HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> HSQL語言討論區 >> 請教程式語法
請教程式語法
pw75916,2012-04-09 00:40:54
不知道板主能否協助編寫新N價線的程式語法.....[EM06]
新N價線(N為變數,一般設為3):
前一新價線為上升趨勢,如當根收盤價>前一新價線的高點,則前一新價線的高點即為本根新價線的起始價(開盤價),當根收盤價則為本根新價線的最高價(收盤價),並以新的k棒表示(無上下影線,一般為白色空心棒)
前一新價線為下降趨勢,如當根收盤價<前一新價線的低點,則前一新價線的低點即為本根新價線的起始價(開盤價),當根收盤價則為本根新價線的最低價(收盤價),並以新的k棒表示(無上下影線,一般為綠色空心棒)
如當根收盤價未突破前一趨勢,則不畫新k棒,前一新價線k棒繼續維持
當趨勢反轉向下時,則當根k棒之收盤價<(突破)前N根新價線的最低點,且確定突破後(即完成該分鐘K棒),則以新的k棒表示(無上下影線,綠色空心棒),本根新價線的開盤價為前一新價線的收盤價,且該分鐘k棒的收盤價為本根新價線的最低價
當趨勢反轉向上時,則當根k棒之收盤價>(突破)前N根新價線的最高點,且確定突破後(即完成該分鐘K棒),則以新的k棒表示(無上下影線,白色空心棒),本根新價線的開盤價為前一新價線的開盤價,且該分鐘k棒的收盤價為本根新價線的最高價
解釋頁:
[URL=http://fund.bot.com.tw/z/glossary/glexp_4717.djhtm]http://fund.bot.com.tw/z/glossary/glexp_4717.djhtm[/URL]
[URL=http://www.moneydj.com/kmdj/wiki/wikiviewer.aspx?keyid=d7481f04-d1cc-498a-9a93-19476883e800]http://www.moneydj.com/kmdj/wiki/wikiviewer.aspx?keyid=d7481f04-d1cc-498a-9a93-19476883e800[/URL]
[URL=http://www.techfocus.com.tw/stk_2.htm#1.24]http://www.techfocus.com.tw/stk_2.htm#1.24[/URL]
如果可以,請板主協助將新N價線的N設為變數,以方便使用,謝謝
Hunta,2012-04-09 08:36:30
因為你要比較「當根收盤價>前一新價線的高點」
那問一下,最開始時的「新價線」要怎麼訂?
pw75916,2012-04-09 09:52:34
每日第一根新價線是:
分鐘k線的開盤價<分鐘k線的收盤價,當此開盤第一根k棒完成時,則畫白色空心棒,下為開盤價,上為收盤價
分鐘k線的開盤價>分鐘k線的收盤價,當此開盤第一根k棒完成時,則畫綠色空心棒,下為收盤價,上為開盤價
當日第二根開始即按照前述方法完成檢視
感謝板主
Hunta,2012-04-11 20:41:55
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]
pw75916,2012-04-11 20:47:13
感謝板主
97 1 8: 此主題共有5帖 此頁5帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時1546.9毫秒 請求2次
|