Forex Community Place

Dapatkan hingga
$50000
karena mengundang teman
untuk memperoleh Bonus StartUp
dari InstaForex
Tidak perlu investasi!
Mulai trading tanpa
risiko dan investasi
Dengan Bonus Permulaan 1000$
Dapatkan bonus
55%
ke akun anda!
Results 1 to 2 of 2

Thread: ea marti

  1. #1
    Orang Asing
    ----
     
    oiiminori is an unknown quantity at this point oiiminori's Avatar
    Join Date
    Mar 2018
    Posts
    5
    Accumulated bonus
    1 USD (What is this?)
    Thanks
    0
    Thanked 6 Times in 0 Posts

    ea marti

    master tolong di bantu.
    dapet scrip ea martingle sederhana.
    nah saya pengenya op yg sebelumya di cut los dan op selanjutnya lot di marti dan kalo terkena tp lot nya kembali ke lot pertama.
    sript ea sederhananya bgini.
    dapet dari bah jum di comen gak ada respon.
    salam nubi.
    //+------------------------------------------------------------------+
    //| Jum+KampRetZ .mq4 |
    //| gifaesa@yahoo.com |
    //| http://JumForex.blogspot.com |
    //+------------------------------------------------------------------+
    #property copyright "JumForex.blogspot.com"
    #property link "Gifaesa@yahoo.com"

    input string Nama_EA = "Jum+KampRetZ";
    input int TP = 40;
    input int SL = 0;
    input double Lots = 0.01;
    input string Menu_Martingel = "Seting";
    input int Jarak_Order = 25;
    input double Kali_Lots = 2;
    input int Max_Order = 10;

    input int Magic = 69;

    double pt,SLb,TPb,SLs,TPs;
    int res,ras;
    int OnInit()
    {
    //---
    if(Digits==3 || Digits==5) pt=10*Point; else pt=Point;
    //---
    return(INIT_SUCCEEDED);
    }
    void OnTick() {
    md();
    lab();

    if(TP==0)TPb=0;else TPb=Ask+TP*pt;
    if(TP==0)TPs=0;else TPs=Bid-TP*pt;
    if(SL==0)SLb=0;else SLb=Ask-SL*pt;
    if(SL==0)SLs=0;else SLs=Bid+SL*pt;
    if( IsDemo() && JumlahOrder(0)+JumlahOrder(1)==0){
    if(Open[1]<Close[1]){ res=OrderSend(Symbol(),OP_BUY,(Lots),Ask,3,SLb,TPb ,Nama_EA,Magic,0,Blue); }
    if(Open[1]>Close[1]){ res=OrderSend(Symbol(),OP_SELL,(Lots),Bid,3,SLs,TP s,Nama_EA,Magic,0,Red); }
    }
    if(trad()==1 && JumlahOrder(0)>=1 && JumlahOrder(0)< Max_Order ) {res=OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,SLb, TPb,Nama_EA,Magic,0,Blue); }
    if(trad()==2 && JumlahOrder(1)>=1 && JumlahOrder(1)< Max_Order ) {res=OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,SLs, TPs,Nama_EA,Magic,0,Red); }

    }
    //+------------------------------------------------------------------+
    void md(){int i,r;double tpnya,dtp;
    for (i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if (OrderSymbol() != Symbol()) continue;
    tpnya=OrderTakeProfit();}
    for (i = OrdersTotal() - 1; i >= 0; i--) {if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if(OrderSymbol() != Symbol()) continue;
    dtp=OrderTakeProfit();
    if( tpnya!=dtp)r=OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), tpnya, 0, CLR_NONE); }}
    int trad(){
    int type,dp; double opb,ops;
    for (int i = 0; i < OrdersTotal(); i++) {
    if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic) continue;
    type=OrderType();
    if(type==0)opb = OrderOpenPrice();
    if(type==1)ops = OrderOpenPrice(); }
    double as = opb - Jarak_Order * pt;
    double bi = ops + Jarak_Order * pt;
    if ( Ask <= as && JumlahOrder(0)> 0 ) dp=1;
    if ( Bid >= bi && JumlahOrder(1)> 0 ) dp=2;
    return(dp);}
    double xlot(int m){
    double ylot,dlot;
    for (int i = 0; i < OrdersTotal(); i++) {
    if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic ||OrderType()!=m) continue;
    dlot=OrderLots(); }
    if(OrderType()==m)ylot=(Lots*MathPow(Kali_Lots,Jum lahOrder(m)));
    return(ylot);}
    int JumlahOrder(int Tipe){ int Total = 0;
    for(int i=0; i<OrdersTotal(); i++) {
    if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))conti nue;
    if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic || OrderType()!=Tipe) continue;
    if(IsDemo())Total++; }
    return(Total);}
    double man(){double Total = 0;
    for(int i=0; i<OrdersTotal(); i++) {
    if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))conti nue;
    if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue;
    if(IsDemo())Total+=OrderProfit(); }
    return(Total);}
    void closeall(){
    for (int i = OrdersTotal() - 1; i >= 0; i--) {
    if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES))continue;
    if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic ) continue;
    if (OrderType() > 1) ras=OrderDelete(OrderTicket());
    if (OrderType() == 0)ras= OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE);
    if (OrderType() == 1)ras=OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); }}
    void lab(){
    ObjectCreate("a",OBJ_LABEL,0,0,0);ObjectSet("a",OB JPROP_CORNER,4);ObjectSet("a",OBJPROP_XDISTANCE,10 ); ObjectSet("a",OBJPROP_YDISTANCE,10); ObjectSetText("a","Jum+KampRetZ",25,"Mistral",Yell ow);
    ObjectCreate("j",OBJ_LABEL,0,0,0);ObjectSet("j",OB JPROP_CORNER,3);ObjectSet("j",OBJPROP_XDISTANCE,10 ); ObjectSet("j",OBJPROP_YDISTANCE,10); ObjectSetText("j","@ 2016 || JumForex.blogspot.com ",16,"Mistral",Yellow);
    Comment("\n ",
    "\n ------------------------------------------------",
    "\n :: Spread : ", MarketInfo(Symbol(), MODE_SPREAD),
    "\n :: Leverage : 1 : ", AccountLeverage(),
    "\n :: Equity : ", AccountEquity(),
    "\n :: Jam Server :", Hour(), ":", Minute(),
    "\n ------------------------------------------------",
    "\n :: Ploting : ",man(),
    "\n :: Level Op Buy : ",JumlahOrder(0),
    "\n :: Level Op Sell : ",JumlahOrder(1),
    "\n ------------------------------------------------",
    "\n :: >>By: <<",
    "\n ------------------------------------------------");
    }

  2. The Following 4 Users Say Thank You to oiiminori For This Useful Post:


  3. <a href="">Forex Portal MT5</a>
  4. #2
    Harian
    ----
     
    linnafx is on a distinguished road linnafx's Avatar
    Join Date
    Jul 2018
    Posts
    72
    Accumulated bonus
    0 USD (What is this?)
    Thanks
    56
    Thanked 21 Times in 29 Posts
    Quote Originally Posted by oiiminori     
    master tolong di bantu.
    dapet scrip ea martingle sederhana.
    nah saya pengenya op yg sebelumya di cut los dan op selanjutnya lot di marti dan kalo terkena tp lot nya kembali ke lot pertama.
    sript ea sederhananya bgini.
    dapet dari bah jum di comen gak ada respon.
    salam nubi.
    //+------------------------------------------------------------------+
    //| Jum+KampRetZ .mq4 |
    //| gifaesa@yahoo.com |
    //| http://JumForex.blogspot.com |
    //+------------------------------------------------------------------+
    #property copyright "JumForex.blogspot.com"
    #property link "Gifaesa@yahoo.com"

    input string Nama_EA = "Jum+KampRetZ";
    input int TP = 40;
    input int SL = 0;
    input double Lots = 0.01;
    input string Menu_Martingel = "Seting";
    input int Jarak_Order = 25;
    input double Kali_Lots = 2;
    input int Max_Order = 10;

    input int Magic = 69;

    double pt,SLb,TPb,SLs,TPs;
    int res,ras;
    int OnInit()
    {
    //---
    if(Digits==3 || Digits==5) pt=10*Point; else pt=Point;
    //---
    return(INIT_SUCCEEDED);
    }
    void OnTick() {
    md();
    lab();

    if(TP==0)TPb=0;else TPb=Ask+TP*pt;
    if(TP==0)TPs=0;else TPs=Bid-TP*pt;
    if(SL==0)SLb=0;else SLb=Ask-SL*pt;
    if(SL==0)SLs=0;else SLs=Bid+SL*pt;
    if( IsDemo() && JumlahOrder(0)+JumlahOrder(1)==0){
    if(Open[1]<Close[1]){ res=OrderSend(Symbol(),OP_BUY,(Lots),Ask,3,SLb,TPb ,Nama_EA,Magic,0,Blue); }
    if(Open[1]>Close[1]){ res=OrderSend(Symbol(),OP_SELL,(Lots),Bid,3,SLs,TP s,Nama_EA,Magic,0,Red); }
    }
    if(trad()==1 && JumlahOrder(0)>=1 && JumlahOrder(0)< Max_Order ) {res=OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,SLb, TPb,Nama_EA,Magic,0,Blue); }
    if(trad()==2 && JumlahOrder(1)>=1 && JumlahOrder(1)< Max_Order ) {res=OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,SLs, TPs,Nama_EA,Magic,0,Red); }

    }
    //+------------------------------------------------------------------+
    void md(){int i,r;double tpnya,dtp;
    for (i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if (OrderSymbol() != Symbol()) continue;
    tpnya=OrderTakeProfit();}
    for (i = OrdersTotal() - 1; i >= 0; i--) {if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if(OrderSymbol() != Symbol()) continue;
    dtp=OrderTakeProfit();
    if( tpnya!=dtp)r=OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), tpnya, 0, CLR_NONE); }}
    int trad(){
    int type,dp; double opb,ops;
    for (int i = 0; i < OrdersTotal(); i++) {
    if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic) continue;
    type=OrderType();
    if(type==0)opb = OrderOpenPrice();
    if(type==1)ops = OrderOpenPrice(); }
    double as = opb - Jarak_Order * pt;
    double bi = ops + Jarak_Order * pt;
    if ( Ask <= as && JumlahOrder(0)> 0 ) dp=1;
    if ( Bid >= bi && JumlahOrder(1)> 0 ) dp=2;
    return(dp);}
    double xlot(int m){
    double ylot,dlot;
    for (int i = 0; i < OrdersTotal(); i++) {
    if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
    if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic ||OrderType()!=m) continue;
    dlot=OrderLots(); }
    if(OrderType()==m)ylot=(Lots*MathPow(Kali_Lots,Jum lahOrder(m)));
    return(ylot);}
    int JumlahOrder(int Tipe){ int Total = 0;
    for(int i=0; i<OrdersTotal(); i++) {
    if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))conti nue;
    if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic || OrderType()!=Tipe) continue;
    if(IsDemo())Total++; }
    return(Total);}
    double man(){double Total = 0;
    for(int i=0; i<OrdersTotal(); i++) {
    if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))conti nue;
    if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue;
    if(IsDemo())Total+=OrderProfit(); }
    return(Total);}
    void closeall(){
    for (int i = OrdersTotal() - 1; i >= 0; i--) {
    if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES))continue;
    if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic ) continue;
    if (OrderType() > 1) ras=OrderDelete(OrderTicket());
    if (OrderType() == 0)ras= OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE);
    if (OrderType() == 1)ras=OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); }}
    void lab(){
    ObjectCreate("a",OBJ_LABEL,0,0,0);ObjectSet("a",OB JPROP_CORNER,4);ObjectSet("a",OBJPROP_XDISTANCE,10 ); ObjectSet("a",OBJPROP_YDISTANCE,10); ObjectSetText("a","Jum+KampRetZ",25,"Mistral",Yell ow);
    ObjectCreate("j",OBJ_LABEL,0,0,0);ObjectSet("j",OB JPROP_CORNER,3);ObjectSet("j",OBJPROP_XDISTANCE,10 ); ObjectSet("j",OBJPROP_YDISTANCE,10); ObjectSetText("j","@ 2016 || JumForex.blogspot.com ",16,"Mistral",Yellow);
    Comment("\n ",
    "\n ------------------------------------------------",
    "\n :: Spread : ", MarketInfo(Symbol(), MODE_SPREAD),
    "\n :: Leverage : 1 : ", AccountLeverage(),
    "\n :: Equity : ", AccountEquity(),
    "\n :: Jam Server :", Hour(), ":", Minute(),
    "\n ------------------------------------------------",
    "\n :: Ploting : ",man(),
    "\n :: Level Op Buy : ",JumlahOrder(0),
    "\n :: Level Op Sell : ",JumlahOrder(1),
    "\n ------------------------------------------------",
    "\n :: >>By: <<",
    "\n ------------------------------------------------");
    }
    Masukan ke bengkel EA aja Bro...di sana master master koding ngumoul....

  5. The Following 2 Users Say Thank You to linnafx For This Useful Post:


Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts