89 lines
3.4 KiB
Plaintext
89 lines
3.4 KiB
Plaintext
//+------------------------------------------------------------------+
|
|
//| StopOutPrice.mq5 |
|
|
//| Copyright 2011, MetaQuotes Software Corp. |
|
|
//| http://www.mql5.com |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "Copyright 2011, MetaQuotes Software Corp."
|
|
#property link "http://www.mql5.com"
|
|
#property version "1.03"
|
|
#property script_show_inputs
|
|
#property description "Calculate StopOut and LockOut price."
|
|
#property description " EnterVolume :"
|
|
#property description " =0.0 : Calculete for existing position volume"
|
|
#property description " >0.0 : Calculete for entered BUY volume"
|
|
#property description " <0.0 : Calculate for entered SELL volume"
|
|
|
|
input double EnterVolume=0.0;
|
|
|
|
double YourVolume;
|
|
//+------------------------------------------------------------------+
|
|
//| Delta |
|
|
//+------------------------------------------------------------------+
|
|
double Delta(double Level)
|
|
{
|
|
return(_Point*
|
|
( AccountInfoDouble(ACCOUNT_EQUITY) // Money available
|
|
-Level/100.0 // Calculated Level %
|
|
*MathAbs(YourVolume) // Volume to calculate
|
|
*SymbolInfoDouble(_Symbol,SYMBOL_TRADE_CONTRACT_SIZE) // Lot size
|
|
/AccountInfoInteger(ACCOUNT_LEVERAGE) // Leverage
|
|
)/
|
|
(SymbolInfoDouble(_Symbol,SYMBOL_TRADE_TICK_VALUE) // Price per tick
|
|
*MathAbs(YourVolume) // Volume to calculate
|
|
));
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| Script program start function |
|
|
//+------------------------------------------------------------------+
|
|
void OnStart()
|
|
{
|
|
if(EnterVolume!=0.0) YourVolume=EnterVolume;
|
|
else
|
|
{
|
|
if(PositionSelect(_Symbol))
|
|
{
|
|
if(PositionGetInteger(POSITION_TYPE)==POSITION_TYPE_BUY)
|
|
{
|
|
YourVolume=+PositionGetDouble(POSITION_VOLUME);
|
|
}
|
|
else
|
|
{
|
|
YourVolume=-PositionGetDouble(POSITION_VOLUME);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
YourVolume=0.0;
|
|
}
|
|
}
|
|
if(YourVolume!=0.0)
|
|
{
|
|
double dStop=Delta(AccountInfoDouble(ACCOUNT_MARGIN_SO_SO));
|
|
double dLock=Delta(100.0);
|
|
if(YourVolume>0.0)
|
|
{
|
|
if(SymbolInfoDouble(_Symbol,SYMBOL_BID)<dStop)
|
|
{
|
|
Alert("INFO : No Stop Out :-)");
|
|
}
|
|
else
|
|
{
|
|
Alert("INFO : VOLUME=",DoubleToString(YourVolume,2),
|
|
" StopOutPrice=",DoubleToString(SymbolInfoDouble(_Symbol,SYMBOL_BID)-dStop,_Digits),
|
|
" LockOutPrice=",DoubleToString(SymbolInfoDouble(_Symbol,SYMBOL_BID)-dLock,_Digits));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Alert("INFO : VOLUME=",DoubleToString(YourVolume,2),
|
|
" StopOutPrice=",DoubleToString(SymbolInfoDouble(_Symbol,SYMBOL_ASK)+dStop,_Digits),
|
|
" LockOutPrice=",DoubleToString(SymbolInfoDouble(_Symbol,SYMBOL_ASK)+dLock,_Digits));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Alert("NO POSITION and VOLUME for this SYMBOL !");
|
|
}
|
|
}
|
|
//+------------------------------------------------------------------+
|