2008年8月21日 星期四

HTS程式碼:程式期限顯示文字提醒


這一篇介紹一段用在HTS裡STS的"買賣訊號"程式碼,作用呢?

先讓我們來這個程式碼會有什麼效果,直接看圖吧!
Image Hosted by ImageShack.us


看了上面的圖面,應該知道這個程式碼在做些什麼事情了,這樣的程式碼並不是多數程式交易人所需要的,它是特定的某些人才會需要的。是的,利用交易程式作生意的人才會需要這個。看懂其中程式碼的描述,甚至加上您自己的電話都OK的。




VAR:使用期限日(1080820),TXT_onChart(0),TXT_Content("0");

if Date<=使用期限日 and Date>=使用期限日-5 and (Time>131500 or Q_Time>131500)then
TXT_Content = "提醒您"+"rn"+ NumToStr(Month(使用期限日),0) +"/"+NumToStr(DayOfMonth(使用期限日),0)+"到期"+"rn"+"還剩"+NumToStr((DateToJulian(使用期限日)-DateToJulian(Date)),0)+"天"
TXT_onChart = TXT_New( Date , 134500, Lowest(L,6)-10 Points, "" )
TXT_SetString(TXT_onChart, TXT_Content)
TXT_SetStyle( TXT_onChart, 1, 4 )
TXT_SetColor( TXT_onChart, DarkMagenta )
elseif Date>使用期限日 and Time[1]=134500 then
TXT_New( Date , 091500, Low- 5 Points, "程式已過期" )
TXT_New( Date , 091500, Low-36 Points, "請聯絡客服" )
end if

熱門文章