HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> 經驗交流與分享 >> This Bar策略如何標示「正確出場價」及計算「正確回測績效」
This Bar策略如何標示「正確出場價」及計算「正確回測績效」
Hunta,2009-09-04 11:01:48
一般使用者對於This Bar策略程式「標示正確出場價」及「計算正確回測績效」這兩個問題上,常常會有一些困擾,所以特別編寫一範例程式供有興趣者參考。
策略條件:
以每天前5根K線之區間最高價(Vh)及區間最低價(Vl)為基準,凡是前一根K線收盤價大於Vh則多單進場;前一根K線收盤價小於Vl則空單進場。
若多單進場後,一旦價格跌破Vl,則多單停損出場;若空單進場後,一旦價格漲破Vh,則空單停損出場。
每日13:40若手上仍有部位一律平倉出場。
程式碼如下:
10 If 5分_K線時間 = 910 Then
20 Vh = 5分_區間最高價( 5 )
30 Vl = 5分_區間最低價( 5 )
40 Vs = 0
50 End If
60
70 // 多單進場
80 If 5分_K線時間 > 915 And Vs = 0 Then
90 If 前1_5分_收盤價 > Vh Then
100 Va = 5分_開盤價
110 Show [ K線下方 , ↑ ]
120 操作訊號( 多單建倉 , 1口 , Va )
130 S1$ = '多' + Cstr( Va )
140 Vd = 5分_最低價 - 15
150 顯示文字[ S1$ , 主畫面 , ( 0 , Vd ) , 字型: 新細明體 , 大小: 009 , 顏色: 16777215 ]
160 Vs = 1
170 End If
180 End If
190
200 // 空單進場
210 If 5分_K線時間 > 915 And Vs = 0 Then
220 If 5分_收盤價 < Vl Then
230 Va = 5分_開盤價
240 Show [ K線上方 , ↓ ]
250 操作訊號( 空單建倉 , 1口 , Va )
260 S1$ = '空' + Cstr( Va )
270 Vd = 5分_最高價 + 20
280 顯示文字[ S1$ , 主畫面 , ( 0 , Vd ) , 字型: 新細明體 , 大小: 009 , 顏色: 16777215 ]
290 Vs = 1
300 End If
310 End If
320
330 // 停損出場
340 If 目前部位( 倉位多空 ) <> 0 Then
350 If 目前部位( 倉位多空 ) > 0 And 5分_最低價 < Vl Then
360 操作訊號( 多單平倉 , 1口 , Vl )
370 Show [ K線下方 , ◎ ]
380 S1$ = '多損' + Cstr( Vl )
390 Vd = 5分_最低價 - 15
400 顯示文字[ S1$ , 主畫面 , ( 0 , Vd ) , 字型: 新細明體 , 大小: 009 , 顏色: 16777215 ]
410 Vs = 0
420 End If
430 If 目前部位( 倉位多空 ) < 0 And 5分_最高價 > Vh Then
440 操作訊號( 空單平倉 , 1口 , Vh )
450 Show [ K線上方 , ◎ ]
460 S1$ = '空損' + Cstr( Vh )
470 Vd = 5分_最高價 + 20
480 顯示文字[ S1$ , 主畫面 , ( 0 , Vd ) , 字型: 新細明體 , 大小: 009 , 顏色: 16777215 ]
490 Vs = 0
500 End If
510 End If
520
530 // 收盤出場
540 If 5分_K線時間 = 1345 And 目前部位( 倉位多空 ) <> 0 Then
550 Va = 5分_開盤價
560 If 目前部位( 倉位多空 ) > 0 Then
570 操作訊號( 多單平倉 , 1口 , Va )
580 Show [ K線下方 , ◎ ]
590 S1$ = '多平' + Cstr( Va )
600 Vd = 5分_最低價 - 15
610 顯示文字[ S1$ , 主畫面 , ( 0 , Vd ) , 字型: 新細明體 , 大小: 009 , 顏色: 16777215 ]
620 Else
630 操作訊號( 空單平倉 , 1口 , Va )
640 Show [ K線上方 , ◎ ]
650 S1$ = '空平' + Cstr( Va )
660 Vd = 5分_最高價 + 20
670 顯示文字[ S1$ , 主畫面 , ( 0 , Vd ) , 字型: 新細明體 , 大小: 009 , 顏色: 16777215 ]
680 End If
690 End If
下載程式碼[URL=http://www.huntasoft.com/hsp/0061.rda]http://www.huntasoft.com/hsp/0061.rda[/URL]
執行結果如下:
[IMGA=0,absMiddle]http://www.huntasoft.com/hsp/pic/0904-1.jpg[/IMGA]
bw5168,2009-09-04 22:10:15
推一下 謝謝版大
bw5168,2009-10-13 01:38:26
[QUOTE][B]下面引用由[U]Hunta[/U]發表的內容:[/B]
一般使用者對於This Bar策略程式「標示正確出場價」及「計算正確回測績效」這兩個問題上,常常會有一些困擾,所以特別編寫一範例程式供有興趣者參考。
策略條件:
以每天前5根K線之區間...[/QUOTE]
請問版主,此策略若要加上固定點數停利
該如何寫?
Hunta,2009-10-14 21:51:39
最近幾天會有新版本,而此版本會有更方便的解決方案。
97 1 8: 此主題共有4帖 此頁4帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時62.5毫秒 請求2次
|