Hunta |
門派 管理員 職務 總版主 級別 法老 聲望 +100000 財富 100002 積分 101915 經驗 642850 文章 1733 註冊 09-04-10 17:15
|
|
|
發表: 2012-04-11 20:41:55 | 第4樓 |
Sorry!!
因為一直都很忙,所以凡是比較複雜的問題通常會晚幾天回覆
策略碼如下: 10 // 判斷是否換日 20 If 前1_5分_K線日期 <> 5分_K線日期 Then 30 If 5分_收盤價 >= 5分_開盤價 Then 40 Vh = 5分_收盤價 50 Vl = 5分_開盤價 60 趨勢# = 1 70 柱狀線[ Vh , Vl , 空心 , 主畫面 , 顏色: 16777215 ] 80 Else 90 Vh = 5分_開盤價 100 Vl = 5分_收盤價 110 柱狀線[ Vh , Vl , 空心 , 主畫面 , 顏色: 65408 ] 120 趨勢# = -1 130 End If 140 End If 150 160 // 參數設定 170 Vn = 3 180 If 5分_K線時間 = 850 Then 190 Vn = 0 200 ElseIf 5分_K線時間 = 855 Then 210 Vn = 1 220 ElseIf 5分_K線時間 = 900 Then 230 Vn = 2 240 End If 250 260 // 趨勢反轉判斷 270 If 趨勢# = 1 Then 280 If 5分_收盤價 < 前VnK線_Vl Then 290 趨勢# = -1 300 Vl = 5分_收盤價 310 End If 320 End If 330 340 If 趨勢# = -1 Then 350 If 5分_收盤價 > 前VnK線_Vh Then 360 趨勢# = 1 370 Vh = 5分_收盤價 380 End If 390 End If 400 410 // 畫出新價線 420 If 趨勢# = 1 Then 430 If 5分_收盤價 > Vh Then 440 Vl = Vh 450 Vh = 5分_收盤價 460 End If 470 柱狀線[ Vh , Vl , 空心 , 主畫面 , 顏色: 16777215 ] 480 Else 490 If 5分_收盤價 < Vl Then 500 Vh = Vl 510 Vl = 5分_收盤價 520 End If 530 柱狀線[ Vh , Vl , 空心 , 主畫面 , 顏色: 65408 ] 540 End If
策略檔下載 [URL=http://www.huntasoft.com/hsp/0123.rda]http://www.huntasoft.com/hsp/0123.rda[/URL]
執行畫面如下:
[IMG]http://www.huntasoft.com/hsp/pic/0411-1.jpg[/IMG] |
[ 此貼最後由Hunta在2012/4/11 下午 10:12:34編輯過 ]
|
|