Простой шаблон для эксперта для реала с инструкцией: www.opentraders.ru/downloads/1096/
0
0
Вдогонку библиотеки функций: www.opentraders.ru/downloads/1095/
1. Торговые от TarasBY
2. Торговые от Andrey Shpilev
3. Трейлинг от TarasBY
4. Капитал от TarasBY
5. Ошибки от IURII TOKMAN
6. Капитал от Andrey Khatimlianskii
7. Тралы от Юрий Дзюбан
8. Торговые от Andrey Khatimlianskii
1. Торговые от TarasBY
2. Торговые от Andrey Shpilev
3. Трейлинг от TarasBY
4. Капитал от TarasBY
5. Ошибки от IURII TOKMAN
6. Капитал от Andrey Khatimlianskii
7. Тралы от Юрий Дзюбан
8. Торговые от Andrey Khatimlianskii
0
Посмотрите в базе есть несколько советников по фибо, может подойдет какой то.
+1
Сделал отключаемое закрытие
//+------------------------------------------------------------------+
//| FL.mq4 |
//| Copyright 2016, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2016, AM2"
#property link "http://www.forexsystems.biz"
#property version "1.00"
#property strict
//--- Inputs
extern double Lots = 0.1; // лот
extern double KLot = 1; // умножение лота
extern double MaxLot = 5; // максимальный лот
extern int StopLoss = 0; // лось
extern int TakeProfit = 0; // язь
extern int BULevel = 0; // уровень БУ
extern int BUPoint = 30; // пункты БУ
extern int TrailingStop = 300; // трал
extern int Slip = 30; // реквот
extern int Count = 5; // максимальное количество позиций
extern int CloseOn = 0; // 1-закрытие по сигналу
extern int Shift = 1; // сдвиг
extern int Magic = 123; // магик
extern string IndName = "FL01";
datetime t=0;
//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//---
Comment("");
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
Comment("");
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void PutOrder(int type,double price)
{
int r=0;
color clr=Green;
double sl=0,tp=0;
if(type==1 || type==3 || type==5)
{
clr=Red;
if(StopLoss>0) sl=NormalizeDouble(price+StopLoss*Point,Digits);
if(TakeProfit>0) tp=NormalizeDouble(price-TakeProfit*Point,Digits);
}
if(type==0 || type==2 || type==4)
{
clr=Blue;
if(StopLoss>0) sl=NormalizeDouble(price-StopLoss*Point,Digits);
if(TakeProfit>0) tp=NormalizeDouble(price+TakeProfit*Point,Digits);
}
r=OrderSend(NULL,type,Lot(),NormalizeDouble(price,Digits),Slip,sl,tp,"",Magic,0,clr);
return;
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
int CountTrades()
{
int count=0;
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
{
if(OrderType()<2) count++;
}
}
}
return(count);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void OpenPos()
{
double up = iCustom(NULL,0,IndName,1,Shift);
double dn = iCustom(NULL,0,IndName,2,Shift);
if(Open[1]<dn && Close[1]>dn)
{
PutOrder(0,Ask);
}
if(Open[1]>up && Close[1]<up)
{
PutOrder(1,Bid);
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void ClosePos()
{
double up = iCustom(NULL,0,IndName,1,Shift);
double dn = iCustom(NULL,0,IndName,2,Shift);
//---
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
{
if(OrderType()==OP_BUY)
{
if(Close[0]>up)
{
if(!OrderClose(OrderTicket(),OrderLots(),Bid,Slip,White))
Print("OrderClose error ",GetLastError());
}
}
if(OrderType()==OP_SELL)
{
if(Close[1]<dn)
{
if(!OrderClose(OrderTicket(),OrderLots(),Ask,Slip,White))
Print("OrderClose error ",GetLastError());
}
}
}
}
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double Lot()
{
double lot=Lots;
if(OrderSelect(OrdersHistoryTotal()-1,SELECT_BY_POS,MODE_HISTORY))
{
if(OrderProfit()<0)
{
lot=OrderLots()*KLot;
}
}
if(lot>MaxLot)lot=Lots;
return(lot);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void Trailing()
{
bool mod;
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() || OrderMagicNumber()==Magic)
{
if(OrderType()==OP_BUY)
{
if(Bid-OrderOpenPrice()>TrailingStop*Point)
{
if(OrderStopLoss()<Bid-TrailingStop*Point)
{
mod=OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TrailingStop*Point,OrderTakeProfit(),0,Yellow);
return;
}
}
}
if(OrderType()==OP_SELL)
{
if((OrderOpenPrice()-Ask)>TrailingStop*Point)
{
if((OrderStopLoss()>(Ask+TrailingStop*Point)) || (OrderStopLoss()==0))
{
mod=OrderModify(OrderTicket(),OrderOpenPrice(),Ask+TrailingStop*Point,OrderTakeProfit(),0,Yellow);
return;
}
}
}
}
}
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void BU()
{
bool m;
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() || OrderMagicNumber()==Magic)
{
if(OrderType()==OP_BUY)
{
if(OrderOpenPrice()<=(Bid-(BULevel+BUPoint)*Point) && OrderOpenPrice()>OrderStopLoss())
{
m=OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice()+BUPoint*Point,OrderTakeProfit(),0,Green);
return;
}
}
if(OrderType()==OP_SELL)
{
if(OrderOpenPrice()>=(Ask+(BULevel+BUPoint)*Point) && OrderOpenPrice()<OrderStopLoss())
{
m=OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice()-BUPoint*Point,OrderTakeProfit(),0,Green);
return;
}
}
}
}
}
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick()
{
double up = iCustom(NULL,0,IndName,1,Shift);
double dn = iCustom(NULL,0,IndName,2,Shift);
if(CountTrades()<=Count && t!=Time[0])
{
OpenPos();
t=Time[0];
}
else if(CloseOn>0) ClosePos();
if(BULevel>0) BU();
if(TrailingStop>0) Trailing();
Comment("\n UP: ",up,
"\n DN: ",dn);
}
//+------------------------------------------------------------------+
0
Еще есть мысль написать подобную статейку по написанию собственных функций, проверок на основе кодов Кима, Роша и Косицина. Может еще подскажешь чьи коды можно взять за образец или материалы на эту тему?
0
Перерисовывается индикатор, когда реалтайм нормально все.
0
Я поправил еще один момент. Так должно быть?
0
Ага?
//+------------------------------------------------------------------+
//| Copyright © 2014, Khlystov Vladimir |
//| http://cmillion.narod.ru |
//+------------------------------------------------------------------+
//#property copyright "Copyright © 2014, cmillion@narod.ru"
//#property link "http://cmillion.ru"
//#property strict
//#property description "Советник торгует на скачках рынка, при этом не использует никакие индикаторы."
//#property description "Идея советника заключается в том, что стоп ордера дискретно времени перемещаются на заданном расстоянии от текущей цены."
//#property description "Если цена достаточно резко поползла в одну сторону, то советник просто не успевает переместить ордер и он становится рыночным."
//#property description "Далее включается тралл ордера."
//--------------------------------------------------------------------
extern int Stoploss = 10, //стоплосс, если 0 то не изменяется
Takeprofit = 50; //тейкпрофит, если 0 то не изменяется
extern int TrailingStop = 10; //длинна тралла, если 0 то нет тралла
extern int TrailingStart = 0; //когда включать тралл, например после достижения 40 п прибыл
extern int StepTrall = 2; //шаг тралла - перемещать стоплосс не ближе чем StepTrall
extern int NoLoss = 0, //перевод в безубыток при заданном кол-ве пунктов прибыли, если 0 то нет перевода в безубыток
MinProfitNoLoss = 0; //минимальная прибыль при переводе вбезубыток
extern int Magic = 77; //магик
extern int Step = 10; //расстояние от цены
extern double Lot = 0.1;
extern int TimeModify = 30; //кол-во секунд раньше которого запрещено изменять ордер
extern int slippage = 30; //Максимально допустимое отклонение цены для рыночных ордеров (ордеров на покупку или продажу).
//--------------------------------------------------------------------
datetime TimeBarB,TimeBarS;
//--------------------------------------------------------------------
int start()
{
ObjectsDeleteAll(0,OBJ_ARROW);
ObjectsDeleteAll(0,OBJ_TREND);
double STOPLEVEL=MarketInfo(Symbol(),MODE_STOPLEVEL);
double OSL=0,StLo=0,PriceB=0,PriceS=0,OOP=0,SL=0,TP=0;
int b=0,s=0,TicketB=0,TicketS=0,OT;
for(int i=0; i<OrdersTotal(); i++)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() && Magic==OrderMagicNumber())
{
OT=OrderType();
OSL = NormalizeDouble(OrderStopLoss(),Digits);
OOP = NormalizeDouble(OrderOpenPrice(),Digits);
SL=OSL;
if(OT==OP_BUY)
{
b++;
if(OSL<OOP && NoLoss!=0)
{
StLo=NormalizeDouble(OOP+MinProfitNoLoss*Point,Digits);
if(StLo>OSL && StLo<=NormalizeDouble(Bid-STOPLEVEL*Point,Digits)) SL=StLo;
}
if(TrailingStop>=STOPLEVEL && TrailingStop!=0 && (Bid-OOP)/Point>=TrailingStart)
{
StLo=NormalizeDouble(Bid-TrailingStop*Point,Digits);
if(StLo>=OOP && StLo>OSL+StepTrall*Point) SL=StLo;
}
if(SL>OSL)
{
if(!OrderModify(OrderTicket(),OOP,SL,TP,0,0)) Print("Error ",GetLastError()," Order Modify Buy SL ",OSL,"->",SL);
else Print("Order Buy Modify SL ",OSL,"-",SL);
}
}
if(OT==OP_SELL)
{
s++;
if((OSL>OOP || OSL==0) && NoLoss!=0)
{
StLo=NormalizeDouble(OOP-MinProfitNoLoss*Point,Digits);
if((StLo<OSL || OSL==0) && StLo>=NormalizeDouble(Ask+STOPLEVEL*Point,Digits)) SL=StLo;
}
if(TrailingStop>=STOPLEVEL && TrailingStop!=0 && (OOP-Ask)/Point>=TrailingStart)
{
StLo=NormalizeDouble(Ask+TrailingStop*Point,Digits);
if(StLo<=OOP && (StLo<OSL-StepTrall*Point || OSL==0)) SL=StLo;
}
if((SL<OSL || OSL==0) && SL!=0)
{
if(!OrderModify(OrderTicket(),OOP,SL,TP,0,0)) Print("Error ",GetLastError()," Order Modify Sell SL ",OSL,"->",SL);
else Print("Order Sell Modify SL ",OSL,"-",SL);
}
}
if(OT==OP_BUYSTOP) {PriceB=OOP; TicketB=OrderTicket();}
if(OT==OP_SELLSTOP) {PriceS=OOP; TicketS=OrderTicket();}
}
}
}
if(b+TicketB==0)
{
if(Stoploss>=STOPLEVEL && Stoploss!=0) SL=NormalizeDouble(Bid-Stoploss*Point,Digits); else SL=0;
if(Takeprofit>=STOPLEVEL && Takeprofit!=0) TP=NormalizeDouble(Ask+Takeprofit*Point,Digits); else TP=0;
if(OrderSend(Symbol(),OP_BUYSTOP,Lot,NormalizeDouble(Ask+Step*Point,Digits),slippage,SL,TP,"news",Magic,0,0)!=-1) TimeBarB=TimeCurrent();
}
if(s+TicketS==0)
{
if(Stoploss>=STOPLEVEL && Stoploss!=0) SL=NormalizeDouble(Ask+Stoploss*Point,Digits); else SL=0;
if(Takeprofit>=STOPLEVEL && Takeprofit!=0) TP=NormalizeDouble(Bid-Takeprofit*Point,Digits); else TP=0;
if(OrderSend(Symbol(),OP_SELLSTOP,Lot,NormalizeDouble(Bid-Step*Point,Digits),slippage,SL,TP,"news",Magic,0,0)!=-1) TimeBarS=TimeCurrent();
}
if(TicketB!=0)
{
if(TimeBarB<TimeCurrent()-TimeModify && MathAbs(NormalizeDouble(Ask+Step*Point,Digits)-PriceB)/Point>StepTrall)
{
if(Stoploss>=STOPLEVEL && Stoploss!=0) SL=NormalizeDouble(Bid-Stoploss*Point,Digits); else SL=0;
if(Takeprofit>=STOPLEVEL && Takeprofit!=0) TP=NormalizeDouble(Ask+Takeprofit*Point,Digits); else TP=0;
if(OrderModify(TicketB,NormalizeDouble(Ask+Step*Point,Digits),SL,TP,0,0)) TimeBarB=TimeCurrent();
}
}
if(TicketS!=0)
{
if(TimeBarS<TimeCurrent()-TimeModify && MathAbs(NormalizeDouble(Bid-Step*Point,Digits)-PriceS)/Point>StepTrall)
{
if(Stoploss>=STOPLEVEL && Stoploss!=0) SL=NormalizeDouble(Ask+Stoploss*Point,Digits); else SL=0;
if(Takeprofit>=STOPLEVEL && Takeprofit!=0) TP=NormalizeDouble(Bid-Takeprofit*Point,Digits); else TP=0;
if(OrderModify(TicketS,NormalizeDouble(Bid-Step*Point,Digits),SL,TP,0,0)) TimeBarS=TimeCurrent();
}
}
return(0);
}
//--------------------------------------------------------------------
0
Там есть стопы
extern int StopLoss = 0; // лось
extern int TakeProfit = 0; // язь
0
После модификации отложек, сраэу же удалять стрелки, появляющиеся на графике после модификации.
Пробуйте 3 варианта выше или кидайте код я посмотрю.
0
В принципе я практически со все разобрался сам, но стрелки при модификации отложек забивают график и очень трудно найти среди них рыночный ордер.
Покажите что убрать на скрине? Обычно так убирается все ObjectsDeleteAll(),
так ObjectsDeleteAll(0,OBJ_ARROW) стрелки и по имени объекта
string name=ObjectName(i);
ObjectDelete(name);
0
Вот трал по вашему индикатору:
//+------------------------------------------------------------------+
//| IndTrail.mq4 |
//| Copyright 2016, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2016, AM2"
#property link "http://www.forexsystems.biz"
#property version "1.00"
#property strict
input int Buffer=0;
input string IndName="GoFX-3MA-MTF-Non-H1";
//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
//---
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick()
{
int r=0;
bool m;
if(IsTesting() && OrdersTotal()<1)
{
//r = OrderSend(NULL,0,0.1,Ask,30,Ask-500*Point,0,"",0,0,Blue);
r = OrderSend(NULL,1,0.1,Bid,30,Ask+500*Point,0,"",0,0,Red);
}
double StopLevel=MarketInfo(Symbol(),MODE_STOPLEVEL);
double sl=NormalizeDouble(iCustom(NULL,0,IndName,Buffer,0),Digits);
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol())
{
if(OrderType()==OP_BUY)
{
if(sl>OrderOpenPrice() && sl!=OrderStopLoss())
{
if(sl<Bid-StopLevel) m=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(sl,Digits),OrderTakeProfit(),0,White);
}
}
if(OrderType()==OP_SELL)
{
if(sl<OrderOpenPrice() && sl!=OrderStopLoss())
{
if(sl>Ask+StopLevel) m=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(sl,Digits),OrderTakeProfit(),0,White);
}
}
}
}
}
}
//+------------------------------------------------------------------+
+1
Сначала делаю согласно условиям: zakaz.opentraders.ru/25597.html
Все остальное смотрю если есть свободное время.
Все остальное смотрю если есть свободное время.
+1
Сейчас вход при пересечении а выход при касании, плюс несколько позиций: www.opentraders.ru/downloads/1094/
0
А так?
if (OrdTotalBuy()==1) Mnog1 = Mnog;
if (OrdTotalBuy()==2) Mnog1 = Mnog+0.05;
if (OrdTotalBuy()==3) Mnog1 = Mnog+0.1;
if (OrdTotalBuy()==4) Mnog1 = Mnog+0.15;
if(OrdTotalBuy()>0) Mnog1 = Mnog+0.05*(OrdTotalBuy()-1);0
Я платно не делаю.
0
Готово. Кроме того в советнике есть отключаемые функции: торговля по времени, трал, БУ, увеличение лота после убытка.
www.opentraders.ru/downloads/1092/
www.opentraders.ru/downloads/1092/
0
Cейчас реализовано 1,2,3,4. Когда нужно будет отключить данные функции отключите самостоятельно в нужный день: www.opentraders.ru/downloads/1091/
0
У вас в этом месяце уже есть один заказ.
Новости сообщества:
-
19 августа 2024, 17:10
Починили поиск на сайте
Поиск доступен на каждой странице сверху справа -
13 августа 2024, 15:18
Чат размещается по новой ссылке
Из недавнего:
Нажмите, чтобы обновить-
AM2
13 мая 2025, 10:49→ Алерт к индикатору OsMa (3) в Стол заказов MQL
после нейросетки надо дорабатывать:
:: <>[Читать..] -
pekyum
12 мая 2025, 17:58→ Распределение прибыли на Форекс (16) в Блог им. alehus
Вы можете сегодня можете начать зарабатывать деньги в лучшем... <>[Читать..] -
AM2
12 мая 2025, 09:30→ Зоны (15) в Стол заказов MQL
пропал заказчик :: <>[Читать..] -
Shiva
8 мая 2025, 11:11→ Индикатор Candle and Volume (7) в Стол заказов MQL
Здравствуйте! А, какой параметр в VOLUME?
<>[Читать..] -
Bishop
5 мая 2025, 11:26→ советник круглые уровни на графике и масд (8) в Стол заказов MQL
игрун, не поднимай пыль <>[Читать..] -
poker
30 апреля 2025, 06:43→ Поправить код для tradingview (1) в Стол заказов MQL
Короче разобрался. Работает только на тайфреймах от М1 до... <>[Читать..] -
AM2
28 апреля 2025, 18:31→ Доработка советника (19) в Стол заказов MQL Добавить возможность входа динамическим лотом от... <>[Читать..]
-
AM2
25 апреля 2025, 15:14→ alert (9) в Стол заказов MQL
1000р. доделать осталось немного <>[Читать..] -
verta81
24 апреля 2025, 09:04→ Нужен советник для МТ5, полный аналог спот grid bot на бирже Bybit (7) в Стол заказов MQL
@V_trueE
В ТГ напишите, все детали обсудим. <>[Читать..] -
AM2
21 апреля 2025, 15:11→ Доработка заказа http://zakaz.opentraders.ru/54973.html (11) в Стол заказов MQL
не туда отправил <>[Читать..]
- Общая информация
- О проекте
- Наша команда
- Предупреждение о рисках
- Условия использования
- Рекламодателям
- Контакты
- Торговля
- Инструкция по FOREX для начинающих
- Сравнение FOREX и биржевого рынка
- Рейтинг брокеров Forex
- Расписание торговых сессий
- Монитор Forex (графики, календарь)
- Наши сервисы и услуги
- Forex VPS
- Тестовая лаборатория
- Рейтинг советников Форекс
- Файловое хранилище
- Конкурсы от брокеров Форекс
- Инвесторам
- Новости: финансы, бизнес, экономика
- MetaTrader
- Скачать MetaTrader 5
- Начало работы с терминалом
- Мобильная версия терминала
- Язык MQL5 для создания советников
- Структура сообщества
- Главная
- Пользователи
- Группы
- Стены
- Лента комментариев
- Избранное
Внимание! Торговля и инвестирование на финансовых рынках сопряжены с повышенным риском потери капитала!
OpenTraders - информационный ресурс, не ведет брокерскую или дилерскую деятельность, не открывает счета. Все материалы на ресурсе носят информационный характер и не являются побуждением к действию. Администрация сайта может не соглашаться с мнением авторов. См. Предупреждение о рисках
Сайт работает на территории СНГ. Любая вероятная реклама направлена исключительно на жителей за пределами Российской Федерации, если явно не оговорено обратное. Пользователи самостоятельно несут ответственность за любую рекламу в своих материалах. См. Пользовательское cоглашение
AM2