تاريخ التسجيل: Apr 2012
الدولة: الرياض
المشاركات: 5,051
خبرة السوق: 1 الى 3 سنوات
معدل تقييم المستوى:
0
رد: مطلوب إكسبير لمؤشر الماكد
[PHP]
int t;
int ticket;
int tt;
datetime New_Time=0;
int r=20000;
double ms1,ms2;
double mm1,mm2;
double Lots=0.1;
extern int mx=0;
void start()
{//1
if(New_Time!=Time[0])
{//2
t++;
New_Time=Time[0];
if(((mm1>0 && mm2<0) || (mm2>0 && mm1<0)) ) tt=0;
mm1=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
ms1=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1 );
mm2=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,2);
ms2=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,2 );
if(OrdersTotal()<1)
{//6
if(((mm1>ms1 && mm2<ms2) || (mm2>ms2 && mm1<ms1)) && t>0 && mm1<0 && mm2<0)
{//c
tt++;
if(tt>mx)
{//n
ticket=OrderSend(Symbol(), OP_BUY, Lots , Ask , 3 , 0 , 0, "x" , r , 0 , Blue);r++;
t=0;
}//n
}//c
if(((mm1>ms1 && mm2<ms2) || (mm2>ms2 && mm1<ms1)) &&t>0 && mm1>0 && mm2>0)
{//c
tt++;
if(tt>mx)
{//c
ticket=OrderSend(Symbol(),OP_SELL, Lots , Bid , 3 , 0 , 0, "y" , r , 0 , Red);r++;
t=0;
}//c
}//c
}//6
for(int i=0;i<OrdersTotal();i++)
{//7
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{//8
if(OrdersTotal()==i+1)
{//9
if(((mm1>ms1 && mm2<ms2) || (mm2>ms2 && mm1<ms1)) &&t>0 && mm1<0 && mm2<0)
{//c
tt++;
if(tt>mx)
{//n
ticket=OrderSend(Symbol(), OP_BUY, Lots , Ask , 3 , 0 , 0, "x" , r , 0 , Blue);r++;
t=0;
}//n
}//c
if(((mm1>ms1 && mm2<ms2) || (mm2>ms2 && mm1<ms1)) &&t>0 && mm1>0 && mm2>0)
{//c
tt++;
if(tt>mx)
{//c
ticket=OrderSend(Symbol(),OP_SELL, Lots , Bid , 3 , 0 , 0, "y" , r , 0 , Red);r++;
t=0;
}//c
}//c
}//9
}//8
}//7
for( i=OrdersTotal()-1;i>=0;i--){
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{//4
if (OrderType( )==OP_BUY)
{//5
if(((mm1>ms1 && mm2<ms2) || (mm2>ms2 && mm1<ms1)) && mm1>0 && mm2>0)
OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet) ;
}//5
if(OrderType()==OP_SELL)
{//6
if(((mm1>ms1 && mm2<ms2) || (mm2>ms2 && mm1<ms1)) && mm1<0 && mm2<0)
OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet) ;
}//6
}//4
}//4
}//2
return(0);
}//1[/PHP]