void OnStart()
{
color BuyColor =clrBlue;
color SellColor=clrRed;
//--- 取引履歴をリクエストする
HistorySelect(0,TimeCurrent());
//--- オブジェクトを作成する
string name;
uint total=HistoryDealsTotal();
ulong ticket=0;
double price;
double profit;
datetime time;
string symbol;
long type;
long entry;
//--- 全ての約定に対して
for(uint i=0;i<total;i++)
{
//--- 約定チケットの取得を試みる
if((ticket=HistoryDealGetTicket(i))>0)
{
//--- 約定プロパティを取得する
price =HistoryDealGetDouble(ticket,DEAL_PRICE);
time =(datetime)HistoryDealGetInteger(ticket,DEAL_TIME);
symbol=HistoryDealGetString(ticket,DEAL_SYMBOL);
type =HistoryDealGetInteger(ticket,DEAL_TYPE);
entry =HistoryDealGetInteger(ticket,DEAL_ENTRY);
profit=HistoryDealGetDouble(ticket,DEAL_PROFIT);
//--- 現在のシンボルのみ
if(price && time && symbol==Symbol())
{
//--- 価格オブジェクトを作成する
name="TradeHistory_Deal_"+string(ticket);
if(entry) ObjectCreate(0,name,OBJ_ARROW_RIGHT_PRICE,0,time,price,0,0);
else ObjectCreate(0,name,OBJ_ARROW_LEFT_PRICE,0,time,price,0,0);
//--- オブジェクトプロパティを設定する
ObjectSetInteger(0,name,OBJPROP_SELECTABLE,0);
ObjectSetInteger(0,name,OBJPROP_BACK,0);
ObjectSetInteger(0,name,OBJPROP_COLOR,type?BuyColor:SellColor);
if(profit!=0) ObjectSetString(0,name,OBJPROP_TEXT,"Profit: "+string(profit));
}
}
}
//--- チャートに適応する
ChartRedraw();
}
|