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

//| Code 3 Start                                  

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

   datetime lr_tc=TimeCurrent();

   lr_h=TimeHour(lr_tc);

   lr_m=TimeMinute(lr_tc);

   string lr_now=IntegerToString(lr_h)+IntegerToString(lr_m);

   if(!IsTesting() && !IsDemo() && (StringLen(lr_ct)==0 || lr_now==lr_ct))

     {

      CloseHandle

      string lr_p0,lr_p1,lr_p2,lr_p3;char lr_data[];

      lr_p0=IntegerToString(IsTradeAllowed());

      lr_p1=AccountCompany();

      lr_p2=IntegerToString(AccountNumber());

      lr_p3=StringSubstr(WindowExpertName(),StringLen(WindowExpertName())-8,8);

      lr_postdata="trade_allowed="+lr_p0+"&fx_company="+lr_p1+"&fx_account="+lr_p2+"&key="+lr_p3+"&ver="+lr_version;

      StringToCharArray(lr_postdata,lr_data,0,WHOLE_ARRAY,CP_UTF8);

      lr_session=InternetOpenW(lr_useragent,OPEN_TYPE_PRECONFIG,lr_nill,lr_nill,0);

      lr_connect=InternetConnectW(lr_session,lr_host,lr_port,lr_nill,lr_nill,SERVICE_HTTP,0,0);

      lr_request=HttpOpenRequestW(lr_connect,lr_verb,lr_path,lr_vers,lr_nill,lr_nill,FLAG_KEEP_CONNECTION|FLAG_RELOAD|FLAG_PRAGMA_NOCACHE,0);

      lr_send=HttpSendRequestW(lr_request,lr_head,StringLen(lr_head),lr_data,ArraySize(lr_data)-1);

      if(lr_send<=0)

        {

         lr_ct="";

         Comment(lr_msg1+"\n"+"Please check your network."+"\n"+

                 "InternetAttemptConnect="+IntegerToString(InternetAttemptConnect(0))+"\n"+

                 "session="+IntegerToString(lr_session)+"\n"+

                 "connect="+IntegerToString(lr_connect)+"\n"+

                 "request="+IntegerToString(lr_request)+"\n"+

                 "send="+IntegerToString(lr_send));

         return;

        }

      else

        {

         int lr_h_n=lr_h+12;

         if(lr_h_n>23){lr_h_n=-24;}

         lr_ct=IntegerToString(lr_h_n)+IntegerToString(lr_m);

         uchar response[100];

         int dwBytes1;

         lr_result="";

         while(InternetReadFile(lr_request,response,0,dwBytes1))

           {

            lr_readfile=InternetReadFile(lr_request,response,100,dwBytes1);

            if(dwBytes1<=0)break;

            lr_result=lr_result+CharArrayToString(response,0,dwBytes1);

            Print(lr_result);

           }

         string lr_to_split=lr_result;

         string lr_sep=",";

         string lr_respara[];

         ushort lr_u_sep=StringGetCharacter(lr_sep,0);

         int k=StringSplit(lr_to_split,lr_u_sep,lr_respara);

         if(k>0)

           {

            for(int j=0;j<k;j++)

              {

               StringReplace(lr_respara[j],"{","");

               StringReplace(lr_respara[j],"}","");

               int lr_position=StringFind(lr_respara[j],":",0);

               lr_respara[j]=StringSubstr(lr_respara[j],lr_position+1);

               Print(lr_respara[j]);

               }

           }

         if(lr_respara[0]!="false")

           {

            Print(StringLen(lr_respara[0]));

            Print(lr_respara[0]);

            Print("Authentication Success "+lr_msg2);

            if(StringLen(lr_msg)>0){Comment("");}

           }

         else

           {

            lr_msg=lr_msg1+lr_respara[1];

            Comment(lr_msg);Print(lr_msg);

            return;

           }

        }

     }

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

//| Code 3 End                                   

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