http://www.yctseng.net/2009/09/vartxtonchart0txtcontent0.html
延續之前提過有特殊商業需求的「到期提醒」功能。今天來做一個自用的訊號進出場價位在圖面上提示的功能。
這段程式只要加在自己的買賣訊號程式最末端即可,相關的顯示價位數字的位置可自行調整其中參數。藍色的部份則需放在變數宣告區,程式碼如下:
VAR:TXT_onChart(0),TXT_Content("0")
Value97=MarketPosition
if Value97<>Value97[1] then
TXT_Content = NumToStr( iff( Value97=0, ExitPrice(0), EntryPrice(0) ),0 )
TXT_onChart = TXT_New(Date , Time, iff(Value97>Value97[1], L-105, H+95) Points,"")
TXT_SetString(TXT_onChart, TXT_Content)
TXT_SetStyle(TXT_onChart, 2, 2)
TXT_SetColor(TXT_onChart, DarkMagenta)
end if
得到下圖這樣的效果:

控制把點位數字顯示位置的就在以上程式碼裡的這一行中:
TXT_onChart = TXT_New(Date , Time, iff(Value97>Value97[1], L-105, H+95) Points,"")
主要從L-105(最低價往下105個點)與H+95(最高價往上95個點)去做出來的,什麼點?我也還不知道。
目前我沒找到很好很聰明的顯示位置的定義方式,這樣的方式會受到圖面縮放時的影響,而使得顯示數字的位置不盡理想,還希望各位有更好的方式可以一起分享。
本文內容僅供參考,無任何買賣建議,投資人應謹慎評估,風險自負。