Follow along with the video below to see how to install our site as a web app on your home screen.
Примечание: This feature may not be available in some browsers.
int init() {linebye();return(0);}int deinit(){Comment (" ");ObjectDelete ("10");ObjectDelete ("Label");return(0);}int start() {if (IsConnected()) { if (ObjectFind("Label") == (-1)) {linebye();} if (ObjectFind("10") == (-1)) {ObjectCreate ("10",OBJ_TEXT,0,Time[WindowBarsPerChart( )/3] , WindowPriceMax(0) ); ObjectSetText("10", DoubleToStr (Close[4],4), font, "Arial", clr);} while (ObjectFind("Label")!=(-1) ) { STL = ObjectGet("Label", 1); text(); Comment("\n"+"Значение линии: " +DoubleToStr(STL,Digits)+"\n" + "Суммарный лот: " + DoubleToStr(lots(),2)+ "\n"+ "Прибыль/убыток на уровне линии: " + res1 + " и размер баланса: " + res +"\n" + "Для прекращения работы скрипта удалите мерцающую линию "); if (iii == 5) {Sleep (30); ObjectSet( "Label", 6, Aqua); WindowRedraw( );} else Sleep (30); if (iii == 10) {Sleep (30); ObjectSet( "Label", 6, Red); WindowRedraw( );} else Sleep (30); if (iii == 10) iii = 0; iii = iii+1; } if (lots() != 0) { if (MessageBox (" Установить уровень закрытия ордеров по цене мигающей линии??? ","Скрипт интересуется:",1)==1) startset(); }}else MessageBox ("Нет соединения с сервером!!!"," Скрипт сообщает:",0x00000000); return(0);}//+------------------------------------------------------------------+int linebye() {// Рисуем линию (которая мигает)ObjectDelete( "Label");ObjectCreate( "Label", OBJ_HLINE, 0, 0, (Bid-Point*(MarketInfo(Symbol(), MODE_STOPLEVEL))) );ObjectSet( "Label", 6, White); ObjectSet( "Label", 8, 2); WindowRedraw( ) ; return(0); }//+------------------------------------------------------------------+string text() { if (funkprice() != 0) {res = DoubleToStr ((AccountBalance( ) - (((STL - funkprice())/Point)*MarketInfo(Symbol(), MODE_TICKVALUE)*lots()*(-1))),0); res1 = DoubleToStr (( (((STL - funkprice())/Point)*MarketInfo(Symbol(), MODE_TICKVALUE)*lots())),1); res2 = DoubleToStr ( (100*(((STL - funkprice())/Point)*MarketInfo(Symbol(), MODE_TICKVALUE)*lots()))/AccountBalance(),2);} else {res = " Суммарный лот = 0! "; res1 = ""; res2 = "";} if (((((STL - funkprice())/Point)*MarketInfo(Symbol(), MODE_TICKVALUE)*lots()))>0) clr = Magenta; else clr = Red; ObjectSetText("10"," Баланс: "+res+" "+AccountCurrency( )+", Профит: "+res1+" "+AccountCurrency( )+" ( "+res2+"% от Depo ) " , font, "Arial", clr); WindowRedraw( ) ;return(0); }//&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&double funkprice() { double price=0; if (lots()!=0) { if (lots()>0) price = MarketInfo(Symbol(),MODE_BID) - ((symbolprofit()/(MarketInfo(Symbol(), MODE_TICKVALUE)*lots()))*Point); if (lots()<0) price = MarketInfo(Symbol(),MODE_ASK) - ((symbolprofit()/(MarketInfo(Symbol(), MODE_TICKVALUE)*lots()))*Point); } return (price); } //*******************************************int startset() { int kol=0; int kolOK=0; int i=0; double ilots=0; for (i=0; i<OrdersTotal(); i++) { if (!OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) continue; if (OrderSymbol()!=Symbol()) continue; if (OrderType()==OP_BUY) { ilots=ilots+OrderLots(); kol=kol+1; } if (OrderType()==OP_SELL) { ilots=ilots-OrderLots(); kol=kol+1; } }//----- Alert ("!!! Пожалуйста дождитесь окончания работы скрипта!"); int resi = 0; for (i=0; i<OrdersTotal(); i++) { if (!OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) continue; if (OrderSymbol()!=Symbol()) continue; if (STL>Ask) { if (OrderType()==OP_BUY) {if (STL == OrderTakeProfit()) resi=resi+1; else { if (OrderModify(OrderTicket(),0,OrderStopLoss(),STL,0,CLR_NONE)) resi = resi+1;} } if (OrderType()==OP_SELL){if (STL == OrderStopLoss()) resi=resi+1; else { if (OrderModify(OrderTicket(),0,STL,OrderTakeProfit(),0,CLR_NONE)) resi = resi+1;} } } if (STL<Bid) { if (OrderType()==OP_BUY) {if (STL == OrderStopLoss()) resi=resi+1; else { if (OrderModify(OrderTicket(),0,STL,OrderTakeProfit(),0,CLR_NONE)) resi = resi+1;} } if (OrderType()==OP_SELL){if (STL == OrderTakeProfit()) resi=resi+1; else { if (OrderModify(OrderTicket(),0,OrderStopLoss(),STL,0,CLR_NONE)) resi = resi+1;} } } } Alert ("***************************************************"); if (kol==resi) Alert ("Все ордера успешно изменены! ОК!"); else Alert ("!!! Внимание!!! Не удалось изменить - " +(kol-resi)+ " ордера из "+kol+" имеющихся"); Alert ("************ информация от скрипта ************"); return(0); } double lots(){double sumlots = 0;for (i=0; i<OrdersTotal(); i++) { if (!OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) continue; if (OrderSymbol()!=Symbol()) continue; if (OrderType()==OP_BUY) { sumlots=sumlots+OrderLots(); } if (OrderType()==OP_SELL) { sumlots=sumlots-OrderLots(); } }return(sumlots);} //**************************double symbolprofit() // profit по ордерам текущего инструмента (без свопов и комиссий){double sprofit = 0;for (i=0; i<OrdersTotal(); i++) { if (!OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) continue; if (OrderSymbol()!=Symbol()) continue; sprofit = sprofit + OrderProfit()+OrderSwap()+OrderCommission(); }return(sprofit);
Добрый вечер!
Ребята,можно приделать стрелки в этом индикаторе.
В подвале, при пересечении нулевого уровня и на график.
Спасибо.
Индикатор из соседней ветки..(индикаторы без перерисовки)
FOTINI, возьмите любой фишер или солар, коих в сети не мерено и со стрелками и с алертами и будет Вам счастье.
а какой не рисует? есть такой?![]()
Доброго Дня, Форумчане и Знатоки-программеры!
Есть хороший Индик, показывающий направление Тренда на 8-ми вал. парах одновременно. Индюк полезный, но ... неправильно работающий, поскольку на некоторых ТФ рисует лабуду, не соответствующую действительности. Вот, к примеру, на GBP-USD на ТФ Н4 может показывать Стрелку "ВВЕРХ" , когда в реале свеча идет вниз.
Вот такая, блин засада получается.
Скажите, спецы, такой БАГ можно исправить?
Если кому не трудно, исправьте, пожалуйста. Буду очень признателен.
Индикатор и Скрин ниже:
Роман Смирнов заинтиресовала Ваша торговая система, а не могли бы Вы подсказать правила входа и выхода по ней?
Бонусом добавил запах черемухи!!!
У меня запасы"Черемуху" сняли - вместо нее теперь "Сирень" ))) :laugh:
Знатоки-программисты,помогите автоматизировать систему.Суть советника:при появлении стрелки индикатора-открывается ордер,допустим лотом 0,1;при противоположной стрелке-лот удваивается,т.е. 0,2 и последующие сделки при сигналах индикатора открываются лотом 0,2.Все ордера закрываются при достижении профита определённого процента от баланса или по достижению определённого профита в валюте счёта.Стрелки не перерисовываются и не пропадают.Помогите,пожалуйста.
--------
Уважаемые,данный индикатор имеет в своем коде переменные написаные кирилицой (я так думаю, так как у мене показывает ероглифами).
Не найдеться кто нибуть, кто поменяет кирилицу на английский.
Так выкладывайте индикатор, а так что гадать получится или нет.
День добрый fylhtk... Подскажите, в чём суть Вашей системы??? Таких советников (качельки, неваляшки и т.д.) море, обычно в них лот увеличивается с каждым сигналом, чтоб при начале движения получить прибыль. у Вас же лот постоянный и во флете советник будет накапливать в основном отрицательные локи и даже при начале положительных входов по стрелам выйти в плюс проблематично, даже невозможно, т.к. если даже входить и выходить по стрелам депозит только убывает.. скрин внизу - выхода даже в нуль не последовало...
У меня испорченой кирилицой. Индикатор Семафор с поста
http://forexsystemsru.com/1179962-post9899.html
Название переменных может быть и русские, но написаны латинскими буквами.
у тебя наверное шрифты подпорчены поэтому и пишет кракозябройУ меня испорченой кирилицой. Индикатор Семафор с поста
http://forexsystemsru.com/1179962-post9899.html
Название переменных может быть и русские, но написаны латинскими буквами.