Wie programmiert man? - Seite 100
Sie verpassen Handelsmöglichkeiten:
- Freie Handelsapplikationen
- Über 8.000 Signale zum Kopieren
- Wirtschaftsnachrichten für die Lage an den Finanzmärkte
Registrierung
Einloggen
Sie stimmen der Website-Richtlinie und den Nutzungsbedingungen zu.
Wenn Sie kein Benutzerkonto haben, registrieren Sie sich
nur kaufen, nicht verkaufen
Erstellen einer profitablen ea, aber es könnte doppelt so gut sein (vielleicht) für jetzt nur Käufe platziert werden, nie verkaufen Aufträge.
Weiß jemand warum?
//+------------------------------------------------------------------+
//| Signal Beginn |
//+------------------------------------------------------------------+
double sig_buy = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 0, 0);
double sig_sell = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 1, 0);
double Sg=iCustom(NULL,0, "RSIFilter_v1",5,5,0,1);
if (sig_buy>0 && Sg>0) Auftrag = SIGNAL_BUY;
wenn (sig_sell>0 && Sg<0 ) Order = SIGNAL_SELL;
//+------------------------------------------------------------------+
//| Signal Ende |
//+------------------------------------------------------------------+
den gesamten Code veröffentlichen, ist noch etwas falsch...
der zweite Schritt sind vielleicht Ihre iCustom() -Funktionen.
ein profitables Ea zu erstellen, aber es könnte doppelt so gut sein (vielleicht), denn jetzt werden nur Käufe platziert, nie Verkaufsaufträge.
Weiß jemand, warum?
//+------------------------------------------------------------------+
//| Signal Begin |
//+------------------------------------------------------------------+
double sig_buy = iCustom(NULL, 0, "Steigung Richtung Linie",40, 2, 0, 0, 0);
double sig_sell = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 1, 0);
double Sg=iCustom(NULL,0, "RSIFilter_v1",5,5,0,1);
if (sig_buy>0 && Sg>0) Auftrag = SIGNAL_BUY;
wenn (sig_sell>0 && Sg<0 ) Order = SIGNAL_SELL;
//+------------------------------------------------------------------+
//| Signal Ende |
//+------------------------------------------------------------------+Platzieren und Betrachten von Objekten an zukünftigen Daten?
Hallo, weiß jemand, ob MQL4 das Platzieren eines Indikatorobjekts in die Zukunft und die Anzeige des zukünftigen Objekts unterstützt? Ich habe versucht, ObjectMove auf ein zukünftiges Datum zu setzen (keine Fehlerrückgabe), aber die Anzeige bleibt beim letzten Tick-Datum stehen. Danke
Die MAs haben eine Verschiebungsfunktion... wenn Sie das meinen. +2 verschiebt ihn um 2 TF-Balken nach vorne. -2 verschiebt ihn um 2 zurück.
veröffentlichen Sie den gesamten Code, gibt es eine andere Sache falsch... der zweite Schritt ist vielleicht Ihre iCustom() Funktionen.
#property link "https://www.forex-tsd.com"
extern int MagicNumber = 1001;
extern bool EachTickMode = False;
extern double Lots = 0.01;
extern int Slippage = 4;
extern bool StopLossMode = True;
extern int StopLoss = 70;
extern bool TakeProfitMode = True;
extern int TakeProfit = 300;
extern bool TrailingStopMode = True;
extern int TrailingStop = 25;
extern double MaximalesRisiko =0;//0,15
extern double DecreaseFactor =3;
extern int MaxOrders = 3000;
extern bool UseHourTrade = False;
extern int FromHourTrade = 8;
extern int ToHourTrade = 18;
#define SIGNAL_NONE 0
#define SIGNAL_BUY 1
#define SIGNAL_SELL 2
#define SIGNAL_CLOSEBUY 3
#define SIGNAL_CLOSESELL 4
int BarCount;
int Aktuell;
bool TickCheck = False;
//+------------------------------------------------------------------+
//| Experten-Initialisierungsfunktion |
//+------------------------------------------------------------------+
int init() {
BarCount = Bars;
if (EachTickMode) Current = 0; sonst Current = 1;
return(0);
}
//+------------------------------------------------------------------+
//| Experten-Deinitialisierungsfunktion |
//+------------------------------------------------------------------+
int deinit() {
return(0);
}
//+------------------------------------------------------------------+
//| Experten-Startfunktion |
//+------------------------------------------------------------------+
int start() {
if (UseHourTrade){
if (!(Hour()>=FromHourTrade && Hour()<=ToHourTrade)) {
Comment("Die Zeit für den Handel ist noch nicht gekommen!");
return(0);
}
}
int Order = SIGNAL_NONE;
int Gesamt, Ticket;
double StopLossLevel, TakeProfitLevel;
int digit = MarketInfo(Symbol(),MODE_DIGITS);
if (EachTickMode && Bars != BarCount) EachTickMode = False;
Total = OrdersTotal();
Auftrag = SIGNAL_NONE;
//+------------------------------------------------------------------+
//| Signal Begin |
//+------------------------------------------------------------------+
double sig_buy = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 0, 0);
double sig_sell = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 1, 0);
double Sg=iCustom(NULL,0, "RSIFilter_v1",5,5,0,1);
if (sig_buy>0 && Sg>0) Auftrag = SIGNAL_BUY;
if (sig_sell>0 && Sg<0 ) Order = SIGNAL_SELL;
//+------------------------------------------------------------------+
//| Signal Ende |
//+------------------------------------------------------------------+
//Kaufen
if (Order == SIGNAL_BUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(ScanTrades() < MaxOrders) {
//Prüfen der freien Marge
if(AccountFreeMargin() < (1000 * Lots)) {
Print("Wir haben kein Geld. Freie Marge = ", AccountFreeMargin());
return(0);
}
StopLossLevel = Ask - StopLoss * Point;
TakeProfitLevel = Ask + TakeProfit * Point;
Ticket = OrderSend(Symbol(), OP_BUY, LotsOptimized(),
NormalizeDouble(Ask,digit),
Slippage,
NormalizeDouble(StopLossLevel,digit),
NormalizeDouble(TakeProfitLevel,digit),
"Buy(#" + MagicNumber + ")", MagicNumber, 0, DodgerBlue);
if(Ticket > 0) {
if(OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) Print("BUY order opened : ", OrderOpenPrice()); else Print("Error opening BUY order : ", GetLastError());
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
//Verkaufen
if (Order == SIGNAL_SELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(ScanTrades() < MaxOrders) {
//Prüfen der freien Marge
if(AccountFreeMargin() < (1000 * Lots)) {
Print("Wir haben kein Geld. Freie Marge = ", AccountFreeMargin());
return(0);
}
StopLossLevel = Bid + StopLoss * Point;
TakeProfitLevel = Bid - TakeProfit * Point;
Ticket = OrderSend(Symbol(), OP_SELL, LotsOptimized(),
NormalizeDouble(Bid,digit),
Slippage,
NormalizeDouble(StopLossLevel,digit),
NormalizeDouble(TakeProfitLevel,digit),
"Sell(#" + MagicNumber + ")", MagicNumber, 0, DeepPink);
if(Ticket > 0) {
if(OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) Print("SELL order opened : ", OrderOpenPrice()); else Print("Error opening SELL order : ", GetLastError());
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
//Position prüfen
for (int i = 0; i < Total; i ++) {
OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
if(OrderType() <= OP_SELL && OrderSymbol() == Symbol()) {
if(OrderType() == OP_BUY && OrderMagicNumber()==MagicNumber ) {
//Schließen
if (Order == SIGNAL_CLOSEBUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Bid, Slippage, MediumSeaGreen);
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
//Trailing-Stop
if(TrailingStopMode && TrailingStop > 0) {
if(Bid - OrderOpenPrice() > Point * TrailingStop) {
if(OrderStopLoss() < Bid - Point * TrailingStop) {
OrderModify(OrderTicket(), OrderOpenPrice(), Bid - Point * TrailingStop, OrderTakeProfit(), 0, MediumSeaGreen);
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
}
} else {
if(OrderType()==OP_SELL && OrderMagicNumber()==MagicNumber)
{
//Schließen
if (Order == SIGNAL_CLOSESELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount))))
{
OrderClose(OrderTicket(), OrderLots(), Ask, Slippage, DarkOrange);
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
//Trailing-Stop
if (TrailingStopMode && TrailingStop > 0)
{
if((OrderOpenPrice() - Ask) > (Point * TrailingStop)) {
if((OrderStopLoss() > (Ask + Point * TrailingStop)) || (OrderStopLoss() == 0)) {
OrderModify(OrderTicket(), OrderOpenPrice(), Ask + Point * TrailingStop, OrderTakeProfit(), 0, DarkOrange);
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
}
}}
}
}
if (!EachTickMode) BarCount = Bars;
return(0);
}
int ScanTrades()
{
int total = OrdersTotal();
int numords = 0;
for(int cnt=0; cnt<total; cnt++)
{
OrderSelect(cnt, SELECT_BY_POS);
if(OrderSymbol() == Symbol() && OrderType()<=OP_SELLSTOP && OrderMagicNumber() == MagicNumber)
numords++;
}
return(numords);
}
//bool ExistPositions() {
// for (int i=0; i<OrdersTotal(); i++) {
// if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
// if (OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber) {
// return(True);
// }
// }
// }
// return(false);
//}
double LotsOptimized()
{
double lot=Lots;
int orders=HistoryTotal(); // Summe der historischen Aufträge
int losses=0; // Anzahl der Verlustaufträge ohne Pause
//---- Losgröße auswählen
if(MaximumRisk>0)lot=NormalizeDouble(Lots*AccountFreeMargin()*MaximumRisk/1000.0,1);
//---- berechnet die Anzahl der Verlustaufträge ohne Unterbrechung
if(DecreaseFactor>0)
{
for(int i=Orders-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==false) { Print("Fehler in der Historie!"); break; }
if(OrderSymbol()!=Symbol() || OrderType()>OP_SELL) continue;
//----
if(OrderProfit()>0) break;
if(OrderGewinn()<0) Verluste++;
}
if(Verluste>1) lot=NormalizeDouble(lot-lot*Verluste/DecreaseFactor,1);
}
//---- Rückgabe der Losgröße
if(lot<0.1) lot=0.1;
return(lot);
}
//+------------------------------------------------------------------+
Erhalten Sie einen Fehlercode oder etwas anderes (beim Backtesting), das Ihnen einen Hinweis darauf gibt, was schief läuft?
#property link "https://www.forex-tsd.com"
extern int MagicNumber = 1001;
extern bool EachTickMode = False;
extern double Lots = 0.01;
extern int Slippage = 4;
extern bool StopLossMode = True;
extern int StopLoss = 70;
extern bool TakeProfitMode = True;
extern int TakeProfit = 300;
extern bool TrailingStopMode = True;
extern int TrailingStop = 25;
extern double MaximalesRisiko =0;//0,15
extern double DecreaseFactor =3;
extern int MaxOrders = 3000;
extern bool UseHourTrade = False;
extern int FromHourTrade = 8;
extern int ToHourTrade = 18;
#define SIGNAL_NONE 0
#define SIGNAL_BUY 1
#define SIGNAL_SELL 2
#define SIGNAL_CLOSEBUY 3
#define SIGNAL_CLOSESELL 4
int BarCount;
int Aktuell;
bool TickCheck = False;
//+------------------------------------------------------------------+
//| Experten-Initialisierungsfunktion |
//+------------------------------------------------------------------+
int init() {
BarCount = Bars;
if (EachTickMode) Current = 0; sonst Current = 1;
return(0);
}
//+------------------------------------------------------------------+
//| Experten-Deinitialisierungsfunktion |
//+------------------------------------------------------------------+
int deinit() {
return(0);
}
//+------------------------------------------------------------------+
//| Experten-Startfunktion |
//+------------------------------------------------------------------+
int start() {
if (UseHourTrade){
if (!(Hour()>=FromHourTrade && Hour()<=ToHourTrade)) {
Comment("Die Zeit für den Handel ist noch nicht gekommen!");
return(0);
}
}
int Order = SIGNAL_NONE;
int Gesamt, Ticket;
double StopLossLevel, TakeProfitLevel;
int digit = MarketInfo(Symbol(),MODE_DIGITS);
if (EachTickMode && Bars != BarCount) EachTickMode = False;
Total = OrdersTotal();
Auftrag = SIGNAL_NONE;
//+------------------------------------------------------------------+
//| Signal Begin |
//+------------------------------------------------------------------+
double sig_buy = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 0, 0);
double sig_sell = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 1, 0);
double Sg=iCustom(NULL,0, "RSIFilter_v1",5,5,0,1);
if (sig_buy>0 && Sg>0) Auftrag = SIGNAL_BUY;
wenn (sig_sell>0 && Sg<0 ) Order = SIGNAL_SELL;
//+------------------------------------------------------------------+
//| Signal Ende |
//+------------------------------------------------------------------+
//Kaufen
if (Order == SIGNAL_BUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(ScanTrades() < MaxOrders) {
//Prüfen der freien Marge
if(AccountFreeMargin() < (1000 * Lots)) {
Print("Wir haben kein Geld. Freie Marge = ", AccountFreeMargin());
return(0);
}
StopLossLevel = Ask - StopLoss * Point;
TakeProfitLevel = Ask + TakeProfit * Point;
Ticket = OrderSend(Symbol(), OP_BUY, LotsOptimized(),
NormalizeDouble(Ask,digit),
Slippage,
NormalizeDouble(StopLossLevel,digit),
NormalizeDouble(TakeProfitLevel,digit),
"Buy(#" + MagicNumber + ")", MagicNumber, 0, DodgerBlue);
if(Ticket > 0) {
if(OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) Print("BUY order opened : ", OrderOpenPrice()); else Print("Error opening BUY order : ", GetLastError());
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
//Verkaufen
if (Order == SIGNAL_SELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(ScanTrades() < MaxOrders) {
//Prüfen der freien Marge
if(AccountFreeMargin() < (1000 * Lots)) {
Print("Wir haben kein Geld. Freie Marge = ", AccountFreeMargin());
return(0);
}
StopLossLevel = Bid + StopLoss * Point;
TakeProfitLevel = Bid - TakeProfit * Point;
Ticket = OrderSend(Symbol(), OP_SELL, LotsOptimized(),
NormalizeDouble(Bid,digit),
Slippage,
NormalizeDouble(StopLossLevel,digit),
NormalizeDouble(TakeProfitLevel,digit),
"Sell(#" + MagicNumber + ")", MagicNumber, 0, DeepPink);
if(Ticket > 0) {
if(OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) Print("SELL order opened : ", OrderOpenPrice()); else Print("Error opening SELL order : ", GetLastError());
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
//Position prüfen
for (int i = 0; i < Total; i ++) {
OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
if(OrderType() <= OP_SELL && OrderSymbol() == Symbol()) {
if(OrderType() == OP_BUY && OrderMagicNumber()==MagicNumber ) {
//Schließen
if (Order == SIGNAL_CLOSEBUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Bid, Slippage, MediumSeaGreen);
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
//Trailing-Stop
if(TrailingStopMode && TrailingStop > 0) {
if(Bid - OrderOpenPrice() > Point * TrailingStop) {
if(OrderStopLoss() < Bid - Point * TrailingStop) {
OrderModify(OrderTicket(), OrderOpenPrice(), Bid - Point * TrailingStop, OrderTakeProfit(), 0, MediumSeaGreen);
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
}
} else {
if(OrderType()==OP_SELL && OrderMagicNumber()==MagicNumber)
{
//Schließen
if (Order == SIGNAL_CLOSESELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount))))
{
OrderClose(OrderTicket(), OrderLots(), Ask, Slippage, DarkOrange);
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
//Trailing-Stop
if (TrailingStopMode && TrailingStop > 0)
{
if((OrderOpenPrice() - Ask) > (Point * TrailingStop)) {
if((OrderStopLoss() > (Ask + Point * TrailingStop)) || (OrderStopLoss() == 0)) {
OrderModify(OrderTicket(), OrderOpenPrice(), Ask + Point * TrailingStop, OrderTakeProfit(), 0, DarkOrange);
if (!EachTickMode) BarCount = Bars;
return(0);
}
}
}
}}
}
}
if (!EachTickMode) BarCount = Bars;
return(0);
}
int ScanTrades()
{
int total = OrdersTotal();
int numords = 0;
for(int cnt=0; cnt<total; cnt++)
{
OrderSelect(cnt, SELECT_BY_POS);
if(OrderSymbol() == Symbol() && OrderType()<=OP_SELLSTOP && OrderMagicNumber() == MagicNumber)
numords++;
}
return(numords);
}
//bool ExistPositions() {
// for (int i=0; i<OrdersTotal(); i++) {
// if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
// if (OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber) {
// return(True);
// }
// }
// }
// return(false);
//}
double LotsOptimized()
{
double lot=Lots;
int orders=HistoryTotal(); // Summe der historischen Aufträge
int losses=0; // Anzahl der Verlustaufträge ohne Pause
//---- Losgröße auswählen
if(MaximumRisk>0)lot=NormalizeDouble(Lots*AccountFreeMargin()*MaximumRisk/1000.0,1);
//---- berechnet die Anzahl der Verlustaufträge ohne Unterbrechung
if(DecreaseFactor>0)
{
for(int i=Orders-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==false) { Print("Fehler in der Historie!"); break; }
if(OrderSymbol()!=Symbol() || OrderType()>OP_SELL) continue;
//----
if(OrderProfit()>0) break;
if(OrderGewinn()<0) Verluste++;
}
if(Verluste>1) lot=NormalizeDouble(lot-lot*Verluste/DecreaseFactor,1);
}
//---- Rückgabe der Losgröße
if(lot<0.1) lot=0.1;
return(lot);
}
//+------------------------------------------------------------------+Ich mache jetzt einen Backtest nur mit dem RSIFilter, ich benutze den RSIMixFilter vor einigen Beiträgen in diesem Thread, ich habe diesen Indikator veröffentlicht, und ich erhalte KÄUFE und VERKÄUFE, so dass die Logik, um die Aufträge KAUFEN und VERKAUFEN sind ok, das Problem ist mit Ihrem iCustom Signale...
RSIMixFilter, ist nicht in diesem Thread, sorry, es ist hier ASK
ein profitables Ea zu erstellen, aber es könnte doppelt so gut sein (vielleicht), denn jetzt werden nur Käufe platziert, nie Verkaufsaufträge.
Weiß jemand, warum?
//+------------------------------------------------------------------+
//| Signal Beginn |
//+------------------------------------------------------------------+
double sig_buy = iCustom(NULL, 0, "Steigung Richtung Linie",40, 2, 0, 0, 0);
double sig_sell = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 1, 0);
double Sg=iCustom(NULL,0, "RSIFilter_v1",5,5,0,1);
if (sig_buy>0 && Sg>0) Auftrag = SIGNAL_BUY;
wenn (sig_sell>0 && Sg<0 ) Order = SIGNAL_SELL;
//+------------------------------------------------------------------+
//| Signal Ende |
//+------------------------------------------------------------------+Ich habe einige Backtesting, EURUSD H1 von April 2007 bis jetzt, mit diesem RSIMixFilter nur...
Muss zu 90% Modellierungsqualität sein, weiß nicht, warum es nicht angezeigt wird.
ein profitables Ea zu erstellen, aber es könnte doppelt so gut sein (vielleicht), denn jetzt werden nur Käufe platziert, nie Verkaufsaufträge.
Weiß jemand warum?
//+------------------------------------------------------------------+
//| Signal Beginn |
//+------------------------------------------------------------------+
double sig_buy = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 0, 0);
double sig_sell = iCustom(NULL, 0, "Slope Direction Line",40, 2, 0, 1, 0);
double Sg=iCustom(NULL,0, "RSIFilter_v1",5,5,0,1);
if (sig_buy>0 && Sg>0) Auftrag = SIGNAL_BUY;
wenn (sig_sell>0 && Sg<0 ) Order = SIGNAL_SELL;
//+------------------------------------------------------------------+
//| Signal Ende |
//+------------------------------------------------------------------+Gab es bei diesem Backtesting Käufe und Verkäufe oder nur einen von ihnen? Bei mir habe ich nur Käufe (oder nur Verkäufe, wenn ich den Code geändert habe).
Ich realy haben nichts gesehen, dass ein Fehler zeigt.
Ich mache jetzt einen Backtest nur mit dem RSIFilter, ich benutze den RSIMixFilter vor einigen Beiträgen in diesem Thread, ich habe diesen Indikator veröffentlicht, und ich bekomme BUYS und SELLS, also die Logik, um die Aufträge BUY und SELL zu tun sind ok, das Problem ist mit Ihren iCustom Signalen...
Ist dies also in Ordnung?
double Sg=iCustom(NULL,0, "RSIFilter_v1",5,5,0,1);
wenn ( Sg>0) Auftrag = SIGNAL_BUY;
wenn (Sg<0 ) Auftrag = SIGNAL_SELL;