fz twosystem 2.0.mq4

#property version   "1.00"
#property description "Заходите на сайт ForexZona.ru" 

input double    Risk             =10;          //
input double    Dist             =20;      
input double    TP               =5;      //
input double    Exponenta        =5;
extern int      TimeStart        =9;         //Время начала работы
extern int      TimeEnd          =20;         //Время завершения работы
input color     BuyLine          =Blue;        //
input color     SellLine         =Red;         //
input int       Magic            =2017;        //

string comment ="ForexZona.ru";
int r, D;
double PricSellLine, PricBuyLine;
double NewLot;

int OnInit()
{
      // код доступен только после оплаты
   }

void OnDeinit(const int reason)
{
ObjectsDeleteAll(0,OBJ_HLINE);
}

void OnTick(){
      // код доступен только после оплаты
   }

void CloseBuy()
{double priceB;
for(int i=OrdersTotal()-1;i>=0;i--)
{if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{if(Symbol()==OrderSymbol() && OrderType()==OP_BUY && Magic==OrderMagicNumber())
{priceB=NormalizeDouble(MarketInfo(OrderSymbol(),MODE_BID), Digits);
bool clos=OrderClose(OrderTicket(),OrderLots(),priceB,100,0);}}}
return;}

void CloseSell()
{double priceS;
for(int i=OrdersTotal()-1;i>=0;i--)
{if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{if(Symbol()==OrderSymbol() && OrderType()==OP_SELL && Magic==OrderMagicNumber())
{priceS=NormalizeDouble(MarketInfo(OrderSymbol(),MODE_ASK), Digits);
bool clos=OrderClose(OrderTicket(),OrderLots(),priceS,100,0);}}}
return;}

bool HLineCreate(string name,double price,color clr)
{//--- если цена не задана, то установим ее на уровне текущей цены Bid 
if(!price) 
   price=SymbolInfoDouble(Symbol(),SYMBOL_BID); 

   ResetLastError(); 

if(!ObjectCreate(0,name,OBJ_HLINE,0,0,price)) 
  {Print(__FUNCTION__,": не удалось создать горизонтальную линию! Код ошибки = ",GetLastError()); 
return(false);} 

   ObjectSet

Показано первые 50% кода (символов: 6917)