外匯-MT4-EA(選自國外外匯論壇)---Dragonpips.doc

#property copyright Copyright QQ:9695905#property link bool gi_76 = TRUE;bool gi_80 = TRUE;bool gi_84 = TRUE;bool gi_88 = TRUE;extern string Owner = C.E.M.P.L.O.N;extern string TradingTime = - Fxopen 23-1 Insta 24-2 Tadawulfx 22-24-;extern int OpenHour = 22;extern int CloseHour = 4;extern double Lots = 0.1;extern double MaxLots = 100.0;extern string lotsOptimizedInfo = - False if your balance under $1000 standard account with start Lots 0.1-;extern bool LotsOptimized = TRUE;extern string LotDecimalInfo = Insta or Ibfx set to 2;extern int LotDecimal = 1;extern int Risk = 50;extern int MaxTrades = 5;double gd_164 = 0.0001;extern string BrokerSpread = - Set spread not over than 4 -;extern double Spread = 3.0;bool gi_188 = TRUE;bool gi_192 = TRUE;double gd_196 = 6.0;double gd_204 = 32.0;int g_slippage_212 = 3;int gi_216 = 32;int gi_220 = 15;int gi_224 = 3;bool gi_228 = TRUE;int g_magic_232 = 371443;int g_magic_236 = 3714431;int g_magic_240 = 3714432;int g_magic_244 = 3714433;int gi_248 = 60;int gi_252 = 3;int gi_256 = 140;int gi_260 = 2;int gi_264 = 170;int gi_268 = 1;int gi_272 = 200;int gi_276 = 1;int gi_280 = 240;int gi_284 = 4;bool gi_288 = TRUE;double gd_292 = 0.001;double gd_300 = 0.001;double gd_308 = 0.0012;int gi_316 = 55;bool gi_320 = TRUE;bool gi_324 = TRUE;bool gi_328 = TRUE;bool gi_332 = TRUE;bool gi_336 = TRUE;bool gi_340 = TRUE;bool gi_344 = TRUE;bool gi_348 = TRUE;double g_minlot_352 = 0.0;double g_maxlot_360 = 0.0;int gi_368 = 0;int g_leverage_372 = 0;double g_lots_376;double g_lots_384;int g_ticket_392 = 0;int g_count_396 = 0;int g_count_400 = 0;int g_count_404 = 0;int g_count_408 = 0;int g_count_412 = 0;int gi_416 = 0;int gi_420 = 0;int gi_424 = 0;int gi_428 = 0;int gi_432 = 0;int gi_436 = 0;int gi_440 = 0;int gi_444 = 0;int gi_448 = 0;int gi_452 = 0;double g_ord_open_price_456 = 0.0;double g_ord_open_price_464 = 0.0;double g_ord_open_price_472 = 0.0;double g_ord_open_price_480 = 0.0;double g_ord_open_price_488 = 0.0;double g_ord_open_price_496 = 0.0;double g_ord_open_price_504 = 0.0;double g_ord_open_price_512 = 0.0;double g_ord_open_price_520 = 0.0;double g_ord_open_price_528 = 0.0;double g_price_552 = 0.0;double g_price_560 = 0.0;double g_ifractals_568;double g_ifractals_576;double gd_unused_584;double gd_unused_592;double g_ifractals_600;double g_ifractals_608;double gd_unused_616;double gd_unused_624;int gi_632 = 0;int gi_unused_636 = 0;double gd_640 = 0.0;int gi_648 = 0;string gs_652 = DragonPips;bool gi_660 = FALSE;bool gi_664 = FALSE;double gd_668 = 0.0;double gd_676 = 0.0;double gd_684 = 0.0;double gd_692 = 0.0;double gd_700 = 0.0;double gd_708 = 0.0;double gd_716 = 0.0;double gd_724 = 0.0;double gd_732 = 0.0;double gd_740 = 0.0;double gd_748 = 0.0;double gd_756 = 0.0;double gd_764 = 0.0;double gd_772 = 0.0;double gd_780 = 0.0;double gd_788 = 0.0;int gi_unused_796 = 0;int gi_unused_800 = 0;int gi_unused_804 = 0;int gi_unused_808 = 0;int gi_unused_812 = 0;int gi_unused_816 = 0;int gi_unused_820 = 0;double gd_824 = 0.0;double gd_832 = 0.0;double gd_840 = 0.0;double gd_848 = 0.0;double gd_864 = 0.0;double gd_872 = 0.0;double gd_880 = 0.0;double gd_888 = 0.0;double gd_896 = 0.0;double gd_904 = 0.0;double gd_912 = 0.0;double gd_920 = 0.0;double gd_928 = 0.0;double gd_936 = 0.0;double gd_944 = 0.0;double gd_952 = 0.0;double gd_960 = 0.0;double gd_968 = 0.0;double gd_976 = 0.0;double gd_984 = 0.0;double gd_992 = 0.0;double gd_1000 = 0.0;double gd_unused_1008 = 0.0;double gd_unused_1016 = 0.0;double gd_unused_1024 = 0.0;double gd_1032 = 0.0;double gd_1040 = 0.0;double gd_1048 = 0.0;double gd_1056;double gd_1064 = 0.0;double gd_1072 = 0.0;double gd_1080 = 0.0;double gd_1088 = 0.0;double gd_1096 = 0.0;double gd_1104 = 0.0;double gd_1112 = 0.0;int init() return (0);int deinit() return (0);int start() HideTestIndicators(TRUE); findMyOrders(); onScreenComment(98); g_price_552 = gd_196; g_price_560 = 0; for (int li_0 = 1; li_0 Bars; li_0+) if (iFractals(NULL, PERIOD_M15, MODE_UPPER, li_0) != 0.0) g_ifractals_568 = iFractals(NULL, PERIOD_M15, MODE_UPPER, li_0); gd_unused_592 = Timeli_0; break; for (int li_4 = 1; li_4 Bars; li_4+) if (iFractals(NULL, PERIOD_M15, MODE_LOWER, li_4) != 0.0) g_ifractals_576 = iFractals(NULL, PERIOD_M15, MODE_LOWER, li_4); gd_unused_584 = Timeli_4; break; for (int li_8 = 1; li_8 Bars; li_8+) if (iFractals(NULL, PERIOD_H1, MODE_UPPER, li_8) != 0.0) g_ifractals_600 = iFractals(NULL, PERIOD_H1, MODE_UPPER, li_8); gd_unused_624 = Timeli_8; break; for (int li_12 = 1; li_12 Bars; li_12+) if (iFractals(NULL, PERIOD_H1, MODE_LOWER, li_12) != 0.0) g_ifractals_608 = iFractals(NULL, PERIOD_H1, MODE_LOWER, li_12); gd_unused_616 = Timeli_4; break; gi_632 = MathRound(g_ifractals_568 - g_ifractals_576) / gd_164); gi_unused_636 = MathRound(g_ifractals_600 - g_ifractals_608) / gd_164); gd_640 = 0; gd_640 = g_ifractals_568 - (g_ifractals_568 - g_ifractals_576) / 2.0; gi_648 = MathRound(iATR(Symbol(), PERIOD_M15, 4, 0) / gd_164); bool li_16 = FALSE; if (Close0 = g_ifractals_608) li_16 = TRUE; g_count_396 = 0; g_count_400 = 0; g_count_404 = 0; g_count_408 = 0; g_count_412 = 0; gi_416 = 0.0; gi_420 = 0.0; gi_424 = 0.0; gi_428 = 0.0; gi_432 = 0.0; gi_436 = 0.0; gi_440 = 0.0; gi_444 = 0.0; gi_448 = 0.0; gi_452 = 0.0; g_ord_open_price_456 = 0.0; g_ord_open_price_464 = 0.0; g_ord_open_price_472 = 0.0; g_ord_open_price_480 = 0.0; g_ord_open_price_488 = 0.0; g_ord_open_price_496 = 0.0; g_ord_open_price_504 = 0.0; g_ord_open_price_512 = 0.0; g_ord_open_price_520 = 0.0; g_ord_open_price_528 = 0.0; for (int l_pos_20 = 0; l_pos_20 OrdersTotal(); l_pos_20+) OrderSelect(l_pos_20, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() = Symbol() & OrderMagicNumber() = g_magic_232 | OrderMagicNumber() = g_magic_236 | OrderMagicNumber() = g_magic_240 | OrderMagicNumber() = g_magic_244) g_count_396+; if (OrderType() = OP_BUY) gi_436+; g_ord_open_price_496 = OrderOpenPrice(); if (OrderType() = OP_SELL) gi_416+; g_ord_open_price_456 = OrderOpenPrice(); else if (OrderSymbol() = Symbol() & OrderMagicNumber() = g_magic_232) g_count_400+; if (OrderType() = OP_BUY) gi_440+; g_ord_open_price_504 = OrderOpenPrice(); if (OrderType() = OP_SELL) gi_420+; g_ord_open_price_464 = OrderOpenPrice(); else if (OrderSymbol() = Symbol() & OrderMagicNumber() = g_magic_236) g_count_404+; if (OrderType() = OP_BUY) gi_444+; g_ord_open_price_512 = OrderOpenPrice(); if (OrderType() = OP_SELL) gi_424+; g_ord_open_price_472 = OrderOpenPrice(); else if (OrderSymbol() = Symbol() & OrderMagicNumber() = g_magic_240) g_count_408+; if (OrderType() = OP_BUY) gi_448+; g_ord_open_price_520 = OrderOpenPrice(); if (OrderType() = OP_SELL) gi_428+; g_ord_open_price_480 = OrderOpenPrice(); else if (OrderSymbol() = Symbol() & OrderMagicNumber() = g_magic_244) g_count_412+; if (OrderType() = OP_BUY) gi_452+; g_ord_open_price_528 = OrderOpenPrice(); if (OrderType() = OP_SELL) gi_432+; g_ord_open_price_488 = OrderOpenPrice(); if (gi_188 = TRUE) for (int l_pos_24 = 0; l_pos_24 = OrderOpenPrice() + gd_196 * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); if (OrderType() = OP_BUY & OrderMagicNumber() = g_magic_236) if (Bid = OrderOpenPrice() + (gd_196 - 2.0) * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); if (OrderType() = OP_BUY & OrderMagicNumber() = g_magic_240) if (Bid = OrderOpenPrice() + (gd_196 - 1.0) * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); if (OrderType() = OP_BUY & OrderMagicNumber() = g_magic_244) if (Bid = OrderOpenPrice() + (gd_196 - 2.0) * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); if (OrderType() = OP_SELL & OrderMagicNumber() = g_magic_232) if (Ask = OrderOpenPrice() - gd_196 * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Ask, g_slippage_212, Orange); if (OrderType() = OP_SELL & OrderMagicNumber() = g_magic_236) if (Ask = OrderOpenPrice() - (gd_196 - 2.0) * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Ask, g_slippage_212, Orange); if (OrderType() = OP_SELL & OrderMagicNumber() = g_magic_240) if (Ask = OrderOpenPrice() - (gd_196 - 1.0) * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Ask, g_slippage_212, Orange); if (OrderType() = OP_SELL & OrderMagicNumber() = g_magic_244) if (Ask = OrderOpenPrice() - (gd_196 - 2.0) * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Ask, g_slippage_212, Orange); if (gi_228 = TRUE) for (int l_pos_28 = 0; l_pos_28 60 * gi_248 & TimeCurrent() - OrderOpenTime() = OrderOpenPrice() + gi_252 * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); Print(Prot. Level 1 - Close Price : + DoubleToStr(OrderClosePrice(), 4) + Lots : + DoubleToStr(OrderLots(), 2) + Order Number : + DoubleToStr(OrderTicket(), 0) + Profit : $ + DoubleToStr(OrderProfit(), 2); if (TimeCurrent() - OrderOpenTime() 60 * gi_256 & TimeCurrent() - OrderOpenTime() = OrderOpenPrice() + gi_260 * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); Print(Prot. Level 2 - Close Price : + DoubleToStr(OrderClosePrice(), 4) + Lots : + DoubleToStr(OrderLots(), 2) + Order Number : + DoubleToStr(OrderTicket(), 0) + Profit : $ + DoubleToStr(OrderProfit(), 2); if (TimeCurrent() - OrderOpenTime() 60 * gi_264 & TimeCurrent() - OrderOpenTime() = OrderOpenPrice() + gi_268 * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); Print(Prot. Level 3 - Close Price : + DoubleToStr(OrderClosePrice(), 4) + Lots : + DoubleToStr(OrderLots(), 2) + Order Number : + DoubleToStr(OrderTicket(), 0) + Profit : $ + DoubleToStr(OrderProfit(), 2); if (TimeCurrent() - OrderOpenTime() 60 * gi_272 & TimeCurrent() - OrderOpenTime() = OrderOpenPrice() - gi_276 * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); Print(Prot. Level 4 - Close Price : + DoubleToStr(OrderClosePrice(), 4) + Lots : + DoubleToStr(OrderLots(), 2) + Order Number : + DoubleToStr(OrderTicket(), 0) + Profit : $ + DoubleToStr(OrderProfit(), 2); if (TimeCurrent() - OrderOpenTime() 60 * gi_280 & Bid = OrderOpenPrice() - gi_284 * gd_164) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); Print(Prot. Level 5 - Close Price : + DoubleToStr(OrderClosePrice(), 4) + Lots : + DoubleToStr(OrderLots(), 2) + Order Number : + DoubleToStr(OrderTicket(), 0) + Profit : $ + DoubleToStr(OrderProfit(), 2); if (DayOfWeek() = 5 & Hour() = 19) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Bid, g_slippage_212, Orange); Print(Prot. Level 5 - Close Price : + DoubleToStr(OrderClosePrice(), 4) + Lots : + DoubleToStr(OrderLots(), 2) + Order Number : + DoubleToStr(OrderTicket(), 0) + Profit : $ + DoubleToStr(OrderProfit(), 2); if (OrderType() = OP_SELL & OrderMagicNumber() = g_magic_232 | OrderMagicNumber() = g_magic_236 | OrderMagicNumber() = g_magic_240 | OrderMagicNumber() = g_magic_244) if (TimeCurrent() - OrderOpenTime() 60 * gi_248 & TimeCurrent() - OrderOpenTime() 60 * gi_256 & Ask 60 * gi_256 & TimeCurrent() - OrderOpenTime() 60 * gi_264 & Ask 60 * gi_264 & TimeCurrent() - OrderOpenTime() 60 * gi_272 & Ask 60 * gi_272 & TimeCurrent() - OrderOpenTime() 60 * gi_280 & Ask 60 * gi_280 & Ask = 19) RefreshRates(); OrderClose(OrderTicket(), OrderLots(), Ask, g_slippage_212, Orange); Print(Prot. Level 5 - Close Price : + DoubleToStr(OrderClosePrice(), 4) + Lots : + DoubleToStr(OrderLots(), 2) + Order Number : + DoubleToStr(OrderTicket(), 0) + Profit : $ + DoubleToStr(OrderProfit(), 2); if (gi_288 = TRUE) if (iOpen(Symbol(), PERIOD_M5, 0) = Ask + gd_292) return; if (iOpen(Symbol(), PERIOD_M5, 0) = Ask + gd_300) return; if (iOpen(Symbol(), PERIOD_M5, 1) = Ask +