trade_protector

trade_protector

官方版 无广告 70

更新日期:2022-10-26 分类标签: 语言:中文 平台:没限制

3 人已下载 手机查看

trade_protector

// trade assistant - to watch after SL's for your trades
// some ideas and code fragments: "S.Projects" - "cortex.snowcron.com"

extern int logging=1;
//logging=1 - if you want logs in Experts\Files directory
extern int nInitialSL=15;
// inital SL
extern int nTrailingStop=35;
//nTrailingStop [pips] - initial trailing stop. It will be used until your trade will reach profit = nPropSLThreshold
extern int nPropSLThreshold=12;
//nPropSLThreshold [pips] - after reaching this profit proportional trailing stop will be used
extern double dPropSLRatio=0.35;
//dPropSLRatio [decimal] - multiplying factor ( PropSL = Profit * dPropSLRatio - Spred )
extern int nUseEscape=0;
//nUseEscape [ 1 or 0 ] - escape misplaced trades as soon as they reach some minimal profit
extern int nEscapeLevel=0;
//nEscapeLevel [pips] - lose size after which we want our trade to terminate
//as soon as it will reach next high
extern int nEscapeTP=35;
//nEscapeTP [pips] - take profit level in pips (you can set to negative value
//- then it will be a lose that you would be happy to get,
//in the case your trade reached some impressive negative pips value)
extern int nSleep=0;
//delay after new bar
extern int nSlip = 2;
//maximum price slip allowed

double dEscapeLevel;
double dInitialSL;
double dTrailingStop;
double dEscapeTP;
double dPropSLThreshold;
double dTakeProfit;
double dTakeProfitMin;
double dTakeProfitMax;
double dTakeProfitT;
int nBars, nSpread, nDigits, nBarsSameTrend, nCloseErr, nOpenErr, i;

double dDeltaPrice, dnBid, dnAsk, dSpread, dStopLevel, dMax, dMin, dMacdDelta, dMacd1, dMacd2;

// double dOldBalance, dNewBalance;

int nTakeProfitMax=100;

int nBarsSinceTrade=0;

string strExpert;

// ------

int init ()
{
nBars = Bars;
nSpread = MarketInfo(Symbol(), MODE_SPREAD);
dSpread = NormalizeDouble(nSpread * Point,4);
nDigits = MarketInfo(Symbol(), MODE_DIGITS);
dEscapeTP = NormalizeDouble(nEscapeTP * Point,4);

dEscapeLevel = nEscapeLevel * Point;

strExpert = "tp-1.2.0-"+Symbol()+"-"+Period();

return(0);
}

// ------
int deinit()
{
return(0);
}

// ------

int start()
{

// ------
// to let MT rest a bit after new bar:
Sleep(nSleep*1000);
if(nSleep > 0)
RefreshRates();

dnBid=NormalizeDouble(Bid,nDigits);
dnAsk=NormalizeDouble(Ask,nDigits);

ModifyOrders();

// ------

return(0);
}

// ------

void ModifyOrders()
{
double dSl;
double arrSL[4];
double arrTP[4];

dTrailingStop = NormalizeDouble(nTrailingStop * Point,4);
dEscapeTP = NormalizeDouble(nEscapeTP * Point,4);
dPropSLThreshold = nPropSLThreshold * Point;
dSpread = MarketInfo(Symbol(),MODE_SPREAD) * Point;
dStopLevel = MarketInfo(Symbol(),MODE_STOPLEVEL) * Point;
dInitialSL = NormalizeDouble(nInitialSL * Point,4);

for(int nCnt = 0; nCnt < OrdersTotal(); nCnt++)
{
OrderSelect(nCnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol() == Symbol() ) //(OrderMagicNumber() == nMagic)
{
if(OrderType() == OP_BUY)
{
dSl=OrderStopLoss();
if( dSl == 0 )
if( dInitialSL != 0)
dSl = dnAsk - dInitialSL;

ArrayResize(arrSL,5);
ArrayInitialize(arrSL,dSl);

LogSL("OP_BUY-check",dSl,arrSL[0],arrSL[1],arrSL[2],arrSL[3]);

if( dPropSLRatio > 0 )
{
if( Bid >= (OrderOpenPrice() + dPropSLThreshold) )
{
dSl = NormalizeDouble( OrderOpenPrice() + dPropSLRatio*(Bid - OrderOpenPrice()) - dSpread,4 );
if(OrderStopLoss() < dSl)
arrSL[1]=dSl;
}
else
{
if(dTrailingStop != 0)
arrSL[2]=dnBid - dTrailingStop;
}
}

dSl=arrSL[ArrayMaximum(arrSL)];

LogSL("OP_BUY - max",dSl,arrSL[0],arrSL[1],arrSL[2],arrSL[3]);

if( dSl > OrderStopLoss() || OrderStopLoss() == 0 )
{
OrderModify(OrderTicket(), OrderOpenPrice(),
dSl, OrderTakeProfit(), 0, Yellow);
Log("Buy - modify", OrderOpenPrice(), dSl, OrderTakeProfit());
}

// Escape buy
//if( dEscape != 0 && dnBid < OrderOpenPrice() - dEscape - 5 * Point )
if( nUseEscape == 1 && dnBid < OrderOpenPrice() - dEscapeLevel - 5 * Point )
{
OrderModify(OrderTicket(), OrderOpenPrice(),
OrderStopLoss(), OrderOpenPrice() + dEscapeTP, 0, Aqua);
Log("Buy - EscapeLevel", OrderOpenPrice(), dSl, OrderTakeProfit());
}

} // end OP_BUY

//////////////////////////////////////////////////////////////////////////////////////////////////

if(OrderType() == OP_SELL)
{
dSl=OrderStopLoss();
if( dSl == 0 )
if( dInitialSL != 0)
dSl = dnBid + dInitialSL;

ArrayResize(arrSL,5);
ArrayInitialize(arrSL,dSl);

LogSL("OP_SELL-check",dSl,arrSL[0],arrSL[1],arrSL[2],arrSL[3]);

if( dPropSLRatio > 0 )
{
if( Ask <= (OrderOpenPrice() - dPropSLThreshold) )
{
dSl = NormalizeDouble(OrderOpenPrice() - dPropSLRatio*(OrderOpenPrice() - Ask) + dSpread,4);
if(OrderStopLoss() > dSl)
arrSL[1]=dSl;
}
else
{
if(dTrailingStop != 0)
arrSL[2]=dnBid + dTrailingStop;
}
}

dSl=arrSL[ArrayMinimum(arrSL)];

LogSL("OP_SELL - min",dSl,arrSL[0],arrSL[1],arrSL[2],arrSL[3]);

if( dSl < OrderStopLoss() || OrderStopLoss() == 0 )
{
OrderModify(OrderTicket(), OrderOpenPrice(),
dSl, OrderTakeProfit(), 0, Yellow);
Log("Sell - modify", OrderOpenPrice(), dSl, OrderTakeProfit());
}

// Escape sell
//if( dEscape != 0 && dnAsk > OrderOpenPrice() + dEscape + 5 * Point )
if( nUseEscape == 1 && dnAsk > OrderOpenPrice() + dEscapeLevel + 5 * Point )
{
OrderModify(OrderTicket(), OrderOpenPrice(),
OrderStopLoss(), OrderOpenPrice() - dEscapeTP, 0, Aqua);

Log("Buy - EscapeLevel", OrderOpenPrice(), dSl, OrderTakeProfit());
}

} // End OP_SELL
} //end if(OrderMagicNumber() == nMagic)

} //end for(int nCnt = 0; nCnt < OrdersTotal(); nCnt++)
} // end ModifyOrders()

//////////////////////////////////////////////////////////////////////////////////////////////////

void Log(string msg, double val1, double val2, double val3)
{
if(logging > 0 )
{
int handle;
handle=FileOpen(strExpert+".log",FILE_CSV|FILE_READ|FILE_WRITE,';');
if(handle<1)
{
//Print("File "+strExpert+"-log.txt not found, the last error is ", GetLastError());
Print("File "+strExpert+"-log.txt not found, the last error is ", GetLastError());
return(false);
}

FileSeek(handle, 0, SEEK_END);
//---- add data to the end of file
//FileWrite(handle, Year(), Month(), Day(), Hour(), Minute(), "Bid, Ask ", msg, Bid, Ask, "___", val1, val2, val3, val4, val5, val6);
FileWrite(handle, Year(), Month(), Day(), Hour(), Minute(), msg, Bid, Ask, "___", val1, "___", val2, val3);
FileClose(handle);
}
}

void LogSL(string msg, double val1, double val2, double val3, double val4, double val5)
{
if(logging > 1 )
{
int handle;
handle=FileOpen(strExpert+"-sl_log.txt",FILE_CSV|FILE_READ|FILE_WRITE,';');
if(handle<1)
{
Print("File "+strExpert+"-sl_log.txt not found, the last error is ", GetLastError());
return(false);
}
FileSeek(handle, 0, SEEK_END);
//---- add data to the end of file
FileWrite(handle, Year(), Month(), Day(), Hour(), Minute(), msg, Bid, Ask, val1, val2, val3, val4, val5);
FileClose(handle);
}
}

 

 

相关资源

暂无评论

暂无评论...