int PauseEA;

int OnInit()
  {
   CreatePauseButton();
   return(INIT_SUCCEEDED);
  }

void OnDeinit(const int reason)
  {
   ObjectDelete("PauseButton");
  }
int start()
{
Comment(PauseEA);
}
void CreatePauseButton()
   {
   ObjectCreate(0,"PauseButton",OBJ_BUTTON,0,0,0);
   ObjectSetInteger(0,"PauseButton",OBJPROP_XDISTANCE,530);
   ObjectSetInteger(0,"PauseButton",OBJPROP_YDISTANCE,55);
   ObjectSetInteger(0,"PauseButton",OBJPROP_XSIZE,100);
   ObjectSetInteger(0,"PauseButton",OBJPROP_YSIZE,50);
   
   ObjectSetString(0,"PauseButton",OBJPROP_TEXT,"Pause EA");
   }


void OnChartEvent(const int id, const long& lparam, const double& dparam, const string& sparam)
  {
   if(id==CHARTEVENT_OBJECT_CLICK)
     {
      Print ("Now inside OnChartEvent");
      if(sparam=="PauseButton")
        {
         PauseEA=1;;      
        }
     }
  }

//---
   //Special Loop to avoid Array Out of Range
   int counted_bars = IndicatorCounted();
   if(counted_bars<0) return(-1);
   if(counted_bars>0) counted_bars--;
   int limit = Bars-counted_bars-5;
   
//+------------------------------------------------------------------+
for(int i=0;i<limit;i++){
   if(Close[i+1]>High[i+2]){
      lowCheck=Low[i+2];
      bool loopCheck=True;
      while(loopCheck){
         if(lowCheck>Low[i+1]){
            lowCheck +=1;
         }else{
            loopCheck=False;
            upStop_1[i+1]=lowCheck;
         }
      }
     upStop_1[i+1]=lowCheck;
   }
   
   if(Close[i+1]<Low[i+2]){
      highCheck=High[i+2];
      bool loopCheck=True;
      while(loopCheck){
         if(highCheck<High[i+1]){
            highCheck +=1;
         }else{
            loopCheck=False;
            upStop_1[i+1]=highCheck;
         }
      }
     upStop_1[i+1]=highCheck;
   }   
}

debug version of 'MACD_True_Alerts_meiner.ex5', please recompile it
cannot load custom indicator 'MACD_True_Alerts_meiner' [4002]
indicator create error
OnTick critical error

   // === delete all created objects
   // === ONLY if we failed to init or if we are deleted from chart
   if(   reason==REASON_PROGRAM 
      || reason==REASON_REMOVE
      || reason==REASON_CHARTCLOSE
      || reason==REASON_INITFAILED
      || reason==REASON_CLOSE       )
   {
      for(int i=ObjectsTotal()-1; i>=0; i--)
      {
         string obj_name=ObjectName(i);
         if(StringSubstr(obj_name,0,StringLen(PFX))==PFX) //ExactPFXmatch
         {
            ObjectDelete(0,obj_name);
         }
      }
   }
   // === in other cases keep action objects, only delete the panel
   // === this will be recreated in OnInit
   else if(   reason==REASON_CHARTCHANGE  //ForTimeframeChange
           || reason==REASON_RECOMPILE    //ForWorkingInEditor
           || reason==REASON_TEMPLATE     //ForChangeOfIndicatorCombination
           || reason==REASON_PARAMETERS   //ForChangeOfValues
           || reason==REASON_ACCOUNT    ) //ForLoosingServerConnection
   {
      DriveRemoveAll();
   }

void DriveRemoveAll() 
{
   for(int i=ObjectsTotal()-1; i>=0; i--)
   {
      string obj_name=ObjectName(i);
      if(StringSubstr(obj_name,0,StringLen(PFX))==PFX) //ExactPFXmatch
      {
         if(ObjectGetInteger(0,obj_name,OBJPROP_TYPE)==OBJ_BUTTON ) 
            ObjectDelete(0,obj_name);
         else if(ObjectGetInteger(0,obj_name,OBJPROP_TYPE)==OBJ_RECTANGLE_LABEL ) 
            ObjectDelete(0,obj_name);
         else if(ObjectGetInteger(0,obj_name,OBJPROP_TYPE)==OBJ_LABEL ) 
            ObjectDelete(0,obj_name);
      }
   }
}