外汇-MT4-EA(选自国外外汇论坛)---Primus_EA.doc

#property copyright 华利宝理财 QQ:9695905#property link #include #import Primeval.dll double fun001(double a0, int a1, double a2, int a3, int a4, double a5, double a6, double a7, int a8, double a9, double a10, double a11); int fun002(int a0, int a1, double a2, int a3, double a4, int a5, int a6, double a7, int a8, double a9, double a10, double a11, double a12, double a13, double a14); bool fun003(int a0, int a1, int a2, int a3, int a4); bool fun004(double a0, int a1, double a2, int a3, double a4, double a5); bool fun005(int a0, int a1, int a2, int a3, int a4); void fun006(string a0, int a1, int& a2, int& a3, int& a4, int& a5, double& a6, double& a7, double& a8, double& a9, double& a10, int& a11, int a12); void fun007(double a0, double a1, double a2, double a3, double a4, int a5, int a6, double& a7, double& a8, double& a9, double& a10, int a11, string a12); void fun008(double a0, double a1, double a2, double a3, double a4, int a5, int a6, double& a7, double& a8, double& a9, double& a10, int a11, string a12); bool fun009(double a0, double a1, int a2, double a3, int a4, double a5, double a6, double a7, double a8, int a9); bool fun010(double a0, double a1, int a2, double a3, int a4, double a5, double a6, double a7, double a8, int a9); bool fun011(int a0, int a1, int a2, double a3, double a4, double a5, double a6, int a7, int a8, int a9, int a10, int a11); bool fun012(double a0, double a1, double a2, double a3, double a4); bool fun013(double a0, double a1, double a2, double a3, double a4, double a5, double a6, int a7, int a8, double a9, double a10, double a11, double a12, int a13, double a14, int a15, string a16, string a17, string a18, int a19); bool fun014(double a0, double a1, double a2, double a3, double a4, double a5, double a6, int a7, int a8, double a9, double a10, double a11, double a12, int a13, double a14, int a15, string a16, string a17, string a18, int a19); bool fun015(double a0, double a1, double a2, double a3, double a4, double a5, int a6, int a7, int a8, double a9, double a10, double a11, double a12, int a13, double a14, int a15, string a16, string a17, string a18, int a19); bool fun016(double a0, double a1, double a2, double a3, double a4, double a5, int a6, int a7, int a8, double a9, double a10, double a11, double a12, int a13, double a14, int a15, string a16, string a17, string a18, int a19); bool fun017(double a0, double a1, double a2, double a3, double a4, double a5, int a6, int a7, double a8, double a9, double a10, double a11, int a12, double a13, int a14, string a15, string a16, string a17, int a18); bool fun018(double a0, double a1, double a2, double a3, double a4, double a5, int a6, int a7, double a8, double a9, double a10, double a11, int a12, double a13, int a14, string a15, string a16, string a17, int a18); void fun019(string a0, int& a1, int& a2, int& a3, int& a4, double& a5, int& a6, int& a7, int& a8, int& a9, int& a10, int& a11, int& a12, int& a13, int& a14, int& a15); bool fun020(double a0, double a1, double a2, double a3, double a4, int a5, string a6, string a7, string a8, int a9); bool fun021(double a0, double a1, double a2, double a3, double a4, int a5, string a6, string a7, string a8, int a9); void fun022(string a0, double& a1, double& a2, double& a3, double& a4, double& a5, double& a6, int a7); double fun023(int a0, int a1, double a2, double a3, double a4); bool fun024(double a0, double a1, double a2, double a3, double a4, double a5, double a6, int a7, string a8, string a9, string a10, int a11); bool fun025(double a0, double a1, double a2, double a3, double a4, double a5, double a6, int a7, string a8, string a9, string a10, int a11); void fun026(string a0, int& a1, int& a2, int& a3, int& a4, int& a5, int& a6, int& a7, int& a8, int& a9, double& a10, double& a11, int& a12, int& a13, int& a14); int fun027(string a0, int a1); void fun029(bool a0, double a1, int a2, int& a3, double& a4, double& a5, double& a6, int& a7); int fun030(double a0, double a1, double& a2, double& a3, int& a4, double a5, int& a6, int a7, int& a8, int a9, double a10, int a11, string a12, string a13, string a14, int a15); bool fun031(double& a0, double a1, double a2, int a3, int a4, bool& a5); bool fun032(int a0, double a1, double a2, double a3, int a4, int a5, int a6, double a7); void fun033(double a0, double a1, int a2, double& a3, double& a4, double& a5); bool fun034(double a0, double a1, int a2, double a3, double a4, double a5, int a6, string a7, string a8, string a9, int a10); int fun035(int a0, double a1, double a2, string a3, double a4, double a5, double& a6, int& a7, int& a8); bool fun036(int a0, int a1, double a2, double a3, int a4, double a5, int a6, int a7, int a8, double a9, double a10, int a11, double a12, int a13, string a14, string a15, string a16, int a17); void fun037(int& a0, double a1, int& a2); void fun038(int& a0, double a1, double a2, int& a3); void fun039(double a0, double a1, double a2, double a3, double a4, double a5, int& a6, double a7, int a8, string a9, string a10, string a11, int a12); void fun040(int a0, int a1, double a2, double a3, double a4, int& a5, double a6, int a7, string a8, string a9, string a10, int a11); bool fun041(int a0, double a1, double a2, double a3, double a4, int a5, string a6, string a7, string a8, int a9); bool fun042(int a0, double a1, double a2, double a3, double a4, int a5, string a6, string a7, string a8, int a9); bool fun043(double a0, double a1, double a2, double a3, double a4, int a5, string a6, string a7, string a8, int a9); bool fun044(string a0, int a1, int a2, int a3, int a4, int a5, int a6); string fun045(int a0); void fun046(string a0, int& a1); bool fun000(double a0, int a1, string a2, string a3, string a4, int a5);#import wininet.dll int InternetOpenA(string a0, int a1, string a2, string a3, int a4); int InternetOpenUrlA(int a0, string a1, string a2, int a3, int a4, int a5); int InternetReadFile(int a0, string a1, int a2, int& a3); int InternetCloseHandle(int a0);#importextern string _A = STRATEGY SELECTION;extern bool GBPUSD_Hedging_Strategy = FALSE;extern bool EURCHF_Grid_Strategy = FALSE;extern string _B = TIME MANAGEMENT;extern bool UseAutoGMTOffset = TRUE;extern int ManualGMTOffset = 2;int gi_108 = -100;extern string _C = ORDER MANAGEMENT;extern bool MoneyManagement = TRUE;extern double LotSize = 0.1;extern double MinLots = 0.01;extern double MaxLots = 100.0;extern bool TradeMicroLots = TRUE;extern string _D = RISK MANAGEMENT;extern int RiskLevel = 10;extern string _E = SYSTEM PARAMETERS;extern bool NFA_Compliant = FALSE;extern bool EnableTrading = TRUE;extern bool GBPUSD_Hedging_CloseAll = FALSE;extern double Slippage = 2.0;extern double MaxSpread = 8.0;extern int MarginCutOffPercent = 60;extern bool SendEmail = FALSE;extern bool SendTradingStatistics = FALSE;extern int TradingStatisticsHour = 15;extern string ExpertComment = Primeval-EA;extern string _F = MANUAL TRADES;extern bool EnableClosingManualTrades = FALSE;extern bool EnableTrailingStops = TRUE;extern int TrailingStopStart = 14;extern int TrailingStopPriceSteps = 2;extern int TrailingStopPosSteps = 1;extern string _G = ORDERS ALERTS;extern bool SoundAlert = TRUE;extern string SoundFileAtBuy = alert.wav;extern string SoundFileAtSell = alert.wav;extern string SoundFileAtClose = ok.wav;int g_color_288 = Green;int g_color_292 = Red;int g_color_296 = Violet;extern string _H = EA REGISTRATION;extern double KEY = 2010.0;string gs_316;double g_spread_324;int g_ticket_332 = -1;bool gi_336 = TRUE;int gi_340;int gi_344 = 5;int gi_348 = 15;bool gi_352 = FALSE;int gi_356 = 0;int gi_unused_360 = 25;int gi_unused_364 = 20;int gi_unused_368 = 35;int gi_unused_372 = 30;string gs_unused_376 = Wingdings;int gi_unused_384 = 15;int g_fontsize_388 = 8;string gs_tacoma_392 = Tacoma;int g_color_400 = White;int gi_unused_404 = 221;int gi_unused_408 = 222;int gi_unused_412 = 163;int gi_unused_416 = 32768;int gi_unused_420 = 255;int gi_unused_424 = 0;bool gi_428 = TRUE;double gd_432;double gd_440;double g_lotstep_448;double gd_456;int g_acc_number_464;string gsa_4683;int g_bool_472;bool gi_476 = FALSE;bool gi_480 = FALSE;bool gi_484 = TRUE;int gi_488 = 10;int gi_492 = 35;int gi_496 = 5;int gi_500 = 5;bool gi_504 = TRUE;bool gi_508 = FALSE;int g_magic_512 = 19851031;double gda_51654;int gi_520 = 8;int gi_524 = 17;int gi_528 = 20;int gi_532 = 29;int gi_536 = 37;int g_period_540 = 11;int g_period_544 = 38;double gd_548 = 53.0;double gd_556 = 48.0;double g_lots_564;bool gba_5722;int gi_576 = 90;int gi_580 = 0;int gi_584 = -14;int gi_588 = 8100;int gi_592 = 10800;int gi_596 = 12600;int gi_600 = 20;int gi_604 = 0;int g_magic_608 = -1264664266;int gi_612;double gd_616;string g_symbol_624;int gi_632;int gi_636;int gi_unused_640;int gi_unused_644;int gi_648;int gi_652;int gi_656;int gi_660;int gi_664;int gi_668;int gi_672;int gi_676;int gi_680;int gi_684;int gi_688;int gi_692;int gi_696;int gi_700;int gi_704;double gd_708;double gd_716;double gd_724;double gd_732;double gd_740;double gd_748;double gd_756;double gd_764;int gi_772 = 1;int gi_776 = 30;int gi_780 = 15;int gi_784 = 22;int gi_788 = 24;double gd_792 = 70.0;double gd_800 = 64.0;double gd_808 = 30.0;double gd_816 = 36.0;double gd_824 = 100.15;int g_magic_832 = 784610;int g_magic_836 = 1331580;int gi_unused_840 = 1;int gi_844 = 2;double gd_848 = 0.0001;double gd_unused_856 = 4.0;bool gi_864 = TRUE;bool gi_868 = TRUE;double gd_872 = 32.0;int gi_880 = 32;int gi_884 = 15;bool gi_888 = TRUE;bool gi_892 = TRUE;bool gi_896 = TRUE;bool gi_900 = TRUE;bool gi_904 = TRUE;bool gi_908 = TRUE;int gi_912 = 0;int g_count_916 = 0;int g_count_920 = 0;int g_count_924 = 0;int g_count_928 = 0;int g_count_932 = 0;double gd_unused_936 = 0.0;double gd_944 = 0.0;int gi_952 = 0;double gd_956 = 0.0;int gi_964 = 0;string gs_dummy_968;int g_ticket_976;int g_ticket_980;int g_ticket_984;int g_ticket_988;int g_ticket_992;int g_ticket_996;double g_ifractals_1000;double g_ifractals_1008;double g_ifractals_1016;double g_ifractals_1024;int gi_1032;int gi_1036 = 0;int gi_1044;int g_hour_1048;int gi_1052;int g_stoplevel_1056;double gd_1060;double g_irsi_1068;double g_irsi_1076;double g_icci_1084;double g_ima_1092;int g_shift_1100;double g_ihigh_1104 = 0.0;double g_ilow_1112 = 0.0;int g_ticket_1124 = -1;int g_ticket_1128 = -1;int g_datetime_1132 = 0;int g_datetime_1136 = 0;int gi_1140 = 45;int gia_1144500;int gi_1148;double gda_115285;double gda_115685;int gia_116085;int gi_1164 = 0;int gi_1168 = 0;double gd_1172 = 0.0;int gi_1180 = 80;bool gi_1184 = FALSE;double gd_1188;double gd_1196;int g_magic_1204 = 87851;int g_magic_1208 = 87861;string g_var_name_1212 = PRIMEVAL_GLOBAL_VAR_0;string g_var_name_1220 = PRIMEVAL_GLOBAL_VAR_1;string g_var_name_1228 = PRIMEVAL_GLOBAL_VAR_2;string g_var_name_1236 = PRIMEVAL_GLOBAL_VAR_3;string g_var_name_1244 = PRIMEVAL_GLOBAL_VAR_4;string g_var_name_1252 = PRIMEVAL_GLOBAL_VAR_5;string g_var_name_1260 = PRIMEVAL_GLOBAL_VAR_6;string g_var_name_1268 = PRIMEVAL_GLOBAL_VAR_7;string g_var_name_1276 = PRIMEVAL_GLOBAL_VAR_8;string g_var_name_1284 = PRIMEVAL_GLOBAL_VAR_9;string g_var_name_1292 = PRIMEVAL_GLOBAL_VAR_10;string gs_1300 = PRIMEVAL_GLOBAL_VAR_11;string gs_1308 = PRIMEVAL_GLOBAL_VAR_12;string g_var_name_1316 = PRIMEVAL_GLOBAL_VAR_13;string g_var_name_1324 = PRIMEVAL_GLOBAL_VAR_14;string g_var_name_1332 = PRIMEVAL_GLOBAL_VAR_15;string gs_1340 = PRIMEVAL_GLOBAL_VAR_16;string gs_1348 = PRIMEVAL_GLOBAL_VAR_17;string g_var_name_1356 = PRIMEVAL_GLOBAL_VAR_18;string g_var_name_1364 = PRIMEVAL_GLOBAL_VAR_19;double g_global_var_1372;double g_global_var_1380;double g_lots_1388;double g_lots_1396;int g_global_var_1404 = 0;int g_global_var_1408 = 0;int gi_1412 = 0;int gi_1416 = 0;double g_global_var_1420;int g_global_var_1428 = 0;int g_global_var_1432 = 0;int g_global_var_1436 = 0;int g_global_var_1440 = 0;int gi_1444 = 0;int gi_1448 = 0;int gi_1452 = 0;bool gi_1456;bool gi_1460;double g_iadx_1464;double g_iadx_1472;double gd_1480;double g_ima_1488;double gd_1496;double gd_1504;double gd_1512;double g_ima_1520;double gd_1528;double gd_1536;double g_ima_1544;double g_ima_1552;int g_global_var_1560;int g_global_var_1564;int g_global_var_1568;int g_global_var_1572;double gd_1576;int gi_1584;double gd_1588;double gd_1596;int g_count_1604;bool gi_1608 = FALSE;bool gi_1612 = FALSE;bool gi_1616 = TRUE;int gi_1620 = 200;int gi_1624 = 160;double gd_1628;double gd_1636;double gd_1644;double gd_1652;double gd_1660;double gd_1668;double gd_unused_1676;int g_period_1684 = 1;int g_period_1688 = 11;string gs_1692 = /primeval/GetAutoGMTOffset?hour=;string gs_1700 = WinInet GMT;int gi_1708 = -1;double g_ord_open_price_1712 = 0.0;double g_ord_open_price_1720;double g_ord_open_price_1728 = 0.0;double g_ord_open_price_1736;int g_count_1744 = 0;int g_count_1748 = 0;int g_datetime_1752 = 0;int nyusgfj(int a_ticket_0, double a_price_4, double a_price_12, double a_price_20) int l_error_32; bool l_bool_36 = FALSE; int l_count_28 = 0; while (l_count_28 0/* NO_ERROR */) l_count_28+; return (l_bool_36);bool piwejansmj(int a_ticket_0) int l_error_8; bool li_ret_12 = FALSE; if (!OrderSelect(a_ticket_0, SELECT_BY_TICKET) return (FALSE); int l_count_4 = 0; if (OrderType() = OP_BUY | OrderType() = OP_SELL) while (l_count_4 0/* NO_ERROR */) l_count_4+; else li_ret_12 = OrderDelete(a_ticket_0); if (li_ret_12) if (SoundAlert) PlaySound(SoundFileAtClose); if (SendEmail) Send_Email(a_ticket_0, CLOSE); return (li_ret_12);void Send_Email(int a_ticket_0, string a