最近客戶問到這個問題,如何把進場的價位和未平倉部位顯示在Multicharts圖表上
在網路上找到了這段程式碼 (擷取自阿政的網誌) 把它稍稍做了修改
var:EP(""),color(0);
if i_MarketPosition<>0 then EP= numtostr(i_AvgEntryPrice,0)+"x"+NumToStr(i_currentcontracts,0) else EP= "Empty"; 追蹤記錄目前程式的多空部位 (i_AvgEntryPrice目前未平倉進場價格;i_currentcontracts目前的口數)
if i_MarketPosition>0 then color=RGB(255,0,0);
if i_MarketPosition<0 then color=RGB(0,255,0);
if i_MarketPosition=0 then color=RGB(100,100,100);
定義字體顏色
Text_new 一連串的函數主要是用來定義字型大小 顏色...等
text_delete(Value1);
Value1=TEXT_New(D, T, H,"");
TEXT_SetString(Value1, EP); 設定圖表上顯示的文字
TEXT_SetColor(Value1, color); 設定文字的顏色
TEXT_SetStyle(Value1, 1, 1); 設定文字和K棒對齊的方式 (分別為水平對齊和垂直對齊)
TEXT_Setattribute(Value1,1,true); 設定文字的屬性(粗體、斜體還是加底線)
TEXT_SetSize(Value1,13); 設定字體大小
TEXT_Setlocation(Value1,D,T,GetAppInfo(aiLowestDispValue)+20); 設定顯示文字的位置 (放在圖表的下方)
這樣就可以一目了然,若是很多策略放在同一個工作底稿,更方便知道目前的總部位狀況