void PA1Order3Modify(){
  bool bres=false,sres=false;
  double PA1BuyOpen=GlobalVariableGet(Symbol()+"-PABuyOpen"); //not used
  double PA1BuyOpenTP=GlobalVariableGet(Symbol()+"-PABuyOpenTP")+NormalizeDouble(((DynSteps/100)*4),0);
  double PA1BuyOpenSL=GlobalVariableGet(Symbol()+"-PABuyOpenSL")-NormalizeDouble(((DynSteps/100)*4),0);
     for(int i = OrdersTotal()-1; i >= 0; i--){
      if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
       if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic1){
        if(OrderType()==OP_BUY && StringFind(OrderComment(),"-1/10")==4){
         if(OrderProfit()==PA1BuyOpenTP && OrderStopLoss()==PA1BuyOpenSL) break; {
          bres=OrderModify(OrderTicket(),OrderOpenPrice(),PA1BuyOpenSL,PA1BuyOpenTP,OrderExpiration(),CLR_NONE); } }
        if(OrderType()==OP_SELL && StringFind(OrderComment(),"-2/10")==4){
         if(OrderProfit()==PA1BuyOpenSL && OrderStopLoss()==PA1BuyOpenTP) break; {
          sres=OrderModify(OrderTicket(),OrderOpenPrice(),PA1BuyOpenTP,PA1BuyOpenSL,OrderExpiration(),CLR_NONE); } }
          }
      }
      return;
    }

//+----------------------------------------   Mein Linien Grid Indikator   -------------------------------+
//+-------------------------------------------------------------------------------------------------------+
#property strict
#property indicator_chart_window
#property indicator_minimum 0
#property indicator_maximum 100
#property indicator_buffers 4
//+---------------------------------------------------------------------------------   Chart Ausgabe   ---+
//+-------------------------------------------------------------------------------------------------------+
#property indicator_type1 DRAW_LINE
#property indicator_style1 STYLE_SOLID
#property indicator_width1 2
#property indicator_color1 clrOrange
#property indicator_label1 "Obere Linie"
//---
#property indicator_type2 DRAW_LINE
#property indicator_style2 STYLE_DASHDOT
#property indicator_width2 1
#property indicator_color2 clrCrimson
#property indicator_label2 "Oben - Abstand"
//---
#property indicator_type3 DRAW_LINE
#property indicator_style3 STYLE_DASHDOT
#property indicator_width3 1
#property indicator_color3 clrDodgerBlue
#property indicator_label3 "Unten + Abstand"
//---
#property indicator_type4 DRAW_LINE
#property indicator_style4 STYLE_SOLID
#property indicator_width4 2
#property indicator_color4 clrOrange
#property indicator_label4 "Untere Linie"
//+---------------------------------------------------------------------   Globale externe Variablen   ---+
//+-------------------------------------------------------------------------------------------------------+
input int      Perioden =    500;
input double   Prozent  =     30;
//+-----------------------------------------------------------------------------   Globale Variablen   ---+
//+-------------------------------------------------------------------------------------------------------+
double bufferGanzOben[];
double bufferGanzUnten[];
double bufferObenMinAbstand[];
double bufferUntenPlAbstand[];
//+-------------------------------------------------------------------------------   OnInit Funktion   ---+
//+-------------------------------------------------------------------------------------------------------+
int OnInit() {
//--- drawing settings
   SetIndexBuffer(0, bufferGanzOben);
   SetIndexBuffer(1, bufferObenMinAbstand);
   SetIndexBuffer(2, bufferUntenPlAbstand);
   SetIndexBuffer(3, bufferGanzUnten);
//---
   return(INIT_SUCCEEDED);
}
//+--------------------------------------------------------------------------   OnCalculate Funktion   ---+
//+-------------------------------------------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[]) {
//--- last counted bar will be recounted
   int _CandlesOnChart = rates_total - prev_calculated;
   if(prev_calculated > 0) {
      _CandlesOnChart++;
   }
   for(int i = 0; i < _CandlesOnChart; i++) {
//---
      _CandlesOnChart = WindowFirstVisibleBar();
//---
      int _HighestCandle = iHighest(Symbol(), PERIOD_CURRENT, MODE_HIGH, _CandlesOnChart, 0);
      bufferGanzOben[i] = High[_HighestCandle];
      int _LowestCandle = iLowest(Symbol(), PERIOD_CURRENT, MODE_LOW, _CandlesOnChart, 0);
      bufferGanzUnten[i] = Low[_LowestCandle];
//---
      double _Range = (_HighestCandle - _LowestCandle);
      double _EinProz = (_Range / 100);
      double _Prozent = (_EinProz * Prozent);
//---
      int _HighCandle = iHighest(Symbol(), PERIOD_CURRENT, MODE_HIGH, _CandlesOnChart, 0);
      bufferObenMinAbstand[i] = High[_HighCandle] + _Prozent;
      int _LowCandle = iLowest(Symbol(), PERIOD_CURRENT, MODE_LOW, _CandlesOnChart, 0);
      bufferUntenPlAbstand[i] = Low[_LowCandle] - _Prozent;
//---
      string _String = "Highest Value: " + DoubleToString(bufferGanzOben[i], Digits()) + " Lowest Valve:" + DoubleToString(bufferGanzUnten[i], Digits());
      if(ObjectCreate(0, "Display", OBJ_LABEL, 0, 0, 0)) {
         Print("Object NOT Created");
      }
      ObjectSetInteger(0, "Display", OBJPROP_FONTSIZE, 10);
      ObjectSetInteger(0, "Display", OBJPROP_WIDTH, 5);
      ObjectSetInteger(0, "Display", OBJPROP_COLOR, clrOrange);
      ObjectSetInteger(0, "Display", OBJPROP_XDISTANCE, 10);
      ObjectSetInteger(0, "Display", OBJPROP_YDISTANCE, 10);
      ObjectSetString(0, "Display", OBJPROP_TEXT, _String);
   }
   return(rates_total);
}

//+------------------------------------------------------------------+
//|                                      RemoteProtectedEABase64.mq5 |
//|                                      Copyright 2012, Investeo.pl |
//|                                           http://www.investeo.pl |
//+------------------------------------------------------------------+
#property copyright "Copyright 2012, Investeo.pl"
#property link      "http://www.investeo.pl"
#property version   "1.00"

#include <MQL5-RPC.mqh>
#include <Arrays\ArrayObj.mqh>
#include <Arrays\ArrayInt.mqh>
#include <Arrays\ArrayString.mqh>
#include <Arrays\ArrayBool.mqh>
#include <Base64.mqh>

bool license_status=false;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
/* License proxy server */
   CXMLRPCServerProxy s("89.238.73.71:9099");

   if(s.isConnected()==true)
     {
      CXMLRPCResult *result;

/* Get account data */
      string User = "Test User";
      string account="Test@huhu.de";
      string EA="Test Abo";

      printf("The name of User = %s",User);
      printf("Account mail =  %d",account);

/* Get remote license status */
      CArrayObj* params= new CArrayObj;
      CArrayString* ea = new CArrayString;
      CArrayString* us = new CArrayString;
      CArrayString *ac=new CArrayString;

      ea.Add(EA);
      us.Add(User);
      ac.Add(account);

      params.Add(ea); params.Add(us); params.Add(ac);

      CXMLRPCQuery query("isValid",params);

      result=s.execute(query);

      CArrayObj *resultArray=result.getResults();
      
      if(resultArray!=NULL && resultArray.At(0).Type()==TYPE_STRING)
        {
         CArrayString *stats=resultArray.At(0);

         string license_encoded=stats.At(0);

         printf("encoded license: %s",license_encoded);

         string license_decoded;

         Base64Decode(license_encoded,license_decoded);

         printf("decoded license: %s",license_decoded);

         CXMLRPCResult license(license_decoded);
         resultArray=license.getResults();

         CArrayBool *bstats=resultArray.At(0);

         license_status=bstats.At(0);
        }
      else license_status=false;

      if(license_status==true) printf("License valid.");
      else printf("License invalid.");

      delete params;
      delete result;
     }
   else Print("License server not connected.");

//---
   return(0);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---

  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
//---
   if(license_status==true)
     {
      // license valid
     }
  }
//+------------------------------------------------------------------+

  double BuyOpenPrice() {
   _BuyOrderEntry=0; //global deklariert
   
   for(int i=PositionsTotal()-1;i>=0;i--) {
     ulong ticket=PositionGetTicket(i); 
      if(ticket>0) {
       if(PositionGetInteger(POSITION_MAGIC)==Magic && PositionGetSymbol(i)==Symbol() && PositionGetInteger(POSITION_TYPE)==POSITION_TYPE_BUY)
        { _BuyOrderEntry=PositionGetDouble(POSITION_PRICE_OPEN); }
       }
     }Print(_BuyOrderEntry);
    return(_BuyOrderEntry);
   }

//+------------------------------------------------------------------+
//|                                                trendlinesDay.mq4 |
//|                      Copyright © 2008, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "nsi2000"
#property link      "http://www.expert-mt4.nm.ru"
//----
#property indicator_chart_window
//---- input parameters
extern int nPeriod=10;
extern int Limit=350;
///---- int Widners Oscilator
int cnt,nCurBar=0;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- Output in Char
   for(cnt=0; cnt<=5; cnt++)
     {
      ObjectCreate("WSO-"+cnt,OBJ_HLINE,0,0,0);
      ObjectSet("WSO-"+cnt,OBJPROP_COLOR,Red);
      if(cnt<5)
        {
         ObjectCreate("Trend DN-"+cnt,OBJ_TREND,0,0,0,0,0);
         ObjectSet("Trend DN-"+cnt,OBJPROP_COLOR,Magenta);
        }
      //----
      ObjectCreate("WRO-"+cnt,OBJ_HLINE,0,0,0);
      ObjectSet("WRO-"+cnt,OBJPROP_COLOR,Blue);
      if(cnt<5)
        {
         ObjectCreate("Trend UP-"+cnt,OBJ_TREND,0,0,0,0,0);
         ObjectSet("Trend Up-"+cnt,OBJPROP_COLOR,Aqua);
        }
     }
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//---- TODO: add your code here
   for(cnt=0; cnt<=5; cnt++)
     {
      ObjectDelete("Trend UP-"+cnt);
      ObjectDelete("Trend DN-"+cnt);
      ObjectDelete("WSO-"+cnt);
      ObjectDelete("WRO-"+cnt);
     }
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
//---- TODO: add your code here
   double r1,r2,r3,r4,r5,r6;
   int rt1,rt2,rt3,rt4,rt5,rt6;
   double s1,s2,s3,s4,s5,s6;
   int st1,st2,st3,st4,st5,st6;
//---- Ëèíèè ñîïðîòèâëåíèÿ è ïîääåðæêè
   if(Bars<Limit) Limit=Bars-nPeriod;
   for(nCurBar=Limit; nCurBar>0; nCurBar--)
     {
      if(Low[nCurBar+(nPeriod-1)/2]==Low[Lowest(NULL,0,MODE_LOW,nPeriod,nCurBar)])
        {
         s6=s5; s5=s4; s4=s3; s3=s2; s2=s1; s1=Low[nCurBar+(nPeriod-1)/2];
         st6=st5; st5=st4; st4=st3; st3=st2; st2=st1; st1=nCurBar+(nPeriod-1)/2;
        }
      if(High[nCurBar+(nPeriod-1)/2]==High[Highest(NULL,0,MODE_HIGH,nPeriod,nCurBar)])
        {
         r6=r5; r5=r4; r4=r3; r3=r2; r2=r1; r1=High[nCurBar+(nPeriod-1)/2];
         rt6=rt5; rt5=rt4; rt4=rt3; rt3=rt2; rt2=rt1; rt1=nCurBar+(nPeriod-1)/2;
        }
     }
//---- Move Object in Chart

   ObjectMove("Trend DN-0",1,Time[st1],s1);
   ObjectMove("Trend DN-0",0,Time[st2],s2);
//----
   ObjectMove("Trend UP-0",1,Time[rt1],r1);
   ObjectMove("Trend UP-0",0,Time[rt2],r2);
//----
   return(0);
  }
//+------------------------------------------------------------------+

bool              newClose       = false; 
static datetime   lastCloseTime  = 0;     
      
      for(int i=0; i<=OrdersHistoryTotal()-1; i++)
         if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)) 
            if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber) 
               if(OrderCloseTime()>lastCloseTime) 
               {
                  newClose = true; 
                  lastCloseTime = OrderCloseTime();
               };