跟单EA MT4.doc

#property copyright 由联邦基金提供QQ:462079360#property link /extern string 是否跟注释参数 = 如果跟就选择 true,不跟就选择 false;extern bool 是否跟注释 = TRUE;extern string 是否跟挂单参数 = 如果跟就选择 true,不跟就选择 false;extern bool 是否跟挂单 = TRUE;extern bool 是否跟修改定单 = TRUE;extern bool 是否最优价跟单 = FALSE;extern double 最优价几个点 = 0.0;extern string temp1 = -;extern string 跟单下单量类型参数 = 1 为固定下单量, 2为缩放下单量, 3为资金比例;extern int 跟单下单量类型 = 2;extern double 固定下单量 = 0.1;extern string 缩放倍数参数 = 下单量缩放倍数 = 跟单手数/喊单手数;extern double 下单量缩放倍数 = 1.0;extern string 资金比例参数 = 资金比例:1000下1标准手 为100%;extern double 资金比例 = 10.0;extern string temp2 = -;extern string 是否有黄金商品参数 = 如果有就选择 true,否则选择 false;extern bool 是否有黄金商品 = FALSE;extern string 喊单帐户黄金商品名称参数 = 黄金商品名称如 GOLD ,XAUUSD ,SPT_GLD 等等 注意字母必须是大写;extern string 喊单帐户黄金商品名称 = XAUUSD;extern string 跟单帐户黄金商品名称 = XAUUSD;int gia_220;bool gi_224;double gd_228;double g_lotstep_236;double gd_244;double gd_252;int g_slippage_260 = 5;int g_slippage_264 = 5;int gi_268;string gs_272;string gs_280;int gia_288;int gi_292;int gi_296;double gd_300;double gd_308;bool gi_316;int g_file_320;int g_count_324;int g_index_328;int g_index_332;int g_index_336;double gd_340;double gda_348;double g_order_stoploss_352;double gda_360;double gd_364;double g_order_takeprofit_372;double gda_380;double gd_384;double gda_392;string gsa_396;string gs_400;string gs_408;string gsa_416;double g_ask_420;double g_bid_428;double gd_436;double g_point_444;double gd_452;double gd_460;bool g_bool_468;bool gi_472;bool g_bool_476;bool gi_480;bool gi_484;bool g_bool_488;bool g_bool_492;bool g_bool_496;int gi_500;string gs_504 = ;string gs_512 = ;string gs_520 = ;void init() gd_460 = 最优价几个点; g_bool_476 = 是否最优价跟单; gd_228 = 下单量缩放倍数; gs_512 = 喊单帐户黄金商品名称; gs_504 = 跟单帐户黄金商品名称; gi_500 = 跟单下单量类型; g_bool_468 = 是否跟修改定单; g_bool_488 = 是否有黄金商品; g_bool_492 = 是否跟注释; g_bool_496 = 是否跟挂单; ArrayResize(gsa_396, 100); ArrayResize(gia_288, 100); ArrayResize(gda_392, 100); ArrayResize(gda_348, 100); ArrayResize(gda_360, 100); ArrayResize(gda_380, 100); ArrayResize(gia_220, 100); for (g_count_324 = 0; g_count_324 0) gs_520 = StringSubstr(Symbol(), 6, gi_296); g_lotstep_236 = MarketInfo(Symbol(), MODE_LOTSTEP); gd_244 = MarketInfo(Symbol(), MODE_MINLOT); gd_252 = MarketInfo(Symbol(), MODE_MAXLOT); if (g_lotstep_236 = 0.01) gi_268 = 2; if (g_lotstep_236 = 0.1) gi_268 = 1; g_file_320 = FileOpen(mySendOrder.TXT, FILE_CSV|FILE_READ); if (g_file_320 0) g_file_320 = FileOpen(mySendOrder.TXT, FILE_CSV|FILE_WRITE); FileWrite(g_file_320, 1268019531;AUDUSD;10;0;0;0;1268019453;); FileClose(g_file_320); gs_280 = FileReadNumber(g_file_320); Print(联邦基金 远程本地跟单系统); ObjectCreate(Gendan, OBJ_LABEL, 0, 0, 0); ObjectSet(Gendan, OBJPROP_XDISTANCE, 10); ObjectSet(Gendan, OBJPROP_YDISTANCE, 15); ObjectSetText(Gendan, 联邦基金 远程本地智能跟单系统, 16, 宋体, White); ObjectCreate(Gendan1, OBJ_LABEL, 0, 0, 0); ObjectSet(Gendan1, OBJPROP_XDISTANCE, 10); ObjectSet(Gendan1, OBJPROP_YDISTANCE, 55); ObjectSetText(Gendan1, 禁止使用此图表进行分析交易!, 16, 宋体, White); ObjectCreate(Gendan2, OBJ_LABEL, 0, 0, 0); ObjectSet(Gendan2, OBJPROP_XDISTANCE, 10); ObjectSet(Gendan2, OBJPROP_YDISTANCE, 95); ObjectSetText(Gendan2, 跟单EA运行中., 16, 宋体, White); Print(可以开始跟单了!); while (true) gi_472 = TRUE; RefreshRates(); FileSeek(g_file_320, 0, SEEK_SET); gs_272 = FileReadNumber(g_file_320); if (gs_272 != gs_280) gs_400 = FileReadString(g_file_320); gi_292 = FileReadNumber(g_file_320); gd_308 = FileReadNumber(g_file_320); gd_340 = FileReadNumber(g_file_320); gd_364 = FileReadNumber(g_file_320); gd_384 = FileReadNumber(g_file_320); gi_224 = FileReadNumber(g_file_320); gs_408 = FileReadString(g_file_320); if (gs_400 = gs_512) if (g_bool_488) gs_400 = gs_504; else gi_224 = FALSE; else gs_400 = StringSubstr(gs_400, 0, 6) + gs_520; if (gi_500 = 1) gd_300 = 固定下单量; if (gi_500 = 2) gd_300 = NormalizeDouble(gd_308 * gd_228, gi_268); if (gi_500 = 3) gd_300 = NormalizeDouble(资金比例 * AccountBalance() / MarketInfo(Symbol(), MODE_LOTSIZE), gi_268); if (gd_300 gd_252) gd_300 = gd_252; gi_480 = FALSE; for (g_index_328 = 0; g_index_328 100; g_index_328+) if (gia_220g_index_328 = gi_224) if (gi_292 = 10 & gia_288g_index_328 != 16) gia_220g_index_328 = 0; gi_480 = TRUE; break; if (gi_292 = 16) gda_360g_index_328 = gd_364; gda_380g_index_328 = gd_384; gi_480 = TRUE; break; if (!gi_480 & gi_292 != 16) | (g_bool_468 & gi_292 = 16) for (g_index_332 = 0; g_index_332 100; g_index_332+) if (gia_220g_index_332 = 0) gsa_396g_index_332 = gs_400; gia_288g_index_332 = gi_292; gda_392g_index_332 = gd_300; gda_348g_index_332 = gd_340; gda_360g_index_332 = gd_364; gda_380g_index_332 = gd_384; gia_220g_index_332 = gi_224; if (g_bool_492 = TRUE) gsa_416g_index_332 = gs_408; break; gsa_416g_index_332 = ; break; gs_280 = gs_272; if (!IsTradeContextBusy() & IsConnected() for (g_index_336 = 0; g_index_336 = gd_460 * g_point_444) gi_316 = OrderSend(gsa_396g_index_336, OP_BUY, gda_392g_index_336, g_ask_420, g_slippage_264, 0, 0, gsa_416g_index_336, gia_220g_index_336, 0, Blue); if (gi_316 0) gia_288g_index_336 = 16; if (gda_360g_index_336 = 0.0 & gda_380g_index_336 = 0.0) gia_220g_index_336 = 0; if (gia_288g_index_336 = 1) if (!g_bool_476 | (g_bool_476 & g_bid_428 - gda_348g_index_336 = gd_460 * g_point_444) gi_316 = OrderSend(gsa_396g_index_336, OP_SELL, gda_392g_index_336, g_bid_428, g_slippage_264, 0, 0, gsa_416g_index_336, gia_220g_index_336, 0, Red); if (gi_316 0) gia_288g_index_336 = 16; if (gda_360g_index_336 = 0.0 & gda_380g_index_336 = 0.0) gia_220g_index_336 = 0; if (gia_288g_index_336 = 2 & g_bool_496 = TRUE) gi_316 = OrderSend(gsa_396g_index_336, OP_BUYLIMIT, gda_392g_index_336, gda_348g_index_336, 0, 0, 0, gsa_416g_index_336, gia_220g_index_336, 0, Blue); if (gi_316 0) gia_288g_index_336 = 16; if (gda_360g_index_336 = 0.0 & gda_380g_index_336 = 0.0) gia_220g_index_336 = 0; if (gia_288g_index_336 = 3 & g_bool_496 = TRUE) gi_316 = OrderSend(gsa_396g_index_336, OP_SELLLIMIT, gda_392g_index_336, gda_348g_index_336, 0, 0, 0, gsa_416g_index_336, gia_220g_index_336, 0, Red); if (gi_316 0) gia_288g_index_336 = 16; if (gda_360g_index_336 = 0.0 & gda_380g_index_336 = 0.0) gia_220g_index_336 = 0; if (gia_288g_index_336 = 4 & g_bool_496 = TRUE) gi_316 = OrderSend(gsa_396g_index_336, OP_BUYSTOP, gda_392g_index_336, gda_348g_index_336, 0, 0, 0, gsa_416g_index_336, gia_220g_index_336, 0, Blue); if (gi_316 0) gia_288g_index_336 = 16; if (gda_360g_index_336 = 0.0 & gda_380g_index_336 = 0.0) gia_220g_index_336 = 0; if (gia_288g_index_336 = 5 & g_bool_496 = TRUE) gi_316 = OrderSend(gsa_396g_index_336, OP_SELLSTOP, gda_392g_index_336, gda_348g_index_336, 0, 0, 0, gsa_416g_index_336, gia_220g_index_336, 0, Red); if (gi_316 0) gia_288g_index_336 = 16; if (gda_360g_index_336 = 0.0 & gda_380g_index_336 = 0.0) gia_220g_index_336 = 0; if (gia_288g_index_336 = 10) gi_484 = FALSE; for (int pos_0 = OrdersTotal() - 1; pos_0 = 0; pos_0-) OrderSelect(pos_0, SELECT_BY_POS, MODE_TRADES); if (OrderMagicNumber() = gia_220g_index_336) gi_484 = TRUE; gi_316 = OrderClose(OrderTicket(), OrderLots(), OrderClosePrice(), g_slippage_260, PaleVioletRed); if (OrderType() OP_SELL) if (OrderDelete(OrderTicket() gia_220g_index_336 = 0; break; if (gi_316 0) gia_220g_index_336 = 0; break; if (!gi_484) gia_220g_index_336 = 0; if (gia_288g_index_336 = 16) gi_484 = FALSE; for (pos_0 = OrdersTotal() - 1; pos_0 = 0; pos_0-) OrderSelect(pos_0, SELECT_BY_POS, MODE_TRADES); if (OrderMagicNumber() = gia_220g_index_336) gi_484 = TRUE; g_order_stoploss_352 = OrderStopLoss(); g_order_takeprofit_372 = OrderTakeProfit(); gd_452 = gd_436 * g_point_444; if (OrderType() = OP_BUY) if (g_bid_428 - gda_360g_index_336 gd_452) g_order_stoploss_352 = gda_360g_index_336; if (gda_380g_index_336 - g_bid_428 gd_452) g_order_takeprofit_372 = gda_380g_index_336; if (OrderType() = OP_BUYLIMIT) if (g_bid_428 - gda_360g_index_336 gd_452) g_order_stoploss_352 = gda_360g_index_336; if (gda_380g_index_336 - g_bid_428 gd_452) g_order_takeprofit_372 = gda_380g_index_336; if (OrderType() = OP_BUYSTOP) if (g_bid_428 - gda_360g_index_336 gd_452) g_order_stoploss_352 = gda_360g_index_336; if (gda_380g_index_336 - g_bid_428 gd_452) g_order_takeprofit_372 = gda_380g_index_336; if (OrderType() = OP_SELL) if (gda_360g_index_336 - g_ask_420 gd_452) g_order_stoploss_352 = gda_360g_index_336; if (g_ask_420 - gda_380g_index_336