พอดีลองเขียน ea จากยูทูปแบคเทสได้แต่พอเอาไปลงกับเดโมกลับเปิดออเดอร์ตามรูปแบบนี้ขอความกรุณาจากผู้รู้ทุกท่านช่วยดูหน่อยครับว่าผิดพลาดตรงไหนอยากลองเขียนดูครับextern int MagicNumber = 12345;
extern double Lotsize = 0.1;
extern int TP = 1000;
extern int SL = 1000;
int OnInit()
{
//---
//---
return(INIT_SUCCEEDED);
}
double Fma,Sma,FmaSh,SmaSh;
void GetMA(){
Fma = iMA(Symbol(),0,20,0,MODE_SMA, PRICE_CLOSE,0);
Sma = iMA(Symbol(),0,144,0,MODE_SMA, PRICE_CLOSE,0);
FmaSh = iMA(Symbol(),0,20,0,MODE_SMA, PRICE_CLOSE,1);
SmaSh = iMA(Symbol(),0,144,0,MODE_SMA, PRICE_CLOSE,1);
}
void Openbuy(){
double sl=Bid-SL*Point;
double tp=Ask+TP*Point;
OrderSend(Symbol(),OP_BUY,Lotsize,Ask,3,sl,tp,"My order",MagicNumber,0,clrGreen);
}
void OpenSell(){
double sl=Ask+SL*Point;
double tp=Bid-TP*Point;
OrderSend(Symbol(),OP_SELL,Lotsize,Bid,3,sl,tp,"My order",MagicNumber,0,clrGreen);
}
void CloseorderAll(int type){
for(int i= OrdersTotal()-1;i>=0;i--){
if(OrderSelect(i,SELECT_BY_POS)==true){
if(OrderMagicNumber()== MagicNumber && OrderSymbol()==Symbol()){
switch(type){
case OP_BUY:
OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_BID),0,0);
break;
case OP_SELL:
OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_ASK),0,0);
break;
}
}
}
}
}
int CountOrder(int type){
int CntOrder = 0;
for(int i=0;i<OrdersTotal ();i++){
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(OrderType() == type && OrderMagicNumber()== MagicNumber){
if(OrderSymbol()==Symbol()){
CntOrder++;
}
}
}
return(CntOrder);
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick(){
GetMA();
if(CountOrder(OP_SELL)==0)
{
if(Fma < Sma && FmaSh > SmaSh)
{
OpenSell();
CloseorderAll(OP_BUY);
}
}
if(CountOrder(OP_BUY)==0){
if(Fma>Sma&&FmaSh<SmaSh){
Openbuy();
CloseorderAll(OP_SELL);
}
}
}
//+------------------------------------------------------------------+
[/list]