Tutorial Tanya jawab kursus : Cara Membuat EA/Expert Advisors

[SoeHoe]

File Latihan Kelas pertama. Sebaiknya jangan copas, tapi tulis ulang ya. biar semakin terlatih

//+------------------------------------------------------------------+
//|                                       2. OrderSend & Tulisan.mq4 |
//|                                          Copyright 2021, Soe Hoe |
//|                                            https://www.soehoe.id |
//+------------------------------------------------------------------+
#property copyright "Copyright 2021, Soe Hoe"
#property link      "https://www.soehoe.id"
#property version   "1.00"
#property strict

string    Komen   = "Takkan LOSS";
string   objName = "soehoe";

double   BalanceAwal = 1000;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   ObjectsDeleteAll(0);
   int       MinTakeProfit    = 500;
   int       MaxStopLoss       = 200;
   double    Lot             = 0.10;
   
   
   
   int row=1;
   int col=1;
   
   color cBalance = clrAqua;
   if( AccountBalance()< (BalanceAwal*0.3) ) cBalance=clrRed;
   //<, >, <=, >=, ==, !=
   
   QnText(row,"Equity");  QnText(row, DoubleToString( AccountEquity(),2),col,clrAntiqueWhite); row++;
   QnText(row,"Balance"); QnText(row,DoubleToString(AccountBalance(),2),col,cBalance); row++;
   QnText(row,"Profit");  QnText(row,    DoubleToString(AccountProfit(),2),col,clrBeige); row++;
   
   
   
   
   
   
//---
   return(INIT_SUCCEEDED);
  }

//====================================================================
void QnText(int myList, string myText, int myCol=0,color myColor = clrYellowGreen){
   string myName = StringConcatenate(objName,myList,myCol);
   int myY = 45*myList;
   int myX = 220*myCol+20;
   
   int      chart_ID =0;
   ObjectCreate(chart_ID,myName,OBJ_LABEL,0,0,0); //Alert("test");
   ObjectSetInteger(chart_ID,myName,OBJPROP_COLOR,myColor);
   ObjectSetInteger(chart_ID,myName,OBJPROP_XDISTANCE,myX);
   ObjectSetInteger(chart_ID,myName,OBJPROP_YDISTANCE,myY);
   ObjectSetInteger(chart_ID,myName,OBJPROP_FONTSIZE,17);
   ObjectSetInteger(chart_ID,myName,OBJPROP_CORNER,CORNER_LEFT_UPPER);
   
   ObjectSetString(chart_ID,myName,OBJPROP_TEXT,myText);
   ObjectSetString(chart_ID,myName,OBJPROP_FONT,"Verdana");
   WindowRedraw();

}
//====================================================================
//====================================================================


//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }






//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
//---
   
  }
//+------------------------------------------------------------------+