HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> 程式交易討論區 >> 如何自動將區間內最後的最高和最低顯示出來
wintanfa,2010-04-19 01:29:50
敬啟者您好
將程式碼加上 290 If Va >= Vl Then
已經不會出現多單建倉價位有誤的信息
但是必須移動一根K棒才會改變K棒顏色
績效回測皆掛零 請指導應該如何修正錯誤?
260 // 多單進場
270 If 目前部位( 倉位多空 ) <= 0 Then
280 If 前Va_1分_最低價 <= Vl Then
290 If Va >= Vl Then
300 操作訊號( 空單平倉 , 1口 , Va )
310 操作訊號( 多單建倉 , 1口 , Va )
320 Show [ K線下方 , ▲ ]
330 Vb = 前Va_1分_最低價 - 2
340 Vd = Va * -1
350 顯示文字[ Vl , 主畫面 , ( Vd , Vb ) , 字型: 新細明體 , 大小: 009 , 顏色: 16777215 ]
360 播放聲音( DOORBEL2.WAV )
370 End If
380 End If
Hunta,2010-04-19 07:43:53
能不能Show一下你的Va定義是什麼?
Va = ?
wintanfa,2010-04-19 08:02:24
[SIZE=2]敬啟者您好:[/SIZE]
[SIZE=2][/SIZE]
[SIZE=2]VA的定義為VA=一分_開盤價[/SIZE]
[SIZE=2][/SIZE]
[SIZE=2]今早重作測試 4/6之前測不到 4/9以後還沒新增歷史資料[/SIZE]
[SIZE=2]4/6 和 4/7 好像也不正確?[/SIZE]
[SIZE=2][/SIZE]
[TABLE][SIZE=2][/SIZE][TR][TD][FACE=新細明體][SIZE=2]序號[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]建倉日期[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]建倉時間[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]平倉日期[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]平倉時間[/SIZE][/FACE][/TD][/TR][TR][TD][FACE=新細明體 ][COLOR=#0000ff][SIZE=2]1[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#0000ff][SIZE=2]990406[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#0000ff][SIZE=2]911[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#0000ff][SIZE=2]990406[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#0000ff][SIZE=2]1345[/SIZE][/COLOR][/FACE][/TD][/TR][TR][TD][FACE=新細明體 ][COLOR=#ff00ff][SIZE=2]2[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#ff00ff][SIZE=2]990407[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#ff00ff][SIZE=2]951[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#ff00ff][SIZE=2]990407[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#ff00ff][SIZE=2]1345[/SIZE][/COLOR][/FACE][/TD][/TR][TR][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]3[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]849[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]946[/SIZE][/COLOR][/FACE][/TD][/TR][TR][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]4[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]946[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]1018[/SIZE][/COLOR][/FACE][/TD][/TR][TR][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]5[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]1018[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]1155[/SIZE][/COLOR][/FACE][/TD][/TR][TR][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]6[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]1155[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]990408[/SIZE][/COLOR][/FACE][/TD][TD][FACE=新細明體 ][COLOR=#993300][SIZE=2]1345[/SIZE][/COLOR][/FACE][/TD][/TR][TR][TD][FACE=新細明體][SIZE=2]7[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]846[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]950[/SIZE][/FACE][/TD][/TR][TR][TD][FACE=新細明體][SIZE=2]8[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]950[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]1011[/SIZE][/FACE][/TD][/TR][TR][TD][FACE=新細明體][SIZE=2]9[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]1011[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]1331[/SIZE][/FACE][/TD][/TR][TR][TD][FACE=新細明體][SIZE=2]10[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]1331[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]990409[/SIZE][/FACE][/TD][TD][FACE=新細明體][SIZE=2]1345[/SIZE][/FACE][/TD][/TR][/TABLE]
Hunta,2010-04-19 08:09:48
如果你定義Va = 1分_開盤價，那
280 If 前Va_1分_最低價 <= Vl Then
這一行就錯了。
wintanfa,2010-04-19 08:21:49
敬啟者您好:
280 If 前Va_1分_最低價 <= Vl Then 這一行有錯。
請指導要如何修正?能不能在作提示! 感恩!
Hunta,2010-04-19 08:43:09
「前Va_1分_最低價」的意思是「前Va根K線(1分)的最低價」
所以若是Va為開盤價，假設是7777，那
前Va_1分_最低價」的意思就是「前7777根K線(1分)的最低價」
Hunta,2010-04-19 08:45:45
建議你可以從我們的範例先看起，比較可以完整瞭解運作
範例網頁[URL=http://www.huntasoft.com/hsp/p03.htm]http://www.huntasoft.com/hsp/p03.htm[/URL]
wintanfa,2010-04-19 09:29:17
敬啟者您好:
平台內的範例和討論區以及問題索引已經不知看過N次
就是不懂程式編碼像之前的MACD只好拼拼湊湊雖不滿意勉強可以接受
這次就沒那麼幸運有錯誤信息產生 我將程式碼MAIL給您
請幫忙指導修正錯誤! 感恩!
Hunta,2010-04-19 09:45:03
10 Va = 1分_開盤價
20 If 最後K線 = 是 Then
30 Vc = 101
40
50 Vh = 1分_區間最高價( Vc )
60 For Va = 0 To Vc Step 1
70 If 前Va_1分_最高價 = Vh Then
你的第10行及第60行都使用Va變數，這樣會使Va的值改變，建議將第10行之Va改為Vz，並且後面的「操作訊號」內的Va都改成Vz就可以了。
wintanfa,2010-04-19 10:43:39
敬啟者您好:
已經照您所指導修正改進
但是高低點的轉折沒有動作信號
K棒也沒有換色
例如在10:35低點7958轉紅K作多
Hunta,2010-04-19 10:47:51
建議你可以利用Debug函數將關鍵數值顯示出來，如此可以很方便的找出問題點在哪裡。
wintanfa,2010-04-19 11:48:05
敬啟者您好:
DEBUG放在操作訊號處沒有信息出來?
原來的程式碼在即時版中碰到高低轉折處都有動作信號響聲!
但是回測績效時全部掛零! 真傷腦筋!!
97 1 2 3 8: 此主題共有29帖 此頁12帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時63.5毫秒 請求2次
|