//
// SellAndSellLimit.mq5
// getYourNet.ch
//

//#property copyright "Copyright 2019, getYourNet.ch"
//#property version   "1.00"
//#property description "Open a Sell market order by dragging the script below the current price or create a SellLimit order by dragging the scipt above the current price"
//#property script_show_inputs

#include <Trade\Trade.mqh>

int NumberOfOrders=1; // Number of Orders to open
double EntryPrice=0; // Entry Price for Sell Limit (overrules drag and drop price)
double RiskPercent=0; // Risk Percent Money Management
double Lots=0.02; // ----- OR Lot Size
int LotSizeDigits=2; // Lot Size Fractional Digits
double StopLoss=120; // Stop Loss Points
double StopLossPrice=0; // ----- OR Stop Loss Price
double TakeProfit=160; // Take Profit Points
double TakeProfitPrice=0; // ----- OR Take Profit Price
string OrderComment="Sell Script"; // Add this Comment to Orders


void OnStart()
{
   CTrade trade;

   MqlTick last;
   SymbolInfoTick(Symbol(),last);

   double selectedprice=ChartPriceOnDropped();
   if(EntryPrice>0&&EntryPrice>last.bid)
      selectedprice=EntryPrice;
   
   double entryprice=selectedprice;
   if(entryprice==0||last.bid>selectedprice)
      entryprice=last.bid;
      
   double slprice=StopLossPrice;
   if(StopLoss>0)
      slprice=entryprice+(StopLoss*Point());

   double tpprice=TakeProfitPrice;
   if(TakeProfit>0)
      tpprice=entryprice-(TakeProfit*Point());

   double volume=Lots;
   if(RiskPercent>0&&slprice>0)
      volume=AccountInfoDouble(ACCOUNT_BALANCE)*(RiskPercent/100)/((slprice-entryprice)/Point())/(SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE));
   volume=NormalizeDouble(volume,LotSizeDigits);

   if(volume>0)
   {
      for(int i=0;i<NumberOfOrders;i++)
      {
         if(last.bid<selectedprice&&selectedprice>0)
            trade.SellLimit(volume,selectedprice,NULL,slprice,tpprice,0,0,OrderComment);
         else
            trade.Sell(volume,NULL,0,slprice,tpprice,OrderComment);
      }
   }
}