ea predator pips.mq4

int     NomorAccount         = 0;

string  Kadaluarsa           = "2029.9.12 00:00";

extern string _EA                            = "___EA PREDATOR PIPS___";
extern int    Magic                          = 20121218;
extern bool   Use_Compund                    = true;
extern double Kelipatan_Kompon               = 80000; 
extern double Lots                           = 0.1;
extern double Penentu_Lot                    = 5; 

extern int    TakeProfit                     = 10; 
extern int    StopLoss                       = 0; 
extern int    Minimal_Step                   = 20;
extern double Max_Lot                        = 20;
extern int    Max_Level                      = 15; 

extern int    TP_In_Money                    = 0;
extern int    SL_In_Money                    = 0;

extern string _MOVING_AVERAGES               = "_______MA INDICATOR______";
extern int    Level_Atas                     = 60;
extern int    Level_Bawah                    = 60;
extern int    MA_Period                      = 100;
extern int    MA_Method                      = 0;
extern string MA_MethoD                      = "0=simple 1=exponential 2=smoothed 3=linear weighted";
extern int    aplied_price                   = 0;
extern string aplied_pricE                   = "0=CLOSE 1=OPEN 2=HIGH 3=LOW 4=MEDIAN 5=TYPICAL 6=WEIGHTED";
extern int    MA_shift                       = 1;
double MA, ma_atas, ma_bawah;

extern string _UNI_CROSS                     = "____ UNI CROSS ____"; 
extern bool   UseSound                       = false;
extern bool   TypeCHart                      = false;
extern bool   UseAlert                       = true;
extern string NameFileSound                  = "alert.wav";
extern int    T3Period                       = 14;
extern int    T3Price                        = 0;
extern double b                              = 0.618;
extern int    Snake_HalfCycle                = 5;
extern int    Inverse                        = 0;
extern int    DeltaForSell                   = 0;
extern int    DeltaForBuy                    = 0;
double panah_biru, panah_merah;

extern string _TIMEFILTER                    = "_______ TIME FILTER KOMPUTER_______";
extern bool    Use_TimeFilter                = false;
extern int     StartHour                     = 0;
extern int     EndHour                       = 24;
int    EndHour1, StartHour1, GMTOffset;
string comment1;

int    Trailing_Stop                  = 0;
double MinLots, MaxLots, minlot, TPBuy, SLBuy;
int    DIGIT, convert, slippage=10, spread, stoplevel;
double last_lot_sell, last_price_sell, last_lot_buy, last_price_buy, last_price, last_lot;
int    last_type, pending, OpenOrders, cnt, openbuy, opensell;
bool   CLOSE, DELETE;
datetime time;
double SL;
double Lot_Marti;
double harga; 
double last_tp, last_sl;
int    pendingsell=0,pendingbuy=0;
double last_tp_buy, last_tp_sell, last_sl_buy, last_sl_sell;

int buystop=0;
int buylimit=0;
int sellstop=0;
int selllimit=0;
double konversi_kompon; 
int komponen_buy=0;
int komponen_sell=0;
double lot_op1_buy, harga_op1_buy, lot_op1_sell, harga_op1_sell;
double rata_buy, rata_sell;

int init()
  {
      // код доступен только после оплаты
   }

int deinit()
  {
openord();
if (OpenOrders>0)
   {
      Alert ("EA RESET");
      Alert ("JANGAN MERESET EA SELAGI ADA ORDER");
   }
   return(0);
  }

int start()
  {
      // код доступен только после оплаты
   }

bool kadaluarsa()
{datetime kada  = StrToTime(Kadaluarsa); if (TimeCurrent()>kada) {Alert ("Expert Advisor has expired");return (false);} else {return (true);}}

bool LoginNumber()
{if (AccountNumber()==NomorAccount || NomorAccount == 0 ) {return (true);} else {Alert ("Login Number dont match "); return (false);}}

double ProfitInMoney(int tipe)
{
double Profit=0;
for(cnt=0;cnt<OrdersTotal();cnt++)   
   {
     OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
	  if (OrderSymbol()==Symbol() && OrderMagicNumber() == Magic && (OrderType()==tipe) )
	     {Profit = Profit + OrderProfit() + OrderSwap() + OrderCommission();}
   }
return (Profit);
}   

double rata_price(int tipe)
{
double total_lot=0; 
double total_kali=0; 
double rata_price=0;
for(cnt=0;cnt<OrdersTotal();cnt++)   
   { 
     OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
	  if (OrderSymbol()==Symbol() && OrderMagicNumber() == Magic && (OrderType()==tipe))
	     {
	       total_lot  = total_lot + OrderLots();
	       total_kali = total_kali + (OrderLots() * OrderOpenPrice());
	     } 
   }
if (total_lot!=0) {rata_price = total_kali / total_lot;} else {rata_price = 0;}
return (rata_price);
}

bool sudah_open_candle_ini(int tipe)
{
bool sudahopenhariini=false;  
for(cnt=0;cnt<OrdersTotal();cnt++)   
   {
     OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
	  if (OrderSymbol()==Symbol() && OrderMagicNumber() == Magic && OrderType()==tipe )
	     {
	        if (OrderOpenTime()>=iTime(Symbol(),0,0)) {sudahopenhariini=true;}
	     }
   }
for(cnt=0;cnt<OrdersHistoryTotal();cnt++)     
   {
     OrderSelect(cnt, SELECT_BY_POS, MODE_HISTORY);
	  if (OrderSymbol()==Symbol() && OrderMagicNumber() == Magic && OrderType()==tipe)
	     {  
	        if (OrderOpenTime()>=iTime(Symbol(),0,0)) {sudahopenhariini=true;}
	     }
   }

return (sudahopenhariini);

}

bool buy()
{
   if (Close[1]<=ma_bawah) {return (true);} else {return (false);}
}
bool sell()
{
   if (Close[1]>=ma_atas) {return (true);} else {return (false);}
}

bool buy_uni()
{ 
   if (panah_biru>0 && panah_biru<999999) {return (true);} else {return (false);}
} 
bool sell_uni()
{ 
   if (panah_merah>0 && panah_merah<999999) {return (true);} else {return (false);}
} 

void ModifyTP(int tipe, double TP) // TP disini diambil dari OrderTakeProfit() dari OP terakhir 
{ 
for (cnt = OrdersTotal(); cnt >= 0; cnt--) 
    {
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol() == Symbol() && OrderMagicNumber()==Magic && (OrderType()==tipe) && (tipe==OP_BUY || tipe==OP_BUYSTOP || tipe==OP_BUYLIMIT)   ) 
         {
           if (NormalizeDouble (OrderTakeProfit(),Digits)!=NormalizeDouble (TP,Digits) && NormalizeDouble (TP,Digits)-Ask>=stoplevel*Point)
   

Показано первые 50% кода (символов: 16154)