0
я затачивал под цвета из пользовательской палитры. основа есть, принцип надеюсь понятен. делаю только то что можно быстро сделать.
0
делает чуть темнее фона. насколько темнее задается в настройках:
//+------------------------------------------------------------------+
//| CvetFona.mq4 |
//| Copyright 2018, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2018, AM2"
#property link "http://www.forexsystems.biz"
#property version "1.00"
#property strict
#property indicator_chart_window
#import "user32.dll"
int GetDC(int hwnd);
int ReleaseDC(int hwnd,int hdc);
#import "gdi32.dll"
color GetPixel(int hdc,int x,int y);
#import
input int plus=20;
color clr;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//--- indicator buffers mapping
ObjectsDeleteAll();
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void PutButton(string name,int x,int y,string text)
{
ObjectDelete(0,name);
ObjectCreate(0,name,OBJ_BUTTON,0,0,0);
//--- установим координаты кнопки
ObjectSetInteger(0,name,OBJPROP_XDISTANCE,x);
ObjectSetInteger(0,name,OBJPROP_YDISTANCE,y);
//--- установим размер кнопки
ObjectSetInteger(0,name,OBJPROP_XSIZE,80);
ObjectSetInteger(0,name,OBJPROP_YSIZE,30);
//--- установим угол графика, относительно которого будут определяться координаты точки
ObjectSetInteger(0,name,OBJPROP_CORNER,2);
//--- установим текст
ObjectSetString(0,name,OBJPROP_TEXT,text);
//--- установим шрифт текста
ObjectSetString(0,name,OBJPROP_FONT,"Arial");
//--- установим размер шрифта
ObjectSetInteger(0,name,OBJPROP_FONTSIZE,12);
//--- установим цвет текста
ObjectSetInteger(0,name,OBJPROP_COLOR,Red);
//--- установим цвет фона
ObjectSetInteger(0,name,OBJPROP_BGCOLOR,clr);
//--- установим цвет границы
ObjectSetInteger(0,name,OBJPROP_BORDER_COLOR,Blue);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
const int prev_calculated,
const datetime &time[],
const double &open[],
const double &high[],
const double &low[],
const double &close[],
const long &tick_volume[],
const long &volume[],
const int &spread[])
{
//---
int hwnd=WindowHandle(Symbol(),Period());
int hdc=GetDC(hwnd);
color back_ground=GetPixel(hdc,1,2);
ReleaseDC(hwnd,hdc);
string s=(string)back_ground;
PutButton("b",22,44,"BUTON");
int a=(int)StringSubstr(s,0,StringFind(s,",",0));
int c=a+plus;
clr=StringToColor((string)c+StringSubstr(s,StringFind(s,",",0),StringLen(s)-StringFind(s,",",0)));
Comment("\n Цвет фона: "+(string)back_ground,
"\n Цвет кнопки: "+(string)c+StringSubstr(s,StringFind(s,",",0),StringLen(s)-StringFind(s,",",0)));
return(rates_total);
}
//+------------------------------------------------------------------+
0
не всегда открывает ордера
значит не совпало какое то условие
0
0
сейчас посмотрел тз.
как я объясню это машине? можно конечно сделать, но не на бесплатном, т.е не ко мне.
от Фрактала как на рис натягиваем
линии Фиббоначи от Фрактала до нижнего
экстремума АО
как я объясню это машине? можно конечно сделать, но не на бесплатном, т.е не ко мне.
0
до поручителя или на следующий месяц
0
в базе обновленный вариант. проверьте еще у себя.
0
может не обновился. еще сюда скинул код:
//+------------------------------------------------------------------+
//| ProBoy.mq4 |
//| Copyright 2018, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2018, AM2"
#property link "http://www.forexsystems.biz"
#property version "1.00"
#property strict
//--- Inputs
extern double Lots = 0.1; // лот
extern double KLot = 2; // умножение лота
extern double MaxLot = 5; // максимальный лот
extern int StopLoss = 2000; // лось
extern int TakeProfit = 20; // язь
extern int Max = 1500; // максимальный размах свечи
extern int Min = 300; // минимальный размах свечи
extern int Delta = 50; // расстояние от цены для стоповых
extern int Slip = 0; // реквот
extern int Shift = 1; // на каком баре сигнал
extern int Magic = 123; // магик
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;
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double Lot()
{
double lot=Lots;
for(int i=OrdersHistoryTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY))
{
if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
{
if(OrderProfit()>0) break;
if(OrderProfit()<0)
{
lot=OrderLots()*KLot;
break;
}
}
}
}
if(lot>MaxLot)lot=Lots;
return(lot);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
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 CloseAll(int ot=-1)
{
bool cl;
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
{
if(OrderType()==0 && (ot==0 || ot==-1))
{
RefreshRates();
cl=OrderClose(OrderTicket(),OrderLots(),NormalizeDouble(Bid,Digits),Slip,White);
}
if(OrderType()==1 && (ot==1 || ot==-1))
{
RefreshRates();
cl=OrderClose(OrderTicket(),OrderLots(),NormalizeDouble(Ask,Digits),Slip,White);
}
}
}
}
}
//+------------------------------------------------------------------+
//| Подсчет ордеров по типу |
//+------------------------------------------------------------------+
int CountOrders(int type)
{
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()==type) count++;
}
}
}
return(count);
}
//+------------------------------------------------------------------+
//| Удаление отложенных ордеров |
//+------------------------------------------------------------------+
void DelOrder()
{
bool del;
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
{
if(OrderType()>1) del=OrderDelete(OrderTicket());
}
}
}
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick()
{
double delta=Close[1]-Open[1];
if(CountTrades()>0) DelOrder();
if(t!=Time[0])
{
DelOrder();
CloseAll();
if(MathAbs(delta)>Min*_Point && MathAbs(delta)<Max*_Point)
{
if(delta>0)
{
if(CountOrders(4)<1 && Bid<Close[1]+Delta*_Point) PutOrder(4,Close[1]+Delta*_Point);
if(CountOrders(5)<1 && Bid>Open[1]-Delta*_Point) PutOrder(5,Open[1]-Delta*_Point);
}
if(delta<0)
{
if(CountOrders(4)<1 && Bid<Open[1]+Delta*_Point) PutOrder(4,Open[1]+Delta*_Point);
if(CountOrders(5)<1 && Bid>Close[1]-Delta*_Point) PutOrder(5,Close[1]-Delta*_Point);
}
}
t=Time[0];
}
Comment("\n Delta: ",delta/_Point);
}
//+------------------------------------------------------------------+
0
0
расчеты в теле советника можно сделать. для чего индикатор?
0
на 26-е. объем большой, то что можно быстро сделать сделаю.
0
опишите подробнее, что на входе на выходе и др.
0
готово:
//+------------------------------------------------------------------+
//| Zakrivashka.mq4 |
//| Copyright 2018, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2018, AM2"
#property link "http://www.forexsystems.biz"
#property version "1.00"
#property strict
//--- Inputs
extern double Lots = 0.1; // лот
extern int StopLoss = 0; // лось
extern int TakeProfit = 0; // язь
extern int BULevel = 0; // уровень БУ
extern int BUPoint = 30; // пункты БУ
extern int TrailingStop = 0; // трал
extern int TrailingStep = 20; // шаг трала
extern int Slip = 30; // реквот
extern int Shift = 1; // на каком баре сигнал индикатора
extern int Magic = 0; // магик
extern bool PosOpen=1; // открытие поз
extern string IndName="0TMA+CG mladen";
extern string TimeFrame = "current time frame";
extern int HalfLength = 56;
extern int Price = PRICE_WEIGHTED;
extern double BandsDeviations = 1.618;
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,Lots,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,TimeFrame,HalfLength,Price,BandsDeviations,1,Shift);
double dn = iCustom(NULL,0,IndName,TimeFrame,HalfLength,Price,BandsDeviations,2,Shift);
if(Bid<dn) PutOrder(0,Ask);
if(Bid>up) PutOrder(1,Bid);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void ClosePos()
{
double mid=iCustom(NULL,0,IndName,TimeFrame,HalfLength,Price,BandsDeviations,0,Shift);
if(Bid>=mid) CloseAll(0);
if(Ask<=mid) CloseAll(1);
}
//+------------------------------------------------------------------+
//| Ступенчатый трал if(TrailingStop>0) Trailing(); |
//+------------------------------------------------------------------+
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+TrailingStep-1)*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+TrailingStep-1)*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,Yellow);
return;
}
}
if(OrderType()==OP_SELL)
{
if(OrderOpenPrice()>=(Ask+(BULevel+BUPoint)*Point) && (OrderOpenPrice()<OrderStopLoss() || OrderStopLoss()==0))
{
m=OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice()-BUPoint*Point,OrderTakeProfit(),0,Yellow);
return;
}
}
}
}
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CloseAll(int ot=-1)
{
bool cl;
for(int i=OrdersTotal()-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
{
if(OrderType()==0 && (ot==0 || ot==-1))
{
RefreshRates();
cl=OrderClose(OrderTicket(),OrderLots(),NormalizeDouble(Bid,Digits),Slip,White);
}
if(OrderType()==1 && (ot==1 || ot==-1))
{
RefreshRates();
cl=OrderClose(OrderTicket(),OrderLots(),NormalizeDouble(Ask,Digits),Slip,White);
}
}
}
}
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick()
{
ClosePos();
if(t!=Time[0])
{
if(PosOpen) OpenPos();
t=Time[0];
}
if(BULevel>0) BU();
if(TrailingStop>0) Trailing();
Comment("\n Trades: ",CountTrades());
}
//+------------------------------------------------------------------+
0
на 24-е
0
посмотрю. если получится быстро сделать. на 22-е
0
скиньте задание целиком сюда в топик
Новости сообщества:
-
19 августа 2024, 17:10
Починили поиск на сайте
Поиск доступен на каждой странице сверху справа -
13 августа 2024, 15:18
Чат размещается по новой ссылке
Текущие конкурсы и акции
(показано 5 случайных)
|
Конкурсы на реальных счетах
(Alpari)
*осталось дней: бессрочно
|
|
Акции
(InstaForex)
*осталось дней: бессрочно
|
|
Конкурсы без вложений
(NordFX)
*осталось дней: бессрочно
|
|
Акции
(InstaForex)
*осталось дней: бессрочно
|
|
Конкурсы без вложений
(FBS)
*осталось дней: бессрочно
|
Полный список см. в сервисе
OpenTraders.Event →
OpenTraders.Event →
Из недавнего:
Нажмите, чтобы обновить-
Mixer19
24 мая 2025, 06:48→ Евро в продажу! (5) в Блог им. Mixer19
Да, на Альфе толькоручная торговля. На робо все остальн... <>[Читать..] -
Boris54
24 мая 2025, 01:25→ Австралиец (2) в Блог им. Evgen123
Евген, можете показать итог за месяц, ну или за неделю. <>[Читать..] -
Evgen123
22 мая 2025, 12:20→ Евро шорт (1) в Блог им. Evgen123
Профит <>[Читать..] -
Evgen123
21 мая 2025, 18:39→ Австралиец шорт (1) в Блог им. Evgen123
Лось <>[Читать..] -
Evgen123
21 мая 2025, 16:09→ Канадец Лонг (1) в Блог им. Evgen123
Лось <>[Читать..] -
Evgen123
21 мая 2025, 14:37→ Aud/usd bay (1) в Блог им. Evgen123
Профит <>[Читать..] -
Evgen123
21 мая 2025, 14:37→ Gbp/usd шорт (1) в Блог им. Evgen123
Лось <>[Читать..] -
AM2
20 мая 2025, 22:35→ Прошу написать робота) на открытие сделок и трейлинг (1) в Блог им. PrAct
сколько предложите зеленых? :: <>[Читать..] -
Evgen123
19 мая 2025, 12:47→ Aud/usd bay (1) в Блог им. Evgen123
Отработала по ТП. <>[Читать..] -
AM2
18 мая 2025, 14:46→ Зоны (51) в Стол заказов MQL
если кто то возьмется реализовать трал и удаление зон, удачи.... <>[Читать..]
- Общая информация
- О проекте
- Наша команда
- Предупреждение о рисках
- Условия использования
- Рекламодателям
- Контакты
- Торговля
- Инструкция по FOREX для начинающих
- Сравнение FOREX и биржевого рынка
- Рейтинг брокеров Forex
- Расписание торговых сессий
- Монитор Forex (графики, календарь)
- Наши сервисы и услуги
- Forex VPS
- Тестовая лаборатория
- Рейтинг советников Форекс
- Файловое хранилище
- Конкурсы от брокеров Форекс
- Инвесторам
- Новости: финансы, бизнес, экономика
- MetaTrader
- Скачать MetaTrader 5
- Начало работы с терминалом
- Мобильная версия терминала
- Язык MQL5 для создания советников
- Структура сообщества
- Главная
- Пользователи
- Группы
- Стены
- Лента комментариев
- Избранное
Внимание! Торговля и инвестирование на финансовых рынках сопряжены с повышенным риском потери капитала!
OpenTraders - информационный ресурс, не ведет брокерскую или дилерскую деятельность, не открывает счета. Все материалы на ресурсе носят информационный характер и не являются побуждением к действию. Администрация сайта может не соглашаться с мнением авторов. См. Предупреждение о рисках
Сайт работает на территории СНГ. Любая вероятная реклама направлена исключительно на жителей за пределами Российской Федерации, если явно не оговорено обратное. Пользователи самостоятельно несут ответственность за любую рекламу в своих материалах. См. Пользовательское cоглашение
AM2