#property copyright "Copyright ｩ 2008, Kikousi" #property link "http://kikousiroom.web.fc2.com/KikousiRoom.html" #include #include #import "user32.dll" int WindowFromPoint(int a0, int a1); int GetForegroundWindow(); int MessageBoxA(int a0, string a1, string a2, int a3); int GetAsyncKeyState(int a0); bool GetCursorPos(int& a0[]); bool ScreenToClient(int a0, int& a1[]); bool GetClientRect(int a0, int& a1[]); #import extern string TorihikiSettei = "＝＝＝取引設定＝＝＝"; extern double Lots = 0.1; extern int Slip_pips = 5; extern string MAXPOSITION = "＝＝＝最大ポジション保有数設定＝＝＝"; extern int Max_Position = 10; extern string KyouseiLimitSettei = "＝＝＝強制リミット設定＝＝＝"; extern int KyouseiLimit_pips = 20; extern bool K_Limit_Trail_ON = TRUE; extern int K_Limit_Step_pips = 0; extern int K_Limit_Position = 3; extern bool K_Limit_Back = TRUE; extern string KyouseiStopSettei = "＝＝＝強制ストップ設定＝＝＝"; extern int KyouseiStop_pips = 20; extern bool Trail_ON = TRUE; extern int Step_pips = 0; extern string SasineSettei = "＝＝＝指値注文設定＝＝＝"; extern bool S_Trail_ON = TRUE; extern int S_Step_pips = 0; extern int S_Position_pips = 3; extern bool Sasine_Back = TRUE; extern int S_Kyoyou_pips = 1; extern string Position_Settei = "＝＝＝表\示位置設定＝＝＝"; extern string SidePosition = "---左サイド＝０／右サイド＝１---"; extern int Hyouji_Position = 1; extern string Sinshuku = "---縦長表\示＝０／短縮表\示＝１---"; extern int SinshukuHyouji = 1; extern string UekaraPosition = "---チャート上部からの位置---"; extern int UpperPosition = 15; extern string MailSettei = "＝＝＝メール設定（ON/OFF）＝＝＝"; extern bool Mail_ON = FALSE; extern string Hyouji_Settei = "＝＝＝表\示ＯＮ／ＯＦＦ及び色設定＝＝＝"; extern string BaibaiHyouji = "---Entry/Exitポインター表\示(画面上矢印及び破線)---"; extern bool BaiBaiPointer = FALSE; extern string RirekiHyouji = "---操作履歴表\示(画面左上)---"; extern bool SousaRireki = TRUE; extern string Soneki_pips = "---損益表\示（価格表\示＝true／pips表\示＝false）---"; extern bool Kakaku_pips = FALSE; extern string LotSettei = "---ロット数/pips設定---"; extern color LotSettei_Color = Silver; extern color Switch_ON_Color = Orange; extern color Switch_OFF_Color = Olive; extern string Rate_Color = "---レート表\示＆注文---"; extern color Kai_Color1 = Turquoise; extern color Kai_Color2 = Gold; extern color Uri_Color1 = DeepPink; extern color Uri_Color2 = Gold; extern string Position_Color = "---ポジション表\示・決済---"; extern color KaiPoji_Color = DodgerBlue; extern color UriPoji_Color = Crimson; extern color Ikkatu_Kessai = DarkOrange; extern color Kessai_Color = Yellow; extern string Line_Color = "---各種ライン---"; extern color KaiLine_Color = RoyalBlue; extern color UriLine_Color = DeepPink; extern color LimitLine1_Color = Blue; extern color LimitLine2_Color = Aqua; extern color StopLine1_Color = Red; extern color StopLine2_Color = Orange; extern string MT_MC_Select_Color = "---MT MC---"; extern color MT_MC_Color = Lime; extern color EntoryLine_Color = Crimson; int g_magic_400; int gi_404; int g_error_408; int gia_412[]; int gia_416[]; int gia_420[]; int gi_424; int gia_428[2]; int gia_432[4]; int gia_unused_436[9]; int gi_440; int gi_444; int gi_448; int gi_452; int gi_456; int gi_unused_460; int gi_468; int gi_472; int gi_476; int gi_480; int gi_484; int gi_488; int gi_492; int gi_496; int gi_500; int gi_504; int gi_508; int gi_512; int gi_516; int gi_520; int gi_524; int gi_528; int gi_532; int gi_536; int gi_540; int gi_544; int gi_548; int gi_552; int gi_556; int gi_560; int gi_564; int gi_568; int gi_572; int gi_576; int gi_580; int gi_584; int gi_588; int gi_592; int gi_596; int gi_600; int gi_604; int gi_608; int gi_612; int gi_620; int gi_624; int gi_628; int gi_unused_632; int gi_636; int gi_640; int gi_644; int gi_652; int gia_660[]; int gia_664[]; int gia_668[]; double g_ord_open_price_676; double g_price_684; double gd_692; double gd_700; double gd_708; double gd_716; double g_lots_724; double gd_732; double gda_740[]; double gda_744[]; double gda_748[]; double gda_752[]; double gda_unused_756[]; double gd_760; double gda_768[]; double gd_772; double gda_780[][3]; double gda_784[]; double gda_788[10]; double gda_792[10]; double gda_796[10]; double g_price_800; double g_price_808; double g_price_816; double g_price_824; double g_price_832; double g_price_840; double g_price_848; double g_price_856; double gd_864; double gd_872; bool gi_880; bool gi_888; bool g_bool_892; bool gi_896; int gi_unused_900; bool gi_904; bool gi_908; bool gi_912; bool gi_916; bool gi_920; bool gba_924[]; bool gba_928[]; bool gba_932[]; bool gba_936[]; bool gi_940; bool gi_944; bool gi_948; bool gi_952; bool gi_956; bool gi_960; bool gi_964; bool gi_968; bool gi_972 = FALSE; bool gi_976 = FALSE; bool gi_980 = FALSE; bool gi_984 = FALSE; bool gi_988 = FALSE; bool gi_992 = FALSE; bool gi_996 = FALSE; bool gi_1000 = FALSE; bool gi_unused_1004 = FALSE; bool gi_unused_1008 = FALSE; bool gi_unused_1012 = FALSE; bool gi_unused_1016 = FALSE; string gs_1020; string gsa_1028[]; string gs_unused_1032 = " "; string gs_1040; string g_comment_1048; string gsa_1056[3]; string gs_1060; int g_color_1068; int g_color_1072; int g_color_1076; int g_color_1080; int g_color_1084; int g_color_1088; int g_color_1092; int g_color_1096; int g_color_1100; color g_color_1104; color g_color_1108; int gi_1112; color g_color_1116; int gi_1120; color g_color_1124; int g_color_1128; int g_color_1132; int g_color_1136; int gi_1140; int g_color_1144; int g_color_1148; int gi_1152; int hwindow() { return (WindowHandle(Symbol(), 0)); } int cand() { return (WindowFirstVisibleBar()); } double MIA() { RefreshRates(); return (MarketInfo(Symbol(), MODE_ASK)); } double MIB() { RefreshRates(); return (MarketInfo(Symbol(), MODE_BID)); } double minlot() { return (MarketInfo(Symbol(), MODE_MINLOT)); } double maxlot() { return (MarketInfo(Symbol(), MODE_MAXLOT)); } double stplot() { return (MarketInfo(Symbol(), MODE_LOTSTEP)); } double WP_Max() { return (WindowPriceMax()); } double WP_Min() { return (WindowPriceMin()); } void ttcom(int ai_0, string as_4, double ad_12) { gsa_1056[2] = gsa_1056[1]; gsa_1056[1] = gsa_1056[0]; if (ai_0 == 0) gsa_1056[0] = TimeToStr(TimeCurrent(), TIME_SECONDS) + " " + as_4 + " " + DoubleToStr(ad_12, Digits); else { if (ai_0 == 2) gsa_1056[0] = TimeToStr(TimeCurrent(), TIME_SECONDS) + " " + as_4; else gsa_1056[0] = TimeToStr(TimeCurrent(), TIME_SECONDS) + " " + as_4 + " " + DoubleToStr(ad_12, 0); } gs_1060 = gsa_1056[0] + "\n" + gsa_1056[1] + "\n" + gsa_1056[2]; } string chrtext() { return (Symbol() + gs_1020); } void prop() { if (gi_904 && gi_440 > gi_456 - 55 && gi_444 > 0 && gi_440 < gi_456 - 45 && gi_444 < 15 && GetAsyncKeyState(1)) gi_888 = TRUE; if (gi_896 && gi_904 && gi_440 > gi_456 - 120 && gi_444 > 0 && gi_440 < gi_456 - 105 && gi_444 < 15 && GetAsyncKeyState(1)) { if (gi_652 == 0) { gi_652 = 1; gi_584 = 0; gi_592 = -53; } else { if (gi_652 == 1) { gi_652 = 2; if (SinshukuHyouji == FALSE) gi_584 = 0; else gi_584 = 106; } else { gi_652 = 0; gi_584 = 53; gi_592 = 0; } } gi_896 = FALSE; } switch (gi_652) { case 0: hoc(129); return; case 1: hoc(130); return; case 2: hoc(131); return; return; } } void tyuumonrate() { switch (Hyouji_Position) { case 0: gi_484 = gi_584 + 3; gi_488 = gi_584 + 83; gi_492 = gi_584 + 15; gi_496 = gi_584 + 55; gi_500 = gi_584 + 3; gi_504 = gi_584 + 63; gi_604 = UpperPosition + gi_608; gi_508 = gi_584 + 3; gi_512 = gi_584 + 33; gi_516 = gi_584 + 39; gi_520 = gi_584 + 69; gi_524 = gi_584 + 3; gi_528 = gi_584 + 74; gi_532 = gi_584 + 3; gi_536 = gi_584 + 13; gi_540 = gi_584 + 64; gi_544 = gi_584 + 74; gi_548 = gi_592 + 3; gi_552 = gi_592 + 36; gi_556 = gi_592 + 34; gi_560 = gi_592 + 49; gi_564 = gi_592 + 3; gi_568 = gi_592 + 11; gi_572 = gi_592 + 25; gi_576 = gi_592 + 33; break; case 1: gi_484 = gi_456 - 125 - gi_584; gi_488 = gi_456 - 45 - gi_584; gi_492 = gi_456 - 109 - gi_584; gi_496 = gi_456 - 63 - gi_584; gi_500 = gi_456 - 117 - gi_584; gi_504 = gi_456 - 57 - gi_584; gi_604 = UpperPosition; gi_508 = gi_456 - 114 - gi_584; gi_512 = gi_456 - 84 - gi_584; gi_516 = gi_456 - 79 - gi_584; gi_520 = gi_456 - 49 - gi_584; gi_524 = gi_456 - 114 - gi_584; gi_528 = gi_456 - 45 - gi_584; gi_532 = gi_456 - 114 - gi_584; gi_536 = gi_456 - 104 - gi_584; gi_540 = gi_456 - 55 - gi_584; gi_544 = gi_456 - 45 - gi_584; gi_548 = gi_456 - 82 - gi_592; gi_552 = gi_456 - 45 - gi_592; gi_556 = gi_456 - 88 - gi_592; gi_560 = gi_456 - 73 - gi_592; gi_564 = gi_456 - 72 - gi_592; gi_568 = gi_456 - 62 - gi_592; gi_572 = gi_456 - 52 - gi_592; gi_576 = gi_456 - 42 - gi_592; } if (gia_660[Max_Position - 1] == 0) { if (gi_652 != 2 && gi_896 && gi_904 && gi_440 > gi_484 && gi_444 > gi_604 && gi_440 < gi_488 && gi_444 < gi_604 + 20) { g_color_1068 = Kai_Color2; gi_unused_900 = 1; if (GetAsyncKeyState(1) != 0) { gi_896 = FALSE; if (gi_988) { if (gd_700 >= MIA()) { g_comment_1048 = "MT逆指注"; entry(2); } else { g_comment_1048 = "MT指値注"; entry(3); } ObjectDelete("ent"); gi_980 = FALSE; gi_988 = FALSE; } else { if (gi_992) { if (gd_700 >= MIA()) { ObjectSet("ygbuy", OBJPROP_PRICE1, gd_700); gi_unused_1012 = TRUE; } else { ObjectSet("ybuy", OBJPROP_PRICE1, gd_700); gi_unused_1004 = TRUE; } ObjectDelete("ent"); gi_980 = FALSE; gi_992 = FALSE; } else { g_comment_1048 = "成行買"; gi_612 = 1; entry(0); } } } } else { g_color_1068 = Kai_Color1; gi_unused_900 = 1; } if (gi_652 != 2 && !gi_972 && gi_896 && gi_904 && gi_440 > gi_484 && gi_444 > gi_604 + 40 && gi_440 < gi_488 && gi_444 < gi_604 + 60) { g_color_1072 = Uri_Color2; gi_unused_900 = 1; if (GetAsyncKeyState(1) != 0) { gi_896 = FALSE; if (gi_988) { if (gd_700 <= MIB()) { g_comment_1048 = "MT逆指注"; entry(4); } else { g_comment_1048 = "MT指値注"; entry(5); } ObjectDelete("ent"); gi_980 = FALSE; gi_988 = FALSE; } else { if (gi_992) { if (gd_700 <= MIB()) { ObjectSet("ygsell", OBJPROP_PRICE1, gd_700); gi_unused_1016 = TRUE; } else { ObjectSet("ysell", OBJPROP_PRICE1, gd_700); gi_unused_1008 = TRUE; } ObjectDelete("ent"); gi_980 = FALSE; gi_992 = FALSE; } else { g_comment_1048 = "成行売"; gi_612 = 1; entry(1); } } } } else { g_color_1072 = Uri_Color1; gi_unused_900 = 1; } } else { g_color_1068 = DimGray; g_color_1072 = DimGray; } if (gi_896 && !gi_940 && g_price_832 > MIA() - 20.0 * Point && g_price_832 <= MIA()) { gi_896 = FALSE; g_comment_1048 = "逆指値買"; gi_612 = 2; entry(0); yclear(2); } if (gi_896 && !gi_944 && g_price_840 < MIB() + 20.0 * Point && g_price_840 >= MIB()) { gi_896 = FALSE; g_comment_1048 = "逆指値売"; gi_612 = 2; entry(1); yclear(3); } if (S_Trail_ON) { if (gi_896 && gi_956 && g_price_848 > MIB() && g_price_848 - S_Kyoyou_pips * Point <= MIB()) { gi_896 = FALSE; g_comment_1048 = "指値売"; gi_612 = 2; entry(1); yclear(1); } if (gi_896 && gi_960 && g_price_856 < MIA() && g_price_856 + S_Kyoyou_pips * Point >= MIA()) { gi_896 = FALSE; g_comment_1048 = "指値買"; gi_612 = 2; entry(0); yclear(0); } } else { if (gi_896 && !gi_956 && g_price_848 < MIB()) { gi_896 = FALSE; g_comment_1048 = "指値売"; gi_612 = 2; entry(1); yclear(1); } if (gi_896 && !gi_960 && g_price_856 > MIA()) { gi_896 = FALSE; g_comment_1048 = "指値買"; gi_612 = 2; entry(0); yclear(0); } } if (gi_1000 && GlobalVariableGet("Global_MC1auto" + g_magic_400) == 1.0) { if (!gi_996) ttcom(2, "MC1auto Start", !gi_996); gi_996 = TRUE; g_lots_724 = GlobalVariableGet("tGlobal_ilot" + g_magic_400); KyouseiLimit_pips = GlobalVariableGet("tGlobal_KyouseiLimit_pips" + g_magic_400); K_Limit_Trail_ON = GlobalVariableGet("tGlobal_K_Limit_Trail_ON" + g_magic_400); K_Limit_Step_pips = GlobalVariableGet("tGlobal_K_Limit_Step_pips" + g_magic_400); K_Limit_Position = GlobalVariableGet("tGlobal_K_Limit_Position" + g_magic_400); K_Limit_Back = GlobalVariableGet("tGlobal_K_Limit_Back" + g_magic_400); KyouseiStop_pips = GlobalVariableGet("tGlobal_KyouseiStop_pips" + g_magic_400); Trail_ON = GlobalVariableGet("tGlobal_Trail_ON" + g_magic_400); Step_pips = GlobalVariableGet("tGlobal_Step_pips" + g_magic_400); Max_Position = GlobalVariableGet("tGlobal_Max_Position" + g_magic_400); S_Trail_ON = GlobalVariableGet("tGlobal_S_Trail_ON" + g_magic_400); S_Step_pips = GlobalVariableGet("tGlobal_S_Step_pips" + g_magic_400); S_Position_pips = GlobalVariableGet("tGlobal_S_Position_pips" + g_magic_400); Sasine_Back = GlobalVariableGet("tGlobal_Sasine_Back" + g_magic_400); S_Kyoyou_pips = GlobalVariableGet("tGlobal_S_Kyoyou_pips" + g_magic_400); if (GlobalVariableGet("MC1_attach_buy" + g_magic_400) == 1.0) { gi_612 = 1; g_comment_1048 = "Auto Buy"; entry(0); GlobalVariableSet("MC1_attach_buy" + g_magic_400, 0); } else { if (GlobalVariableGet("MC1_attach_sell" + g_magic_400) == 1.0) { gi_612 = 1; g_comment_1048 = "Auto Sell"; entry(1); GlobalVariableSet("MC1_attach_sell" + g_magic_400, 0); } } if (GlobalVariableGet("MC1_attach_sasine_buy" + g_magic_400) == 1.0) { ObjectDelete("ybuy"); ObjectCreate("ybuy", OBJ_TEXT, 0, iTime(Symbol(), 0, gi_480), GlobalVariableGet("MC1_attach_sasine_buy_price" + g_magic_400)); ObjectSetText("ybuy", "買指値", 10, "Terminal", KaiLine_Color); if (ObjectGet("ybuy", OBJPROP_PRICE1) > Close[0]) GlobalVariableSet("MC1_attach_sasine_buy" + g_magic_400, 0); } if (GlobalVariableGet("MC1_attach_sasine_sell" + g_magic_400) == 1.0) { ObjectDelete("ysell"); ObjectCreate("ysell", OBJ_TEXT, 0, iTime(Symbol(), 0, gi_480), GlobalVariableGet("MC1_attach_sasine_sell_price" + g_magic_400)); ObjectSetText("ysell", "売指値", 10, "Terminal", UriLine_Color); if (ObjectGet("ysell", OBJPROP_PRICE1) < Close[0]) GlobalVariableSet("MC1_attach_sasine_sell" + g_magic_400, 0); } } else { if (gi_996 && GlobalVariableGet("Global_MC1auto" + g_magic_400) == 0.0) { ttcom(2, "MC1auto END", gi_996 && GlobalVariableGet("Global_MC1auto" + g_magic_400) == 0.0); gi_996 = FALSE; g_lots_724 = GlobalVariableGet("Global_ilot" + g_magic_400); S_Trail_ON = GlobalVariableGet("Global_S_Trail_ON" + g_magic_400); Sasine_Back = GlobalVariableGet("Global_Sasine_Back" + g_magic_400); K_Limit_Trail_ON = GlobalVariableGet("Global_K_Limit_Trail_ON" + g_magic_400); K_Limit_Back = GlobalVariableGet("Global_K_Limit_Back" + g_magic_400); Trail_ON = GlobalVariableGet("Global_Trail_ON" + g_magic_400); S_Step_pips = GlobalVariableGet("Global_S_Step_pips" + g_magic_400); S_Position_pips = GlobalVariableGet("Global_S_Position_pips" + g_magic_400); S_Kyoyou_pips = GlobalVariableGet("Global_S_Kyoyou_pips" + g_magic_400); KyouseiLimit_pips = GlobalVariableGet("Global_KyouseiLimit_pips" + g_magic_400); K_Limit_Step_pips = GlobalVariableGet("Global_K_Limit_Step_pips" + g_magic_400); K_Limit_Position = GlobalVariableGet("Global_K_Limit_Position" + g_magic_400); KyouseiStop_pips = GlobalVariableGet("Global_KyouseiStop_pips" + g_magic_400); Step_pips = GlobalVariableGet("Global_Step_pips" + g_magic_400); Max_Position = GlobalVariableGet("Global_Max_Position" + g_magic_400); } } } void mt_mc() { if (!gi_972 && !gi_976) { if (!gi_988 && !gi_992 && gi_652 != 2 && gi_896 && gi_904 && gi_440 > gi_508 && gi_444 > gi_604 + 68 && gi_440 < gi_512 && gi_444 < gi_604 + 83) { gi_912 = TRUE; if (GetAsyncKeyState(1) != 0) gi_988 = TRUE; } else gi_912 = FALSE; if (!gi_988 && !gi_992 && gi_652 != 2 && gi_896 && gi_904 && gi_440 > gi_516 && gi_444 > gi_604 + 68 && gi_440 < gi_520 && gi_444 < gi_604 + 83) { gi_916 = TRUE; if (GetAsyncKeyState(1) == 0) return; gi_992 = TRUE; return; } gi_916 = FALSE; } } void exit() { if (!gi_972 && !gi_976) { if (gda_748[0] != 0.0) { if (pojcheck() > 1 && gi_652 != 2 && gi_896 && gi_904 && gi_440 > gi_524 && gi_444 > gi_604 + 83 && gi_440 < gi_528 && gi_444 < gi_604 + 98) { gi_920 = TRUE; gi_unused_900 = 1; if (GetAsyncKeyState(1) != 0) { gi_896 = FALSE; g_comment_1048 = "一括決済"; gi_612 = 4; kessai(Max_Position); } } else gi_920 = FALSE; if (gi_896 && GlobalVariableGet("Global_All_exit" + g_magic_400) == 1.0) { gi_896 = FALSE; g_comment_1048 = "一括決済"; gi_612 = 4; kessai(Max_Position); GlobalVariableSet("Global_All_exit" + g_magic_400, 0); } } for (int l_index_0 = 0; l_index_0 < Max_Position; l_index_0++) { if (gda_748[l_index_0] == 0.0) break; if (gi_652 != 2 && gi_896 && gi_904 && gi_440 > gi_524 && gi_444 > gi_604 + 101 + 30 * l_index_0 && gi_440 < gi_528 && gi_444 < gi_604 + 116 + 30 * l_index_0) { gba_924[l_index_0] = 1; gi_unused_900 = 1; gia_420[l_index_0] = gia_660[l_index_0]; if (GetAsyncKeyState(1) != 0) { gi_896 = FALSE; if (gsa_1028[l_index_0] != "買ポジ" && gsa_1028[l_index_0] != "売ポジ") { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); g_comment_1048 = "未約定取消"; gi_612 = 10; kessai(l_index_0); } else { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); g_comment_1048 = "成行決済"; gi_612 = 4; kessai(l_index_0); } } } else { gba_924[l_index_0] = 0; gia_420[l_index_0] = 0; } } if (gi_896 && GlobalVariableGet("Global_pos_exit" + g_magic_400) != EMPTY_VALUE) { gi_896 = FALSE; g_comment_1048 = "pos決済"; gi_612 = 4; kessai(GlobalVariableGet("Global_pos_exit" + g_magic_400)); } GlobalVariableSet("Global_pos_exit" + g_magic_400, EMPTY_VALUE); } } int pojcheck() { int l_count_0 = 0; for (int l_index_4 = 0; l_index_4 < Max_Position; l_index_4++) if (gsa_1028[l_index_4] == "買ポジ" || gsa_1028[l_index_4] == "売ポジ") l_count_0++; return (l_count_0); } int lotset() { if (Lots < minlot()) Lots = minlot(); if (Lots > maxlot()) Lots = maxlot(); if (gi_652 != 2 && gi_904 && gi_440 > gi_492 && gi_444 > gi_604 + 23 && gi_440 < gi_492 + 12 && gi_444 < gi_604 + 35) { if (GetAsyncKeyState(1) != 0) { gi_unused_900 = 1; g_lots_724 -= stplot(); if (g_lots_724 < minlot()) g_lots_724 = minlot(); } } if (gi_652 != 2 && gi_904 && gi_440 > gi_496 && gi_444 > gi_604 + 23 && gi_440 < gi_496 + 12 && gi_444 < gi_604 + 35) { if (GetAsyncKeyState(1) != 0) { gi_unused_900 = 1; g_lots_724 += stplot(); if (g_lots_724 > maxlot()) g_lots_724 = maxlot(); } } if (gi_652 != 2 && gi_904 && gi_440 > gi_492 - 10 && gi_444 > gi_604 + 23 && gi_440 < gi_492 + 2 && gi_444 < gi_604 + 35) { if (GetAsyncKeyState(1) != 0) { gi_unused_900 = 1; g_lots_724 -= 10.0 * stplot(); if (g_lots_724 < minlot()) g_lots_724 = minlot(); } } if (gi_652 != 2 && gi_904 && gi_440 > gi_496 + 10 && gi_444 > gi_604 + 23 && gi_440 < gi_496 + 22 && gi_444 < gi_604 + 35) { if (GetAsyncKeyState(1) != 0) { gi_unused_900 = 1; g_lots_724 += 10.0 * stplot(); if (g_lots_724 > maxlot()) g_lots_724 = maxlot(); } } if (gi_652 != 2 && gi_904 && gi_440 > gi_492 + 12 && gi_444 > gi_604 + 23 && gi_440 < gi_496 && gi_444 < gi_604 + 35) { if (GetAsyncKeyState(1) != 0) { gi_unused_900 = 1; gi_972 = TRUE; } } if (gi_972) directlot(); return (0); } void pojicount(int ai_0) { if (gi_976) { if (gi_640 != ai_0) return; pdirectlot(ai_0); return; } if (Lots < minlot()) Lots = minlot(); if (Lots > maxlot()) Lots = maxlot(); if (gi_652 != 2 && gi_904 && gi_440 > gi_532 && gi_444 > gi_604 + 120 + 30 * ai_0 && gi_440 < gi_536 && gi_444 < gi_604 + 130 + 30 * ai_0 && GetAsyncKeyState(1)) gda_740[ai_0] = gda_740[ai_0] - stplot(); if (gi_652 != 2 && gi_904 && gi_440 > gi_540 && gi_444 > gi_604 + 120 + 30 * ai_0 && gi_440 < gi_544 && gi_444 < gi_604 + 130 + 30 * ai_0 && GetAsyncKeyState(1)) gda_740[ai_0] += stplot(); if (gi_652 != 2 && gi_904 && gi_440 > gi_536 && gi_444 > gi_604 + 117 + 30 * ai_0 && gi_440 < gi_540 && gi_444 < gi_604 + 133 + 30 * ai_0 && GetAsyncKeyState(1)) { gi_976 = TRUE; gi_640 = ai_0; } if (gda_740[ai_0] < minlot()) gda_740[ai_0] = minlot(); if (gda_740[ai_0] > gda_748[ai_0]) gda_740[ai_0] = gda_748[ai_0]; } void kakutrail() { if (gi_652 == 0 || gi_652 == 3 && !gi_972 && !gi_976 && gi_896) { if (gi_904 && gi_440 > gi_548 && gi_444 > gi_604 + 271 - gi_588 + gi_636 && gi_440 < gi_552 && gi_444 < gi_604 + 283 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (S_Trail_ON) S_Trail_ON = FALSE; else S_Trail_ON = TRUE; gi_908 = TRUE; gi_896 = FALSE; } if (gi_904 && gi_440 > gi_556 && gi_444 > gi_604 + 296 - gi_588 + gi_636 && gi_440 < gi_560 && gi_444 < gi_604 + 307 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (Sasine_Back) Sasine_Back = FALSE; else Sasine_Back = TRUE; gi_908 = TRUE; gi_896 = FALSE; } if (gi_904 && gi_440 > gi_548 && gi_444 > gi_604 + 319 - gi_588 + gi_636 && gi_440 < gi_552 && gi_444 < gi_604 + 331 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (K_Limit_Trail_ON) K_Limit_Trail_ON = FALSE; else K_Limit_Trail_ON = TRUE; gi_908 = TRUE; gi_896 = FALSE; ArrayInitialize(gda_796, 0); } if (gi_904 && gi_440 > gi_556 && gi_444 > gi_604 + 357 - gi_588 + gi_636 && gi_440 < gi_560 && gi_444 < gi_604 + 366 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (K_Limit_Back) K_Limit_Back = FALSE; else K_Limit_Back = TRUE; gi_908 = TRUE; gi_896 = FALSE; } if (gi_904 && gi_440 > gi_548 && gi_444 > gi_604 + 368 - gi_588 + gi_636 && gi_440 < gi_552 && gi_444 < gi_604 + 380 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (Trail_ON) Trail_ON = FALSE; else Trail_ON = TRUE; gi_908 = TRUE; gi_896 = FALSE; } if (gi_904 && gi_440 > gi_548 && gi_444 > gi_604 + 405 - gi_588 + gi_636 && gi_440 < gi_552 && gi_444 < gi_604 + 415 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (Hyouji_Position == 0) Hyouji_Position = 1; else Hyouji_Position = 0; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_548 && gi_444 > gi_604 + 417 - gi_588 + gi_636 && gi_440 < gi_552 && gi_444 < gi_604 + 427 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (SinshukuHyouji == FALSE) SinshukuHyouji = TRUE; else SinshukuHyouji = FALSE; gi_908 = TRUE; gi_636 = 0; } if (gi_904 && gi_440 > gi_548 && gi_444 > gi_604 + 429 - gi_588 + gi_636 && gi_440 < gi_552 && gi_444 < gi_604 + 439 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (Mail_ON) Mail_ON = FALSE; else Mail_ON = TRUE; gi_908 = TRUE; gi_896 = FALSE; } if (GlobalVariableGet("Global_MC1auto" + g_magic_400) == 1.0) { if (gi_904 && gi_440 > gi_548 && gi_444 > gi_604 + 441 - gi_588 + gi_636 && gi_440 < gi_552 && gi_444 < gi_604 + 451 - gi_588 + gi_636 && GetAsyncKeyState(1)) { if (gi_1000) gi_1000 = FALSE; else gi_1000 = TRUE; gi_908 = TRUE; gi_896 = FALSE; } } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 285 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 294 - gi_588 + gi_636 && GetAsyncKeyState(1)) { S_Step_pips--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 285 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 294 - gi_588 + gi_636 && GetAsyncKeyState(1)) { S_Step_pips++; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 297 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 306 - gi_588 + gi_636 && GetAsyncKeyState(1)) { S_Position_pips--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 297 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 306 - gi_588 + gi_636 && GetAsyncKeyState(1)) { S_Position_pips++; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 309 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 318 - gi_588 + gi_636 && GetAsyncKeyState(1)) { S_Kyoyou_pips--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 309 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 318 - gi_588 + gi_636 && GetAsyncKeyState(1)) { S_Kyoyou_pips++; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 333 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 342 - gi_588 + gi_636 && GetAsyncKeyState(1)) { KyouseiLimit_pips--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 333 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 342 - gi_588 + gi_636 && GetAsyncKeyState(1)) { KyouseiLimit_pips++; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 345 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 354 - gi_588 + gi_636 && GetAsyncKeyState(1)) { K_Limit_Step_pips--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 345 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 354 - gi_588 + gi_636 && GetAsyncKeyState(1)) { K_Limit_Step_pips++; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 357 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 366 - gi_588 + gi_636 && GetAsyncKeyState(1)) { K_Limit_Position--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 357 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 366 - gi_588 + gi_636 && GetAsyncKeyState(1)) { K_Limit_Position++; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 382 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 391 - gi_588 + gi_636 && GetAsyncKeyState(1)) { KyouseiStop_pips--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 382 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 391 - gi_588 + gi_636 && GetAsyncKeyState(1)) { KyouseiStop_pips++; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_564 && gi_444 > gi_604 + 394 - gi_588 + gi_636 && gi_440 < gi_568 && gi_444 < gi_604 + 403 - gi_588 + gi_636 && GetAsyncKeyState(1)) { Step_pips--; gi_908 = TRUE; } if (gi_904 && gi_440 > gi_572 && gi_444 > gi_604 + 394 - gi_588 + gi_636 && gi_440 < gi_576 && gi_444 < gi_604 + 403 - gi_588 + gi_636 && GetAsyncKeyState(1)) { Step_pips++; gi_908 = TRUE; } if (S_Trail_ON) g_color_1080 = Switch_ON_Color; else g_color_1080 = Switch_OFF_Color; if (Sasine_Back) g_color_1084 = Switch_ON_Color; else g_color_1084 = Switch_OFF_Color; if (K_Limit_Trail_ON) g_color_1088 = Switch_ON_Color; else g_color_1088 = Switch_OFF_Color; if (K_Limit_Back) g_color_1092 = Switch_ON_Color; else g_color_1092 = Switch_OFF_Color; if (Trail_ON) g_color_1096 = Switch_ON_Color; else g_color_1096 = Switch_OFF_Color; if (Mail_ON) g_color_1136 = Switch_ON_Color; else g_color_1136 = Switch_OFF_Color; if (gi_1000) gi_1140 = 65280; else gi_1140 = 255; if (S_Step_pips <= 0) S_Step_pips = 0; if (S_Position_pips <= 0) S_Position_pips = 0; if (S_Kyoyou_pips <= 1) S_Kyoyou_pips = 1; if (KyouseiLimit_pips <= 1) KyouseiLimit_pips = 1; if (K_Limit_Step_pips <= 0) K_Limit_Step_pips = 0; if (K_Limit_Position <= 0) K_Limit_Position = 0; if (KyouseiStop_pips <= 1) KyouseiStop_pips = 1; if (Step_pips <= 0) Step_pips = 0; if (SinshukuHyouji == FALSE) { gi_584 = 0; gi_588 = 0; } else { if (gi_652 == 0) { gi_584 = 53; gi_588 = 270; } else { if (gi_652 == 3) { gi_584 = 106; gi_588 = 270; } } } if (Hyouji_Position == 0) { gi_596 = 215; gi_600 = 216; } else { gi_596 = 216; gi_600 = 215; } gd_760 = KyouseiStop_pips * Point; gd_772 = KyouseiLimit_pips * Point; if (gi_908) { kakutrailclear(); kakutrailhyouji(); gi_908 = FALSE; } } } void entry(int ai_0) { ttmode(1); switch (ai_0) { case 0: if (!k_check(0)) { o_send(OP_BUY, MIA(), 0, 0, g_color_1116); if (gi_404 == -1) { ord_error("timeout"); gi_612 = 0; if (g_comment_1048 == "指値買") yclear(0); if (g_comment_1048 == "逆指値買") yclear(2); } else if (Mail_ON) SendMail("MC1 BUY entory", Symbol() + ": BUY(" + m_action(g_comment_1048) + ") " + DoubleToStr(g_lots_724, 2) + "lots " + DoubleToStr(MIA(), Digits)); } break; case 1: if (!k_check(1)) { o_send(OP_SELL, MIB(), 0, 0, gi_1120); if (gi_404 == -1) { ord_error("timeout"); gi_612 = 0; if (g_comment_1048 == "指値売") yclear(1); if (g_comment_1048 == "逆指値売") yclear(3); } else if (Mail_ON) SendMail("MC1 SELL entory", Symbol() + ": SELL(" + m_action(g_comment_1048) + ") " + DoubleToStr(g_lots_724, 2) + "Lots " + DoubleToStr(MIB(), Digits)); } break; case 2: o_send(OP_BUYSTOP, gd_700, 0, 0, g_color_1116); if (gi_404 == -1) { ord_error("timeout"); gi_612 = 0; } break; case 3: o_send(OP_BUYLIMIT, gd_700, 0, 0, g_color_1116); if (gi_404 == -1) { ord_error("timeout"); gi_612 = 0; } break; case 4: o_send(OP_SELLSTOP, gd_700, 0, 0, gi_1120); if (gi_404 == -1) { ord_error("timeout"); gi_612 = 0; } break; case 5: o_send(OP_SELLLIMIT, gd_700, 0, 0, gi_1120); if (gi_404 == -1) { ord_error("timeout"); gi_612 = 0; } } if (gi_404 != -1) { PlaySound("Alert"); gi_620++; } } void o_send(int a_cmd_0, double a_price_4, double a_price_12, double a_price_20, color a_color_28) { gi_404 = OrderSend(Symbol(), a_cmd_0, g_lots_724, a_price_4, Slip_pips, a_price_12, a_price_20, g_comment_1048, g_magic_400, 0, a_color_28); } bool k_check(int ai_0) { bool li_ret_4; switch (ai_0) { case 0: if (MIA() - gd_760 >= MIB()) { k_error("強StopError"); li_ret_4 = TRUE; } else { if (MIA() + gd_772 <= MIA()) { k_error("強LimitError"); li_ret_4 = TRUE; } else li_ret_4 = FALSE; } break; case 1: if (MIB() + gd_760 <= MIA()) { k_error("強StopError"); li_ret_4 = TRUE; } else { if (MIB() - gd_772 >= MIB()) { k_error("強LimitError"); li_ret_4 = TRUE; } else li_ret_4 = FALSE; } } return (li_ret_4); } void k_error(string as_0) { gi_404 = -1; PlaySound("timeout"); ttcom(2, as_0, 0); Print("Order Error #", 0, " ", as_0); } void ord_error(string as_0) { PlaySound(as_0); g_error_408 = GetLastError(); g_comment_1048 = ErrorDescription(g_error_408); ttcom(2, g_comment_1048, g_error_408); Print("Order Error #", g_error_408, " ", g_comment_1048); } void SL_TP(int a_ticket_0, double a_price_4, double a_price_12) { if (OrderModify(a_ticket_0, 0, a_price_4, a_price_12, 0, g_color_1116) == FALSE) { g_error_408 = GetLastError(); g_comment_1048 = ErrorDescription(g_error_408); ttcom(2, g_comment_1048, g_error_408); Print("Order Error #", g_error_408, " ", g_comment_1048); } } void kessai(int a_count_0) { bool li_4; int li_8; m_action(g_comment_1048); if (a_count_0 < Max_Position) { li_4 = a_count_0; li_8 = a_count_0 + 1; } else { li_4 = FALSE; li_8 = Max_Position; } ttmode(1); for (int li_12 = li_4; li_12 < li_8; li_12++) { if (gia_660[li_12] == 0) break; if (gi_612 == 10) { if (OrderDelete(gia_660[li_12]) == 0) { ord_error("timeout"); gi_612 = 0; } else { PlaySound("ok"); gi_620--; if (gi_976) { for (a_count_0 = 0; a_count_0 < 7; a_count_0++) ObjectDelete("pdirect" + a_count_0); gi_976 = FALSE; gi_896 = FALSE; } } } else { if (gsa_1028[li_12] == "買ポジ") g_price_684 = MIB(); else if (gsa_1028[li_12] == "売ポジ") g_price_684 = MIA(); if (gi_1000 && GlobalVariableGet("Global_MC1auto" + g_magic_400) == 1.0) { gda_740[li_12] = GlobalVariableGet("Global_pos_lots" + g_magic_400 + li_12); if (gda_740[li_12] == 0.0 || gda_740[li_12] > gda_748[li_12]) gda_740[li_12] = gda_748[li_12]; } gi_404 = OrderClose(gia_660[li_12], gda_740[li_12], g_price_684, Slip_pips, g_color_1124); if (gi_404 == -1) { ord_error("disconnect"); gi_612 = 0; } else { PlaySound("news"); if (Mail_ON) { SendMail("MC1 EXIT", Symbol() + ": EXIT(" + m_action(g_comment_1048) + ") " + DoubleToStr(gda_740[li_12], 2) + "Lots " + DoubleToStr(OrderClosePrice(), Digits) + " Profit:" + DoubleToStr(OrderProfit(), Digits)); } gi_620--; if (gi_976) { for (a_count_0 = 0; a_count_0 < 7; a_count_0++) ObjectDelete("pdirect" + a_count_0); gi_976 = FALSE; gi_896 = FALSE; } } } } } void torihikirate() { string ls_0; string ls_8; if (!gi_980) { gd_700 = MIB(); ObjectDelete("ent"); } else { if (gi_896 && GetAsyncKeyState(1)) gi_896 = FALSE; gd_700 = NormalizeDouble(ObjectGet("ent", OBJPROP_PRICE1), Digits); if (gd_700 == 0.0) { gi_980 = FALSE; gi_988 = FALSE; gi_992 = FALSE; } } reset2(); if (gi_652 != 2) { if (gi_988) { sg_ent_line(); if (gd_700 >= MIA()) ls_0 = "MT逆"; if (gd_700 < MIA()) ls_0 = "MT指"; if (gd_700 > MIB()) ls_8 = "MT指"; if (gd_700 <= MIB()) ls_8 = "MT逆"; gd_708 = gd_700; gd_716 = gd_700; } else { if (gi_992) { sg_ent_line(); if (gd_700 >= MIA()) ls_0 = "MC逆"; if (gd_700 < MIA()) ls_0 = "MC指"; if (gd_700 > MIB()) ls_8 = "MC指"; if (gd_700 <= MIB()) ls_8 = "MC逆"; gd_708 = gd_700; gd_716 = gd_700; } else { ls_0 = "買："; ls_8 = "売："; gd_708 = MIA(); gd_716 = MIB(); } } ob_tx("key1", ls_0 + DoubleToStr(gd_708, Digits), 14, "Tarminal", g_color_1068, Hyouji_Position, gi_584 + 3, gi_604); ob_tx("key2", ls_8 + DoubleToStr(gd_716, Digits), 14, "Tarminal", g_color_1072, Hyouji_Position, gi_584 + 3, gi_604 + 40); ob_tx("key3", CharToStr(gi_596), 8, "Wingdings", LotSettei_Color, Hyouji_Position, gi_584 + 15, gi_604 + 23); ob_tx("key4", CharToStr(gi_600), 8, "Wingdings", LotSettei_Color, Hyouji_Position, gi_584 + 55, gi_604 + 23); ob_tx("key30", CharToStr(gi_596), 8, "Wingdings", LotSettei_Color, Hyouji_Position, gi_584 + 5, gi_604 + 23); ob_tx("key40", CharToStr(gi_600), 8, "Wingdings", LotSettei_Color, Hyouji_Position, gi_584 + 65, gi_604 + 23); ob_tx("key5", DoubleToStr(g_lots_724, 2), 10, "Arial", LotSettei_Color, Hyouji_Position, gi_584 + 23, gi_604 + 20); } } void sg_mt() { if (gi_652 != 2) { if (gi_988) g_color_1144 = EntoryLine_Color; else { if (gi_912) g_color_1144 = Switch_ON_Color; else g_color_1144 = MT_MC_Color; } ob_tx("mt4", "MT", 12, "Arial", g_color_1144, Hyouji_Position, gi_584 + 43, gi_604 + 63); } } void sg_mc() { if (gi_652 != 2) { if (gi_992) g_color_1148 = EntoryLine_Color; else { if (gi_916) g_color_1148 = Switch_ON_Color; else g_color_1148 = MT_MC_Color; } ob_tx("mc1", "MC", 12, "Arial", g_color_1148, Hyouji_Position, gi_584 + 8, gi_604 + 63); } } void sg_ent_line() { gi_980 = TRUE; ObjectCreate("ent", OBJ_HLINE, 0, 0, gd_700); ObjectSet("ent", OBJPROP_WIDTH, 3); ObjectSet("ent", OBJPROP_COLOR, EntoryLine_Color); } void ob_tx(string a_name_0, string a_text_8, int a_fontsize_16, string a_fontname_20, color a_color_28, int a_corner_32, int a_x_36, int a_y_40) { ObjectCreate(a_name_0, OBJ_LABEL, 0, 0, 0); ObjectSetText(a_name_0, a_text_8, a_fontsize_16, a_fontname_20, a_color_28); ObjectSet(a_name_0, OBJPROP_CORNER, a_corner_32); ObjectSet(a_name_0, OBJPROP_XDISTANCE, a_x_36); ObjectSet(a_name_0, OBJPROP_YDISTANCE, a_y_40); } void kakutrailhyouji() { if (gi_652 == 0) { ob_tx("sasi", "指値注", 8, "Tarminal", g_color_1080, Hyouji_Position, gi_592 + 3, gi_604 + 270 - gi_588 + gi_636); ob_tx("sasi1", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 3, gi_604 + 284 - gi_588 + gi_636); ob_tx("sasi2", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 284 - gi_588 + gi_636); ob_tx("sasi3", DoubleToStr(S_Step_pips, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 282 - gi_588 + gi_636); ob_tx("sasi31", "stp", 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 33, gi_604 + 282 - gi_588 + gi_636); ob_tx("sasi4", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 3, gi_604 + 296 - gi_588 + gi_636); ob_tx("sasi5", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 296 - gi_588 + gi_636); ob_tx("sasi6", DoubleToStr(S_Position_pips, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 294 - gi_588 + gi_636); ob_tx("sasi61", "pos", 7, "Arial", g_color_1084, Hyouji_Position, gi_592 + 33, gi_604 + 294 - gi_588 + gi_636); ob_tx("sasi7", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 3, gi_604 + 308 - gi_588 + gi_636); ob_tx("sasi8", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 308 - gi_588 + gi_636); ob_tx("sasi9", DoubleToStr(S_Kyoyou_pips, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 306 - gi_588 + gi_636); ob_tx("sasi91", "kyo", 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 33, gi_604 + 306 - gi_588 + gi_636); ob_tx("limi", "強Limit", 8, "Tarminal", g_color_1088, Hyouji_Position, gi_592 + 3, gi_604 + 318 - gi_588 + gi_636); ob_tx("limi1", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 3, gi_604 + 332 - gi_588 + gi_636); ob_tx("limi2", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 332 - gi_588 + gi_636); ob_tx("limi3", DoubleToStr(KyouseiLimit_pips, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 330 - gi_588 + gi_636); ob_tx("limi31", "pips", 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 33, gi_604 + 330 - gi_588 + gi_636); ob_tx("limi4", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 3, gi_604 + 344 - gi_588 + gi_636); ob_tx("limi5", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 344 - gi_588 + gi_636); ob_tx("limi6", DoubleToStr(K_Limit_Step_pips, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 342 - gi_588 + gi_636); ob_tx("limi61", "stp", 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 33, gi_604 + 342 - gi_588 + gi_636); ob_tx("limi7", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 3, gi_604 + 356 - gi_588 + gi_636); ob_tx("limi8", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 356 - gi_588 + gi_636); ob_tx("limi9", DoubleToStr(K_Limit_Position, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 354 - gi_588 + gi_636); ob_tx("limi91", "pos", 7, "Arial", g_color_1092, Hyouji_Position, gi_592 + 33, gi_604 + 354 - gi_588 + gi_636); ob_tx("stop", "強Stop", 8, "Tarminal", g_color_1096, Hyouji_Position, gi_592 + 3, gi_604 + 366 - gi_588 + gi_636); ob_tx("stop1", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 2, gi_604 + 380 - gi_588 + gi_636); ob_tx("stop2", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 380 - gi_588 + gi_636); ob_tx("stop3", DoubleToStr(KyouseiStop_pips, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 378 - gi_588 + gi_636); ob_tx("stop31", "pips", 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 33, gi_604 + 378 - gi_588 + gi_636); ob_tx("stop4", CharToStr(gi_596), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 2, gi_604 + 392 - gi_588 + gi_636); ob_tx("stop5", CharToStr(gi_600), 6, "Wingdings", LotSettei_Color, Hyouji_Position, gi_592 + 23, gi_604 + 392 - gi_588 + gi_636); ob_tx("stop6", DoubleToStr(Step_pips, 0), 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 9, gi_604 + 390 - gi_588 + gi_636); ob_tx("stop61", "stp", 7, "Arial", LotSettei_Color, Hyouji_Position, gi_592 + 33, gi_604 + 390 - gi_588 + gi_636); ob_tx("LR", "Ｌ／Ｒ", 8, "Tarminal", Switch_ON_Color, Hyouji_Position, gi_592 + 3, gi_604 + 402 - gi_588 + gi_636); ob_tx("UD", "Ｕ／Ｄ", 8, "Tarminal", Switch_ON_Color, Hyouji_Position, gi_592 + 3, gi_604 + 414 - gi_588 + gi_636); ob_tx("mail", "e-Mail", 8, "Tarminal", g_color_1136, Hyouji_Position, gi_592 + 3, gi_604 + 426 - gi_588 + gi_636); if (GlobalVariableGet("Global_MC1auto" + g_magic_400) == 1.0) ob_tx("auto", "ＡＵＴＯ", 8, "Tarminal", gi_1140, Hyouji_Position, gi_592 + 3, gi_604 + 438 - gi_588 + gi_636); else ObjectDelete("auto"); gi_636 = ObjectGet("sasi31", OBJPROP_YDISTANCE) - (gi_604 + 282 - gi_588); return; } kakutrailclear(); } void ikkatu() { if (pojcheck() > 1 && gi_652 != 2 && !gi_972 && gia_412[1] != 0) { if (gi_920) g_color_1076 = Kessai_Color; else g_color_1076 = Ikkatu_Kessai; ob_tx("keyA", "一括決済", 10, "Tarminal", g_color_1076, Hyouji_Position, gi_584 + 3, gi_604 + 83); return; } ObjectDelete("keyA"); } void positionhyouji() { int li_8; bool li_16; bool li_20; int l_datetime_32; bool li_36; int li_12 = 0; int li_unused_24 = 0; ArrayInitialize(gia_412, 0); ArrayInitialize(gia_664, 0); ArrayInitialize(gia_660, 0); ArrayInitialize(gda_748, 0); gi_628 = 0; gi_unused_632 = 0; for (int l_pos_28 = 0; l_pos_28 < OrdersTotal(); l_pos_28++) { if (OrderSelect(l_pos_28, SELECT_BY_POS, MODE_TRADES) == TRUE) { if (OrderSymbol() == Symbol()) { if (OrderMagicNumber() == g_magic_400 || OrderMagicNumber() == 0) { gia_412[gi_628] = OrderTicket(); gia_664[gi_628] = OrderOpenTime(); gi_628++; } } } } GlobalVariableSet("Global_Position" + g_magic_400, gi_628); if (gi_628 == 0) { GlobalVariablesDeleteAll("tGlobal_Kstop0"); GlobalVariablesDeleteAll("tGlobal_Klimit"); } if (gi_628 == gi_624) { if (gi_628 > gi_620) { if (OrderSelect(gia_412[gi_628 - 1], SELECT_BY_TICKET) == TRUE) { l_datetime_32 = OrderOpenTime(); for (l_pos_28 = 0; l_pos_28 < gi_628; l_pos_28++) { if (gia_668[l_pos_28] == l_datetime_32) { li_20 = TRUE; break; } li_20 = FALSE; } if (li_20) { if (OrderSelect(gia_416[l_pos_28], SELECT_BY_TICKET) == TRUE) { if (OrderType() == OP_BUY || OrderType() == OP_SELL) { if (gi_612 == 4) g_comment_1048 = "成分割決"; if (gi_612 == 5) g_comment_1048 = "リ分割決"; if (gi_612 == 6) g_comment_1048 = "ス分割決"; se_point(); } } } } } else { if (gi_628 == gi_620 && gia_412[gi_628 - 1] > gia_416[gi_628 - 1]) { if (OrderSelect(gia_412[gi_628 - 1], SELECT_BY_TICKET) == TRUE) { l_datetime_32 = OrderOpenTime(); for (l_pos_28 = 0; l_pos_28 < gi_628; l_pos_28++) { if (gia_668[l_pos_28] == l_datetime_32) { li_20 = TRUE; break; } li_20 = FALSE; } if (li_20) { if (OrderSelect(gia_416[l_pos_28], SELECT_BY_TICKET) == TRUE) { if (gi_612 == 0) g_comment_1048 = "タ分割決"; se_point(); } } else { if (OrderSelect(gia_416[l_pos_28], SELECT_BY_TICKET) == TRUE) { g_comment_1048 = "(指)約定"; se_point(); } } } } } } else { if (gi_628 > gi_624) { if (gi_628 > gi_620) { if (OrderSelect(gia_412[gi_628 - 1], SELECT_BY_TICKET) == TRUE) { if (OrderType() == OP_BUY) g_comment_1048 = "発注買"; else { if (OrderType() == OP_SELL) g_comment_1048 = "発注売"; else g_comment_1048 = "Tarminal Order"; } Print(g_comment_1048); ttcom(0, g_comment_1048, OrderOpenPrice()); } } else { if (gi_628 == gi_620) { if (OrderSelect(gia_412[gi_628 - 1], SELECT_BY_TICKET) == TRUE) { Print(g_comment_1048); ttcom(0, g_comment_1048, OrderOpenPrice()); } } } } else { if (gi_628 < gi_624) { if (gi_628 < gi_620) { if (gi_628 == 0) { if (OrderSelect(gia_416[0], SELECT_BY_TICKET) == TRUE) { g_comment_1048 = "Tarminal EXIT"; se_point(); } } else { for (int l_index_0 = 0; l_index_0 < gi_628 + 1; l_index_0++) { for (l_pos_28 = 0; l_pos_28 < gi_628; l_pos_28++) { if (gia_412[l_pos_28] == gia_416[l_index_0]) { li_20 = FALSE; break; } li_20 = TRUE; } if (li_20) { if (OrderSelect(gia_416[l_index_0], SELECT_BY_TICKET) != TRUE) break; g_comment_1048 = "Tarminal EXIT"; se_point(); break; } } } } else { if (gi_628 >= gi_620) { if (gi_628 == 0) { if (g_comment_1048 == "一括決済") li_12 = gi_624 - gi_620; else li_12 = 1; for (l_index_0 = 0; l_index_0 < li_12; l_index_0++) if (OrderSelect(gia_416[l_index_0], SELECT_BY_TICKET) == TRUE) se_point(); } else { for (l_index_0 = 0; l_index_0 < gi_628 + 1; l_index_0++) { for (l_pos_28 = 0; l_pos_28 < gi_628; l_pos_28++) { if (gia_412[l_pos_28] == gia_416[l_index_0]) { li_20 = FALSE; break; } li_20 = TRUE; } if (li_20) { if (OrderSelect(gia_416[l_index_0], SELECT_BY_TICKET) != TRUE) break; se_point(); break; } } } } } } } } ArrayCopy(gia_668, gia_664, 0, 0, gi_628); ArrayCopy(gia_416, gia_412, 0, 0, gi_628); gi_612 = 0; gi_624 = gi_628; gi_620 = gi_628; ArraySort(gia_664, gi_628, 0, MODE_ASCEND); for (l_pos_28 = 0; l_pos_28 < OrdersTotal(); l_pos_28++) { if (OrderSelect(l_pos_28, SELECT_BY_POS, MODE_TRADES) == TRUE) { if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_400 || OrderMagicNumber() == 0) { l_index_0 = ArrayBsearch(gia_664, OrderOpenTime(), gi_628, 0, MODE_ASCEND); gia_660[l_index_0] = OrderTicket(); } } } for (l_pos_28 = gi_628; l_pos_28 < Max_Position; l_pos_28++) { gia_664[l_pos_28] = 0; p1reset(l_pos_28); ksclear(l_pos_28); gsa_1028[l_pos_28] = ""; gda_788[l_pos_28] = 0; gda_792[l_pos_28] = 0; } for (l_pos_28 = 0; l_pos_28 < gi_628; l_pos_28++) { if (OrderSelect(gia_660[l_pos_28], SELECT_BY_TICKET) == TRUE) { gd_692 = OrderClosePrice(); g_ord_open_price_676 = OrderOpenPrice(); if (OrderType() == OP_BUY) { gsa_1028[l_pos_28] = "買ポジ"; li_36 = FALSE; } else { if (OrderType() == OP_SELL) { gsa_1028[l_pos_28] = "売ポジ"; li_36 = TRUE; } else { if (OrderType() == OP_BUYLIMIT) { gsa_1028[l_pos_28] = "BuyLimit"; li_36 = FALSE; } else { if (OrderType() == OP_BUYSTOP) { gsa_1028[l_pos_28] = "BuyStop"; li_36 = FALSE; } else { if (OrderType() == OP_SELLLIMIT) { gsa_1028[l_pos_28] = "SellLimit"; li_36 = TRUE; } else { if (OrderType() == OP_SELLSTOP) { gsa_1028[l_pos_28] = "SellStop"; li_36 = TRUE; } } } } } } switch (li_36) { case 0: g_color_1100 = KaiPoji_Color; l_index_0 = 0; li_8 = 0; gda_752[l_pos_28] = (gd_692 - g_ord_open_price_676) * MathPow(10, Digits); GlobalVariableSet("Global_Auto_Poji" + g_magic_400 + l_pos_28, 0); break; case 1: g_color_1100 = UriPoji_Color; l_index_0 = 1; li_8 = 1; gda_752[l_pos_28] = (g_ord_open_price_676 - gd_692) * MathPow(10, Digits); GlobalVariableSet("Global_Auto_Poji" + g_magic_400 + l_pos_28, 1); } GlobalVariableSet("Global_soneki" + g_magic_400 + l_pos_28, gda_752[l_pos_28]); if (Kakaku_pips) gda_752[l_pos_28] = OrderProfit(); if (gba_924[l_pos_28] == 1) g_color_1100 = Kessai_Color; gda_748[l_pos_28] = OrderLots(); pojicount(l_pos_28); if (g_ord_open_price_676 == gda_744[l_pos_28]) li_16 = FALSE; else { li_16 = TRUE; gda_744[l_pos_28] = g_ord_open_price_676; } if (li_16) gda_740[l_pos_28] = gda_748[l_pos_28]; if (gi_1000 && GlobalVariableGet("Global_MC1auto" + g_magic_400) == 1.0) { if (GlobalVariableGet("tGlobal_lot" + g_magic_400 + l_pos_28) != 0.0) gda_740[l_pos_28] = GlobalVariableGet("tGlobal_lot" + g_magic_400 + l_pos_28); if (GlobalVariableGet("MC1_attach_kessai" + g_magic_400 + l_pos_28) == 1.0) { GlobalVariableSet("MC1_attach_kessai" + g_magic_400 + l_pos_28, 0); gi_612 = 4; g_comment_1048 = "Auto Exit"; kessai(l_pos_28); } } ksline(l_pos_28); StLm(l_pos_28); kslcheck(l_pos_28); p1reset(l_pos_28); if (!gi_972) { if (!gi_976 || (gi_976 && gi_640 >= l_pos_28)) { GlobalVariableSet("Global_ticketbank2" + g_magic_400 + l_pos_28, gia_416[l_pos_28]); GlobalVariableSet("Global_timebank2" + g_magic_400 + l_pos_28, gia_668[l_pos_28]); GlobalVariableSet("Global_lot" + g_magic_400 + l_pos_28, gda_740[l_pos_28]); GlobalVariableSet("Global_tKks" + g_magic_400 + l_pos_28, gda_768[l_pos_28]); GlobalVariableSet("Global_kl1" + g_magic_400 + l_pos_28, gba_928[l_pos_28]); GlobalVariableSet("Global_kl2" + g_magic_400 + l_pos_28, gba_932[l_pos_28]); GlobalVariableSet("Global_klclr" + g_magic_400 + l_pos_28, gba_936[l_pos_28]); GlobalVariableSet("Global_odrlot" + g_magic_400 + l_pos_28, gda_748[l_pos_28]); GlobalVariableSet("Global_POJ" + g_magic_400 + l_pos_28, li_8); GlobalVariableSet("Global_MAB" + g_magic_400 + l_pos_28, g_ord_open_price_676); GlobalVariableSet("Global_Kstop0" + g_magic_400 + l_pos_28, gda_780[l_pos_28][0]); GlobalVariableSet("Global_Kstop1" + g_magic_400 + l_pos_28, gda_780[l_pos_28][1]); GlobalVariableSet("Global_Kstop2" + g_magic_400 + l_pos_28, gda_780[l_pos_28][2]); GlobalVariableSet("Global_Klimit" + g_magic_400 + l_pos_28, gda_784[l_pos_28]); if (gi_652 != 2) { ob_tx("poji" + l_pos_28, DoubleToStr(l_pos_28 + 1, 0) + gsa_1028[l_pos_28] + " " + DoubleToStr(gda_752[l_pos_28], 0), 10, "Terminal", g_color_1100, Hyouji_Position, gi_584 + 3, gi_604 + 100 + 30 * l_pos_28); if (gsa_1028[l_pos_28] == "買ポジ" || gsa_1028[l_pos_28] == "売ポジ") ob_tx("chg" + l_pos_28, "ChgPos." + DoubleToStr(l_pos_28 + 1, 0), 8, "Arial", g_color_1100, Hyouji_Position, gi_592 + 3 - 53, gi_604 + 354 - gi_588 + gi_636 + 12 * l_pos_28); else { gda_740[l_pos_28] = gda_748[l_pos_28]; ob_tx("chg" + l_pos_28, "Cancel." + DoubleToStr(l_pos_28 + 1, 0), 8, "Arial", g_color_1100, Hyouji_Position, gi_592 + 3 - 53, gi_604 + 354 - gi_588 + gi_636 + 12 * l_pos_28); } ob_tx("key6" + l_pos_28, CharToStr(gi_596), 7, "Wingdings", LotSettei_Color, Hyouji_Position, gi_584 + 3, gi_604 + 116 + 30 * l_pos_28); ob_tx("key7" + l_pos_28, CharToStr(gi_600), 7, "Wingdings", LotSettei_Color, Hyouji_Position, gi_584 + 63, gi_604 + 116 + 30 * l_pos_28); ob_tx("key8" + l_pos_28, DoubleToStr(gda_740[l_pos_28], 2) + "/ " + DoubleToStr(gda_748[l_pos_28], 2), 8, "Arial", LotSettei_Color, Hyouji_Position, gi_584 + 11, gi_604 + 113 + 30 * l_pos_28); } } } } } } void StLm(int ai_0) { if (MIB() > gda_780[ai_0][0] && gsa_1028[ai_0] == "買ポジ") { if (MIA() - 20.0 * Point * gi_644 < gda_780[ai_0][0]) { if (MIA() - gda_788[ai_0] >= 25.0 * Point * gi_644) { gda_788[ai_0] = MIA() - 20.0 * Point * gi_644; gi_984 = TRUE; } } else { if (gda_780[ai_0][0] - 5.0 * Point * gi_644 >= gda_788[ai_0] || gda_780[ai_0][0] < gda_788[ai_0]) { gda_788[ai_0] = gda_780[ai_0][0]; gi_984 = TRUE; } } if (MIB() > gda_784[ai_0] && gda_792[ai_0] - MIB() < 15.0 * Point * gi_644) { gda_792[ai_0] = MIA() + 20.0 * Point * gi_644; gi_984 = TRUE; } else { if (K_Limit_Trail_ON) { if (gda_784[ai_0] + 5.0 * Point * gi_644 >= gda_792[ai_0] || gda_792[ai_0] == 0.0) { if (MIA() + 20.0 * Point * gi_644 <= gda_784[ai_0] + 10.0 * Point * gi_644) { gda_792[ai_0] = gda_784[ai_0] + 10.0 * Point * gi_644; gi_984 = TRUE; } else { gda_792[ai_0] = MIA() + 20.0 * Point * gi_644; gi_984 = TRUE; } } } else { if (!K_Limit_Trail_ON) { if (MIA() + 20.0 * Point * gi_644 <= gda_784[ai_0] && gda_784[ai_0] != gda_796[ai_0]) { gda_792[ai_0] = gda_784[ai_0]; gda_796[ai_0] = gda_784[ai_0]; gi_984 = TRUE; } else { if (gda_784[ai_0] != gda_796[ai_0]) { gda_792[ai_0] = MIA() + 20.0 * Point * gi_644; gda_796[ai_0] = gda_784[ai_0]; gi_984 = TRUE; } } } } } } else { if (MIA() < gda_780[ai_0][0] && gsa_1028[ai_0] == "売ポジ") { if (MIB() + 20.0 * Point * gi_644 > gda_780[ai_0][0]) { if (gda_788[ai_0] - MIB() >= 25.0 * Point * gi_644) { gda_788[ai_0] = MIB() + 20.0 * Point * gi_644; gi_984 = TRUE; } } else { if (gda_780[ai_0][0] + 5.0 * Point * gi_644 <= gda_788[ai_0] || gda_780[ai_0][0] > gda_788[ai_0]) { gda_788[ai_0] = gda_780[ai_0][0]; gi_984 = TRUE; } } if (MIA() < gda_784[ai_0] && MIA() - gda_792[ai_0] < 15.0 * Point * gi_644) { gda_792[ai_0] = MIB() - 20.0 * Point * gi_644; gi_984 = TRUE; } else { if (K_Limit_Trail_ON) { if (gda_784[ai_0] - 5.0 * Point * gi_644 <= gda_792[ai_0] || gda_792[ai_0] == 0.0) { if (MIB() - 20.0 * Point * gi_644 >= gda_784[ai_0] - 10.0 * Point * gi_644) { gda_792[ai_0] = gda_784[ai_0] - 10.0 * Point * gi_644; gi_984 = TRUE; } else { gda_792[ai_0] = MIB() - 20.0 * Point * gi_644; gi_984 = TRUE; } } } else { if (!K_Limit_Trail_ON) { if (MIB() - 20.0 * Point * gi_644 >= gda_784[ai_0] && gda_784[ai_0] != gda_796[ai_0]) { gda_792[ai_0] = gda_784[ai_0]; gda_796[ai_0] = gda_784[ai_0]; gi_984 = TRUE; } else { if (gda_784[ai_0] != gda_796[ai_0]) { gda_792[ai_0] = MIB() - 20.0 * Point * gi_644; gda_796[ai_0] = gda_784[ai_0]; gi_984 = TRUE; } } } } } } } if (gi_896 && gi_984) { SL_TP(gia_660[ai_0], gda_788[ai_0], gda_792[ai_0]); gi_984 = FALSE; } } void ksline(int ai_0) { if (gia_660[ai_0] != gda_780[ai_0][1] && gia_664[ai_0] != gda_780[ai_0][2]) { ksclear(ai_0); if (gia_660[ai_0] == gda_780[ai_0 + 1][1] && gia_664[ai_0] == gda_780[ai_0 + 1][2]) { gda_780[ai_0][0] = gda_780[ai_0 + 1][0]; gda_784[ai_0] = gda_784[ai_0 + 1]; gda_788[ai_0] = gda_788[ai_0 + 1]; gda_792[ai_0] = gda_792[ai_0 + 1]; gda_796[ai_0] = gda_796[ai_0 + 1]; } else { if (gsa_1028[ai_0] == "買ポジ") { gda_780[ai_0][0] = MIA() - gd_760; gda_784[ai_0] = MIA() + gd_772; } else { if (gsa_1028[ai_0] == "売ポジ") { gda_780[ai_0][0] = MIB() + gd_760; gda_784[ai_0] = MIB() - gd_772; } else { if (gsa_1028[ai_0] == "BuyLimit" || gsa_1028[ai_0] == "BuyStop") { gda_780[ai_0][0] = 0; gda_784[ai_0] = 0; } else { if (gsa_1028[ai_0] == "SellLimit" || gsa_1028[ai_0] == "SellStop") { gda_780[ai_0][0] = 0; gda_784[ai_0] = 0; } } } } gba_928[ai_0] = 1; gba_932[ai_0] = 0; gda_768[ai_0] = gd_760; } gda_780[ai_0][1] = gia_660[ai_0]; gda_780[ai_0][2] = gia_664[ai_0]; } else { if (gia_660[ai_0] != gda_780[ai_0][1] && gia_664[ai_0] == gda_780[ai_0][2]) { ksclear(ai_0); gda_780[ai_0][1] = gia_660[ai_0]; if (gi_612 != 4) { if (gsa_1028[ai_0] == "買ポジ") { gda_784[ai_0] = gd_692 + gd_772; gda_780[ai_0][0] = gd_692 - gd_760; } else { if (gsa_1028[ai_0] == "売ポジ") { gda_784[ai_0] = gd_692 - gd_772; gda_780[ai_0][0] = gd_692 + gd_760; } } gi_612 = 0; } gba_928[ai_0] = 1; gba_932[ai_0] = 0; } else { if (gsa_1028[ai_0] == "買ポジ" && gda_780[ai_0][0] == 0.0) { ksclear(ai_0); gda_780[ai_0][0] = MIA() - gd_760; gda_784[ai_0] = MIA() + gd_772; gba_928[ai_0] = 1; gba_932[ai_0] = 0; gda_768[ai_0] = gd_760; gda_780[ai_0][1] = gia_660[ai_0]; gda_780[ai_0][2] = gia_664[ai_0]; } if (gsa_1028[ai_0] == "売ポジ" && gda_780[ai_0][0] == 0.0) { ksclear(ai_0); gda_780[ai_0][0] = MIB() + gd_760; gda_784[ai_0] = MIB() - gd_772; gba_928[ai_0] = 1; gba_932[ai_0] = 0; gda_768[ai_0] = gd_760; gda_780[ai_0][1] = gia_660[ai_0]; gda_780[ai_0][2] = gia_664[ai_0]; } } } if (gda_780[ai_0][1] == gia_420[ai_0]) { g_color_1104 = LimitLine2_Color; g_color_1108 = StopLine2_Color; } else { g_color_1104 = LimitLine1_Color; g_color_1108 = StopLine1_Color; } if (gba_936[ai_0] == 1) { ksclear(ai_0); gba_936[ai_0] = 0; } if (gi_1000 && GlobalVariableGet("tGlobal_Kstop0" + g_magic_400 + ai_0) != 0.0) { ObjectDelete("Kstop" + ai_0); gda_780[ai_0][0] = GlobalVariableGet("tGlobal_Kstop0" + g_magic_400 + ai_0); } if (gi_1000 && GlobalVariableGet("tGlobal_Klimit" + g_magic_400 + ai_0) != 0.0) { ObjectDelete("Klimi" + ai_0); gda_784[ai_0] = GlobalVariableGet("tGlobal_Klimit" + g_magic_400 + ai_0); } ObjectCreate("Kstop" + ai_0, OBJ_HLINE, 0, 0, gda_780[ai_0][0]); ObjectSet("Kstop" + ai_0, OBJPROP_COLOR, g_color_1108); ObjectCreate("Klimi" + ai_0, OBJ_HLINE, 0, 0, gda_784[ai_0]); ObjectSet("Klimi" + ai_0, OBJPROP_COLOR, g_color_1104); } void ksclear(int ai_0) { ObjectDelete("Kstop" + ai_0); ObjectDelete("Klimi" + ai_0); } void kslcheck(int ai_0) { double ld_4; double ld_12; if (gsa_1028[ai_0] != "BuyLimit" && gsa_1028[ai_0] != "BuyStop" && gsa_1028[ai_0] != "SellLimit" && gsa_1028[ai_0] != "SellStop") { if (gda_780[ai_0][1] != 0.0) { ld_4 = ObjectGet("Kstop" + ai_0, OBJPROP_PRICE1); ld_12 = ObjectGet("Klimi" + ai_0, OBJPROP_PRICE1); if (ld_4 != 0.0 && gda_780[ai_0][0] != ld_4) { gi_896 = FALSE; gda_780[ai_0][0] = ld_4; if (gsa_1028[ai_0] == "買ポジ") gda_768[ai_0] = MIA() - ld_4; else if (gsa_1028[ai_0] == "売ポジ") gda_768[ai_0] = ld_4 - MIB(); } if (ld_12 != 0.0 && gda_784[ai_0] != ld_12) { gi_896 = FALSE; gda_784[ai_0] = ld_12; } if (!K_Limit_Trail_ON) { if (gsa_1028[ai_0] == "買ポジ") { if (gi_896 && gda_784[ai_0] <= MIB()) { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); gi_896 = FALSE; g_comment_1048 = "強Limit"; gi_612 = 5; kessai(ai_0); } } if (gsa_1028[ai_0] == "売ポジ") { if (gi_896 && gda_784[ai_0] >= MIA()) { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); gi_896 = FALSE; g_comment_1048 = "強Limit"; gi_612 = 5; kessai(ai_0); } } } else { if (gsa_1028[ai_0] == "買ポジ") { if (gba_928[ai_0] == 1 && gda_784[ai_0] <= MIB()) { gba_928[ai_0] = 0; gba_932[ai_0] = 1; if (K_Limit_Back) { gda_784[ai_0] = MIB() - K_Limit_Position * Point; gba_936[ai_0] = 1; } } if (gba_932[ai_0] == 1) { if (gda_784[ai_0] + K_Limit_Step_pips * Point + K_Limit_Position * Point <= MIB()) { gda_784[ai_0] = MIB() - K_Limit_Position * Point; gba_936[ai_0] = 1; } if (gi_896 && gda_784[ai_0] > MIB()) { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); gi_896 = FALSE; gba_928[ai_0] = 1; gba_932[ai_0] = 0; g_comment_1048 = "強Limit"; gi_612 = 5; kessai(ai_0); } } } if (gsa_1028[ai_0] == "売ポジ") { if (gba_928[ai_0] == 1 && gda_784[ai_0] >= MIA()) { gba_928[ai_0] = 0; gba_932[ai_0] = 1; if (K_Limit_Back) { gda_784[ai_0] = MIA() + K_Limit_Position * Point; gba_936[ai_0] = 1; } } if (gba_932[ai_0] == 1) { if (gda_784[ai_0] - K_Limit_Step_pips * Point - K_Limit_Position * Point >= MIA()) { gda_784[ai_0] = MIA() + K_Limit_Position * Point; gba_936[ai_0] = 1; } if (gi_896 && gda_784[ai_0] < MIA()) { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); gi_896 = FALSE; gba_928[ai_0] = 1; gba_932[ai_0] = 0; g_comment_1048 = "強Limit"; gi_612 = 5; kessai(ai_0); } } } } if (Trail_ON) { if (gsa_1028[ai_0] == "買ポジ") { if (gda_780[ai_0][0] + gda_768[ai_0] + Step_pips * Point <= MIB()) { gda_780[ai_0][0] = MIA() - gda_768[ai_0]; gba_936[ai_0] = 1; } } if (gsa_1028[ai_0] == "売ポジ") { if (gda_780[ai_0][0] - gda_768[ai_0] - Step_pips * Point >= MIA()) { gda_780[ai_0][0] = MIB() + gda_768[ai_0]; gba_936[ai_0] = 1; } } } if (gsa_1028[ai_0] == "買ポジ") { if (gi_896 && gda_780[ai_0][0] >= MIB()) { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); gi_896 = FALSE; g_comment_1048 = "強Stop"; gi_612 = 6; kessai(ai_0); } } if (gsa_1028[ai_0] == "売ポジ") { if (gi_896 && gda_780[ai_0][0] <= MIA()) { GlobalVariableSet("Global_TM" + g_magic_400, TimeCurrent()); gi_896 = FALSE; g_comment_1048 = "強Stop"; gi_612 = 6; kessai(ai_0); } } } } } void ttmode(int ai_0) { switch (ai_0) { case 0: gs_1040 = "Waiting"; if (gi_904) gi_1112 = 65280; else gi_1112 = 32768; break; case 1: gs_1040 = "Busy"; gi_1112 = 9639167; break; case 2: gs_1040 = "Stand-by"; gi_1112 = 42495; } ObjectDelete("tjty"); ob_tx("tjty", gs_1040, 9, "Araial", gi_1112, Hyouji_Position + 2, 3, 3); } void se_point() { double ld_0; gd_692 = OrderClosePrice(); g_ord_open_price_676 = OrderOpenPrice(); if (Kakaku_pips) ld_0 = OrderProfit(); else { if (OrderType() == OP_BUY) ld_0 = (gd_692 - g_ord_open_price_676) * MathPow(10, Digits); else if (OrderType() == OP_SELL) ld_0 = (g_ord_open_price_676 - gd_692) * MathPow(10, Digits); } Print(g_comment_1048); ttcom(1, g_comment_1048, ld_0); } void reset2() { ObjectDelete("key1"); ObjectDelete("key2"); ObjectDelete("key3"); ObjectDelete("key4"); ObjectDelete("key30"); ObjectDelete("key40"); ObjectDelete("key5"); } void reset3() { ObjectDelete("mt4"); ObjectDelete("mc1"); } void p1reset(int ai_0) { ObjectDelete("poji" + ai_0); ObjectDelete("key6" + ai_0); ObjectDelete("key7" + ai_0); ObjectDelete("key8" + ai_0); ObjectDelete("chg" + ai_0); } void kakutrailclear() { ObjectDelete("sasi"); ObjectDelete("sasi1"); ObjectDelete("sasi2"); ObjectDelete("sasi3"); ObjectDelete("sasi31"); ObjectDelete("sasi4"); ObjectDelete("sasi5"); ObjectDelete("sasi6"); ObjectDelete("sasi61"); ObjectDelete("sasi7"); ObjectDelete("sasi8"); ObjectDelete("sasi9"); ObjectDelete("sasi91"); ObjectDelete("limi"); ObjectDelete("limi1"); ObjectDelete("limi2"); ObjectDelete("limi3"); ObjectDelete("limi31"); ObjectDelete("limi4"); ObjectDelete("limi5"); ObjectDelete("limi6"); ObjectDelete("limi61"); ObjectDelete("limi7"); ObjectDelete("limi8"); ObjectDelete("limi9"); ObjectDelete("limi91"); ObjectDelete("stop"); ObjectDelete("stop1"); ObjectDelete("stop2"); ObjectDelete("stop3"); ObjectDelete("stop31"); ObjectDelete("stop4"); ObjectDelete("stop5"); ObjectDelete("stop6"); ObjectDelete("stop61"); ObjectDelete("LR"); ObjectDelete("UD"); ObjectDelete("mail"); ObjectDelete("TP"); ObjectDelete("TP1"); ObjectDelete("TP2"); ObjectDelete("TP3"); ObjectDelete("TP31"); ObjectDelete("SL"); ObjectDelete("SL1"); ObjectDelete("SL2"); ObjectDelete("SL3"); ObjectDelete("SL31"); ObjectDelete("SP"); ObjectDelete("SP1"); ObjectDelete("SP2"); ObjectDelete("SP3"); ObjectDelete("SP31"); ObjectDelete("auto"); } void sgreset() { gi_940 = TRUE; gi_944 = TRUE; gi_948 = TRUE; gi_952 = TRUE; gi_956 = FALSE; gi_960 = FALSE; } void sasinegyakusasine() { gd_864 = WP_Max() + 5.0 * Point; gd_872 = WP_Min(); if (gi_940 && g_price_800 != gd_864) { g_price_800 = gd_864; yoyakub(); g_price_832 = WP_Max() + 500.0 * Point; } if (gi_944 && g_price_808 != gd_872) { g_price_808 = gd_872; yoyakus(); g_price_840 = WP_Min() - 500.0 * Point; } if (gi_948 && g_price_816 != gd_864) { g_price_816 = gd_864; yoyakugs(); g_price_848 = WP_Max() + 500.0 * Point; } if (gi_952 && g_price_824 != gd_872) { g_price_824 = gd_872; yoyakugb(); g_price_856 = WP_Min() - 500.0 * Point; } if (g_price_800 != ObjectGet("ygbuy", OBJPROP_PRICE1)) { if (ObjectFind("ygbuy") != 0) { gi_940 = TRUE; g_price_800 = gd_864; g_price_832 = WP_Max() + 500.0 * Point; ObjectDelete("ygbl"); yoyakub(); } else { gi_896 = FALSE; gi_940 = FALSE; g_price_800 = ObjectGet("ygbuy", OBJPROP_PRICE1); g_price_832 = g_price_800; ybline(); } } if (g_price_808 != ObjectGet("ygsell", OBJPROP_PRICE1)) { if (ObjectFind("ygsell") != 0) { gi_944 = TRUE; g_price_808 = gd_872; g_price_840 = WP_Min() - 500.0 * Point; ObjectDelete("ygsl"); yoyakus(); } else { gi_896 = FALSE; gi_944 = FALSE; g_price_808 = ObjectGet("ygsell", OBJPROP_PRICE1); g_price_840 = g_price_808; ysline(); } } if (g_price_816 != ObjectGet("ysell", OBJPROP_PRICE1)) { if (ObjectFind("ysell") != 0) { gi_948 = TRUE; gi_956 = FALSE; g_price_816 = gd_864; g_price_848 = WP_Max() + 500.0 * Point; ObjectDelete("ysl"); yoyakugs(); } else { gi_896 = FALSE; gi_948 = FALSE; gi_964 = TRUE; g_price_816 = ObjectGet("ysell", OBJPROP_PRICE1); g_price_848 = g_price_816; ygsline(); } } if (g_price_824 != ObjectGet("ybuy", OBJPROP_PRICE1)) { if (ObjectFind("ybuy") != 0) { gi_952 = TRUE; gi_960 = FALSE; g_price_824 = gd_872; g_price_856 = WP_Min() - 500.0 * Point; ObjectDelete("ybl"); yoyakugb(); } else { gi_896 = FALSE; gi_952 = FALSE; gi_968 = TRUE; g_price_824 = ObjectGet("ybuy", OBJPROP_PRICE1); g_price_856 = g_price_824; ygbline(); } } if (!gi_940 && ObjectFind("ygbl") != 0) { gi_940 = TRUE; g_price_800 = gd_864; g_price_832 = WP_Max() + 500.0 * Point; ObjectDelete("ygbuy"); yoyakub(); } if (!gi_944 && ObjectFind("ygsl") != 0) { gi_944 = TRUE; g_price_808 = gd_872; g_price_840 = WP_Min() - 500.0 * Point; ObjectDelete("ygsell"); yoyakus(); } if (!gi_948 && ObjectFind("ysl") != 0) { gi_948 = TRUE; gi_956 = FALSE; g_price_816 = gd_864; g_price_848 = WP_Max() + 500.0 * Point; ObjectDelete("ysell"); yoyakugs(); } if (!gi_952 && ObjectFind("ybl") != 0) { gi_952 = TRUE; gi_960 = FALSE; g_price_824 = gd_872; g_price_856 = WP_Min() - 500.0 * Point; ObjectDelete("ybuy"); yoyakugb(); } if (S_Trail_ON) { if (gi_964 && !gi_948 && g_price_848 <= MIB()) { if (Sasine_Back) { g_price_816 = MIB() - S_Position_pips * Point; g_price_848 = g_price_816; yoyakugb(); ygbline(); } gi_956 = TRUE; gi_964 = FALSE; } if (!gi_948 && g_price_848 + S_Step_pips * Point <= MIB() - S_Position_pips * Point) { g_price_816 = MIB() - S_Position_pips * Point; g_price_848 = g_price_816; yoyakugs(); ygsline(); } if (gi_968 && !gi_952 && g_price_856 >= MIA()) { if (Sasine_Back) { g_price_824 = MIA() + S_Position_pips * Point; g_price_856 = g_price_824; yoyakugs(); ygsline(); } gi_960 = TRUE; gi_968 = FALSE; } if (!gi_952 && g_price_856 - S_Step_pips * Point >= MIA() + S_Position_pips * Point) { g_price_824 = MIA() + S_Position_pips * Point; g_price_856 = g_price_824; yoyakugb(); ygbline(); } } GlobalVariableSet("Global_Bsasine" + g_magic_400, ObjectGet("ybuy", OBJPROP_PRICE1)); GlobalVariableSet("Global_Ssasine" + g_magic_400, ObjectGet("ysell", OBJPROP_PRICE1)); } void yoyakub() { ObjectDelete("ygbuy"); ObjectCreate("ygbuy", OBJ_TEXT, 0, iTime(Symbol(), 0, gi_476), g_price_800); ObjectSetText("ygbuy", "買逆指", 10, "Terminal", KaiLine_Color); } void yoyakus() { ObjectDelete("ygsell"); ObjectCreate("ygsell", OBJ_TEXT, 0, iTime(Symbol(), 0, gi_476), g_price_808); ObjectSetText("ygsell", "売逆指", 10, "Terminal", UriLine_Color); } void yoyakugb() { ObjectDelete("ybuy"); ObjectCreate("ybuy", OBJ_TEXT, 0, iTime(Symbol(), 0, gi_480), g_price_824); ObjectSetText("ybuy", "買指値", 10, "Terminal", KaiLine_Color); } void yoyakugs() { ObjectDelete("ysell"); ObjectCreate("ysell", OBJ_TEXT, 0, iTime(Symbol(), 0, gi_480), g_price_816); ObjectSetText("ysell", "売指値", 10, "Terminal", UriLine_Color); } void ybline() { ObjectDelete("ygbl"); ObjectCreate("ygbl", OBJ_HLINE, 0, 0, g_price_832); ObjectSet("ygbl", OBJPROP_COLOR, KaiLine_Color); } void ysline() { ObjectDelete("ygsl"); ObjectCreate("ygsl", OBJ_HLINE, 0, 0, g_price_840); ObjectSet("ygsl", OBJPROP_COLOR, UriLine_Color); } void ygbline() { ObjectDelete("ybl"); ObjectCreate("ybl", OBJ_HLINE, 0, 0, g_price_856); ObjectSet("ybl", OBJPROP_COLOR, KaiLine_Color); } void ygsline() { ObjectDelete("ysl"); ObjectCreate("ysl", OBJ_HLINE, 0, 0, g_price_848); ObjectSet("ysl", OBJPROP_COLOR, UriLine_Color); } void yclear(int ai_0) { switch (ai_0) { case 0: ObjectDelete("ybuy"); ObjectDelete("ybl"); return; case 1: ObjectDelete("ysell"); ObjectDelete("ysl"); return; case 2: ObjectDelete("ygbuy"); ObjectDelete("ygbl"); return; case 3: ObjectDelete("ygsell"); ObjectDelete("ygsl"); return; return; } } void directlot() { ObjectDelete("key2"); reset3(); if (gi_440 > gi_492 + 12 && gi_440 < gi_496 + 3 && gi_444 > gi_604 + 24 && gi_444 < gi_604 + 309) { for (int l_count_0 = 0; l_count_0 < 19; l_count_0++) { switch (l_count_0) { case 0: gd_732 = minlot(); break; case 1: gd_732 = minlot() + stplot(); break; case 2: gd_732 = minlot() + 2.0 * stplot(); break; case 3: gd_732 = minlot() + 3.0 * stplot(); break; case 4: gd_732 = minlot() + 4.0 * stplot(); break; case 5: gd_732 = 10.0 * minlot(); break; case 6: gd_732 = 20.0 * minlot(); break; case 7: gd_732 = 30.0 * minlot(); break; case 8: gd_732 = 40.0 * minlot(); break; case 9: gd_732 = 50.0 * minlot(); break; case 10: gd_732 = 60.0 * minlot(); break; case 11: gd_732 = 70.0 * minlot(); break; case 12: gd_732 = 80.0 * minlot(); break; case 13: gd_732 = 90.0 * minlot(); break; case 14: gd_732 = 100.0 * minlot(); break; case 15: gd_732 = 200.0 * minlot(); break; case 16: gd_732 = 300.0 * minlot(); break; case 17: gd_732 = 400.0 * minlot(); break; case 18: gd_732 = 500.0 * minlot(); } if (gi_444 > gi_604 + 37 + 13 * l_count_0 && gi_444 < gi_604 + 49 + 13 * l_count_0) { g_color_1128 = Switch_ON_Color; if (GetAsyncKeyState(1) != 0) { for (l_count_0 = 0; l_count_0 < 19; l_count_0++) ObjectDelete("direct" + l_count_0); gi_972 = FALSE; g_lots_724 = gd_732; gi_896 = FALSE; return; } } else g_color_1128 = LotSettei_Color; ObjectDelete("direct" + l_count_0); ob_tx("direct" + l_count_0, DoubleToStr(gd_732, 2), 10, "Arial", g_color_1128, Hyouji_Position, gi_584 + 23, gi_604 + 33 + 13 * l_count_0); } } else { for (l_count_0 = 0; l_count_0 < 19; l_count_0++) ObjectDelete("direct" + l_count_0); gi_972 = FALSE; } } void pdirectlot(int ai_0) { int li_4; double ld_8; string ls_16; if (gi_440 > gi_536 && gi_444 > gi_604 + 113 + 30 * ai_0 && gi_440 < gi_540 && gi_444 < gi_604 + 113 + 30 * ai_0 + 117) { for (int l_count_24 = 0; l_count_24 < 7; l_count_24++) { switch (l_count_24) { case 0: ls_16 = "単数"; ld_8 = 0; break; case 1: ls_16 = "1/4"; ld_8 = 0.25; break; case 2: ls_16 = "1/3"; ld_8 = 0.33; break; case 3: ls_16 = "半分"; ld_8 = 0.5; break; case 4: ls_16 = "2/3"; ld_8 = 0.66; break; case 5: ls_16 = "3/4"; ld_8 = 0.75; break; case 6: ls_16 = "全部"; ld_8 = 1; } if (gi_444 > gi_604 + 129 + 30 * ai_0 + 13 * l_count_24 && gi_444 < gi_604 + 146 + 30 * ai_0 + 13 * l_count_24) { g_color_1132 = Switch_ON_Color; if (GetAsyncKeyState(1) != 0) { if (stplot() == 1.0) li_4 = 0; else { if (stplot() == 0.1) li_4 = 1; else if (stplot() == 0.01) li_4 = 2; } gda_740[ai_0] = NormalizeDouble(gda_748[ai_0] * ld_8, li_4); for (l_count_24 = 0; l_count_24 < 7; l_count_24++) ObjectDelete("pdirect" + l_count_24); gi_976 = FALSE; gi_896 = FALSE; return; } } else g_color_1132 = LotSettei_Color; ObjectDelete("pdirect" + l_count_24); ob_tx("pdirect" + l_count_24, ls_16, 10, "Terminal", g_color_1132, Hyouji_Position, gi_584 + 20, gi_604 + 125 + 30 * ai_0 + 13 * l_count_24); } } else { for (l_count_24 = 0; l_count_24 < 7; l_count_24++) ObjectDelete("pdirect" + l_count_24); gi_976 = FALSE; } } string m_action(string as_0) { if (as_0 == "成行買") as_0 = "Nariyuki BUY"; else { if (as_0 == "成行売") as_0 = "Nariyuki SELL"; else { if (as_0 == "指値買") as_0 = "Sasine BUY"; else { if (as_0 == "指値売") as_0 = "Sasine SELL"; else { if (as_0 == "逆指値買") as_0 = "Sasine BUY"; else { if (as_0 == "逆指値売") as_0 = "Sasine SELL"; else { if (as_0 == "強Limit") as_0 = "K-Limit Exit"; else { if (as_0 == "強Stop") as_0 = "K-Stop Exit"; else as_0 = "Exit"; } } } } } } } return (as_0); } void hoc(int ai_0) { ObjectDelete("hoc"); ob_tx("hoc", CharToStr(ai_0), 11, "Wingdings", LotSettei_Color, 1, 65, 0); } void shuuryou() { int li_0 = MessageBoxA(0, chrtext() + ":トレード終了をします", "トレード終了", 131120); if (li_0 == 1) { if (IsExpertEnabled() == TRUE) PlaySound("timeout"); else { PlaySound("ok"); for (int l_count_4 = 0; l_count_4 < 4; l_count_4++) yclear(l_count_4); kakutrailclear(); ObjectDelete("tjty"); ObjectDelete("auto"); ObjectDelete("hoc"); reset2(); reset3(); globaldel(); Comment(""); } } } void tyuui() { int li_0 = MessageBoxA(0, "決済されていません。ＥＡをＯＮにしてください。", "ポジション保有中", 131120); if (li_0 == 1) if (IsExpertEnabled() == FALSE) PlaySound("timeout"); } void arraysize() { ArrayResize(gia_412, Max_Position); ArrayResize(gia_416, Max_Position); ArrayResize(gia_660, Max_Position); ArrayResize(gia_664, Max_Position); ArrayResize(gia_668, Max_Position); ArrayResize(gda_740, Max_Position); ArrayResize(gda_744, Max_Position); ArrayResize(gda_748, Max_Position); ArrayResize(gda_752, Max_Position); ArrayResize(gba_924, Max_Position); ArrayResize(gia_420, Max_Position); ArrayResize(gsa_1028, Max_Position); ArrayResize(gda_784, Max_Position); ArrayResize(gda_780, Max_Position); ArrayResize(gba_928, Max_Position); ArrayResize(gba_932, Max_Position); ArrayResize(gda_768, Max_Position); ArrayResize(gba_936, Max_Position); } void rearray() { ArrayInitialize(gia_412, 0); ArrayInitialize(gia_664, 0); ArrayInitialize(gda_752, 0); ArrayInitialize(gba_924, 0); ArrayInitialize(gia_420, 0); ArrayInitialize(gsa_1028, 0); ArrayInitialize(gda_784, 0); ArrayInitialize(gda_780, 0); ArrayInitialize(gba_928, 1); ArrayInitialize(gba_932, 0); ArrayInitialize(gda_768, 0); ArrayInitialize(gba_936, 0); } void syscheck() { int l_index_0 = 0; for (int l_pos_4 = 0; l_pos_4 < OrdersTotal(); l_pos_4++) { if (OrderSelect(l_pos_4, SELECT_BY_POS, MODE_TRADES) == TRUE) { if (OrderSymbol() == Symbol()) { if (OrderMagicNumber() == GlobalVariableGet("Global_MagicNO" + OrderMagicNumber())) { if (gi_880) { gi_880 = FALSE; ttcom(2, "System Continue", OrderMagicNumber()); } g_magic_400 = OrderMagicNumber(); GlobalVariableSet("Global_MagicNumber" + hwindow(), g_magic_400); gia_416[l_index_0] = GlobalVariableGet("Global_ticketbank2" + g_magic_400 + l_index_0); gia_668[l_index_0] = GlobalVariableGet("Global_timebank2" + g_magic_400 + l_index_0); gda_740[l_index_0] = GlobalVariableGet("Global_lot" + g_magic_400 + l_index_0); gda_780[l_index_0][0] = GlobalVariableGet("Global_Kstop0" + g_magic_400 + l_index_0); gda_780[l_index_0][1] = GlobalVariableGet("Global_Kstop1" + g_magic_400 + l_index_0); gda_780[l_index_0][2] = GlobalVariableGet("Global_Kstop2" + g_magic_400 + l_index_0); gda_784[l_index_0] = GlobalVariableGet("Global_Klimit" + g_magic_400 + l_index_0); gda_768[l_index_0] = GlobalVariableGet("Global_tKks" + g_magic_400 + l_index_0); gba_928[l_index_0] = GlobalVariableGet("Global_kl1" + g_magic_400 + l_index_0); gba_932[l_index_0] = GlobalVariableGet("Global_kl2" + g_magic_400 + l_index_0); gba_936[l_index_0] = GlobalVariableGet("Global_klclr" + g_magic_400 + l_index_0); g_lots_724 = GlobalVariableGet("Global_ilot" + g_magic_400); gi_620 = GlobalVariableGet("Global_entcount" + g_magic_400); gi_624 = GlobalVariableGet("Global_kcount" + g_magic_400); Max_Position = GlobalVariableGet("Global_Max_Position" + g_magic_400); KyouseiLimit_pips = GlobalVariableGet("Global_KyouseiLimit_pips" + g_magic_400); K_Limit_Trail_ON = GlobalVariableGet("Global_K_Limit_Trail_ON" + g_magic_400); K_Limit_Step_pips = GlobalVariableGet("Global_K_Limit_Step_pips" + g_magic_400); K_Limit_Position = GlobalVariableGet("Global_K_Limit_Position" + g_magic_400); K_Limit_Back = GlobalVariableGet("Global_K_Limit_Back" + g_magic_400); KyouseiStop_pips = GlobalVariableGet("Global_KyouseiStop_pips" + g_magic_400); Trail_ON = GlobalVariableGet("Global_Trail_ON" + g_magic_400); Step_pips = GlobalVariableGet("Global_Step_pips" + g_magic_400); S_Trail_ON = GlobalVariableGet("Global_S_Trail_ON" + g_magic_400); S_Step_pips = GlobalVariableGet("Global_S_Step_pips" + g_magic_400); S_Position_pips = GlobalVariableGet("Global_S_Position_pips" + g_magic_400); Sasine_Back = GlobalVariableGet("Global_Sasine_Back" + g_magic_400); S_Kyoyou_pips = GlobalVariableGet("Global_S_Kyoyou_pips" + g_magic_400); l_index_0++; } } } } } void globaldel() { for (int l_count_0 = 0; l_count_0 < Max_Position; l_count_0++) { GlobalVariableDel("Global_ticketbank2" + g_magic_400 + l_count_0); GlobalVariableDel("Global_timebank2" + g_magic_400 + l_count_0); GlobalVariableDel("Global_lot" + g_magic_400 + l_count_0); GlobalVariableDel("Global_Kstop0" + g_magic_400 + l_count_0); GlobalVariableDel("Global_Kstop1" + g_magic_400 + l_count_0); GlobalVariableDel("Global_Kstop2" + g_magic_400 + l_count_0); GlobalVariableDel("Global_Klimit" + g_magic_400 + l_count_0); } GlobalVariableDel("Global_Stop_pips" + g_magic_400); GlobalVariableDel("Global_Limit_pips" + g_magic_400); GlobalVariableDel("tGlobal_Stop_pips" + g_magic_400); GlobalVariableDel("tGlobal_Limit_pips" + g_magic_400); GlobalVariableDel("Global_MagicNumber" + hwindow()); GlobalVariableDel("Global_entcount" + g_magic_400); GlobalVariableDel("Global_kcount" + g_magic_400); GlobalVariableDel("Global_Max_Position" + g_magic_400); GlobalVariableDel("Global_KyouseiLimit_pips" + g_magic_400); GlobalVariableDel("Global_K_Limit_Trail_ON" + g_magic_400); GlobalVariableDel("Global_K_Limit_Step_pips" + g_magic_400); GlobalVariableDel("Global_K_Limit_Position" + g_magic_400); GlobalVariableDel("Global_K_Limit_Back" + g_magic_400); GlobalVariableDel("Global_KyouseiStop_pips" + g_magic_400); GlobalVariableDel("Global_Trail_ON" + g_magic_400); GlobalVariableDel("Global_Step_pips" + g_magic_400); GlobalVariableDel("Global_S_Trail_ON" + g_magic_400); GlobalVariableDel("Global_S_Step_pips" + g_magic_400); GlobalVariableDel("Global_S_Position_pips" + g_magic_400); GlobalVariableDel("Global_Sasine_Back" + g_magic_400); GlobalVariableDel("Global_S_Kyoyou_pips" + g_magic_400); } void LS_settei() { string ls_0 = "こちらの業者は小数点以下が１桁多く表\示されています" + "\n" + "　現在の強制ストップ値：" + DoubleToStr(KyouseiStop_pips, 0) + "\n" + "　現在の強制リミット値：" + DoubleToStr(KyouseiLimit_pips, 0) + "\n" + "などとなっていますが各設定値を×１０に変更しますか？"; int li_8 = MessageBoxA(0, ls_0, "ストップ・リミット設定値確認", 131124); if (li_8 == 6) { KyouseiStop_pips = 10 * KyouseiStop_pips; KyouseiLimit_pips = 10 * KyouseiLimit_pips; K_Limit_Step_pips = 10 * K_Limit_Step_pips; K_Limit_Position = 10 * K_Limit_Position; Step_pips = 10 * Step_pips; S_Step_pips = 10 * S_Step_pips; S_Position_pips = 10 * S_Position_pips; S_Kyoyou_pips = 10 * S_Kyoyou_pips; PlaySound("connect"); } } int init() { if (MarketInfo("USDJPY", MODE_DIGITS) == 3.0) { LS_settei(); gi_644 = 10; } else gi_644 = 1; gi_880 = TRUE; g_bool_892 = IsTesting(); g_lots_724 = Lots; if (!GlobalVariableCheck("GlobalMagicNumber")) GlobalVariableSet("GlobalMagicNumber", 1000); else { if (OrdersTotal() != 0) g_magic_400 = GlobalVariableGet("GlobalMagicNumber"); else { g_magic_400 = GlobalVariableGet("GlobalMagicNumber") + 1.0; if (g_magic_400 > 9999) g_magic_400 = 1000; GlobalVariableSet("GlobalMagicNumber", g_magic_400); } } switch (Period()) { case PERIOD_M1: gs_1020 = ",M1"; break; case PERIOD_M5: gs_1020 = ",M5"; break; case PERIOD_M15: gs_1020 = ",M15"; break; case PERIOD_M30: gs_1020 = ",M30"; break; case PERIOD_H1: gs_1020 = ",H1"; break; case PERIOD_H4: gs_1020 = ",H4"; break; case PERIOD_D1: gs_1020 = ",D1"; break; case PERIOD_W1: gs_1020 = ",W1"; break; case PERIOD_MN1: gs_1020 = ",MN1"; } gi_580 = GetForegroundWindow(); gi_424 = WindowHandle(Symbol(), 0); ttcom(2, "EA Start", GlobalVariableGet("GlobalMagicNumber")); ttcom(2, "MagicNo." + DoubleToStr(g_magic_400, 0), ???); GlobalVariableSet("Global_MagicNumber" + gi_424, g_magic_400); for (int l_count_4 = 0; l_count_4 < 4; l_count_4++) yclear(l_count_4); sgreset(); arraysize(); rearray(); GlobalVariableSet("Global_ilot" + g_magic_400, g_lots_724); GlobalVariableSet("Global_S_Trail_ON" + g_magic_400, S_Trail_ON); GlobalVariableSet("Global_Sasine_Back" + g_magic_400, Sasine_Back); GlobalVariableSet("Global_K_Limit_Trail_ON" + g_magic_400, K_Limit_Trail_ON); GlobalVariableSet("Global_K_Limit_Back" + g_magic_400, K_Limit_Back); GlobalVariableSet("Global_Trail_ON" + g_magic_400, Trail_ON); GlobalVariableSet("Global_S_Step_pips" + g_magic_400, S_Step_pips); GlobalVariableSet("Global_S_Position_pips" + g_magic_400, S_Position_pips); GlobalVariableSet("Global_S_Kyoyou_pips" + g_magic_400, S_Kyoyou_pips); GlobalVariableSet("Global_KyouseiLimit_pips" + g_magic_400, KyouseiLimit_pips); GlobalVariableSet("Global_K_Limit_Step_pips" + g_magic_400, K_Limit_Step_pips); GlobalVariableSet("Global_K_Limit_Position" + g_magic_400, K_Limit_Position); GlobalVariableSet("Global_KyouseiStop_pips" + g_magic_400, KyouseiStop_pips); GlobalVariableSet("Global_Step_pips" + g_magic_400, Step_pips); GlobalVariableSet("Global_Max_Position" + g_magic_400, Max_Position); GlobalVariableSet("Global_All_exit" + g_magic_400, 0); GlobalVariableSet("Global_pos_exit" + g_magic_400, EMPTY_VALUE); return (0); } int deinit() { PlaySound("ok"); for (int l_count_0 = 0; l_count_0 < 4; l_count_0++) yclear(l_count_0); kakutrailclear(); ObjectDelete("tjty"); ObjectDelete("auto"); ObjectDelete("hoc"); reset2(); reset3(); globaldel(); Comment(""); return (0); } int start() { if (BaiBaiPointer) { g_color_1116 = Blue; gi_1120 = 255; g_color_1124 = Orange; } else { g_color_1116 = CLR_NONE; gi_1120 = -1; g_color_1124 = CLR_NONE; } if (!g_bool_892) g_lots_724 = Lots; syscheck(); while (true) { arraysize(); if (!GetAsyncKeyState(1)) gi_896 = TRUE; if (!g_bool_892) { if (IsExpertEnabled() == FALSE) { if (gia_412[0] == 0) { shuuryou(); return (-1); } tyuui(); } } GetCursorPos(gia_428); gi_448 = gia_428[0]; gi_452 = gia_428[1]; ScreenToClient(hwindow(), gia_428); gi_440 = gia_428[0]; gi_444 = gia_428[1]; gi_468 = WindowFromPoint(gi_448, gi_452); if (gi_468 == hwindow()) gi_904 = TRUE; else gi_904 = FALSE; GetClientRect(hwindow(), gia_432); gi_456 = gia_432[2]; gi_unused_460 = gia_432[3]; gi_472 = MathCeil(70 * cand() / gi_456); gi_476 = MathCeil(gi_472); if (gi_476 == 0) gi_480 = 4; else { if (gi_476 == 1) gi_480 = 8; else gi_480 = gi_472 + gi_476; } prop(); tyuumonrate(); mt_mc(); exit(); lotset(); kakutrail(); if (!gi_972) { torihikirate(); reset3(); sg_mt(); sg_mc(); } if ((gi_972 && SinshukuHyouji == 0) || (gi_976 && SinshukuHyouji == 0)) kakutrailclear(); else kakutrailhyouji(); ikkatu(); sasinegyakusasine(); positionhyouji(); ttmode(0); if (iBarShift(Symbol(), 0, gi_1152) != 0) { yoyakub(); yoyakus(); yoyakugb(); yoyakugs(); gi_1152 = TimeCurrent(); } if (SousaRireki) { Comment(gs_1060); gi_608 = 25; } else gi_608 = 0; if (g_bool_892) break; if (gi_888) { gi_888 = FALSE; ttmode(2); break; } Sleep(100); } return (0); }