HSQL程式教學--顯示橫排資訊函數說明

「顯示橫排資訊」函數是用於在「主畫面」或「技術指標」的上方顯示指定之資料,範例如下:

奇狐程式如下:
VAR2:(((CLOSE + HIGH) + LOW) / 3),linethick0;
VAR3:EMA(VAR2,6),linethick0;
VAR4:REF(VAR3,1),linethick0;
FILLRGN((VAR3 > VAR4),VAR3,VAR4),COLORMAGENTA;
FILLRGN((VAR3 < VAR4),VAR4,VAR3),colorFF0000;

估算樣本方差2:(((收盤價 + 最高價) + 最低價) / 3),不畫出指標線;
估算樣本方差3:指數平滑移動平均(估算樣本方差2,6),不畫出指標線;
估算樣本方差4:向前引用(估算樣本方差3,1),不畫出指標線;
畫區間綵帶((估算樣本方差3 > 估算樣本方差4),估算樣本方差3,估算樣本方差4),COLORMAGENTA;
畫區間綵帶((估算樣本方差3 < 估算樣本方差4),估算樣本方差4,估算樣本方差3),colorFF0000;

改為HSQL的程式語言如下:

10 自訂技術指標[ #1 , 自訂 ] 
20 
30 載入陣列[ 5分_收盤價 , 收盤價 -> 陣列1 ] 
40 載入陣列[ 5分_最高價 , 最高價 -> 陣列2 ] 
50 載入陣列[ 5分_最低價 , 最低價 -> 陣列3 ] 
60 A1{} = 陣列運算( 陣列1 , 1 ~ 250 , + , 陣列2 ) 
70 A1{} = 陣列運算( 陣列1 , 1 ~ 250 , + , 陣列3 ) 
80 A2{} = 陣列運算( 陣列1 , 1 ~ 250 , / , 陣列3 ) 
90 A3{} = 陣列EMA( 陣列2 , 1 ~ 250 , 參數 3 ) 
100 Vc = 陣列3值( 250 ) 
110 Vd = 陣列3值( 249 ) 
120 If Vc > Vd Then 
130  柱狀線[ Vc , Vd , 實心 , 技術1 , #1 , 值1 , 顏色: 16711935 ] 
140 End If 
150 If Vc < Vd Then 
160  柱狀線[ Vd , Vc , 實心 , 技術1 , #2 , 值2 , 顏色: 65280 ] 
170 End If 
180 Ve = Vc - Vd 
190 顯示橫排資訊[ 技術1 , #0 , 名稱: 差值 , X軸: 9000 , Ve , 顏色: 16777215 ] 

本範例需更新至HSP v5.0a版以上,方可執行。


下載程式檔0080.rda (請下載至Huntap資#料匣內)

實際執行畫面如下:


其中「顯示橫排資訊」函數設定如下:

※「顯示橫排資訊」函數中「X軸座標」代表距離左邊之距離,範圍為0 ~ 11655。
※「主畫面」及「技術指標」各可以設定4組(0~3)「顯示橫排資訊」