//+------------------------------------------------------------------+
//| RenkoChannel.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 int StopLoss = 500; // лось
extern int TakeProfit = 500; // язь
extern int Slip = 30; // реквот
extern int Magic = 123; // магик
extern string IndName = "vhpchannel_03";
extern int Fast = 21;
extern int Slow = 100;
datetime t=0;
//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//---
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
//---
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
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(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);
}
}
}
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void OpenPos()
{
double up=iCustom(NULL,0,IndName,Fast,Slow,2,1);
double dn=iCustom(NULL,0,IndName,Fast,Slow,3,1);
if(t!=Time[0])
{
// покупка
if((Close[1]>Open[1] && Close[2]<Open[2] && Ask<dn) || // цена ниже нижней границы канала плюс разворотный паттерн
(Low[2]<dn && Close[1]>Open[1] && Close[2]<Open[2] && Ask>dn)) // цена выше нижней границы канала плюс разворотный паттерн и касание
{
if(CountTrades()<1) PutOrder(0,Ask);
}
// продажа
if((Close[1]<Open[1] && Close[2]>Open[2] && Bid>up) || // цена выше верхней границы канала плюс разворотный паттерн
(High[2]>up && Close[1]<Open[1] && Close[2]>Open[2] && Bid<up)) // цена ниже верхней границы канала плюс разворотный паттерн и касание
{
if(CountTrades()<1) PutOrder(1,Bid);
}
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void ClosePos()
{
double up=iCustom(NULL,0,IndName,Fast,Slow,2,1);
double dn=iCustom(NULL,0,IndName,Fast,Slow,3,1);
//---
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(High[2]>up && Close[1]<Open[1] && Close[2]>Open[2] && Bid<up) // цена ниже верхней границы канала плюс разворотный паттерн и касание
{
CloseAll(0);
}
}
if(OrderType()==OP_SELL)
{
if(Low[2]<dn && Close[1]>Open[1] && Close[2]<Open[2] && Ask>dn) // цена выше нижней границы канала плюс разворотный паттерн и касание
{
CloseAll(1);
}
}
}
}
}
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick()
{
double up=iCustom(NULL,0,IndName,Fast,Slow,2,1);
double dn=iCustom(NULL,0,IndName,Fast,Slow,3,1);
if(t!=Time[0])
{
if(CountTrades()<1) OpenPos();
else ClosePos();
}
Comment("\n up: ",up,"\n dn: ",dn);
}
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Genri.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
#property indicator_chart_window
input double L1=1.225;
input double L2=1.266;
input double L3=0;
input double L4=0;
input double L5=0;
input double L6=0;
input double L7=0;
input double L8=0;
input double L9=0;
input double L10=0;
input double L11=0;
input double L12=0;
input double L13=0;
input double L14=0;
input double L15=0;
input int Width=1;
input color Color=Red;
input string Symb="GBPUSD";
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//--- indicator buffers mapping
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
Comment("");
ObjectsDeleteAll(0,0,OBJ_HLINE);
}
//+------------------------------------------------------------------+
//| Горизонтальная линия |
//+------------------------------------------------------------------+
void PutHLine(string name,long chart_id,double p,int width,color clr)
{
ObjectDelete(chart_id,name);
ObjectCreate(chart_id,name,OBJ_HLINE,0,0,p);
//--- установим цвет линии
ObjectSetInteger(chart_id,name,OBJPROP_COLOR,clr);
//--- установим толщину линии
ObjectSetInteger(chart_id,name,OBJPROP_WIDTH,width);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void PutLines(long id)
{
if(L1>0) PutHLine("Line"+(string)L1,id,L1,Width,Color);
if(L2>0) PutHLine("Line"+(string)L2,id,L2,Width,Color);
if(L3>0) PutHLine("Line"+(string)L3,id,L3,Width,Color);
if(L4>0) PutHLine("Line"+(string)L4,id,L4,Width,Color);
if(L5>0) PutHLine("Line"+(string)L5,id,L5,Width,Color);
if(L6>0) PutHLine("Line"+(string)L6,id,L6,Width,Color);
if(L7>0) PutHLine("Line"+(string)L7,id,L7,Width,Color);
if(L8>0) PutHLine("Line"+(string)L8,id,L8,Width,Color);
if(L9>0) PutHLine("Line"+(string)L9,id,L9,Width,Color);
if(L10>0) PutHLine("Line"+(string)L10,id,L10,Width,Color);
if(L11>0) PutHLine("Line"+(string)L11,id,L11,Width,Color);
if(L12>0) PutHLine("Line"+(string)L12,id,L12,Width,Color);
if(L13>0) PutHLine("Line"+(string)L13,id,L13,Width,Color);
if(L14>0) PutHLine("Line"+(string)L14,id,L14,Width,Color);
if(L15>0) PutHLine("Line"+(string)L15,id,L15,Width,Color);
}
//+------------------------------------------------------------------+
//| 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[])
{
//---
long currChart,prevChart=ChartFirst();
int i=0,limit=100;
while(i<limit)// у нас наверняка не больше 100 открытых графиков
{
currChart=ChartNext(prevChart); // на основании предыдущего получим новый график
if(currChart<0) break; // достигли конца списка графиков
if(ChartSymbol(currChart)==Symb) PutLines(currChart);
prevChart=currChart;// запомним идентификатор текущего графика для ChartNext()
i++;// не забудем увеличить счетчик
}
Comment("\n Windows: ",i);
//--- return value of prev_calculated for next call
return(rates_total);
}
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Random.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
#property show_inputs
input int Min=1;
input int Max=24;
//+------------------------------------------------------------------+
//| Script program start function |
//+------------------------------------------------------------------+
void OnStart()
{
int r=MathRand()%Max;
Comment("\n Случайное число от: ",Min," до ",Max," = ",r);
}
//+------------------------------------------------------------------+
Дело в том что советник у меня не работает
AM2