//+------------------------------------------------------------------+ //| | //| | //| www.arabictrader.com/vb | //| | //| mrdollar.cs@gmail.com | //+------------------------------------------------------------------+ #property copyright "MR.dollar" #property link "mrdollar.cs@gmail.com" #property show_inputs //+------------------------------------------------------------------+ //| FUNCTION DEFINITIONS deinitialization function | //+------------------------------------------------------------------+ void OnInit() { CreatePanel("Panel_Info_Info1",OBJ_EDIT,"www.ArabicTrader.com",10,25,190,20,DodgerBlue,White,DodgerBlue,11,true,false,0,ALIGN_CENTER); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { } //+------------------------------------------------------------------+ //| FUNCTION DEFINITIONS Start function | //+------------------------------------------------------------------+ void OnStart() { int total=OrdersHistoryTotal()-1; for(int cnt=total; cnt>=0; cnt--) { bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_HISTORY); int ticket=OrderTicket(); if(OrderSymbol()==Symbol()) { if(OrderType()==OP_BUY) { DrawArrow("B "+string(ticket),OrderOpenTime(),OrderOpenPrice(),Blue,2); DrawArrow("Bc "+string(ticket),OrderCloseTime(),OrderClosePrice(),Blue,3); DrawTrend("Bt "+string(ticket),OrderOpenTime(),OrderOpenPrice(),OrderCloseTime(),OrderClosePrice(),Blue); } if(OrderType()==OP_SELL) { DrawArrow("S "+string(ticket),OrderOpenTime(),OrderOpenPrice(),Red,2); DrawArrow("Sc "+string(ticket),OrderCloseTime(),OrderClosePrice(),Red,3); DrawTrend("St "+string(ticket),OrderOpenTime(),OrderOpenPrice(),OrderCloseTime(),OrderClosePrice(),Red); } } } ObjectDelete(0,"Panel_Info_Info1"); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void DrawArrow(string name,datetime time,double price,color col,int arrow_code) { if(ObjectFind(name)==-1) { ObjectCreate(name,OBJ_ARROW,0,time,price); ObjectSet(name,OBJPROP_ARROWCODE,arrow_code); ObjectSet(name,OBJPROP_COLOR,col); } } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void DrawTrend(string name,datetime time1,double price1,datetime time2,double price2,color col) { if(ObjectFind(name)==-1) { ObjectCreate(name,OBJ_TREND,0,time1,price1,time2,price2); ObjectSet(name,OBJPROP_COLOR,col); ObjectSet(name,OBJPROP_RAY,false); ObjectSet(name,OBJPROP_WIDTH,1); ObjectSet(name,OBJPROP_STYLE,STYLE_DOT); } } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void CreatePanel(string name,ENUM_OBJECT Type,string text,int XDistance,int YDistance,int Width,int Hight, color BGColor_,color InfoColor,color boarderColor,int fontsize,bool readonly=false,bool Obj_Selectable=false,int Corner=0,ENUM_ALIGN_MODE Align=ALIGN_LEFT) { if(ObjectFind(0,name)==-1) { ObjectCreate(0,name,Type,0,0,0); ObjectSetInteger(0,name,OBJPROP_XDISTANCE,XDistance); ObjectSetInteger(0,name,OBJPROP_YDISTANCE,YDistance); ObjectSetInteger(0,name,OBJPROP_XSIZE,Width); ObjectSetInteger(0,name,OBJPROP_YSIZE,Hight); ObjectSetString(0,name,OBJPROP_TEXT,text); ObjectSetString(0,name,OBJPROP_FONT,"Arial Bold"); ObjectSetInteger(0,name,OBJPROP_FONTSIZE,fontsize); ObjectSetInteger(0,name,OBJPROP_CORNER,Corner); ObjectSetInteger(0,name,OBJPROP_COLOR,InfoColor); ObjectSetInteger(0,name,OBJPROP_BORDER_TYPE,BORDER_FLAT); ObjectSetInteger(0,name,OBJPROP_BORDER_COLOR,boarderColor); ObjectSetInteger(0,name,OBJPROP_BGCOLOR,BGColor_); ObjectSetInteger(0,name,OBJPROP_SELECTABLE,Obj_Selectable); if(Type==OBJ_EDIT) { ObjectSetInteger(0,name,OBJPROP_ALIGN,Align); ObjectSetInteger(0,name,OBJPROP_READONLY,readonly); } } if(ObjectGet(name,OBJPROP_TEXT)!=text && readonly==true) { ObjectSetString(0,name,OBJPROP_TEXT,text); } } //+------------------------------------------------------------------+