Metatrader Forum | Forex Expert-Advisor | Broker & Forex Tools

Metatrader Forum | Forex Expert-Advisor | Broker & Forex Tools (http://www.expert-advisor.com/forum/index.php)
-   Programmierung MQL4 (http://www.expert-advisor.com/forum/forumdisplay.php?f=220)
-   -   Rectangle Werte auslesen (http://www.expert-advisor.com/forum/showthread.php?t=6249)

Max2018 12.11.18 16:59

Rectangle Werte auslesen
 
Hallo,

ich habe in einem Chart zahlreiche Objekte Rectangle eingezeichnet mit ganz unterschiedlichen Namen.

Ich will nun bei jedem Rectangle, der unterhalb des aktuellen Kurses liegt eine Pending Sell Position eröffnen - Startwert ist der untere Rectangle Wert und SL der obere Rectangle Wert.

Aber wie mache ich das, wenn mir der jeweilige Objektname nicht vorliegt?:confused:

Schon jetzt lieben Dank

Max2018 12.11.18 21:35

Keiner ne idee ?
:confused:

André 12.11.18 22:35

Hi Max,
die Idee sollte klar sein, Order handling bekommste selber hin denke ich.

Code:

  int objectsTotal=ObjectsTotal();
  string objectName="";
  double objectPrice1=0,objectPrice2=0;
  double orderOpenPrice=0,slPrice=0;

  for(int i=0;i<objectsTotal;i++)
    {
      objectName=ObjectName(i);
      objectPrice1 = ObjectGetDouble(0,objectName,OBJPROP_PRICE1);
      objectPrice2 = ObjectGetDouble(0,objectName,OBJPROP_PRICE1);

      // send sell orders
      if(objectPrice1<Bid && objectPrice2<Bid)
        {
        orderOpenPrice=NormalizeDouble(MathMin(objectPrice1,objectPrice2),Digits);
        slPrice=NormalizeDouble(MathMax(objectPrice1,objectPrice2),Digits);

        // order handling ...
        Print("orderOpenPrice sell-stop: ",orderOpenPrice," | Rectangle:",objectName);
        Print("slPrice sell-stop: ",orderOpenPrice," | Rectangle:",objectName);
        }

      // send buy orders
      if(objectPrice1>Ask && objectPrice2>Ask)
        {
        orderOpenPrice=NormalizeDouble(MathMax(objectPrice1,objectPrice2),Digits);
        slPrice=NormalizeDouble(MathMin(objectPrice1,objectPrice2),Digits);

        // order handling ...
        Print("orderOpenPrice buy-stop: ",orderOpenPrice," | Rectangle:",objectName);
        Print("slPrice buy-stop: ",orderOpenPrice," | Rectangle:",objectName);
        }
    }


Max2018 13.11.18 14:40

Hallo,
ganz lieben Dank für die schnelle Antwort. Aber das geht irgendwie nicht.
1. Dein Code Er erkennt alle Objekte - ich wollte aber nur die Rectangles
2. Wenn ich andere Objekte lösche und nur Rectangles im Chart habe erkennt er nur den ersten Preis. Ein Rectangle ist aber ein Rechteck und durch einen oberen Preis und einen unteren Preis gekennzeichnet.
Code:

//------------------------------------------------------
//ERKENNT RACTANGLE PRICES +++++++++++++++++++++
//------------------------------------------------------
int objectsTotal=ObjectsTotal();
  string objectName="";
  double objectPrice1=0,objectPrice2=0;
  double orderOpenPrice=0,slPrice=0;
  for(int i=0;i<objectsTotal;i++)
    {
      objectName=ObjectName(i);
      objectPrice1 = ObjectGetDouble(0,objectName,OBJPROP_PRICE1);
      objectPrice2 = ObjectGetDouble(0,objectName,OBJPROP_PRICE1);

      // send sell orders
      if(objectPrice1<Bid && objectPrice2<Bid)
        {
        orderOpenPrice=NormalizeDouble(MathMin(objectPrice1,objectPrice2),Digits);
       
        slPrice=NormalizeDouble(MathMax(objectPrice1,objectPrice2),Digits);
Comment(orderOpenPrice+"  "+slPrice+"    "+ObjectName(i));
        // order handling ...
        Print("orderOpenPrice sell-stop: ",orderOpenPrice," | Rectangle:",objectName);
        Print("slPrice sell-stop: ",orderOpenPrice," | Rectangle:",objectName);
        }

      // send buy orders
      if(objectPrice1>Ask && objectPrice2>Ask)
        {
        orderOpenPrice=NormalizeDouble(MathMax(objectPrice1,objectPrice2),Digits);
        slPrice=NormalizeDouble(MathMin(objectPrice1,objectPrice2),Digits);

        // order handling ...
        Print("orderOpenPrice buy-stop: ",orderOpenPrice," | Rectangle:",objectName);
        Print("slPrice buy-stop: ",orderOpenPrice," | Rectangle:",objectName);
        }
    }
//------------------------------------------------------
//ENDE 
//------------------------------------------------------
 if( Hour()>0)
  {
    int result=0;
     
        result=OrderSend(Symbol(),OP_SELLLIMIT,Lots,orderOpenPrice,Slippage,0,0,"H_"+Kommentar1+MagicNumber+"_"+Zeiteinheit+"_"+Kommentar2,MagicNumber,0,Blue);
        if(result>0)
        {
       
        TheStopLoss=slPrice;
        TheTakeProfit=0;
        if(StopLoss>0) TheStopLoss=slPrice;
        OrderSelect(result,SELECT_BY_TICKET);
        OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(TheStopLoss,Digits),NormalizeDouble(TheTakeProfit,Digits),StrToTime(TimeToClose),Green);
        }
        if(TradingTime==false)
        {OrderClose(OrderTicket(),0,0,0,Blue);


        }

        return(0);
    }


André 13.11.18 16:50

Sorry in meinem Code ist ein kleiner Fehler drin.

Code:

objectPrice2 = ObjectGetDouble(0,objectName,OBJPROP_PRICE2);
sollte passen (copy an paste Fehler).

Wenn du nur Rectangles willst, einfach eine if-Abfrage, ob dein Object ein Rectangle ist.

Code:

for (...) {
  objectName=ObjectName(i);
  if(ObjectType(objectName)==OBJ_RECTANGLE) {

        // Rest des Codes

    }
}


Max2018 15.11.18 01:42

SUPER Danke :)


Alle Zeitangaben in WEZ +2. Es ist jetzt 00:04 Uhr.

Powered by vBulletin® Version 3.8.5 (Deutsch)
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.1
Powered by vBCMS® 2.7.0 ©2002 - 2024 vbdesigns.de
Copyright ©2009 - 2023 by Expert-Advisor.com - Das Metatrader Forum