int    handle;
double LotSize;
double MinLot;
double MinCapital;
string DemoCheck;
string BalanceCheck;

int init()
{
   LotSize=MarketInfo(Symbol(),MODE_LOTSIZE);
   MinLot =MarketInfo(Symbol(),MODE_MINLOT);
   MinCapital=NormalizeDouble(MinLot*LotSize/0.25,2);

   if(IsDemo())
   {
      DemoCheck="Demo";
   }
   else
   {
      DemoCheck="Live";
   }

   if(AccountBalance()>=MinCapital)
   {
      BalanceCheck="OK";
   }
   else
   {
      BalanceCheck="Insufficient";
   }

   Comment("\n",
           "The P.I.D. Professional SP4","\n",
           "Copyright © 2008 AutoFX-Advisors.","\n\n",
           "Minimum capital needed to run PID on this broker is $",MinCapital);

   handle=FileOpen("AccountDetails.csv",FILE_CSV|FILE_WRITE,",");
   FileWrite(handle,"Account Name","Account Number","EA","Broker","Currency","Leverage","Demo","Lot Price","Min Lot","Tick Value","Min Capital");
   FileWrite(handle,AccountName(),AccountNumber(),AccountName(),AccountCompany(),AccountCurrency(),AccountLeverage(),DemoCheck,LotSize,MinLot,MarketInfo(Symbol(),MODE_TICKVALUE),MinCapital,BalanceCheck);
   FileClose(handle);

   return(0);
}

int start()
{ 
   return(0);
}