Geschrieben 21. Juli 200817 Jr. comment_33981 XEA.Trade.com Beispiel: //+------------------------------------------------------------------+ //| DailyScalp.mq4 | //| | //| //+------------------------------------------------------------------+ #property copyright "borrowed some code from mpfx" #property link "http://www.stideas.com" extern double TakeProfit = 30; extern double Lots = 1; extern double TrailingStop = 99; extern double Stoploss = 17; extern double Pips = 16; extern double Perc = 5; double Points; int init () { Points = MarketInfo (Symbol(), MODE_POINT); //---- return(0); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int deinit() { return(0); } //+------------------------------------------------------------------+ //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { double Levv=0; int cnt=0, total; if(Bars<10) { Print("bars less than 100"); return(0); } if(OrdersTotal()<1) { if(AccountFreeMargin()<(1*Lots)) { Print("BrokeAsAJoke"); return(0); } Levv= AccountEquity()*(Perc/100/100)/10; // (BUY) if (Close[1]>Close[2]) { OrderSend(OP_BUY,Levv,Ask,3,Bid-Stoploss*Points,Ask+TakeProfit,0,0,Red); return(0); } if (Close[1]>Close[2]) { OrderSend(OP_BUY,Levv,Ask,3,Bid-Stoploss*Points,Ask+TakeProfit,0,0,Red); return(0); } // (SELL) if (Close[1]<Close[2]) { OrderSend(OP_SELL,Levv,Bid,3,Ask+Stoploss*Points,Bid-TakeProfit,0,0,Red); return(0); } if (Close[1]<Close[2]) { OrderSend(OP_SELL,Levv,Bid,3,Ask+Stoploss*Points,Bid-TakeProfit,0,0,Red); return(0); } return(0); } total=OrdersTotal(); for(cnt=0;cnt<OrdersTotal();cnt++) { OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); if(OrderType()<=OP_SELL && OrderSymbol()==Symbol()) { if(OrderType()==OP_BUY) { if(OrderOpenTime() - (CurTime() >= 86400)) //1 Day// { OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet); return(0); } } } } total=OrdersTotal(); for(cnt=0;cnt<OrdersTotal();cnt++) { OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); if(OrderType()<=OP_BUY && OrderSymbol()==Symbol()) { if(OrderType()==OP_SELL) { if (OrderOpenTime() - (CurTime() >= 86400)) //1 Day// { OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet); return(0); } } } } } Melden
Geschrieben 21. Juli 200817 Jr. comment_33993 Download über Rechtsklick>Speichern geht auf der Seite nicht, oder? Wer an die Codes will, muss mit Copy&Paste arbeiten. Melden
Geschrieben 21. Juli 200817 Jr. comment_34019 @Ecart, hast du einen Erklärung für den schmollenden Smilie? #EDIT: Ah, so funktioniert das! Melden
Geschrieben 21. Juli 200817 Jr. comment_34021 werden die Signale auch angezeigt oder werden nur die Orders (theoretisch) ausgeführt? Melden
Geschrieben 21. Juli 200817 Jr. Autor comment_34022 Ah, so funktioniert das! Wir fangen zwar hier erst an, aber genau so habe ich mir das vorgestellt.Besonders die Art der Grafiken. Diese Pfeilhinweise usw. Wir lernen alle dadurch besser. Irgendwie sollten wir es schaffen, dafür eine Bilderbibliothek anzulegen. PS: Ich habe es (bisher) nicht geschafft, obwohl meine Daten z.B. EUR/USD vollständig sind, einenBacktest durchzuführen. Immer nur 'weiße' Blätter als Ergebnis ... Melden
Geschrieben 21. Juli 200817 Jr. comment_34023 werden die Signale auch angezeigt oder werden nur die Orders (theoretisch) ausgeführt? Da hat man gerade ein Etappenziel erreicht (den Smilie zu konfigurieren) schon kommt einer und macht Druck Wir fangen zwar hier erst an, aber genau so habe ich mir das vorgestellt. Ich denke auch, dass wir nur mit "Try and Error" vorwärts kommen. Irgendwie sollten wir es schaffen, dafür eine Bilderbibliothek anzulegen. Ähm-ja, kein Problem. Die Frage ist nur, wie sich das am Besten umsetzen lässt. Beim Zugriff auf die Gallerie habe ich vorhin bemerkt, dass es einen Bug gibt. Ich kann derzeit auf meine Alben nicht zugreifen PS: Ich habe es (bisher) nicht geschaft, obwohl meine Daten z.B. EUR/USD vollständig sind, einenBacktest durchzuführen. Da bist du mir zwei Schritte voraus Melden
Geschrieben 22. Juli 200817 Jr. Autor comment_34194 Da bist du mir zwei Schritte voraus Es geht ... Die Anleitung (*.doc - 15 Seiten; lesen ab S. 7) von dem EA "Bogie-NN-v8. [ haben wir von FinGeR erhalten] Dort ist alles beschrieben... Der Beweis... Melden
XEA.Trade.com
Beispiel:
//+------------------------------------------------------------------+ //| DailyScalp.mq4 | //| | //| //+------------------------------------------------------------------+ #property copyright "borrowed some code from mpfx" #property link "http://www.stideas.com" extern double TakeProfit = 30; extern double Lots = 1; extern double TrailingStop = 99; extern double Stoploss = 17; extern double Pips = 16; extern double Perc = 5; double Points; int init () { Points = MarketInfo (Symbol(), MODE_POINT); //---- return(0); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int deinit() { return(0); } //+------------------------------------------------------------------+ //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { double Levv=0; int cnt=0, total; if(Bars<10) { Print("bars less than 100"); return(0); } if(OrdersTotal()<1) { if(AccountFreeMargin()<(1*Lots)) { Print("BrokeAsAJoke"); return(0); } Levv= AccountEquity()*(Perc/100/100)/10; // (BUY) if (Close[1]>Close[2]) { OrderSend(OP_BUY,Levv,Ask,3,Bid-Stoploss*Points,Ask+TakeProfit,0,0,Red); return(0); } if (Close[1]>Close[2]) { OrderSend(OP_BUY,Levv,Ask,3,Bid-Stoploss*Points,Ask+TakeProfit,0,0,Red); return(0); } // (SELL) if (Close[1]<Close[2]) { OrderSend(OP_SELL,Levv,Bid,3,Ask+Stoploss*Points,Bid-TakeProfit,0,0,Red); return(0); } if (Close[1]<Close[2]) { OrderSend(OP_SELL,Levv,Bid,3,Ask+Stoploss*Points,Bid-TakeProfit,0,0,Red); return(0); } return(0); } total=OrdersTotal(); for(cnt=0;cnt<OrdersTotal();cnt++) { OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); if(OrderType()<=OP_SELL && OrderSymbol()==Symbol()) { if(OrderType()==OP_BUY) { if(OrderOpenTime() - (CurTime() >= 86400)) //1 Day// { OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet); return(0); } } } } total=OrdersTotal(); for(cnt=0;cnt<OrdersTotal();cnt++) { OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); if(OrderType()<=OP_BUY && OrderSymbol()==Symbol()) { if(OrderType()==OP_SELL) { if (OrderOpenTime() - (CurTime() >= 86400)) //1 Day// { OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet); return(0); } } } } }