Link

ÿþ//+------------------------------------------------------------------+

//|                                                         Link.mq4 |

//|                                               Yuriy Tokman (YTG) |

//|                                               https://ytg.com.ua |

//+------------------------------------------------------------------+

#property copyright "Yuriy Tokman (YTG)"

#property link      "https://ytg.com.ua"

#property version   "1.00"

#property strict

#property indicator_chart_window



#import "shell32.dll"                   

int ShellExecuteW(int hwnd, string Operation,string File,string Parameters,string Directory,int ShowCmd);

#import



input string site = "http://ytg.com.ua/";



//+------------------------------------------------------------------+

//| Custom indicator initialization function                         |

//+------------------------------------------------------------------+

int OnInit()

  {

//--- indicator buffers mapping

   Button("Link",clrDimGray,"Visit Website",524,3);

//---

   return(INIT_SUCCEEDED);

  }

//---

void OnDeinit(const int reason)

  {

//---

   ObjectDelete(0,"Link");

  }

//+------------------------------------------------------------------+

//| Custom indicator iteration function                              |

//+------------------------------------------------------------------+

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[])

  {

//---

//--- return value of prev_calculated for next call

   return(rates_total);

  }

//----

void OnChartEvent(const int id, const long &lparam, const double &dparam, const string &sparam)

 {

  if(id==CHARTEVENT_OBJECT_CLICK){

   string clickedChartObject=sparam;

    if(clickedChartObject=="Link"){

     Button("Link",clrSlateGray,"Visit Website",524,3);

     ShellExecuteW(0,"Open", site, "", "", 1);       

   }      

  ChartRedraw();}}

//+------------------------------------------------------------------+

bool Button(string name="",color clr=clrWhite,string _txt = "", int x=0, int y=0, int xs=100,int ys=35, int sz = 10){



 if(ObjectFind(name)>=0)ObjectDelete(name);

 

   ResetLastError(); 

   if(!ObjectCreate(0,name,OBJ_BUTTON,0,0,0)) 

     { 

      Print(name,__FUNCTION__, ": Error = ",GetLastError()); 

      return(false); 

     }   

   ObjectSetInteger(0,name,OBJPROP_COLOR,clr);

   ObjectSetInteger(0,name,OBJPROP_BGCOLOR,clrLime);

   ObjectSetInteger(0,name,OBJPROP_XDISTANCE,x);

   ObjectSetInteger(0,name,OBJPROP_YDISTANCE,y);

   ObjectSetInteger(0,name,OBJPROP_XSIZE,xs);

   ObjectSetInteger(0,name,OBJPROP_YSIZE,ys);

   ObjectSetString(0,name,OBJPROP_FONT,"Arial Black");

   ObjectSetString(0,name,OBJPROP_TEXT,_txt);

   ObjectSetInteger(0,name,OBJPROP_FONTSIZE,sz);

   ObjectSetInteger(0,name,OBJPROP_SELECTABLE,0);

   

   return(true);

}