海龟交易代码java_[转载]海龟交易系统 MT4 源码

//+------------------------------------------------------------------+

//| GoHan Turtle Trader.mq4 |

//| Copyright ?2008, gohanforex.com |

//| http://www.gohanforex.com |

//+------------------------------------------------------------------+

#property copyright "Copyright ?2008, gohanforex.com"

#property

link "http://www.gohanforex.com"

extern color LabelColor=White;

extern int LabelFontSize=8;

extern color S1LongEntryLineColor=Blue;

extern color S2LongEntryLineColor=LightBlue;

extern color S1andS2LongEntryLineColor=Lime;

extern color S1ExitLinesColor=Yellow;

extern color S1ShortEntryLineColor=Red;

extern color S2ShortEntryLineColor=Pink;

extern color S1andS2ShortEntryLineColor=Orange;

int MaxCommentsToShow=25;

string allcomments[];

datetime lastcheck;

bool periodOK=false;

int MagicNumber=12345;

int S1Periods=20;

int S2Periods=55;

double S1LongEntry=0;

double S1ShortEntry=0;

double S2LongEntry=0;

double S2ShortEntry=0;

double S1LongExit=0;

double S1ShortExit=0;

double S2LongExit=0;

double S2ShortExit=0;

int S1LongEntryBar=0;

int S1ShortEntryBar=0;

int S2LongEntryBar=0;

int S2ShortEntryBar=0;

int S1LongExitBar=0;

int S1ShortExitBar=0;

double HighPriceArray[];

double LowPriceArray[];

double CurrentATR;

double UnitSizing;

double TradeRisk=0.01;

int ATRTakeProfitMultiplier=2;

int ATRStopLossMultiplier=2;

//+------------------------------------------------------------------+

//| expert initialization

function |

//+------------------------------------------------------------------+

int init()

{

manageupperstatus("GoHan

Turtles Trader - gohanforex.com, CR 2009");

if(Period()==1440)

{

periodOK=true;

managelowerstatus("http://www.gohanforex.com");

managecomments("Turtle Trading Started");

CalcTurtleValues(); drawentries(S1LongEntry, S2LongEntry, S1ShortEntry, S2ShortEntry,

S1LongExit, S1ShortExit);

}

else

{

periodOK=false;

managelowerstatus("ERROR: This scanner must be used on a