Orders Execution
Miscellaneous
0
Views
0
Downloads
0
Favorites
i-UrovenZero-v_3_11_0
//+------------------------------------------------------------------+
//| 28.01.2012 i-UrovenZero v.3.11.0.mq4 |
//| bor-ix |
//+------------------------------------------------------------------+
#property copyright "bor-ix i-UrovenZero v.3.11.0 îò 28.01.2012 12:50"
#property strict
#property indicator_chart_window
//111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111//
// íàñòðîéêè èíäèêàòîðà:
//---------------------------------------------------------------------------------------------//
extern string Ìàãèêè ="------------------------------------------------------------";
extern int MagicNumber1=-1; //íîìåð ìàãèêà (MagicNumber: "-1" - âñå îðäåðà; "0" - îðäåðà óñòàíîâëåííûå îáû÷íûì ñïîñîáîì; íå ðàâíûå "-1" - îðäåðà ñ óñòàíîâëåííûì MagicNumber)
extern int MagicNumber2 = -1;
extern int MagicNumber3 = -1;
extern int MagicNumber4 = -1;
extern int MagicNumber5 = -1;
extern int MagicNumber6 = -1;
extern int MagicNumber7 = -1;
extern int MagicNumber8 = -1;
extern int MagicNumber9 = -1;
extern int MagicNumber10 = -1;
extern string Òèêåòû = "------------------------------------------------------------";
extern int OrderTicket1=-1; //íîìåð òèêåòà (OrderTicket: "-1" - âñå îðäåðà; "0" - îðäåðà óñòàíîâëåííûå îáû÷íûì ñïîñîáîì; íå ðàâíûå "-1" - îðäåðà ñ óñòàíîâëåííûì OrderTicket)
extern int OrderTicket2 = -1;
extern int OrderTicket3 = -1;
extern int OrderTicket4 = -1;
extern int OrderTicket5 = -1;
extern int OrderTicket6 = -1;
extern int OrderTicket7 = -1;
extern int OrderTicket8 = -1;
extern int OrderTicket9 = -1;
extern int OrderTicket10 = -1;
//---------------------------------------------------------------------------------------------//
extern string Ðàñ÷åò_Ïî_Âñåì_Ïàðàì ="------------------------------------------------------------";
extern bool _FullSymbols=false; //â ðàñ÷åò ðàáîòû èíäèêàòîðà èñïîëüçîâàòü çíà÷åíèÿ îðäåðîâ ïî âñåì ïàðàì = true, òîëüêî ïî òåêóùåé ïàðå = false.
//----------------------------------------------------------------//
extern string Ïàíåëü_Ðàñ÷åòîâ ="==============================";
extern double Lots_R=00.10; //ââîäèì çíà÷åíèå îáúåìà ëîòà
extern double Rastojanie_R=1000.00; //ââîäèì çíà÷åíèå ðàññòîÿíèÿ â ïóíêòàõ
extern double Pribyl_R = 00.00; //ââîäèì çíà÷åíèå ïðèáûëè/óáûòêà â öåíòàõ
extern bool _CALC_0 = true; //âûâîä ïàíåëè íà ýêðàí
extern bool _CALC_dop = false; //âûâîä äîïîëíèòåëüíîé ïàíåëè àâòîìàòè÷åñêîé êàëüêóëÿöèè íà ýêðàí
extern string Ïîëîæåíèå_CALC = "------------------------------------------------------------";
extern int Ugol_C = 2; //ïîëîæåíèå íà ãðàôèêå
extern int C_XX = 5; //çíà÷åíèå êîîðäèíàò ïî ãîðèçîíòàëè
extern int C_YY = 5; //çíà÷åíèå êîîðäèíàò ïî âåðòèêàëè
extern color cvet_CALC_0 = Violet; //öâåò îñíîâíîé íàäïèñè ïàíåëè
extern color cvet_CALC_R = Orange; //öâåò íàäïèñè ðåçóëüòàòà ðàñ÷åòîâ
//----------------------------------------------------------------//
extern string Ïàíåëü_Òðåâîãè = "==============================";
extern bool _otRavnogoLoca = true; //âûáîð ðåæèìà ïðåäóïðåæäåíèÿ îòíîñèòåëüíî ðàâíîãî ëîêà
extern int dSig = 50; //ïóíêòîâ îò óðîâíÿ ðàâíîãî ëîêà
extern int PZM = 150; //ñèãíàëüíûé óðîâåíü â % îò óðîâíÿ ïîëíîãî ñëèâà - ïî áàëàíñó
extern string Ïîëîæåíèå_Ñèãí_ = "------------------------------------------------------------";
extern int Ugol_LD=1; //ïîëîæåíèå íà ãðàôèêå èíôî. ïàíåëè 3
extern int X_LD = 5;
extern int Y_LD = 5;
extern string Íàñòðîéêè_Çâóêà_1 = "------------------------------------------------------------";
extern bool _SignSumProfit = false; //çâóê ïðåâûøåíèÿ full ïðîôèòà
extern double dSumProfit = 50; //óðîâåíü ïðîôèòà ïî âñåì îðäåðàì
extern bool _SignSellProfit = false; //çâóê ïðåâûøåíèÿ sell ïðîôèòà
extern double dSellProfit = 50; //óðîâåíü ïðîôèòà ïî sell îðäåðàì
extern bool _SignBuyProfit = false; //çâóê ïðåâûøåíèÿ buy ïðîôèòà
extern double dBuyProfit = 50; //óðîâåíü ïðîôèòà ïî buy îðäåðàì
extern string Sound_Profit = "payment.wav";
extern bool _Sound_TP=false; //çâóê ïî äîñòèæåíèþ TP
extern string Sound_Profit2 ="pik1.wav";
extern bool _Sound_dS=false; //çâóê ïî äîñòèæåíèþ dS
extern string Sound_Profit3 = "pik2.wav";
extern string Íàñòðîéêè_Çâóêà_2 = "------------------------------------------------------------";
extern bool _SP_Bolshe=false; //çâóê äî ñèãíàëüíîãî óðîâíÿ ëîêà
extern string Sound_OK ="clock.wav";
extern bool _SP_Menshe=false; //çâóê ïîñëå ñèãíàëüíîãî óðîâíÿ ëîêà
extern string Sound_Alert = "alert.wav";
extern string Ñìåíà_Öâåòà = "------------------------------------------------------------";
extern bool _active_Si=true; //àêòèâíàÿ ñèãíàëèçàöèÿ - ñìåíà öâåòà âêëþ÷åííûõ ðåæèìîâ "MagicNumber" è "fullsymbols"
//----------------------------------------------------------------//
extern string ÏàíåëüÍàñòðÒåêñòà ="==============================";
extern string Shrift="Arial Narrow"; //øðèôòû - "Verdana", "Tahoma"
extern int RShrift = 8; //ðàçìåð øðèôòà - 9
extern double kY_str = 1.1; //êîýô.ðàññòîÿíèÿ ìåæäó ñòðîêàìè - 1.3
extern double kY_pan = 1.2; //êîýô.ðàññòîÿíèÿ ìåæäó ïàíåëÿìè - 1.7
extern string Ïîëîæ__ÒåêñòÏàí_ = "------------------------------------------------------------";
extern int Ugol_t = 3; //ïîëîæåíèå ïàíåëè â îêíå ãðàôèêà (0,1,2,3)
extern int XX = 5; //êîîðäèíàòà ïî îñè X
extern int YY = 5; //êîîðäèíàòà ïî îñè Y
extern string ÏàíåëüÊîììåíòàðèé = "------------------------------------------------------------";
extern bool _INFO_COMENT=false; //äîïîëíèòåëüíûå êîììåíòàðèè â ëåâîì âåðõíåì óãëó
//----------------------------------------------------------------//
extern string Ïàíåëü_Îðäåðîâ = "==============================";
extern bool _INFO_1 = true; //âûâîä òåêñòîâîé ïàíåëè íà ýêðàí
extern color Color_i1 = DarkGray; //öâåò òåêñòà ïàíåëè
extern color Color_i1b = Red; //öâåò òåêñòà ïî îòêðûòûì ïîçèöèÿì Buy
extern color Color_i1d = DodgerBlue; //öâåò òåêñòà ïî îòêðûòûì ïîçèöèÿì Buy-Sell
extern color Color_i1s = Red; //öâåò òåêñòà ïî îòêðûòûì ïîçèöèÿì Sell
extern color Color_i1sF = Maroon; //öâåò òåêñòà ïî âñåì îòêðûòûì ïîçèöèÿì Sell
extern color Color_i1bF = Maroon; //öâåò òåêñòà ïî âñåì îòêðûòûì ïîçèöèÿì Buy
//----------------------------------------------------------------//
extern string Ïàíåëü_Óðîâíåé ="==============================";
extern bool _INFO_2=false; //âûâîä òåêñòîâîé ïàíåëè íà ýêðàí
//----------------------------------------------------------------//
extern string Ïàíåëü_Áåçóáûòêà ="==============================";
extern bool _INFO_3=false; //âûâîä òåêñòîâîé ïàíåëè íà ýêðàí
//----------------------------------------------------------------//
extern string Ïàíåëü_Ïîêóïêè = "==============================";
extern bool _INFO_4 = true; //âûâîä òåêñòîâîé ïàíåëè íà ýêðàí
extern color Color_i4 = Orange; //öâåò òåêñòà ïàíåëè
//----------------------------------------------------------------//
extern string Ïàíåëü_Áàëàíñà = "==============================";
extern bool _INFO_5 = false; //âûâîä òåêñòîâîé ïàíåëè íà ýêðàí
extern color Color_i5 = IndianRed; //öâåò òåêñòà ïàíåëè
//----------------------------------------------------------------//
extern string Ïàíåëü_Èíôîðìàöèè = "==============================";
extern bool _INFO_6 = true; //âûâîä òåêñòîâîé ïàíåëè íà ýêðàí
extern color Color_i6 = DimGray; //öâåò òåêñòà ïàíåëè
//----------------------------------------------------------------//
extern string Íàñòðîéêà_Óðîâíåé = "==============================";
extern string Óðîâåíü_Çàìîðîçêè = "------------------------------------------------------------";
extern bool _uUr_Fr = true; //âûâîä òåêñòîâîé ïàíåëè íà ýêðàí
extern color Color_Fr = LightPink; //öâåò ëèíèè
extern int Style_Fr = 2; //òèï ëèíèè çàìîðîçêè (0,1,2,3,4)
extern int Width_Fr = 1; //òîëùèíà ëèíèè çàìîðîçêè (0,1,2,3,4)
extern string Óð__Ðàâíîãî_Ëîêà = "------------------------------------------------------------";
extern bool _uUr_RL = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern color Color_RL = DodgerBlue; //öâåò ëèíèè óðîâíÿ ðàâíîãî ëîêà
extern int Style_RL = 2; //òèï ëèíèè óðîâíÿ ðàâíîãî ëîêà (0,1,2,3,4)
extern int Width_RL = 1; //òîëùèíà ëèíèè óðîâíÿ ðàâíîãî ëîêà (0,1,2,3,4)
extern string Ñèãíàëüíûé_Óðîâåíü = "------------------------------------------------------------";
extern bool _uUr_Si = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern color Color_Si = Orange; //öâåò ëèíèè ñèãíàëüíîãî óðîâíÿ
extern int Style_Si = 2; //òèï ëèíèè ñèãíàëüíîãî óðîâíÿ (0,1,2,3,4)
extern int Width_Si = 1; //òîëùèíà ëèíèè ñèãíàëüíîãî óðîâíÿ (0,1,2,3,4)
extern string Óð__Íóëåâîé_Ìàðæè = "------------------------------------------------------------";
extern bool _uUr_ZM = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern color Color_ZM = Orange; //öâåò ëèíèè è òåêñòà óðîâíÿ íóëåâîé ìàðæè
extern int Style_ZM = 0; //òèï ëèíèè óðîâíÿ íóëåâîé ìàðæè (0,1,2,3,4)
extern int Width_ZM = 2; //òîëùèíà ëèíèè óðîâíÿ íóëåâîé ìàðæè (0,1,2,3,4)
extern string Óð__Ïîëíîãî_Ñëèâà = "------------------------------------------------------------";
extern bool _uUr_ZF = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern color Color_ZF = Red; //öâåò ëèíèè óðîâíÿ è òåêñòà ïîëíîãî ñëèâà
extern int Style_ZF = 0; //òèï ëèíèè óðîâíÿ ïîëíîãî ñëèâà (0,1,2,3,4)
extern int Width_ZF = 2; //òîëùèíà ëèíèè óðîâíÿ ïîëíîãî ñëèâà (0,1,2,3,4)
extern string Óð__StopOut = "------------------------------------------------------------";
extern bool _uUr_SO = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern color Color_SO = Red; //öâåò ëèíèè óðîâíÿ è òåêñòà StopOut
extern int Style_SO = 2; //òèï ëèíèè óðîâíÿ StopOut (0,1,2,3,4)
extern int Width_SO = 1; //òîëùèíà ëèíèè óðîâíÿ StopOut (0,1,2,3,4)
extern string Óð_Îáù__Áåçóáûòêà = "------------------------------------------------------------";
extern bool _uUrOZP = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern color Color_OZP = DeepSkyBlue; //öâåò ëèíèé è òåêñòà óðîâíÿ îáùåãî áåçóáûòêà
extern int Style_OZP = 1; //òèï ëèíèè óðîâíÿ îáùåãî áåçóáûòêà (0,1,2,3,4)
extern int Width_OZP = 2; //òîëùèíà ëèíèè óðîâíÿ îáùåãî áåçóáûòêà (0,1,2,3,4)
extern string Óð__Áåçóáûòêîâ = "------------------------------------------------------------";
extern bool _uUrZP=true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern color Color_ZP=MediumSeaGreen; //öâåò ëèíèé è òåêñòà óðîâíåé áåçóáûòêà Buy è Sell
extern int Style_ZP = 0; //òèï ëèíèè óðîâíåé áåçóáûòêà Buy è Sell (0,1,2,3,4)
extern int Width_ZP = 2; //òîëùèíà ëèíèè óðîâíåé áåçóáûòêà Buy è Sell (0,1,2,3,4)
extern string Óð_Áåçóáûò_è_ÒÏ="------------------------------------------------------------";
extern bool _UrZPpTP = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern int bTP = 50; //ðàññòîÿíèå ïðîôèòà îò óðîâíÿ áåçóáûòêà Buy
extern int sTP = 50; //ðàññòîÿíèå ïðîôèòà îò óðîâíÿ áåçóáûòêà Sell
extern int fTP = 50; //ðàññòîÿíèå ïðîôèòà îò îáùåãî óðîâíÿ áåçóáûòêà
extern color Color_ZPdP=MediumSeaGreen; //öâåò ëèíèè è òåêñòà ïðîôèòà + TP îò óðîâíåé áåçóáûòêà
extern int Style_ZPdP = 4; //òèï ëèíèè ïðîôèòà + TP îò óðîâíåé áåçóáûòêà (0,1,2,3,4)
extern int Width_ZPdP = 1; //òîëùèíà ëèíèè ïðîôèòà + TP îò óðîâíåé áåçóáûòêà (0,1,2,3,4)
extern string Óð__Áåçóáûò_è_S = "------------------------------------------------------------";
extern bool _UrZPpdS = true; //âûâîä ëèíèè óðîâíÿ íà ýêðàí
extern int dS = 100; //óðîâåíü ïðèáûëè S îò óðîâíÿ áåçóáûòêà
extern string Óð__Âîëàòèëüíîñòè = "------------------------------------------------------------";
extern bool _UrZPVlt=true; // âûâîä óðîâíÿ ïðèáûëè ïî âîëàòèëíîñòè îò óðîâíåé áåçóáûòêà
extern string Óð__Öåíòðà_Òÿæåñòè = "------------------------------------------------------------";
extern bool _UrCT = true;
extern color Color_UrCT=DarkOrange; //öâåò ëèíèè "Öåíòðà Òÿæåñòè"
extern int Style_UrCT = 0; //òèï ëèíèè "Öåíòðà Òÿæåñòè" (0,1,2,3,4)
extern int Width_UrCT = 2; //òîëùèíà ëèíèè "Öåíòðà Òÿæåñòè" (0,1,2,3,4)
extern string Îêðàñêà_çîí1 = "------------------------------------------------------------";
extern bool _Paint_LDZ = true; //îêðàñêà ìåðòâîé çîíû è çîíû ëîêà
extern color Color_LZ = LightYellow; //C'70,100,00'; //öâåò çîíû ëîêà
extern color Color_DZ = MistyRose; //C'70,00,00'; //öâåò ìåðòâîé çîíû
extern string Îêðàñêà_çîí2 = "------------------------------------------------------------";
extern bool _Paint_Profit = true; //îêðàñêà ïðîôèòíûõ çîí âîîáùå
extern int _UrX = 3; //îêðàñêà ïðîôèòíûõ çîí ïî TP=1, dS=2, Vlt=3
extern string Îêðàñêà_çîí3 = "------------------------------------------------------------";
extern bool _Dark_Ground = false;
extern color bColor_ZPdP_D = C'000,110,000';
extern color sColor_ZPdP_D = C'000,120,000';
extern color fColor_ZPdP_D = C'000,000,128';
extern color bColor_ZPdP_L = MistyRose; //C'207,239,222'; //öâåò çîíû íà÷àëà ïðîôèòà
extern color sColor_ZPdP_L = Lavender; //C'207,249,222'; //öâåò çîíû íà÷àëà ïðîôèòà
extern color fColor_ZPdP_L=C'215,245,255'; //öâåò çîíû íà÷àëà îáùåãî ïðîôèòà
extern string Ïåðèîä_Âîëàò_òè ="==============================";
extern int chislo_barov=1000; //êîëè÷åñòâî áàðîâ äëÿ ðàñ÷åòà ñðåäíåé âîëàòèëüíîñòè
extern string Îòîáðàæåíèå_Îðäåðîâ = "==============================";
extern bool paint_ord_i_obem = true;
extern bool paint_obem_ord = true;
extern bool paint_ord_i_obem2 = true;
extern bool paint_obem_ord2 = false;
extern bool history = true;
extern color TOB_Color = Red;
extern color TOS_Color = Blue;
extern color OOB_Color = Pink;
extern color OOS_Color = PowderBlue;
extern string O_yy = " "; //ñìåùåíèå îò òî÷êè îòêðûòèÿ âëåâî
extern int O_xx = 1; //ñìåùåíèå îò òî÷êè îòêðûòèÿ ââåðõ
//----------------------------------------------------------------//
string comment="";
//Comment("");
//---------------------------------------------------------------------------------------------//
//111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111//
//222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222//
//ôóíêöèÿ ñòèðàíèÿ íàðèñîâàííûõ îáúåêòîâ ïîñëå çàêðûòèÿ èíäèêàòîðà
//---------------------------------------------------------------------------------------------//
int deinit()
{
ObjectDelete_();
Del_comment("îðä. ¹:");
Del_comment("îðä..¹:");
Del_comment("îðä .¹:");
Del_comment("îáú.îðä");
Del_comment("îáú-îðä");
Del_comment("_Óðîâåí");
Del_comment("Ðàçìåð ");
return(0);
}
//---------------------------------------------------------------------------------------------//
//222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222//
//#############################################################################################//
//íà÷àëî èñïîëíÿåìîãî êîäà èíäèêàòîðà:
//---------------------------------------------------------------------------------------------//
int start()
{
ObjectDelete_(); //ñòèðàåì âñ¸ óñòàíîâëåííîå ýòèì èíäèêàòîðîì
Del_comment("îðä. ¹:");
Del_comment("îðä..¹:");
Del_comment("îðä .¹:");
Del_comment("îáú.îðä");
Del_comment("îáú-îðä");
Del_comment("_Óðîâåí");
Del_comment("Ðàçìåð ");
//=============================================================================================//
//ëè÷íàÿ èíôîðìàöèÿ:
//---------------------------------------------------------------------------------------------//
if(_INFO_COMENT==true)
{
Comment_("----------------------------");
Comment_(" "+AccountName());
string type="Ðåàë"; if(IsDemo()) type="Äåìî";
Comment_(" Òèï ñ÷åòà: "+type+"\n ¹: "+AccountNumber());
Comment_(" 쑌֔: 1/"+AccountLeverage());
Comment_("----------------------------");
Comment("----------------------------\n i-UrovenZero v.3.11.0"+comment); comment="";
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//èíôðîðìàöèÿ î ñ÷åòå:
//---------------------------------------------------------------------------------------------//
double min_lot = MarketInfo(Symbol(), MODE_MINLOT); //ðàçìåð ìèíèìàëüíîãî ëîòà
double max_lot = MarketInfo(Symbol(), MODE_MAXLOT); //ðàçìåð ìàêñèìàëüíîãî ëîòà
double lot_cena = MarketInfo(Symbol(), MODE_MARGINREQUIRED); //öåíà 1.0 ëîòà
double lot_zalog = MarketInfo(Symbol(), MODE_MARGININIT); //çàëîã çà 1.0 ëîò
double tickvalue = MarketInfo(Symbol(), MODE_TICKVALUE); //öåíà îäíîãî ïóíêòà
double swap_buy = MarketInfo(Symbol(), MODE_SWAPLONG); //ñâîï äëÿ BUY â ïóíêòàõ
double swap_sell = MarketInfo(Symbol(), MODE_SWAPSHORT); //ñâîï äëÿ SELL â ïóíêòàõ
double spread = MarketInfo(Symbol(), MODE_SPREAD); //ðàçìåð ñïðýäà
double freeze = MarketInfo(Symbol(), MODE_STOPLEVEL); //ìèíèìàëüíî äîïóñòèìûé óðîâåíü ñòîï-ëîññà/òåéê-ïðîôèòà â ïóíêòàõ
if(freeze==0 && AccountCompany()=="Alpari NZ Limited") freeze=spread*2;
double balance = AccountBalance(); //çíà÷åíèå áàëàíñà àêòèâíîãî ñ÷åòà
double equity = AccountEquity(); //èìåþùèåñÿ íà ñ÷åòó ñðåäñòâà
double margin = AccountMargin(); //ñóììà çàëîãîâûõ ñðåäñòâ
double freemargin = AccountFreeMargin(); //èìåþùèåñÿ íà ñ÷åòó ñâîáîäíûõ ñðåäñòâ
double stop_out = AccountStopoutLevel(); //Stop Out (ïðèíóäèòåëüíîå çàêðûòèå ïîçèöèé)
double znakov = MathPow (10, MarketInfo(Symbol(), MODE_DIGITS)); //êîîýô.óìíîæåíèÿ äëÿ çíàêîâ âàëþòíîé ïàðû
double mindigits = NormalizeDouble(-MathLog(min_lot)/MathLog(10), 0); //êîëè÷åñòâî çíàêîâ â ìèíèìàëüíîì îáúåìå ëîòà
double margin_level=0;
if(margin>0) margin_level=equity/margin*100; //ïðîöåíò ñâîáîäíûõ ñðåäñòâ
double min_balans = lot_cena * min_lot; //ðàñ÷åò ñòîèìîñòè ìèíèìàëüíîãî ëîòà
double lots_take = freemargin / lot_cena; //êîëè÷åñòâî ëîòîâ êîòîðîå ìîæíî êóïèòü
double BuySwapPlus=0;
double BuySwapMinus=0;
double SellSwapPlus=0;
double SellSwapMinus=0;
double BuyLots = 0;
double SellLots = 0;
double OP_BuyLimit = 0;
double OP_SellLimit = 0;
double OP_BuyStop = 0;
double OP_SellStop = 0;
int All_Order_Buy = 0;
int All_Order_Sell = 0;
double BuyProfit=0;
double SellProfit=0;
double SellProfitMinus=0;
double SellLotsMinus=0;
int All_Order_Sell_Minus=0;
double SellProfitPlus=0;
int All_Order_Sell_Plus=0;
double SellLotsPlus=0;
int All_OP_SellStop = 0;
int All_OP_BuyLimit = 0;
int All_OP_SellLimit = 0;
double BuyProfitMinus=0;
double BuyLotsMinus=0;
int All_Order_Buy_Minus=0;
double BuyProfitPlus=0;
double BuyLotsPlus=0;
int All_Order_Buy_Plus=0;
int All_OP_BuyStop = 0;
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
// ðàñ÷åò ñðåäíåé âîëàòèëüíîñòè
//---------------------------------------------------------------------------------------------//
int i,NN,s=0,b=0,vlt;
if(chislo_barov>Bars) NN=Bars;
else NN=chislo_barov;
for(i=NN; i>0; i--)
{
s = s + (High[i]-Low[i])/Point;
b = b + 1;
}
vlt=s/b;
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ðàñ÷åò îáúåìà, êîëè÷åñòâà îðäåðîâ è èõ ïðèáûëè:
//---------------------------------------------------------------------------------------------//
if(OrdersTotal()>0)
{
for(double ord=0; ord<OrdersTotal(); ord++)
{
if(!OrderSelect(ord,SELECT_BY_POS,MODE_TRADES)) break;
{
if(_FullSymbols==false && OrderSymbol()!=Symbol()) continue;
{
if((MagicNumber1==-1 &&
MagicNumber2 == -1 &&
MagicNumber3 == -1 &&
MagicNumber4 == -1 &&
MagicNumber5 == -1 &&
MagicNumber6 == -1 &&
MagicNumber7 == -1 &&
MagicNumber8 == -1 &&
MagicNumber9 == -1 &&
MagicNumber10== -1 &&
OrderTicket1 == -1 &&
OrderTicket2 == -1 &&
OrderTicket3 == -1 &&
OrderTicket4 == -1 &&
OrderTicket5 == -1 &&
OrderTicket6 == -1 &&
OrderTicket7 == -1 &&
OrderTicket8 == -1 &&
OrderTicket9 == -1 &&
OrderTicket10== -1)||
OrderMagicNumber() == MagicNumber1 ||
OrderMagicNumber() == MagicNumber2 ||
OrderMagicNumber() == MagicNumber3 ||
OrderMagicNumber() == MagicNumber4 ||
OrderMagicNumber() == MagicNumber5 ||
OrderMagicNumber() == MagicNumber6 ||
OrderMagicNumber() == MagicNumber7 ||
OrderMagicNumber() == MagicNumber8 ||
OrderMagicNumber() == MagicNumber9 ||
OrderMagicNumber() == MagicNumber10 ||
OrderTicket() == OrderTicket1 ||
OrderTicket() == OrderTicket2 ||
OrderTicket() == OrderTicket3 ||
OrderTicket() == OrderTicket4 ||
OrderTicket() == OrderTicket5 ||
OrderTicket() == OrderTicket6 ||
OrderTicket() == OrderTicket7 ||
OrderTicket() == OrderTicket8 ||
OrderTicket() == OrderTicket9 ||
OrderTicket() == OrderTicket10)
{
switch(OrderType()) //ðàñ÷åò îáúåìîâ îðäåðîâ ïî òèïó:
{
case OP_BUYSTOP: OP_BuyStop = OP_BuyStop + OrderLots(); break;
case OP_BUY: BuyLots = BuyLots + OrderLots(); break;
case OP_BUYLIMIT: OP_BuyLimit = OP_BuyLimit + OrderLots(); break;
case OP_SELLLIMIT: OP_SellLimit = OP_SellLimit + OrderLots(); break;
case OP_SELL: SellLots = SellLots + OrderLots(); break;
case OP_SELLSTOP: OP_SellStop = OP_SellStop + OrderLots(); break;
}
switch(OrderType()) //ðàñ÷åò òåêóùåé ïðèáûëè îðäåðîâ è èõ îáúåìà:
{
case OP_BUY:
{
BuyProfit=BuyProfit+OrderProfit()+OrderCommission()+OrderSwap();
if((OrderProfit()+OrderCommission()+OrderSwap())>0) BuySwapPlus=BuySwapPlus+OrderSwap();
if((OrderProfit()+ OrderCommission()+ OrderSwap())>0) BuyProfitPlus = BuyProfitPlus + OrderProfit() + OrderCommission() + OrderSwap();
if((OrderProfit() + OrderCommission() + OrderSwap())>0) BuyLotsPlus = BuyLotsPlus + OrderLots();
if((OrderProfit()+OrderCommission()+OrderSwap())>0) All_Order_Buy_Plus=All_Order_Buy_Plus+1;
if((OrderProfit()+OrderCommission()+OrderSwap())<0) BuySwapMinus=BuySwapMinus+OrderSwap();
if((OrderProfit()+ OrderCommission()+ OrderSwap())<0) BuyProfitMinus = BuyProfitMinus + OrderProfit() + OrderCommission() + OrderSwap();
if((OrderProfit() + OrderCommission() + OrderSwap())<0) BuyLotsMinus = BuyLotsMinus + OrderLots();
if((OrderProfit()+OrderCommission()+OrderSwap())<0) All_Order_Buy_Minus=All_Order_Buy_Minus+1;
}
break;
case OP_SELL:
{
SellProfit=SellProfit+OrderProfit()+OrderCommission()+OrderSwap();
if((OrderProfit()+OrderCommission()+OrderSwap())>0) SellSwapPlus=SellSwapPlus+OrderSwap();
if((OrderProfit()+ OrderCommission()+ OrderSwap())>0) SellProfitPlus = SellProfitPlus + OrderProfit() + OrderCommission() + OrderSwap();
if((OrderProfit() + OrderCommission() + OrderSwap())>0) SellLotsPlus = SellLotsPlus + OrderLots();
if((OrderProfit()+OrderCommission()+OrderSwap())>0) All_Order_Sell_Plus=All_Order_Sell_Plus+1;
if((OrderProfit()+OrderCommission()+OrderSwap())<0) SellSwapMinus=SellSwapMinus+OrderSwap();
if((OrderProfit()+ OrderCommission()+ OrderSwap())<0) SellProfitMinus = SellProfitMinus + OrderProfit() + OrderCommission() + OrderSwap();
if((OrderProfit() + OrderCommission() + OrderSwap())<0) SellLotsMinus = SellLotsMinus + OrderLots();
if((OrderProfit()+OrderCommission()+OrderSwap())<0) All_Order_Sell_Minus=All_Order_Sell_Minus+1;
}
break;
}
switch(OrderType()) //ðàñ÷åò êîëè÷åñòâà îðäåðîâ ïî òèïó:
{
case OP_BUYSTOP: All_OP_BuyStop = All_OP_BuyStop + 1; break;
case OP_BUY: All_Order_Buy = All_Order_Buy + 1; break;
case OP_BUYLIMIT: All_OP_BuyLimit = All_OP_BuyLimit + 1; break;
case OP_SELLLIMIT: All_OP_SellLimit = All_OP_SellLimit + 1; break;
case OP_SELL: All_Order_Sell = All_Order_Sell + 1; break;
case OP_SELLSTOP: All_OP_SellStop = All_OP_SellStop + 1; break;
}
}
}
}
}
}
double SumBuySwap=BuySwapPlus+BuySwapMinus;
double SumSellSwap=SellSwapPlus+SellSwapMinus;
double SumSwap=SumBuySwap+SumSellSwap;
bool noLotsRab=false;
bool noLotsOtl=false;
if(BuyLots==0 && SellLots==0) { noLotsRab=true; } //îòñóòñòâèå ðåàëüíûõ îðäåðîâ
if(OP_BuyStop==0 && OP_BuyLimit==0 && OP_SellLimit==0 && OP_SellStop==0) { noLotsOtl=true; } //îòñóòñòâèå îòëîæåííûõ îðäåðîâ
double dLots = BuyLots - SellLots; //ðàçíîñòü îáúåìîâ îðäåðîâ Buy è Sell
double dOrd = All_Order_Buy - All_Order_Sell; //ðàçíîñòü êîëè÷åñòâà îðäåðîâ Buy è Sell
double SumOrd = All_Order_Buy + All_Order_Sell; //ñóììà êîëè÷åñòâà îðäåðîâ Buy è Sell
double SumProfit = BuyProfit + SellProfit; //ðàñ÷åò òåêóùåé ïðèáûëè ïî îòêðûòûì ïîçèöèÿì
double dlots = NormalizeDouble(dLots,Digits); //óáèðàåì ïîãðåøíîñòü â ðàñ÷åòå êîëè÷åñòâà îðäåðîâ
double SumLots = BuyLots + SellLots; //ñóììà îáúåìîâ îðäåðîâ Buy è Sell
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ðàñ÷åòû óðîâíåé:
//---------------------------------------------------------------------------------------------//
double dZM,UrZM,dZF,UrZF,dDZ,dPZM,UrPZM,dSO,UrSO,UrZPb,UrZPs,UrOZP,bdS,sdS,fdS,UrCT,UrOZPZ,UrCTZ,idCT,UrZPbVlt,UrZPsVlt,UrZPfVlt,
idZP,UrRL,UrZPbTP,UrZPsTP,UrZPfTP,UrZPbdS,UrZPsdS,UrZPfdS,dUrRL,UrAut,UrTP_frz,UrSL_frz,idZM,dUrZP;
if(dlots!=0)
{
dZM = freemargin / (tickvalue * dlots); //ðàññòîÿíèå îò öåíû äî óðîâíÿ íóëåâîé ìàðæè
dZF = equity / (tickvalue * dlots); //ðàññòîÿíèå îò öåíû äî ïîëíîãî ñëèâà
dDZ = dZF - dZM; //ðàçìåð "ìåðòâîé" çîíû
dPZM = dZF - dDZ * PZM / 100; //ðàññòîÿíèå îò öåíû äî óêàçàííîãî % îò óðîâíÿ ïîëíîãî ñëèâà - ñèãíàëüíîãî óðîâíÿ
dSO = dZF - dDZ * stop_out / 100; //ðàññòîÿíèå îò öåíû äî óðîâíÿ ïðèíóäèòåëüíîãî çàêðûòèÿ îðäåðîâ
if(dlots > 0) UrSO = Bid - dSO * Point; //çíà÷åíèå óðîâíÿ ïðèíóäèòåëüíîãî çàêðûòèÿ îðäåðîâ - StopOut
if(dlots < 0) UrSO = Ask - dSO * Point; //çíà÷åíèå óðîâíÿ ïðèíóäèòåëüíîãî çàêðûòèÿ îðäåðîâ - StopOut
if(dlots > 0) UrZM = Bid - dZM * Point; //çíà÷åíèå óðîâíÿ íóëåâîé ìàðæè
if(dlots < 0) UrZM = Ask - dZM * Point; //çíà÷åíèå óðîâíÿ íóëåâîé ìàðæè
if(dlots > 0) UrZF = Bid - dZF * Point; //çíà÷åíèå óðîâíÿ ïîëíîãî ñëèâà
if(dlots < 0) UrZF = Ask - dZF * Point; //çíà÷åíèå óðîâíÿ ïîëíîãî ñëèâà
if(dlots > 0) UrPZM = Bid - dPZM * Point; //çíà÷åíèå % ñèãíàëüíîãî óðîâíÿ
if(dlots < 0) UrPZM = Ask - dPZM * Point; //çíà÷åíèå % ñèãíàëüíîãî óðîâíÿ
if(dlots > 0) dUrRL = (dlots * lot_cena - freemargin) / (tickvalue * dlots); //ðàññòîÿíèå äî óðîâíÿ Ðàâíîãî Ëîêà
if(dlots < 0) dUrRL = (dlots * lot_cena + freemargin) / (tickvalue * dlots); //ðàññòîÿíèå äî óðîâíÿ Ðàâíîãî Ëîêà
if(dlots > 0) UrRL = Bid + dUrRL * Point; //óðîâåíü ðàâíîãî ëîêà
if(dlots < 0) UrRL = Ask - dUrRL * Point; //óðîâåíü ðàâíîãî ëîêà
if(dlots > 0) UrAut = UrRL + dSig * Point; //çíà÷åíèå àâòîìàòè÷åñêîãî ñèãíàëüíîãî óðîâíÿ äëÿ óñòàíîâêè ðàâíîãî ëîêà
if(dlots < 0) UrAut = UrRL - dSig * Point; //çíà÷åíèå àâòîìàòè÷åñêîãî ñèãíàëüíîãî óðîâíÿ äëÿ óñòàíîâêè ðàâíîãî ëîêà
if(BuyLots > 0 && SellLots > 0 && dlots > 0) UrOZP = Bid - ((BuyProfit + SellProfit) / (tickvalue * (dlots)) * Point); //óðîâåíü îáùåãî áåçóáûòêà äëÿ îòêðûòûõ îðäåðîâ
if(BuyLots > 0 && SellLots > 0 && dlots < 0) UrOZP = Ask - ((BuyProfit + SellProfit) / (tickvalue * (dlots)) * Point); //óðîâåíü îáùåãî áåçóáûòêà äëÿ îòêðûòûõ îðäåðîâ
}
if(BuyLots > 0) bdS = dS/(BuyLots * tickvalue);
if(SellLots > 0) sdS = dS/(SellLots * tickvalue);
if(dLots!=0) fdS=dS/(dLots*tickvalue);
UrTP_frz = Ask + freeze * Point; //óðîâåíü çîíû çàìîðîçêè - äëÿ âûñòàâëåíèÿ îòëîæåíèêîâ è TP
UrSL_frz = Bid - freeze * Point; //óðîâåíü çîíû çàìîðîçêè - äëÿ âûñòàâëåíèÿ îòëîæåíèêîâ è SL
if(BuyLots > 0) UrZPb = Bid - (BuyProfit / (tickvalue * BuyLots) * Point); //óðîâåíü áåçóáûòêà äëÿ BUY îðäåðîâ
if(SellLots > 0) UrZPs = Ask + (SellProfit / (tickvalue * SellLots) * Point); //óðîâåíü áåçóáûòêà äëÿ SELL îðäåðîâ
if(BuyLots > 0) UrZPbTP = UrZPb + bTP * Point; //óðîâåíü áåçóáûòêà + TP äëÿ BUY îðäåðîâ
if(SellLots > 0) UrZPsTP = UrZPs - sTP * Point; //óðîâåíü áåçóáûòêà + TP äëÿ SELL îðäåðîâ
if(BuyLots > 0) UrZPbVlt = UrZPb + vlt * Point; //óðîâåíü áåçóáûòêà + âîëàòèëüíîñòü äëÿ BUY îðäåðîâ
if(SellLots > 0) UrZPsVlt = UrZPs - vlt * Point; //óðîâåíü áåçóáûòêà + âîëàòèëüíîñòü äëÿ SELL îðäåðîâ
if(BuyLots > 0) UrZPbdS = UrZPb + bdS * Point; //óðîâåíü áåçóáûòêà + S äëÿ BUY îðäåðîâ
if(SellLots > 0) UrZPsdS = UrZPs - sdS * Point; //óðîâåíü áåçóáûòêà + S äëÿ SELL îðäåðîâ
if(BuyLots > SellLots) UrZPfTP = UrOZP + fTP * Point; //óðîâåíü îáùåãî áåçóáûòêà + TP äëÿ âñåõ îðäåðîâ
if(SellLots > BuyLots) UrZPfTP = UrOZP - fTP * Point; //óðîâåíü îáùåãî áåçóáûòêà + TP äëÿ âñåõ îðäåðîâ
if(BuyLots > SellLots) UrZPfVlt = UrOZP + vlt * Point; //óðîâåíü îáùåãî áåçóáûòêà + âîëàòèëüíîñòü
if(SellLots > BuyLots) UrZPfVlt = UrOZP - vlt * Point; //óðîâåíü îáùåãî áåçóáûòêà + âîëàòèëüíîñòü
if(dLots!=0) UrZPfdS=UrOZP+fdS*Point; //óðîâåíü îáùåãî áåçóáûòêà + S äëÿ âñåõ îðäåðîâ
idZM=-dZM; //ðàññòîÿíèÿ îò òåêóùåé öåíû äî óðîâíÿ íóëåâîé ìàðæè (ñî çíàêîì "-" - íèæå òåêóùåé öåíû)
if(UrZPb>0 && UrZPs>0) dUrZP=(UrZPb-UrZPs)/Point; //ðàññòîÿíèå ìåæäó áåçóáûòêàìè Buy è Sell
if(dlots!=0) UrCT=UrZPs+BuyLots*Point*dUrZP/(BuyLots+SellLots); //óðîâåíü "öåíòðà òÿæåñòè"
if(BuyLots == 0 && SellLots > 0) { UrCTZ = UrZPs; UrOZPZ = UrZPs; }
if(BuyLots > 0 && SellLots == 0) { UrCTZ = UrZPb; UrOZPZ = UrZPb; }
if(BuyLots > 0 && SellLots > 0) { UrCTZ = UrCT; UrOZPZ= UrOZP; }
if(dlots > 0) idZP = (UrOZPZ - Bid) * (znakov); //ðàññòîÿíèå îò òåêóùåé öåíû äî óðîâíÿ îáùåãî áåçóáûòêà äëÿ îòêðûòûõ îðäåðîâ (ñî çíàêîì "-" - íèæå òåêóùåé öåíû)
if(dlots < 0) idZP = (UrOZPZ - Ask) * (znakov); //ðàññòîÿíèå îò òåêóùåé öåíû äî óðîâíÿ îáùåãî áåçóáûòêà äëÿ îòêðûòûõ îðäåðîâ (ñî çíàêîì "-" - íèæå òåêóùåé öåíû)
if(dlots > 0) idCT = (UrCTZ - Bid) * (znakov); //ðàññòîÿíèå îò òåêóùåé öåíû äî óðîâíÿ îáùåãî áåçóáûòêà äëÿ îòêðûòûõ îðäåðîâ (ñî çíàêîì "-" - íèæå òåêóùåé öåíû)
if(dlots < 0) idCT = (UrCTZ - Ask) * (znakov); //ðàññòîÿíèå îò òåêóùåé öåíû äî óðîâíÿ îáùåãî áåçóáûòêà äëÿ îòêðûòûõ îðäåðîâ (ñî çíàêîì "-" - íèæå òåêóùåé öåíû)
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ðèñîâàíèå óðîâíåé:
//---------------------------------------------------------------------------------------------//
double PribylTPs,PribylTPb,PribylTPf,C_YYY,Pribylvolf,Pribylvolb,Pribylvols;
int PPF,PPB,PPS;
PribylTPf=MathAbs(fTP*dlots*tickvalue); //Ðàñ÷åò ïðèáûëè çà îáùèì áåçóáûòêîì + TP
PribylTPb=MathAbs(bTP*BuyLots*tickvalue); //Ðàñ÷åò ïðèáûëè Buy + TP
PribylTPs=MathAbs(sTP*SellLots*tickvalue); //Ðàñ÷åò ïðèáûëè Sell + TP
Pribylvolf = MathAbs(vlt * dlots * tickvalue);
Pribylvolb = MathAbs(vlt * BuyLots * tickvalue);
Pribylvols = MathAbs(vlt * SellLots * tickvalue);
PPF = (UrZPfdS-UrOZP)/Point;
PPB = (UrZPbdS-UrZPb)/Point;
PPS = (UrZPs-UrZPsdS)/Point;
if(dlots!=0)
{
if(_uUr_ZF == true) driveline ("_Óðîâåíü Ïîëíîãî ÑËÈÂÀ", UrZF, Color_ZF, Style_ZF, Width_ZF);
if(_uUr_SO == true) driveline ("_Óðîâåíü Ïðèíóäèòåëüíîãî Çàêðûòèÿ Îðäåðîâ ÄÖ / StopOut = " + AccountStopoutLevel() + " %", UrSO, Color_SO, Style_SO, Width_SO);
if(_uUr_ZM == true) driveline ("_Óðîâåíü Íóëåâîé Ìàðæè", UrZM, Color_ZM, Style_ZM, Width_ZM);
if(_uUr_Si == true && _otRavnogoLoca == false) driveline ("Ñèãíàëüíûé Óðîâåíü Ëîêà = " + PZM + " %", UrPZM, Color_Si, Style_Si, Width_Si);
if(_uUr_Si == true && _otRavnogoLoca == true) driveline ("Ñèãíàëüíûé Óðîâåíü Ëîêà + " + dSig + " ïï", UrAut, Color_Si, Style_Si, Width_Si);
if(_uUr_RL == true) driveline ("_Óðîâåíü Ðàâíîãî Ëîêà", UrRL, Color_RL, Style_RL, Width_RL);
if(_UrZPpTP == true && BuyLots > 0 && SellLots > 0) driveline ("_Óðîâåíü Îáùåãî Áåçóáûòêà + (TP = " + fTP + " ïï) = " + DoubleToStr(PribylTPf,2) + " S", UrZPfTP, Color_OZP, Style_ZPdP, Width_ZPdP);
if(_UrZPpdS == true && BuyLots > 0 && SellLots > 0) driveline ("_Óðîâåíü Îáùåãî Áåçóáûòêà + " + dS + " S (" + PPF + " ïï)", UrZPfdS, Color_OZP, Style_ZPdP, Width_ZPdP);
if(_UrZPVlt == true && BuyLots > 0 && SellLots > 0) driveline ("_Óðîâåíü Îáùåãî Áåçóáûòêà + âîëàòèëüíîñòü = " + DoubleToStr(Pribylvolf,2) + " S", UrZPfVlt, Color_OZP, Style_ZPdP, Width_ZPdP);
if(_uUrOZP==true && BuyLots>0 && SellLots>0) driveline("_Óðîâåíü Îáùåãî Áåçóáûòêà",UrOZP,Color_OZP,Style_OZP,Width_OZP);
}
if(_uUrZP == true) driveline ("_Óðîâåíü Áåçóáûòêà BUY", UrZPb, Color_ZP, Style_ZP, Width_ZP);
if(_uUrZP == true) driveline ("_Óðîâåíü Áåçóáûòêà SELL", UrZPs, Color_ZP, Style_ZP, Width_ZP);
if(_UrZPpTP == true) driveline ("_Óðîâåíü Áåçóáûòêà BUY + (TP = " + bTP + " ïï) = " + DoubleToStr(PribylTPb,2) + " S", UrZPbTP, Color_ZPdP, Style_ZPdP, Width_ZPdP);
if(_UrZPpTP == true) driveline ("_Óðîâåíü Áåçóáûòêà SELL + (TP = " + sTP + " ïï) = " + DoubleToStr(PribylTPs,2) + " S", UrZPsTP, Color_ZPdP, Style_ZPdP, Width_ZPdP);
if(_UrZPpdS == true) driveline ("_Óðîâåíü Áåçóáûòêà BUY + " + dS + " S (" + PPB + " ïï)", UrZPbdS, Color_ZPdP, Style_ZPdP, Width_ZPdP);
if(_UrZPpdS == true) driveline ("_Óðîâåíü Áåçóáûòêà SELL + " + dS + " S (" + PPS + " ïï)", UrZPsdS, Color_ZPdP, Style_ZPdP, Width_ZPdP);
if(_UrZPVlt == true) driveline ("_Óðîâåíü Áåçóáûòêà BUY + âîëàòèëüíîñòü = " + DoubleToStr(Pribylvolb,2) + " S", UrZPbVlt, Color_ZPdP, Style_ZPdP, Width_ZPdP);
if(_UrZPVlt == true) driveline ("_Óðîâåíü Áåçóáûòêà SELL + âîëàòèëüíîñòü = " + DoubleToStr(Pribylvols,2) + " S", UrZPsVlt, Color_ZPdP, Style_ZPdP, Width_ZPdP);
if(_uUr_Fr == true && freeze > 0) driveline ("Íå íèæå äëÿ BuyStop,SellLimit,StopLoss,TakeProfit", UrTP_frz, Color_Fr, Style_Fr, Width_Fr);
if(_uUr_Fr == true && freeze > 0) driveline ("Íå âûøå äëÿ BuyLimit,SellStop,StopLoss,TakeProfit", UrSL_frz, Color_Fr, Style_Fr, Width_Fr);
if(_UrCT==true && BuyLots>0 && SellLots>0) driveline("_Óðîâåíü Öåíòðà Òÿæåñòè Îáúåìîâ",UrCT,Color_UrCT,Style_UrCT,Width_UrCT);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//îêðàñêà çîíû íà÷àëà ïðèáûëè:
//---------------------------------------------------------------------------------------------//
double bColor_ZPdPZ,sColor_ZPdPZ,fColor_ZPdPZ,UrXb,UrXs,UrXf;
if(_Dark_Ground==true)
{
bColor_ZPdPZ = bColor_ZPdP_D;
sColor_ZPdPZ = sColor_ZPdP_D;
fColor_ZPdPZ = fColor_ZPdP_D;
}
else
{
bColor_ZPdPZ = bColor_ZPdP_L;
sColor_ZPdPZ = sColor_ZPdP_L;
fColor_ZPdPZ = fColor_ZPdP_L;
}
if(_UrX == 1) { UrXb = UrZPbTP; UrXs = UrZPsTP; UrXf = UrZPfTP;}
if(_UrX == 2) { UrXb = UrZPbdS; UrXs = UrZPsdS; UrXf = UrZPfdS;}
if(_UrX == 3) { UrXb = UrZPbVlt; UrXs = UrZPsVlt; UrXf = UrZPfVlt;}
if(_Paint_Profit==true)
{
ObjectCreate("Çîíà Buy+ - öâåò",OBJ_RECTANGLE,0,D'0000.00.00',UrZPb,TimeCurrent()*1.1,UrXb);
ObjectSet("Çîíà Buy+ - öâåò",OBJPROP_STYLE,STYLE_SOLID);
ObjectSet("Çîíà Buy+ - öâåò",OBJPROP_COLOR,bColor_ZPdPZ);
ObjectSet("Çîíà Buy+ - öâåò",OBJPROP_BACK,True);
ObjectCreate("Çîíà Sell+ - öâåò",OBJ_RECTANGLE,0,D'0000.00.00',UrZPs,TimeCurrent()*1.1,UrXs);
ObjectSet("Çîíà Sell+ - öâåò",OBJPROP_STYLE,STYLE_SOLID);
ObjectSet("Çîíà Sell+ - öâåò",OBJPROP_COLOR,sColor_ZPdPZ);
ObjectSet("Çîíà Sell+ - öâåò",OBJPROP_BACK,True);
ObjectCreate("Çîíà Full+ - öâåò",OBJ_RECTANGLE,0,D'0000.00.00',UrOZP,TimeCurrent()*1.1,UrXf);
ObjectSet("Çîíà Full+ - öâåò",OBJPROP_STYLE,STYLE_SOLID);
ObjectSet("Çîíà Full+ - öâåò",OBJPROP_COLOR,fColor_ZPdPZ);
ObjectSet("Çîíà Full+ - öâåò",OBJPROP_BACK,True);
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//îêðàñêà "Lock & DeadZone":
//---------------------------------------------------------------------------------------------//
if(_Paint_LDZ==true && dlots!=0)
{
ObjectCreate("Ìåðòâàÿ Çîíà - öâåò",OBJ_RECTANGLE,0,D'0000.00.00',UrZF,TimeCurrent()*1.1,UrZM);
ObjectSet("Ìåðòâàÿ Çîíà - öâåò",OBJPROP_STYLE,STYLE_SOLID);
ObjectSet("Ìåðòâàÿ Çîíà - öâåò",OBJPROP_COLOR,Color_DZ);
ObjectSet("Ìåðòâàÿ Çîíà - öâåò",OBJPROP_BACK,True);
if(_otRavnogoLoca == false) ObjectCreate("Çîíà LOCK - öâåò", OBJ_RECTANGLE, 0, D'0000.00.00', UrZM, TimeCurrent()*1.1, UrPZM);
if(_otRavnogoLoca == true) ObjectCreate("Çîíà LOCK - öâåò", OBJ_RECTANGLE, 0, D'0000.00.00', UrZM, TimeCurrent()*1.1, UrAut);
ObjectSet("Çîíà LOCK - öâåò",OBJPROP_STYLE,STYLE_SOLID);
ObjectSet("Çîíà LOCK - öâåò",OBJPROP_COLOR,Color_LZ);
ObjectSet("Çîíà LOCK - öâåò",OBJPROP_BACK,True);
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//Çâóêîâîå îïîâåùåíèå î òåêóùåì óðîâíå äî/ïîñëå âûñòàâëåííîãî % îò óðîâíÿ Íóëåâîé ìàðæè
//---------------------------------------------------------------------------------------------//
if(margin_level!=0 && dlots!=0)
{
if(_otRavnogoLoca==false)
{
if(_SP_Menshe == true && margin_level <= PZM) PlaySound(Sound_Alert);
if(_SP_Bolshe == true && margin_level > PZM) PlaySound(Sound_OK);
}
if(_otRavnogoLoca==true)
{
if(_SP_Menshe == true && (dlots > 0 && Bid <= UrAut)||(dlots < 0 && Ask >= UrAut)) PlaySound(Sound_Alert);
if(_SP_Bolshe == true && (dlots > 0 && Bid > UrAut)||(dlots < 0 && Ask < UrAut)) PlaySound(Sound_OK);
}
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//Çâóêîâîå îïîâåùåíèå î äîñòèæåíèè ïðîôèòà
//---------------------------------------------------------------------------------------------//
{
if(_SignSumProfit == true && SumProfit > dSumProfit) {PlaySound(Sound_Profit); string dtxtF = "S ! ";}
if(_SignSellProfit == true && SellProfit > dSellProfit) {PlaySound(Sound_Profit); string dtxtS = "S ! ";}
if(_SignBuyProfit==true && BuyProfit>dBuyProfit) {PlaySound(Sound_Profit); string dtxtB="S ! ";}
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//Çâóêîâîå îïîâåùåíèå î äîñòèæåíèè âûñòàâëåííîãî ÒÐ èëè S
//---------------------------------------------------------------------------------------------//
{
if(_Sound_TP == true && BuyLots > SellLots && Bid >= UrZPbTP) PlaySound(Sound_Profit2);
if(_Sound_TP == true && SellLots > BuyLots && Ask <= UrZPsTP) PlaySound(Sound_Profit2);
if(_Sound_dS == true && BuyLots > SellLots && Bid >= UrZPbdS) PlaySound(Sound_Profit3);
if(_Sound_dS == true && SellLots > BuyLots && Ask <= UrZPsdS) PlaySound(Sound_Profit3);
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//Ïàíåëü "Lock & DeadZone":
//---------------------------------------------------------------------------------------------//
color ColorL=Color_Si;
if(margin_level<=PZM && margin_level>100 && _otRavnogoLoca==false) drivetext("LOCK","LOCK",RShrift*5,ColorL,Ugol_LD,X_LD+RShrift*1.5,X_LD+RShrift*2);
if((dlots>0 && Bid<=UrAut) || (dlots<0 && Ask>=UrAut) && margin_level>100 && _otRavnogoLoca==true)
drivetext("LOCK","LOCK",RShrift*5,ColorL,Ugol_LD,X_LD+RShrift*1.5,X_LD+RShrift*2);
if(margin_level<=100 && margin_level!=0) drivetext("DEAD ZONE","DEAD ZONE",RShrift*2.3,Color_ZF,Ugol_LD,X_LD+4,X_LD+RShrift*2.3);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü "GAME OVER":
//---------------------------------------------------------------------------------------------//
int Ugol_GO=3,X_GO=10,Y_GO=10;
color Colour_GO1=Red,Colour_GO2=Orange,Colour_GO3=Gray;
double dGO=RShrift*8.5;
bool iGO=true;
if(balance<min_balans)
{
if(equity<min_balans)
{
if(freemargin<min_balans)
{
drivetext("GAME OVER 1","GAME OVER",RShrift*4,Colour_GO1,Ugol_GO,X_GO+RShrift*1.5,Y_GO+RShrift*2);
drivetext("GAME OVER 2","ÂÛÈÃÐÛÂÀÅÒ ÒÎÒ, ÊÒÎ ÍÅ ÓÑÒÀÅÒ ÏÐÎÈÃÐÛÂÀÒÜ",RShrift,Colour_GO2,Ugol_GO,X_GO,Y_GO+RShrift*1.3);
drivetext("GAME OVER 3","çàãðóæàé äåíüãè è íà÷èíàé ñíà÷àëà :)",RShrift-1,Colour_GO3,Ugol_GO,X_GO+43,Y_GO);
}
}
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü info.1
//---------------------------------------------------------------------------------------------//
double dINFO,dINFO_1,dINFO_2,dINFO_3,dINFO_4,dINFO_5,dINFO_6,dINFO_7,dINFO_8,dINFO_9,dINFO_10;
if(_INFO_1==true && iGO!=true && (noLotsRab!=true || noLotsOtl!=true))
{
dINFO=0;
drivetext("Êîëè÷åñòâî : Îáúåì - SELL.STOP.îðäåðîâ - èíôî","Sell.Stop: "
+DoubleToStr(-All_OP_SellStop,0)
+" : "+DoubleToStr(-OP_SellStop,mindigits),RShrift,Color_i1,Ugol_t,XX,YY+RShrift*(kY_str*0+kY_pan*0)-dINFO);
drivetext("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - SELL-.îðäåðîâ - èíôî",
DoubleToStr(SellProfitMinus,2)
+" : "+DoubleToStr(SellSwapMinus,2)
+" : "+DoubleToStr(-All_Order_Sell_Minus,0)
+" : "+DoubleToStr(-SellLotsMinus,mindigits),RShrift,Color_i1s,Ugol_t,XX,YY+RShrift*(kY_str*1+kY_pan*0)-dINFO);
drivetext("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - SELL.Full.îðäåðîâ - èíôî",
DoubleToStr(SellProfit,2)
+" : "+DoubleToStr(SumSellSwap,2)
+" : "+DoubleToStr(-All_Order_Sell,0)
+" : "+DoubleToStr(-SellLots,mindigits),RShrift,Color_i1sF,Ugol_t,XX,YY+RShrift*(kY_str*2+kY_pan*0)-dINFO);
drivetext("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - SELL+.îðäåðîâ - èíôî",
DoubleToStr(SellProfitPlus,2)
+" : "+DoubleToStr(SellSwapPlus,2)
+" : "+DoubleToStr(-All_Order_Sell_Plus,0)
+" : "+DoubleToStr(-SellLotsPlus,mindigits),RShrift,Color_i1s,Ugol_t,XX,YY+RShrift*(kY_str*3+kY_pan*0)-dINFO);
drivetext("Êîëè÷åñòâî : Îáúåì - SELL.LIMIT.îðäåðîâ - èíôî","Sell.Limit: "
+DoubleToStr(-All_OP_SellLimit,0)
+" : "+DoubleToStr(-OP_SellLimit,mindigits),RShrift,Color_i1,Ugol_t,XX,YY+RShrift*(kY_str*4+kY_pan*0)-dINFO);
drivetext("( Êîëè÷åñòâî : Îáúåì ) - Âñåãî èñïîëüçîâàíî îðäåðîâ - èíôî","Âñåãî: "+
DoubleToStr(SumOrd,0)
+" : "+DoubleToStr(SumLots,mindigits),RShrift,Color_i1d,Ugol_t,XX,YY+RShrift*(kY_str*5+kY_pan*0)-dINFO);
drivetext("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - Ðàçíèöà ïî îðäåðàì - èíôî",
DoubleToStr(SumProfit,2)
+" : "+DoubleToStr(SumSwap,2)
+" : "+DoubleToStr(dOrd,0)
+" : "+DoubleToStr(dLots,mindigits),RShrift,Color_i1d,Ugol_t,XX,YY+RShrift*(kY_str*6+kY_pan*0)-dINFO);
drivetext("Êîëè÷åñòâî : Îáúåì - BUY.LIMIT.îðäåðîâ - èíôî","Buy.Limit: "
+DoubleToStr(All_OP_BuyLimit,0)
+" : "+DoubleToStr(OP_BuyLimit,mindigits),RShrift,Color_i1,Ugol_t,XX,YY+RShrift*(kY_str*7+kY_pan*0)-dINFO);
drivetext("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - BUY-.îðäåðîâ - èíôî",
DoubleToStr(BuyProfitMinus,2)
+" : "+DoubleToStr(BuySwapMinus,2)
+" : "+DoubleToStr(All_Order_Buy_Minus,0)
+" : "+DoubleToStr(BuyLotsMinus,mindigits),RShrift,Color_i1b,Ugol_t,XX,YY+RShrift*(kY_str*8+kY_pan*0)-dINFO);
drivetext("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - BUY.Full.îðäåðîâ - èíôî",
DoubleToStr(BuyProfit,2)
+" : "+DoubleToStr(SumBuySwap,2)
+" : "+DoubleToStr(All_Order_Buy,0)
+" : "+DoubleToStr(BuyLots,mindigits),RShrift,Color_i1bF,Ugol_t,XX,YY+RShrift*(kY_str*9+kY_pan*0)-dINFO);
drivetext("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - BUY+.îðäåðîâ - èíôî",
DoubleToStr(BuyProfitPlus,2)
+" : "+DoubleToStr(BuySwapPlus,2)
+" : "+DoubleToStr(All_Order_Buy_Plus,0)
+" : "+DoubleToStr(BuyLotsPlus,mindigits),RShrift,Color_i1b,Ugol_t,XX,YY+RShrift*(kY_str*10+kY_pan*0)-dINFO);
drivetext("Êîëè÷åñòâî : Îáúåì - BUY.STOP.îðäåðîâ - èíôî","Buy.Stop: "
+DoubleToStr(All_OP_BuyStop,0)
+" : "+DoubleToStr(OP_BuyStop,mindigits),RShrift,Color_i1,Ugol_t,XX,YY+RShrift*(kY_str*11+kY_pan*0)-dINFO);
dINFO_1=0;
}
else dINFO_1=RShrift*(kY_str*10+kY_pan*2);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü info.2
//---------------------------------------------------------------------------------------------//
color cooloor=clrRed;
if(_INFO_2==true && iGO!=true && noLotsRab!=true && dlots!=0)
{
dINFO=dINFO_1+dINFO_2-dGO;
drivetext("Óðîâåíü ÑËÈÂÀ - èíôî","Ó.Ïîëí.Ñëèâà: "+DoubleToStr(UrZF,Digits),RShrift,Color_ZF,Ugol_t,XX,YY+RShrift*(kY_str*12+kY_pan*0.1)-dINFO);
drivetext("Óðîâåíü Ïðèíóäèòåëüíîãî Çàêðûòèÿ Îðäåðîâ ÄÖ / StopOut - èíôî","Çàêð.(StopOut): "+DoubleToStr(stop_out,0)+"%",RShrift,Color_ZF,Ugol_t,XX,YY+RShrift*(kY_str*13+kY_pan*0.1)-dINFO);
drivetext("Ìåðòâàÿ Çîíà - èíôî","̸ðòâ.Çîíà,ïï: "+DoubleToStr(MathAbs(dDZ),0),RShrift,Color_ZF,Ugol_t,XX,YY+RShrift*(kY_str*14+kY_pan*0.1)-dINFO);
drivetext ("Ðàññòîÿíèå äî Íóëåâîé Ìàðæè - èíôî","...îñòàëîñü: " + DoubleToStr(idZM,0),RShrift, Color_ZM, Ugol_t, XX, YY + RShrift*(kY_str*15 + kY_pan*0.3) - dINFO);
drivetext ("Óðîâåíü Íóëåâîé Ìàðæè - èíôî", "Ó.0-é.Ìàðæ.: " + DoubleToStr(UrZM, Digits), RShrift, Color_ZM, Ugol_t, XX, YY + RShrift*(kY_str*16 + kY_pan*0.3) - dINFO);
drivetext("Ðàññòîÿíèå äî Óðîâíÿ Ðàâíîãî Ëîêà - èíôî","...îñòàëîñü,ïï: "+DoubleToStr(dUrRL,0),RShrift,Color_RL,Ugol_t,XX,YY+RShrift*(kY_str*17+kY_pan*0.4)-dINFO);
drivetext("Óðîâåíü Ðàíîãî Ëîêà - èíôî","Ó.Ðàâí.Ëîê.: "+DoubleToStr(UrRL,Digits),RShrift,Color_RL,Ugol_t,XX,YY+RShrift*(kY_str*18+kY_pan*0.4)-dINFO);
if(BuyLots!=0 && SellLots!=0) { cooloor=Color_OZP; } else cooloor=Color_ZPdP;
drivetext("Ðàññòîÿíèå äî Îáùåãî Óðîâíÿ Áåçóáûòêà - èíôî","...îñòàëîñü,ïï: "+DoubleToStr(idZP,0),RShrift,cooloor,Ugol_t,XX,YY+RShrift*(kY_str*19+kY_pan*0.5)-dINFO);
drivetext("Îáùèé Óðîâåíü Áåçóáûòêà - èíôî","Ó.Îáù.Áåç.: "+DoubleToStr(UrOZPZ,Digits),RShrift,cooloor,Ugol_t,XX,YY+RShrift*(kY_str*20+kY_pan*0.5)-dINFO);
drivetext("Ðàññòîÿíèå äî Öåíòð Òÿæåñòè Îúåìîâ - èíôî","...îñòàëîñü,ïï: "+DoubleToStr(idCT,0),RShrift,Color_UrCT,Ugol_t,XX,YY+RShrift*(kY_str*21+kY_pan*0.6)-dINFO);
drivetext("Öåíòð Òÿæåñòè Îúåìîâ - èíôî","Öåíòð.Òÿæ.: "+DoubleToStr(UrCTZ,Digits),RShrift,Color_UrCT,Ugol_t,XX,YY+RShrift*(kY_str*22+kY_pan*0.6)-dINFO);
dINFO_2=0;
}
else dINFO_2=RShrift*(kY_str*11+kY_pan*0.6);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü info.3
//---------------------------------------------------------------------------------------------//
if(_INFO_3==true && iGO!=true && noLotsRab!=true && BuyLots!=0 && SellLots!=0)
{
dINFO=dINFO_1+dINFO_2+dINFO_3-dGO;
drivetext("Ðàññòîÿíèå ìåæäó BUY = 0 è SELL = 0","Ð.Ìåæä.0/0,ïï: "+DoubleToStr(dUrZP,0),RShrift,Color_ZP,Ugol_t,XX,YY+RShrift*(kY_str*23+kY_pan*0.7)-dINFO);
drivetext ("Óðîâ.SELL=0 - èíôî","Ó.Sell=0: " + DoubleToStr(UrZPs,Digits), RShrift, Color_ZP, Ugol_t, XX, YY + RShrift*(kY_str*24 + kY_pan*0.7) - dINFO);
drivetext ("Óðîâ.BUY=0 - èíôî", "Ó.Buy=0: " + DoubleToStr(UrZPb, Digits), RShrift, Color_ZP, Ugol_t, YY, YY + RShrift*(kY_str*25 + kY_pan*0.7) - dINFO);
dINFO_3=0;
}
else dINFO_3=RShrift*(kY_str*3+kY_pan*0.1);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü info.4
//---------------------------------------------------------------------------------------------//
if(_INFO_4==true)
{
dINFO=dINFO_1+dINFO_2+dINFO_3-dGO;
drivetext("Ìîæíî êóïèòü ëîòîâ - èíôî","Êóïèòü.ëîò: "+DoubleToStr(lots_take,mindigits+1),RShrift,Color_i4,Ugol_t,XX,YY+RShrift*(kY_str*26+kY_pan*0.8)-dINFO);
dINFO_4=0;
}
else dINFO_4=RShrift*(kY_str*1+kY_pan*0);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü info.5
//---------------------------------------------------------------------------------------------//
if(_INFO_5==true)
{
dINFO=dINFO_1+dINFO_2+dINFO_3+dINFO_4+dINFO_5-dGO;
drivetext ("Óðîâåíü - èíôî","Óðîâåíü: " + DoubleToStr(margin_level,2) + " %",RShrift,Color_i5,Ugol_t,XX,YY + RShrift*(kY_str*27 + kY_pan*0.9) - dINFO);
drivetext ("Ñâîáîäíî - èíôî", "Ñâîáîäíî: " + DoubleToStr(freemargin, 2), RShrift, Color_i5, Ugol_t, XX, YY + RShrift*(kY_str*28 + kY_pan*0.9) - dINFO);
drivetext("Çàëîã - èíôî","Çàëîã: "+DoubleToStr(margin,2),RShrift,Color_i5,Ugol_t,XX,YY+RShrift*(kY_str*29+kY_pan*0.9)-dINFO);
drivetext ("Ñðåäñòâà - èíôî","Ñðåäñòâà: " + DoubleToStr(equity,2),RShrift, Color_i5, Ugol_t, XX, YY + RShrift*(kY_str*30 + kY_pan*0.9) - dINFO);
drivetext ("Áàëàíñ - èíôî", "Áàëàíñ: " + DoubleToStr(balance, 2), RShrift, Color_i5, Ugol_t, XX, YY + RShrift*(kY_str*31 + kY_pan*0.9) - dINFO);
dINFO_5=0;
}
else dINFO_5=RShrift*(kY_str*5+kY_pan*0.1);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü info.6
//---------------------------------------------------------------------------------------------//
if(_INFO_6==true)
{
dINFO=dINFO_1+dINFO_2+dINFO_3+dINFO_4+dINFO_5+dINFO_6-dGO;
drivetext ("Ñâîï SELL, ïï - èíôî","Ñâîï.Sell,ïï: " + DoubleToStr(swap_sell,2),RShrift, Color_i6, Ugol_t, XX, YY + RShrift*(kY_str*32 + kY_pan*1.0) - dINFO);
drivetext ("Ñâîï BUY, ïï - èíôî", "Ñâîï.Buy,ïï: " + DoubleToStr(swap_buy, 2), RShrift, Color_i6, Ugol_t, XX, YY + RShrift*(kY_str*33 + kY_pan*1.0) - dINFO);
drivetext ("Çàëîã çà ìèíèìàëüíûé ëîò - èíôî","Çà-ã.min.ëîò: " + DoubleToStr(min_balans,2), RShrift, Color_i6, Ugol_t, XX, YY + RShrift*(kY_str*34 + kY_pan*1.0) - dINFO);
drivetext ("Ñòîèìîñòü 1 ïï äëÿ 1 ëîòà - èíôî", "S 1ïï/1ëîò: " + DoubleToStr(tickvalue, 2), RShrift, Color_i6, Ugol_t, XX, YY + RShrift*(kY_str*35 + kY_pan*1.0) - dINFO);
drivetext ("Ìàêñèìàëüíûé ëîò - èíôî","max.ëîò: " + DoubleToStr(max_lot, mindigits), RShrift, Color_i6, Ugol_t, XX, YY + RShrift*(kY_str*36 + kY_pan*1.0) - dINFO);
drivetext ("Ìèíèìàëüíûé ëîò - èíôî", "min.ëîò: " + DoubleToStr(min_lot, mindigits), RShrift, Color_i6, Ugol_t, XX, YY + RShrift*(kY_str*37 + kY_pan*1.0) - dINFO);
drivetext("Ñïðåä, ïï - èíôî","Ñïðåä,ïï: "+DoubleToStr(spread,1),RShrift,Color_i6,Ugol_t,XX,YY+RShrift*(kY_str*38+kY_pan*1.0)-dINFO);
drivetext("Ðàçìåð Çîíû Çàìîðîçêè, ïï - èíôî","Ð.ÇÇ,ïï: "+DoubleToStr(freeze,1),RShrift,Color_i6,Ugol_t,XX,YY+RShrift*(kY_str*39+kY_pan*1.0)-dINFO);
drivetext("Ðàçìåð Ñðåäíåé Âîëàòèëüíîñòè çà "+NN+" áàðîâ - èíôî","Ñð.Â-òü,ïï: "+DoubleToStr(vlt,1),RShrift,Color_i6,Ugol_t,XX,YY+RShrift*(kY_str*40+kY_pan*1.0)-dINFO);
drivetext("Êîëè÷åñòâî áàðîâ â èñòîðèè - èíôî","Êîë.Áàðîâ: "+DoubleToStr(Bars,0),RShrift,Color_i6,Ugol_t,XX,YY+RShrift*(kY_str*41+kY_pan*1.0)-dINFO);
dINFO_6=0;
}
//else dINFO_6 = RShrift*(kY_str*8 + kY_pan);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü ìàãèê
//---------------------------------------------------------------------------------------------//
color ColorAM=clrRed;
if(_active_Si== true) ColorAM = fColorCycle();
else ColorAM = Magenta;
if(MagicNumber1!=-1 ||
MagicNumber2 != -1 ||
MagicNumber3 != -1 ||
MagicNumber4 != -1 ||
MagicNumber5 != -1 ||
MagicNumber6 != -1 ||
MagicNumber7 != -1 ||
MagicNumber8 != -1 ||
MagicNumber9 != -1 ||
MagicNumber10!=-1||
OrderTicket1 != -1 ||
OrderTicket2 != -1 ||
OrderTicket3 != -1 ||
OrderTicket4 != -1 ||
OrderTicket5 != -1 ||
OrderTicket6 != -1 ||
OrderTicket7 != -1 ||
OrderTicket8 != -1 ||
OrderTicket9 != -1 ||
OrderTicket10!=-1) drivetext("ÂÍÈÌÀÍÈÅ! ÂÛÁÎÐÊÀ ÏÎ ÓÊÀÇÀÍÍÛÌ ÇÍÀ×ÅÍÈßÌ","M/T",RShrift*2,ColorAM,Ugol_LD,XX,YY+5);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
//ïàíåëü èíñòðóìåíòà
//---------------------------------------------------------------------------------------------//
color ColorFS = 0;
double XXF=0;
if(_active_Si== true) ColorFS = fColorCycle();
else ColorFS = Magenta;
if(MagicNumber1!=-1 ||
MagicNumber2 != -1 ||
MagicNumber3 != -1 ||
MagicNumber4 != -1 ||
MagicNumber5 != -1 ||
MagicNumber6 != -1 ||
MagicNumber7 != -1 ||
MagicNumber8 != -1 ||
MagicNumber9 != -1 ||
MagicNumber10!=-1||
OrderTicket1 != -1 ||
OrderTicket2 != -1 ||
OrderTicket3 != -1 ||
OrderTicket4 != -1 ||
OrderTicket5 != -1 ||
OrderTicket6 != -1 ||
OrderTicket7 != -1 ||
OrderTicket8 != -1 ||
OrderTicket9 != -1 ||
OrderTicket10!=-1) XXF=XX+RShrift*2; else XXF=XX;
if(_FullSymbols==true) drivetext("ÂÍÈÌÀÍÈÅ! ÂÛÁÐÀÍÛ ÂÑÅ ÏÀÐÛ","F",RShrift*2,ColorFS,Ugol_LD,XXF,YY+5);
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
// ïàíåëü ðàñ÷åòîâ
//---------------------------------------------------------------------------------------------//
if(_CALC_0==true)
{
//---------------------------------------------------------------------------------------------//
if(_CALC_dop==true)
{
if(noLotsRab==false)
{
drivetext("Ðàñ÷åò ïðèáûëè ïî TP="+fTP+" ïï îò óðîâíÿ îáù.áåçóáûòêà","Ïðèá. (ïî TP="+fTP+"ïï îò óð. Full=0"+") = "+DoubleToStr(PribylTPf,2),RShrift,Color_OZP,Ugol_C,C_XX,C_YY);
drivetext("Ðàñ÷åò ïðèáûëè ïî TP="+sTP+" ïï îò óðîâíÿ áåçóáûòêà Sell","Ïðèá. (ïî TP="+sTP+"ïï îò óð. Sell=0"+") = "+DoubleToStr(PribylTPs,2),RShrift,Color_ZPdP,Ugol_C,C_XX,C_YY+RShrift*kY_str*1);
drivetext("Ðàñ÷åò ïðèáûëè ïî TP="+bTP+" ïï îò óðîâíÿ áåçóáûòêà Buy","Ïðèá. (ïî TP="+bTP+"ïï îò óð. Buy=0"+") = "+DoubleToStr(PribylTPb,2),RShrift,Color_ZPdP,Ugol_C,C_XX,C_YY+RShrift*kY_str*2);
drivetext("Ðàñ÷åò ðàññòîÿíèÿ äëÿ "+dS+" S îò óðîâíÿ îáù.áåçóáûòêà","Ðàñò. îò óð. Full=0 äëÿ "+dS+" S = "+DoubleToStr(PPF,0),RShrift,Color_OZP,Ugol_C,C_XX,C_YY+RShrift*kY_str*3);
drivetext("Ðàñ÷åò ðàññòîÿíèÿ äëÿ "+dS+" S îò óðîâíÿ áåçóáûòêà Sell","Ðàñò. îò óð. Sell=0 äëÿ "+dS+" S = "+DoubleToStr(PPS,0),RShrift,Color_ZPdP,Ugol_C,C_XX,C_YY+RShrift*kY_str*4);
drivetext("Ðàñ÷åò ðàññòîÿíèÿ äëÿ "+dS+" S îò óðîâíÿ áåçóáûòêà Buy","Ðàñò. îò óð. Buy=0 äëÿ "+dS+" S = "+DoubleToStr(PPB,0),RShrift,Color_ZPdP,Ugol_C,C_XX,C_YY+RShrift*kY_str*5);
C_YYY=C_YY;
}
}
if(noLotsRab==true || _CALC_dop==false) C_YYY=-RShrift*(kY_str*5+kY_pan)+C_YY;
//---------------------------------------------------------------------------------------------//
double Pribyl_R_2,Rastojanie_R_2,Lots_R_2;
if((Pribyl_R!=Pribyl_R_2 && Rastojanie_R !=Rastojanie_R_2 && Lots_R !=Lots_R_2)
|| (Pribyl_R == 0.0 && Rastojanie_R == 0.0 && Lots_R == 0.0)
|| (Pribyl_R == 0.0 && Rastojanie_R == 0.0 && Lots_R != 0.0)
|| (Pribyl_R == 0.0 && Rastojanie_R != 0.0 && Lots_R == 0.0)
||(Pribyl_R != 0.0 && Rastojanie_R == 0.0 && Lots_R == 0.0))
drivetext("Êîììåíòàðèè - Ðàñ÷åò","ÍÅÂÅÐÍ. ÂÂÎÄ ÇÍÀ×.",RShrift,cvet_CALC_R,Ugol_C,C_XX,C_YYY+RShrift*7.4);
else
{
if(Pribyl_R==0.0 && Rastojanie_R!=0.0 && Lots_R!=0.0)
{
Pribyl_R_2=Rastojanie_R*Lots_R*tickvalue; //Ðàñ÷åò ïðèáûëè
drivetext("Ïðèáûëü - Ðàñ÷åò","Ïîëó÷èëè Ïðèáûëü: "+DoubleToStr(Pribyl_R_2,2),RShrift,cvet_CALC_R,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*5+kY_pan));
drivetext("Ðàññòîÿíèå - Ðàñ÷åò","Çàäàëè Ðàññòîÿíèå: "+DoubleToStr(Rastojanie_R,0),RShrift,cvet_CALC_0,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*6+kY_pan));
drivetext("Îáúåì Ëîòà - Ðàñ÷åò","Çàäàëè Îáúåì Ëîòà: "+DoubleToStr(Lots_R,mindigits),RShrift,cvet_CALC_0,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*7+kY_pan));
}
else
{
if(Pribyl_R!=0.0 && Rastojanie_R==0.0 && Lots_R!=0.0)
{
Rastojanie_R_2=Pribyl_R/(Lots_R*tickvalue); //Ðàñ÷åò ðàññòîÿíèÿ
drivetext("Ïðèáûëü - Ðàñ÷åò","Çàäàëè Ïðèáûëü: "+DoubleToStr(Pribyl_R,2),RShrift,cvet_CALC_0,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*5+kY_pan));
drivetext("Ðàññòîÿíèå - Ðàñ÷åò","Ïîëó÷èëè Ðàññòîÿíèå: "+DoubleToStr(Rastojanie_R_2,0),RShrift,cvet_CALC_R,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*6+kY_pan));
drivetext("Îáúåì Ëîòà - Ðàñ÷åò","Çàäàëè Îáúåì Ëîòà: "+DoubleToStr(Lots_R,mindigits),RShrift,cvet_CALC_0,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*7+kY_pan));
}
else
{
if(Pribyl_R!=0.0 && Rastojanie_R!=0.0 && Lots_R==0.0)
{
Lots_R_2=Pribyl_R/(Rastojanie_R*tickvalue); //Ðàñ÷åò îáúåìà ëîòà
drivetext("Ïðèáûëü - Ðàñ÷åò","Çàäàëè Ïðèáûëü: "+DoubleToStr(Pribyl_R,2),RShrift,cvet_CALC_0,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*5+kY_pan));
drivetext("Ðàññòîÿíèå - Ðàñ÷åò","Çàäàëè Ðàññòîÿíèå: "+DoubleToStr(Rastojanie_R,0),RShrift,cvet_CALC_0,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*6+kY_pan));
drivetext("Îáúåì Ëîòà - Ðàñ÷åò","Ïîëó÷èëè Îáúåì Ëîòà: "+DoubleToStr(Lots_R_2,mindigits),RShrift,cvet_CALC_R,Ugol_C,C_XX,C_YYY+RShrift*(kY_str*7+kY_pan));
}
}
}
}
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
// âûíîñ îðäåðîâ íà ãðàôèê
//---------------------------------------------------------------------------------------------//
int Arrow, no; // Êîä ñòðåëêè
double OrdColor; // Öâåò ñòðåëêè
string name0,name1,name2,nameZ1,nameZ2; // Èìÿ îòîáðàæåíèÿ ñèìâîëîâ îðäåðîâ
for(no=0; no<OrdersTotal(); no++)
{
OrderSelect(no,SELECT_BY_POS);
if(OrderSymbol()!=Symbol()) continue;
if((MagicNumber1==-1 &&
MagicNumber2 == -1 &&
MagicNumber3 == -1 &&
MagicNumber4 == -1 &&
MagicNumber5 == -1 &&
MagicNumber6 == -1 &&
MagicNumber7 == -1 &&
MagicNumber8 == -1 &&
MagicNumber9 == -1 &&
MagicNumber10== -1 &&
OrderTicket1 == -1 &&
OrderTicket2 == -1 &&
OrderTicket3 == -1 &&
OrderTicket4 == -1 &&
OrderTicket5 == -1 &&
OrderTicket6 == -1 &&
OrderTicket7 == -1 &&
OrderTicket8 == -1 &&
OrderTicket9 == -1 &&
OrderTicket10== -1)||
OrderMagicNumber() == MagicNumber1 ||
OrderMagicNumber() == MagicNumber2 ||
OrderMagicNumber() == MagicNumber3 ||
OrderMagicNumber() == MagicNumber4 ||
OrderMagicNumber() == MagicNumber5 ||
OrderMagicNumber() == MagicNumber6 ||
OrderMagicNumber() == MagicNumber7 ||
OrderMagicNumber() == MagicNumber8 ||
OrderMagicNumber() == MagicNumber9 ||
OrderMagicNumber() == MagicNumber10 ||
OrderTicket() == OrderTicket1 ||
OrderTicket() == OrderTicket2 ||
OrderTicket() == OrderTicket3 ||
OrderTicket() == OrderTicket4 ||
OrderTicket() == OrderTicket5 ||
OrderTicket() == OrderTicket6 ||
OrderTicket() == OrderTicket7 ||
OrderTicket() == OrderTicket8 ||
OrderTicket() == OrderTicket9 ||
OrderTicket() == OrderTicket10)
{
switch(OrderType())
{
case OP_BUY: Arrow=1; OrdColor=TOB_Color;
name0 = OrderTicket();
name1 = "Buy: " + DoubleToStr(OrderLots(), 2) + "\nProfit: " + DoubleToStr(OrderProfit(), 2) + "\nmagic: " + OrderMagicNumber();
name2 = DoubleToStr(OrderLots(), 2);
break;
case OP_SELL: Arrow=2; OrdColor=TOS_Color;
name0 = OrderTicket();
name1 = "Sell: " + DoubleToStr(OrderLots(), 2) + "\nProfit: " + DoubleToStr(OrderProfit(), 2) + "\nmagic: " + OrderMagicNumber();
name2 = DoubleToStr(OrderLots(), 2);
break;
case OP_BUYLIMIT: Arrow=1; OrdColor=OOB_Color;
name0 = OrderTicket();
name1 = "BuyLimit: " + DoubleToStr(OrderLots(), 2) + "\nmagic: " + OrderMagicNumber();
name2 = DoubleToStr(OrderLots(), 2);
break;
case OP_BUYSTOP: Arrow=1; OrdColor=OOB_Color;
name0 = OrderTicket();
name1 = "BuyStop: " + DoubleToStr(OrderLots(), 2)+ "\nmagic: " + OrderMagicNumber();
name2 = DoubleToStr(OrderLots(), 2);
break;
case OP_SELLLIMIT: Arrow=2; OrdColor=OOS_Color;
name0 = OrderTicket();
name1 = "SellLimit: " + DoubleToStr(OrderLots(), 2) + "\nmagic: " + OrderMagicNumber();
name2 = DoubleToStr(OrderLots(), 2);
break;
case OP_SELLSTOP: Arrow=2; OrdColor=OOS_Color;
name0 = OrderTicket();
name1 = "SellStop: " + DoubleToStr(OrderLots(), 2) + "\nmagic: " + OrderMagicNumber();
name2 = DoubleToStr(OrderLots(), 2);
break;
}
if(paint_ord_i_obem==true)
{
ObjectCreate("îðä. ¹: "+name0,OBJ_ARROW,0,OrderOpenTime(),OrderOpenPrice());
ObjectSet("îðä. ¹: "+name0,OBJPROP_ARROWCODE,Arrow);
ObjectSet("îðä. ¹: "+name0,OBJPROP_COLOR,OrdColor);
ObjectSetText("îðä. ¹: "+name0,name1);
if(paint_obem_ord==true)
{
ObjectCreate("îáú.îðä. "+name0,OBJ_TEXT,0,OrderOpenTime(),OrderOpenPrice()+spread*O_xx*Point);
ObjectSetText("îáú.îðä. "+name0,name2+O_yy,RShrift+2,Shrift,OrdColor);
}
}
if(paint_ord_i_obem2==true)
{
ObjectCreate("îðä..¹: "+name0,OBJ_ARROW,0,TimeCurrent()+Period()*2000,OrderOpenPrice());
ObjectSet("îðä..¹: "+name0,OBJPROP_ARROWCODE,3);
ObjectSet("îðä..¹: "+name0,OBJPROP_COLOR,OrdColor);
ObjectSetText("îðä..¹: "+name0,name1);
if(paint_obem_ord2==true)
{
ObjectCreate("îáú-îðä. "+name0,OBJ_TEXT,0,TimeCurrent()+Period()*2700,OrderOpenPrice()+spread*O_xx*Point);
ObjectSetText("îáú-îðä. "+name0,name2+O_yy,RShrift+2,Shrift,OrdColor);
}
}
}
}
//---------------------------------------------------------------------------------------------//
//=============================================================================================//
// âûíîñ èñòîðèè ñäåëîê íà ãðàôèê
//---------------------------------------------------------------------------------------------//
double Color; // Öâåò ñòðåëêè
if(history==true)
{
for(i=0; i<HistoryTotal(); i++) // Ïðîâåðêà äëÿ âñåõ çàêðûòûõ è óäàë¸ííûõ îðäåðîâ
{
OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
if(OrderSymbol()!=Symbol()) continue; // Ñëåäóþùèé îðäåð
if((MagicNumber1==-1 &&
MagicNumber2 == -1 &&
MagicNumber3 == -1 &&
MagicNumber4 == -1 &&
MagicNumber5 == -1 &&
MagicNumber6 == -1 &&
MagicNumber7 == -1 &&
MagicNumber8 == -1 &&
MagicNumber9 == -1 &&
MagicNumber10== -1 &&
OrderTicket1 == -1 &&
OrderTicket2 == -1 &&
OrderTicket3 == -1 &&
OrderTicket4 == -1 &&
OrderTicket5 == -1 &&
OrderTicket6 == -1 &&
OrderTicket7 == -1 &&
OrderTicket8 == -1 &&
OrderTicket9 == -1 &&
OrderTicket10== -1)||
OrderMagicNumber() == MagicNumber1 ||
OrderMagicNumber() == MagicNumber2 ||
OrderMagicNumber() == MagicNumber3 ||
OrderMagicNumber() == MagicNumber4 ||
OrderMagicNumber() == MagicNumber5 ||
OrderMagicNumber() == MagicNumber6 ||
OrderMagicNumber() == MagicNumber7 ||
OrderMagicNumber() == MagicNumber8 ||
OrderMagicNumber() == MagicNumber9 ||
OrderMagicNumber() == MagicNumber10 ||
OrderTicket() == OrderTicket1 ||
OrderTicket() == OrderTicket2 ||
OrderTicket() == OrderTicket3 ||
OrderTicket() == OrderTicket4 ||
OrderTicket() == OrderTicket5 ||
OrderTicket() == OrderTicket6 ||
OrderTicket() == OrderTicket7 ||
OrderTicket() == OrderTicket8 ||
OrderTicket() == OrderTicket9 ||
OrderTicket() == OrderTicket10)
{
switch(OrderType())
{
case OP_BUY: Arrow=1; Color=TOB_Color;
nameZ1 = OrderTicket();
nameZ2 = DoubleToStr(OrderOpenPrice(), MarketInfo(OrderSymbol(), MODE_DIGITS)) + " -> " + DoubleToStr(OrderClosePrice(), MarketInfo(OrderSymbol(), MODE_DIGITS))
+"\nBuy: "+DoubleToStr(OrderLots(),2)
+"\nProfit: "+DoubleToStr(OrderProfit(),2)
+"\nmagic: "+OrderMagicNumber();
break;
case OP_SELL: Arrow=2; Color=TOS_Color;
nameZ1 = OrderTicket();
nameZ2 = DoubleToStr(OrderOpenPrice(), MarketInfo(OrderSymbol(), MODE_DIGITS)) + " -> " + DoubleToStr(OrderClosePrice(), MarketInfo(OrderSymbol(), MODE_DIGITS))
+"\nSell: "+DoubleToStr(OrderLots(),2)
+"\nProfit: "+DoubleToStr(OrderProfit(),2)
+"\nmagic: "+OrderMagicNumber();
break;
case OP_BUYLIMIT: Arrow=1; Color=OOB_Color;
nameZ1 = OrderTicket();
nameZ2 = "\n" + DoubleToStr(OrderOpenPrice(), MarketInfo(OrderSymbol(), MODE_DIGITS)) + " -> " + DoubleToStr(OrderClosePrice(), MarketInfo(OrderSymbol(), MODE_DIGITS))
+"\nBuyLimit: "+DoubleToStr(OrderLots(),2)
+"\nmagic: "+OrderMagicNumber();
break;
case OP_BUYSTOP: Arrow=1; Color=OOB_Color;
nameZ1 = OrderTicket();
nameZ2 = DoubleToStr(OrderOpenPrice(), MarketInfo(OrderSymbol(), MODE_DIGITS)) + " -> " + DoubleToStr(OrderClosePrice(), MarketInfo(OrderSymbol(), MODE_DIGITS))
+"\nBuyStop: "+DoubleToStr(OrderLots(),2)
+"\nmagic: "+OrderMagicNumber();
break;
case OP_SELLLIMIT: Arrow=2; Color=OOB_Color;
nameZ1 = OrderTicket();
nameZ2 = DoubleToStr(OrderOpenPrice(), MarketInfo(OrderSymbol(), MODE_DIGITS)) + " -> " + DoubleToStr(OrderClosePrice(), MarketInfo(OrderSymbol(), MODE_DIGITS))
+"\nSellLimit: "+DoubleToStr(OrderLots(),2)
+"\nmagic: "+OrderMagicNumber();
break;
case OP_SELLSTOP: Arrow=2; Color=OOB_Color;
nameZ1 = OrderTicket();
nameZ2 = DoubleToStr(OrderOpenPrice(), MarketInfo(OrderSymbol(), MODE_DIGITS)) + " -> " + DoubleToStr(OrderClosePrice(), MarketInfo(OrderSymbol(), MODE_DIGITS))
+"\nSllStop: "+DoubleToStr(OrderLots(),2)
+"\nmagic: "+OrderMagicNumber();
break;
}
// Ïðîðèñîâêà ëèíèé çàêðûòûõ ïîçèöèé
ObjectCreate("îðä .¹: "+nameZ1,OBJ_TREND,0,OrderOpenTime(),OrderOpenPrice(),OrderCloseTime(),OrderClosePrice());
ObjectSet("îðä .¹: "+nameZ1,OBJPROP_STYLE,STYLE_DOT);
ObjectSet("îðä .¹: "+nameZ1,OBJPROP_WIDTH,1);
ObjectSet("îðä .¹: "+nameZ1,OBJPROP_RAY,false);
ObjectSet("îðä .¹: "+nameZ1,OBJPROP_COLOR,Color);
ObjectSetText("îðä .¹: "+nameZ1,nameZ2);
ObjectCreate("îðä .¹: "+nameZ1+" ",OBJ_ARROW,0,OrderCloseTime(),OrderClosePrice());
ObjectSet("îðä .¹: "+nameZ1+" ",OBJPROP_ARROWCODE,3);
ObjectSet("îðä .¹: "+nameZ1+" ",OBJPROP_COLOR,Color);
ObjectSetText("îðä .¹: "+nameZ1+" ",nameZ2);
}
}
}
//---------------------------------------------------------------------------------------------//
return(0);
}
//#############################################################################################//
//333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333//
//ôóíêöèÿ âûâîäà êîììåíòàðèåâ â ëåâûé âåðõíèé óãîë:
//---------------------------------------------------------------------------------------------//
void Comment_(string com) { if(_INFO_COMENT==true) comment=comment+"\n"+com; }
//---------------------------------------------------------------------------------------------//
//333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333//
//444444444444444444444444444444444444444444444444444444444444444444444444444444444444444444444//
//ôóíêöèÿ îòðèñîâêè ëèíèé - óðîâíåé:
//---------------------------------------------------------------------------------------------//
void driveline(string Text,double Znach,color Color,int Style,int Width)
{
ObjectDelete(Text);
ObjectCreate(Text,OBJ_HLINE,0,0,Znach);
ObjectSet(Text,OBJPROP_COLOR,Color);
ObjectSet(Text,OBJPROP_STYLE,Style);
ObjectSet(Text,OBJPROP_WIDTH,Width);
}
//---------------------------------------------------------------------------------------------//
//444444444444444444444444444444444444444444444444444444444444444444444444444444444444444444444//
//555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555//
//ôóíêöèÿ âûâîäà ïîëüçîâàòåëüñêèõ êîììåíòàðèåâ â âèäå òåêñòîâûõ ïàíåëåé:
//---------------------------------------------------------------------------------------------//
void drivetext(string Text1,string Text2,int RShrift,color Color,int Ugol,int xx,int yy)
{
ObjectDelete(Text1);
ObjectCreate(Text1,OBJ_LABEL,0,0,0,0,0);
ObjectSetText(Text1,Text2,RShrift,Shrift,Color);
ObjectSet(Text1,OBJPROP_CORNER,Ugol);
ObjectSet(Text1,OBJPROP_XDISTANCE,xx);
ObjectSet(Text1,OBJPROP_YDISTANCE,yy);
}
//---------------------------------------------------------------------------------------------//
//555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555//
//666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666//
//ôóíêöèÿ ñìåíû ñèãíàëüíîãî öâåòà:
//---------------------------------------------------------------------------------------------//
color fColorCycle()
{
color Color[]={Red,Magenta,Yellow,Blue,Green}; // Ìîæíî äîáàâèòü äðóãèå öâåòà, èëè óáðàòü íåíóæíûå, íî íà 1 áîëüøå ÷åì êîëè÷åñòâî âûçîâîâ
static int Index=-1;
Index++;
Index%=ArraySize(Color);
return(Color[Index]);
}
//---------------------------------------------------------------------------------------------//
//666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666//
//777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777//
//1-ÿ ôóíêöèÿ ñòèðàíèÿ íàðèñîâàííûõ îáúåêòîâ ïîñëå çàêðûòèÿ èíäèêàòîðà
//---------------------------------------------------------------------------------------------//
void ObjectDelete_()
{
ObjectDelete("GAME OVER 1");
ObjectDelete("GAME OVER 2");
ObjectDelete("GAME OVER 3");
ObjectDelete("LOCK");
ObjectDelete("DEAD ZONE");
ObjectDelete("Ñèãíàëüíûé Óðîâåíü Ëîêà = "+PZM+" %");
ObjectDelete("Ñèãíàëüíûé Óðîâåíü Ëîêà + "+dSig+" ïï");
ObjectDelete("Íå íèæå äëÿ BuyStop,SellLimit,StopLoss,TakeProfit");
ObjectDelete("Íå âûøå äëÿ BuyLimit,SellStop,StopLoss,TakeProfit");
ObjectDelete("Çîíà Buy+ - öâåò");
ObjectDelete("Çîíà Sell+ - öâåò");
ObjectDelete("Çîíà Full+ - öâåò");
ObjectDelete("Ìåðòâàÿ Çîíà - öâåò");
ObjectDelete("Çîíà LOCK - öâåò");
ObjectDelete("Óðîâåíü ÑËÈÂÀ - èíôî");
ObjectDelete("Óðîâåíü Ïðèíóäèòåëüíîãî Çàêðûòèÿ Îðäåðîâ ÄÖ / StopOut - èíôî");
ObjectDelete("Ìåðòâàÿ Çîíà - èíôî");
ObjectDelete("Ðàññòîÿíèå äî Íóëåâîé Ìàðæè - èíôî");
ObjectDelete("Ðàññòîÿíèå äî Öåíòð Òÿæåñòè Îúåìîâ - èíôî");
ObjectDelete("Öåíòð Òÿæåñòè Îúåìîâ - èíôî");
ObjectDelete("Óðîâåíü Íóëåâîé Ìàðæè - èíôî");
ObjectDelete("Ðàññòîÿíèå äî Îáùåãî Óðîâíÿ Áåçóáûòêà - èíôî");
ObjectDelete("Îáùèé Óðîâåíü Áåçóáûòêà - èíôî");
ObjectDelete("Ðàññòîÿíèå ìåæäó BUY = 0 è SELL = 0");
ObjectDelete("Óðîâ.SELL=0 - èíôî");
ObjectDelete("Óðîâ.BUY=0 - èíôî");
ObjectDelete("Ìîæíî êóïèòü ëîòîâ - èíôî");
ObjectDelete("Óðîâåíü - èíôî");
ObjectDelete("Ñâîáîäíî - èíôî");
ObjectDelete("Çàëîã - èíôî");
ObjectDelete("Ñðåäñòâà - èíôî");
ObjectDelete("Áàëàíñ - èíôî");
ObjectDelete("Çàëîã çà ìèíèìàëüíûé ëîò - èíôî");
ObjectDelete("Ìèíèìàëüíûé ëîò - èíôî");
ObjectDelete("Ìàêñèìàëüíûé ëîò - èíôî");
ObjectDelete("Ñòîèìîñòü 1 ïï äëÿ 1 ëîòà - èíôî");
ObjectDelete("Ñïðåä, ïï - èíôî");
//ObjectDelete ("Ðàçìåð Çîíû Çàìîðîçêè, ïï - èíôî");
//ObjectDelete ("Ðàçìåð Ñðåäíåé Âîëàòèëüíîñòè çà " + NN + " áàðîâ - èíôî");
ObjectDelete("Êîëè÷åñòâî áàðîâ â èñòîðèè - èíôî");
ObjectDelete("Ñâîï SELL, ïï - èíôî");
ObjectDelete("Ñâîï BUY, ïï - èíôî");
ObjectDelete("Êîëè÷åñòâî : Îáúåì - SELL.STOP.îðäåðîâ - èíôî");
ObjectDelete("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - SELL.Full.îðäåðîâ - èíôî");
ObjectDelete("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - SELL-.îðäåðîâ - èíôî");
ObjectDelete("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - SELL+.îðäåðîâ - èíôî");
ObjectDelete("Êîëè÷åñòâî : Îáúåì - SELL.LIMIT.îðäåðîâ - èíôî");
ObjectDelete("( Êîëè÷åñòâî : Îáúåì ) - Âñåãî èñïîëüçîâàíî îðäåðîâ - èíôî");
ObjectDelete("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - Ðàçíèöà ïî îðäåðàì - èíôî");
ObjectDelete("Êîëè÷åñòâî : Îáúåì - BUY.LIMIT.îðäåðîâ - èíôî");
ObjectDelete("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - BUY.Full.îðäåðîâ - èíôî");
ObjectDelete("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - BUY-.îðäåðîâ - èíôî");
ObjectDelete("Ïðèáûëü : Ñâîï : Êîëè÷åñòâî : Îáúåì - BUY+.îðäåðîâ - èíôî");
ObjectDelete("Êîëè÷åñòâî : Îáúåì - BUY.STOP.îðäåðîâ - èíôî");
ObjectDelete("Ïàíåëü Ðàñ÷åòà");
ObjectDelete("Êîììåíòàðèè - Ðàñ÷åò");
ObjectDelete("Ðàñ÷åò ïðèáûëè ïî TP="+sTP+" ïï îò óðîâíÿ áåçóáûòêà Sell");
ObjectDelete("Ðàñ÷åò ïðèáûëè ïî TP="+bTP+" ïï îò óðîâíÿ áåçóáûòêà Buy");
ObjectDelete("Ðàñ÷åò ïðèáûëè ïî TP="+fTP+" ïï îò óðîâíÿ îáù.áåçóáûòêà");
ObjectDelete("Ðàñ÷åò ðàññòîÿíèÿ äëÿ "+dS+" S îò óðîâíÿ îáù.áåçóáûòêà");
ObjectDelete("Ðàñ÷åò ðàññòîÿíèÿ äëÿ "+dS+" S îò óðîâíÿ áåçóáûòêà Sell");
ObjectDelete("Ðàñ÷åò ðàññòîÿíèÿ äëÿ "+dS+" S îò óðîâíÿ áåçóáûòêà Buy");
ObjectDelete("Ïðèáûëü - Ðàñ÷åò");
ObjectDelete("Ðàññòîÿíèå - Ðàñ÷åò");
ObjectDelete("Îáúåì Ëîòà - Ðàñ÷åò");
ObjectDelete("Ðàññòîÿíèå äî Óðîâíÿ Ðàâíîãî Ëîêà - èíôî");
ObjectDelete("Óðîâåíü Ðàíîãî Ëîêà - èíôî");
ObjectDelete("ÂÍÈÌÀÍÈÅ! ÂÛÁÎÐÊÀ ÏÎ ÓÊÀÇÀÍÍÛÌ ÇÍÀ×ÅÍÈßÌ");
ObjectDelete("ÂÍÈÌÀÍÈÅ! ÂÛÁÐÀÍÛ ÂÑÅ ÏÀÐÛ");
}
//---------------------------------------------------------------------------------------------//
//777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777//
//888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888//
//2-ÿ ôóíêöèÿ ñòèðàíèÿ íàðèñîâàííûõ îáúåêòîâ ïîñëå çàêðûòèÿ èíäèêàòîðà
//---------------------------------------------------------------------------------------------//
void Del_comment(string index)
{
for(int i=ObjectsTotal()-1; i>=0; i--)
{
string name=ObjectName(i);
if(index==StringSubstr(name,0,7)) ObjectDelete(name);
}
return;
}
//---------------------------------------------------------------------------------------------//
//888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888//
//
//
// © Bor-ix
// îòäåëüíàÿ áëàãîäàðíîñòü çà ïîìîùü â ðàçðàáîòêå è èäåè: Kirill & d_tom & Don_Leone & s.v.antonyuk & Strelok & incognitos Õ)
Comments
Markdown Formatting Guide
# H1
## H2
### H3
**bold text**
*italicized text*
[title](https://www.example.com)

`code`
```
code block
```
> blockquote
- Item 1
- Item 2
1. First item
2. Second item
---