請教程式語法 - HSP程式交易論壇


	上篇重新整理下篇

97 1 8: 此主題共有5帖此頁5帖每頁12帖

主題：請教程式語法 - 複製地址

pw75916

級別新手上路
積分 8
經驗 1068
文章 6
註冊 11-10-03 09:12

發表: 2012-04-09 00:40:54 人氣:34435

樓主

請教程式語法

不知道板主能否協助編寫新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

門派管理員
職務總版主
級別法老
聲望＋100000
財富 100002
積分 101915
經驗 642850
文章 1733
註冊 09-04-10 17:15

發表: 2012-04-09 08:36:30

第2樓

因為你要比較「當根收盤價>前一新價線的高點」
那問一下，最開始時的「新價線」要怎麼訂?

pw75916

級別新手上路
積分 8
經驗 1068
文章 6
註冊 11-10-03 09:12

發表: 2012-04-09 09:52:34

第3樓

每日第一根新價線是：
分鐘k線的開盤價<分鐘k線的收盤價，當此開盤第一根k棒完成時，則畫白色空心棒，下為開盤價，上為收盤價
分鐘k線的開盤價>分鐘k線的收盤價，當此開盤第一根k棒完成時，則畫綠色空心棒，下為收盤價，上為開盤價
當日第二根開始即按照前述方法完成檢視

感謝板主

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編輯過 ]

pw75916

級別新手上路
積分 8
經驗 1068
文章 6
註冊 11-10-03 09:12

發表: 2012-04-11 20:47:13

第5樓

感謝板主

97 1 8: 此主題共有5帖此頁5帖每頁12帖

回覆文章注意: *為必填項

*驗證訊息

用戶名稱密碼註冊

*文章名稱

長度不得超過255字

內容(最大25K)
是否是UBB代碼

內容支持插入UBB標籤
使用方法請參考幫助

其它選項:

顯示簽名

鎖定文章

- 顏色表 Alt+S或Ctrl+Enter快速提交