[طلب] مساعدة في عمل اكسبرت
extern string S1="Enter Max Orders";
extern int MaxOrders=0;
extern string S2="Enter Trading Time";
extern bool UseHourTrade =false;
extern double FromHourTrade =0; //00:00 24h
extern double ToHourTrade =0; //00:00 24h
extern string S3="Enter Price To Start Buy/Sell";
input double PriceToStart =0.0; // Price level to execute a deal
extern string S4="Choose Buy/Sell";
extern bool Buy=false; // Buy or sell . True/False
extern bool Sell=false; //Buy or sell . True/False
extern string S5="Enter Pip Step"; // Pip step
extern int PipStep=0;
extern string S6="Enter Lot Size";
extern double LotSize =0.00; // Lot size
extern double LotSizeIncrement =0.00; //Lot incerment
extern double MaxLot =0.0; // Max lot
extern string S7="Equity";
extern bool CloseAllSymbolsWhenEquityHit=false; //Close all treads and all symbols when equlity hit true/false
extern double EquityProfit=0.0; // Close all treads when equlity reached the input profit
extern double EquityLoss=0.0; //Close all treads when equlity reached the input loss
extern bool DisableAllEAs=false; //Disable all EAs
extern string S8="Pips";
extern bool ProfitLossInPips=false; // Profit in pips Ture/Fales
extern double TakeProfit =0.0; // Take profit in pips input
extern double StopLoss=0.0; // Stop loss in pips input
extern bool PerSingleOrder=false; // Per single order True/False
extern string S9="USD";
extern bool ProfitLossInUSD=false; // Profit in USD True/False
extern double USDProfit=0.0; // USD profit input
extern bool PerSingleOrder=false; // Per single order True/False
extern string S10="Percentage";
extern bool ProfitPercent=false; // Profit % True/False
extern double ProfitPercent=0.0; // Profit % input
extern bool PerSingleOrder=false; // Per single order True/False
extern bool CloseAllSymbolsWhenPercentHit=false; //Close all treads and all symbols when percent hit true/false
extern bool DisableAllEAs=false;
extern string S11="Break Even.Trailing Stop";
extern bool BreakEven=false;
extern double BreakEvenAfterPips=0.0;
extern bool TrailingStop=false; //Trailing stop True/False
extern double StartTrailingStop=0.0; //Start Trailing stop profit pip
extern double TrailingStep=0.0; //Trailing stop step profit pip
extern bool UseSound =false; // UseSound True/False. When break even placed and when trailing stop moving
extern string NameFileSound ="expert.wav";
extern string S12="Enter Slip Page";
extern double MaxSlippage= 3; //Max slip page
extern string S13="Enter Magic Number";
extern int MagicNumber=0; // Magic number 
رد: [طلب] مساعدة في عمل اكسبرت
رد: [طلب] مساعدة في عمل اكسبرت
رد: [طلب] مساعدة في عمل اكسبرت
رد: [طلب] مساعدة في عمل اكسبرت
رد: [طلب] مساعدة في عمل اكسبرت
رد: [طلب] مساعدة في عمل اكسبرت
رد: [طلب] مساعدة في عمل اكسبرت
extern double Equity=1000000;
int P=1;
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init()
{
//----
if(Digits%2==1)P=10;
//----
return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
//----
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start()
{
//----
if(AccountEquity()>=Equity)
{CloseAll();
}
//----
return(0);
}
//+------------------------------------------------------------------+
void CloseAll()
{
int ordtotal;
int cnt;
int ordtype;
int result;
ordtotal = OrdersTotal();
for (cnt = ordtotal - 1; cnt >= 0; cnt--)
{
if(OrderSelect(cnt,SELECT_BY_POS))
{
if (OrderType() <= OP_SELL) result = OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),5*P,Violet);
if (OrderType() > OP_SELL) result = OrderDelete(OrderTicket());
}
}
return;
} 
رد: [طلب] مساعدة في عمل اكسبرت
رد: [طلب] مساعدة في عمل اكسبرت
extern double Equity=1000000;
int P=1;
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init()
{
//----
if(Digits%2==1)P=10;
//----
return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
//----
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start()
{
//----
if(AccountEquity()>=Equity)
{CloseAll();
}
//----
return(0);
}
//+------------------------------------------------------------------+
void CloseAll()
{
int ordtotal;
int cnt;
int ordtype;
int result;
ordtotal = OrdersTotal();
for (cnt = ordtotal - 1; cnt >= 0; cnt--)
{
if(OrderSelect(cnt,SELECT_BY_POS))
{
if (OrderType() <= OP_SELL) result = OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),5*P,Violet);
if (OrderType() > OP_SELL) result = OrderDelete(OrderTicket());
}
}
return;
}
المواضيع المتشابهه | ||||
| الموضوع | كاتب الموضوع | المنتدى | مشاركات | آخر مشاركة |
| مساعدة في اكسبرت | emankr | منتدى المؤشرات و الاكسبرتات | 1 | 08 - 05 - 2013 02:01 PM |
