#define WIDTH 50 // larghezza del rettangolo in barre //+------------------------------------------------------------------+ //| Script program start function | //+------------------------------------------------------------------+ void OnStart() { //--- ottenere l'ID del grafico corrente e impostare il nome dell'oggetto grafico long chart_id = ChartID(); string obj_name = MQLInfoString(MQL_PROGRAM_NAME)+"_RectLabel"; //--- ottenere le due coordinate temporali del rettangolo datetime time1 = iTime(_Symbol, _Period, WIDTH); datetime time2 = iTime(_Symbol, _Period, 0); if(time1==0 || time2==0) { Print("Error getting time ", GetLastError()); return; } //--- ottenere i prezzi massimi e minimi nell'intervallo della larghezza del rettangolo double price1 = HighestHigh(_Symbol, _Period, 0, WIDTH); double price2 = LowestLow(_Symbol, _Period, 0, WIDTH); if(price1==EMPTY_VALUE || price2==EMPTY_VALUE) return; //--- creare un oggetto rettangolo Print("Create a wheat-colored rectangle"); if(!ObjectCreate(chart_id, obj_name, OBJ_RECTANGLE, 0, time1, price1, time2, price2)) { Print("ObjectCreate() failed. Error ", GetLastError()); return; } //--- riempire il rettangolo con il colore originale ObjectSetInteger(chart_id, obj_name, OBJPROP_FILL, true); ObjectSetInteger(chart_id, obj_name, OBJPROP_BACK, true); ObjectSetInteger(chart_id, obj_name, OBJPROP_COLOR, clrWheat); ChartRedraw(); //--- aspettare un secondo, riempire il rettangolo con il colore DodgerBlue e aggiornare il grafico Sleep(1000); Print("Change color to DodgerBlue"); ObjectSetInteger(chart_id, obj_name, OBJPROP_COLOR, clrDodgerBlue); ChartRedraw(); //--- aspettare un secondo, riempire il rettangolo con il colore LimeGreen e aggiornare il grafico Sleep(1000); Print("Change color to LimeGreen"); ObjectSetInteger(chart_id, obj_name, OBJPROP_COLOR, clrLimeGreen); ChartRedraw(); //--- aspettare un secondo, riempire il rettangolo con il colore OrangeRed e aggiornare il grafico Sleep(1000); Print("Change color to OrangeRed"); ObjectSetInteger(chart_id, obj_name, OBJPROP_COLOR, clrOrangeRed); ChartRedraw(); //--- aspettare un secondo, riempire il rettangolo con il colore Wheat e aggiornare il grafico Sleep(1000); Print("Reset color to original"); ObjectSetInteger(chart_id, obj_name, OBJPROP_COLOR, clrWheat); ChartRedraw(); //--- dopo tre secondi, rimuovere l'oggetto dal grafico Sleep(3000); Print("Delete the rectangle"); ObjectDelete(chart_id, obj_name); } //+-------------------------------------------------------------------------------------------+ //| Restituisce il massimo più Alto nell'intervallo specificato di barre | //+-------------------------------------------------------------------------------------------+ double HighestHigh(const string symbol, const ENUM_TIMEFRAMES timeframe, const uint start, const uint count) { ResetLastError(); int index=iHighest(symbol, timeframe, MODE_HIGH, count, start); if(index==-1) { PrintFormat("%s: iHighest() failed. Error %d",__FUNCTION__, GetLastError()); return(EMPTY_VALUE); } GetLastError(); double price=iHigh(symbol, timeframe, index); if(price==0) { PrintFormat("%s: iHigh() failed. Error %d",__FUNCTION__, GetLastError()); return(EMPTY_VALUE); } return(price); } //+-------------------------------------------------------------------------------------------+ //| Restituisce il minimo più Basso nell'intervallo specificato di barre | //+-------------------------------------------------------------------------------------------+ double LowestLow(const string symbol, const ENUM_TIMEFRAMES timeframe, const uint start, const uint count) { ResetLastError(); int index=iLowest(symbol, timeframe, MODE_LOW, count, start); if(index==-1) { PrintFormat("%s: iLowest() failed. Error %d",__FUNCTION__, GetLastError()); return(EMPTY_VALUE); } GetLastError(); double price=iLow(symbol, timeframe, index); if(price==0) { PrintFormat("%s: iLow() failed. Error %d",__FUNCTION__, GetLastError()); return(EMPTY_VALUE); } return(price); } |