// EA ENCRYPTING
 int CryptEncoded((CRYPT_BASE64,int &data[], string &key[], int &result[] )
{ 
   string text="The compaq church process sorrow into white joy ";
   string keystr="ABCDEFG";
   uchar src[],dst[],key[];

   StringToCharArray(keystr,key); //--- prepare key
   StringToCharArray(text,src); //--- copy text to source array src[]
   PrintFormat("Initial data: size=%d, string='%s'",ArraySize(src),CharArrayToString(src)); //--- print initial data
   int res=CryptEncode(CRYPT_DES,src,key,dst);

   if(res>0)  //--- check error
     {
     PrintFormat("Encoded data: size=%d %s",res,ArrayToHex(dst)); //print encrypted dada
      res=CryptDecode(CRYPT_DES,dst,key,src);  //--- decode dst[] to src[]
 	if(res>0)
	{
     PrintFormat("Decoded data: size=%d, string='%s'",ArraySize(src),CharArrayToString(src)); //- print decoded data
	}
 	else
	{
	Print("Error in CryptDecode. Error code=",GetLastError());
	}
     else
     Print("Error in CryptEncode. Error code=",GetLastError());
     }
return 0, + GetLastError();
}

      // ArrayToHex
//+------------------------------------------------------------------+
string ArrayToHex(uchar &arr[],int count=-1)
  {
   string res="";
//--- check
   if(count<0 || count>ArraySize(arr))
      count=ArraySize(arr);
//--- transform to HEX string
   for(int i=0; i<count; i++)
      res+=StringFormat("%.2X",arr[i]);
//---
   return(res);
  }

//HOW TO ADD PASSWORD TO PROTECT YOUR EA

extern string  Password;  // add this in the global scope area. on the very top 
//+------------------------------------------------------------------+
//| Expert initialization function    // add the code here                               |
//+------------------------------------------------------------------+

int init()
{
   string   client = NULL;  // Make sure the client is online in order to get his client name and account number
   if(IsConnected()) client = AccountInfoString(ACCOUNT_NAME) + " / " + DoubleToStr(AccountInfoInteger(ACCOUNT_LOGIN), 0);

   if(!Password_Check(client))   // Check client's password
   {
      if(StringLen(Password) != 0)
         MessageBox("Unable to verify client and account number!" + 
            (IsConnected() ? "\nPlease verify you have the correct password." : "\n\nYou need to be online for verification."), 
            (IsConnected() ? "Invalid Password!" : "Offline!"), MB_OK | MB_ICONSTOP);
      else
         MessageBox("Unregistered software.\n\nPlease contact software vendor to obtain\nyour personal activation password." +
            (StringLen(client) == 0 ? "" : "\n\nYour registration information is:\n\n'"+client+"'"), 
            "Unregistered", MB_OK | MB_ICONSTOP);
      
      ExpertRemove();  // Invalid password or user is offline.  Remove expert and exit with error
      return(INIT_FAILED);
   }
   return(INIT_SUCCEEDED);   // All good... 
}
//+----------------------------------------------------------------------------------------------------------------------------------------------------------------------+
//| Validate client's password //using client name, account number and our DES key( BASE64) for double confirmation |  
//+------------------------------------------------------------------+
bool Password_Check(string client)
{
   string   MasterKey;
   uchar dst[], src[], key[];

   // Define your encryption key here.  Must be 7 characters for DES/ECB encryption
   // Make your password difficult to figure out.  You last name is not a good idea!
   // Something like "wLdU&$z" would be good.  For now, we'll use a simple one...
  
   MasterKey = "OfXnUTd";    // 
   StringToCharArray(MasterKey, key); // Convert MasterKey to character array
   
   if(StringLen(client) == 0) return(false); // Make sure client string is not null in the INIT FUCTION above for password
      
   StringToCharArray(client, src);  // Encrypt the client using DES key
   CryptEncode(CRYPT_DES, src, key, dst);

   ArrayInitialize(key, 0x00);  // Clear key and encode to BASE64
   CryptEncode(CRYPT_BASE64, dst, key, src);
  
   return(CharArrayToString(src) == Password);  // Compare password and return result
}
//+------------------------------------------------------------------------------------------------------------------------------------------------------+
//To allow multiple accounts for a single client, remove account number from the 'client' string, as follows:

if(IsConnected()) client = AccountInfoString(ACCOUNT_NAME);    // Make sure client is online to get name automatically

//+-----------------------------------------------------------------------------------------------------------------------------------------------------------+
//Generating Password for each client through entering client name or account name, broker name, and login detail which are to //be encrypted into the ea and generate a password for the client. 

int init()  //Again, in your init() function you'll add the following code.
{
   string   Password = OfXnUTd;

  
   if(StringLen(Client) != 0)    // Make sure the Client input in the init function above is not empty 
   {   
      
      Password = Password_Generate(Client); // Generate a client password
      Print("Client: '"+Client+"'  Password: "+Password); // Print the generated password (makes it easy to cut and paste)
      
      MessageBox("Password generated for client / account\n\n'"+Client+"' is:\n"+Password, "Password Generator", 
         MB_OK | MB_ICONINFORMATION);   // Display the password generated for client
   }
   else
      MessageBox("You must specify a client / account number!", "Password Generator", MB_OK | MB_ICONSTOP);     
      ExpertRemove();   // All good.  Remove expert.
      return(INIT_SUCCEEDED);
}
//+---------------------------------------------------------------------------------------------------------------------------------------------------------------------+
   //Slight modification to our "Password_Check()" function to return a string of the encoded password. Use same password in    //BOTH the Password_Check() function and Password_Generate() function. to encrypt client info and return only password

/+------------------------------------------------------------------+
//| Encrypt client information and return the password
//+------------------------------------------------------------------+
string Password_Generate(string client)
{
   string   MasterKey;
   uchar dst[], src[], key[];

   // Define your encryption key here.  Must be 7 characters for DES/ECB encryption
   // IT MUST BE THE SAME PASSWORD AS DEFINE IN THE "Password_Check()" function!
   // Make your password difficult to figure out.  You last name is not a good idea!
   // Something like "wLdU&$z" would be good.  For now, we'll use a simple one...
   MasterKey = "NotDemo";  
   
   
   StringToCharArray(MasterKey, key);   // Convert MasterKey to character array
   
  
   StringToCharArray(client, src);                     // Encrypt the client using DES key
   CryptEncode(CRYPT_DES, src, key, dst);  // Encrypt the client using DES key

   // Clear key and encode to BASE64
   ArrayInitialize(key, 0x00);
   CryptEncode(CRYPT_BASE64, dst, key, src);

   // Return encypted password
   return(CharArrayToString(src));   
}