HSQL程式教學--運用KDJ指標背離方式尋找多空轉折點

本範例運用KDJ指標背離方式尋找多空轉折點。

程式碼如下:

10　載入陣列[ 5分_KD( 9 ) , K值 -> 不輸出 , D值 -> 不輸出 , J值 -> 陣列1 ]　
20　載入陣列[ 5分_最高價 , 最高價 -> 陣列2 ]　
30　載入陣列[ 5分_最低價 , 最低價 -> 陣列3 ]　
40　A4{}　=　陣列高低點( 陣列2 , 100 ~ 250 , 級數=4 , 相對位置 -> 陣列6 )　
50　A5{}　=　陣列高低點( 陣列3 , 100 ~ 250 , 級數=4 , 相對位置 -> 陣列7 )　
60　
70　Va　=　陣列6值( 101 )　
80　If　Va　>=　236　And　陣列2值( 250 )　>　陣列2值( Va )　And　陣列1值( 250 )　<　陣列1值( Va )　And　
　　 5分_上影線　>　6　Then　
90　　Show [ K線上方 , ↓ ]　
100　End If　
110　
120　Va　=　陣列7值( 1 )　
130　If　Va　>=　236　And　陣列3值( 250 )　<　陣列3值( Va )　And　陣列1值( 250 )　>　陣列1值( Va )　And　
　　 5分_下影線　>　6　And　5分_成交量　>=　1500　Then　
140　　Show [ K線下方 , ↑ ]　
150　End If　

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

重點說明:
行號10 將KD(9)之J值，存放於陣列1中。(陣列1之第250位置為目前K線，第249位置為上一K線，...依此類推)
行號20 將最高價，存入陣列2。(陣列1之第250位置為目前K線之最高價，第249位置為上一K線之最高價，...依此類推)
行號30 將最低價，存入陣列3。
行號40 抓取陣列2之相對高低點，並將K線位置序號同步存於陣列6中。(主要用於抓取最近幾個相對高點)
行號50 抓取陣列3之相對高低點，並將K線位置序號同步存於陣列7中。(主要用於抓取最近幾個相對低點)
行號70 將前一波高點之K線位置存於變數Va中。
行號80 若前一波高點之K線位置距離在15根K線之內(目前K線之位置為250)，且價過高但KDJ未過高，且上影線大於6點以上
，則在K線下方顯示↑多方符號。
....
行號120 將前一波低點之K線位置存於變數Va中。
行號130 若前一波低點之K線位置距離在15根K線之內(目前K線之位置為250)，且價破低但KDJ未破低，且下影線大於6點以上
，且成交量大於1500口，則在K線上方顯示↓空方符號。

實際執行畫面如下: