HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> HSQL語言討論區 >> 單K計數器
單K計數器
TIGER,2009-12-16 11:36:21
[SIZE=4]版主您好:[/SIZE]
[SIZE=4] 我已經把我的策略加入單K計數器的程式碼了,回測結果也與原本的資料相符[/SIZE]
[SIZE=4] 但為了保險起見,想請版主幫我檢視一下我的程式碼,單K計數器的部份是不是有寫正確[/SIZE]
[SIZE=4] 謝謝版主![/SIZE]
[SIZE=4] (用This Bar的方式有三處,又各分多空,所以會用到6個單k計數器,但是系統只提供5個位置,所以我調整了位置,所以請版主特別幫忙檢查一下,謝謝!)[/SIZE]
[SIZE=4][/SIZE]
[SIZE=4]以下是我的程式碼:[/SIZE]
[SIZE=3] 60 Vz = 5分_轉折精靈一號
70 Ve = 5分_開盤價
80
90 Vt = 目前時間( 時 )
100 Vu = 目前時間( 分 )
110 Vv = 目前時間( 秒 )
120
130
140 // 多單進場
150 If 目前部位( 倉位多空 ) <= 0 Then
160 If 單K計數器( 目前K線 , 0 ) = 0 Then
170 If Vz = 1 And 前1_5分_實體K線 > 0 And 前1_5分_K線時間 < 1300 Then
180
190 操作訊號( 空單平倉 , 1口 , Ve )
200 操作訊號( 多單建倉 , 1口 , Ve )
210 Show [ K線下方 , ▲ ]
220 Vf = 目前部位( 第 1 次成本價位 )
230 S1$ = '多單'
240 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Ve )
250 發送簡訊[ 0911222333 , S2$ , 單次 ]
260 單K計數器( 目前K線 , 0 ) = 1
270 End If
280 Else
290 操作訊號( 空單平倉 , 1口 , Ve )
300 操作訊號( 多單建倉 , 1口 , Ve )
310 Show [ K線下方 , ▲ ]
320 Vf = 目前部位( 第 1 次成本價位 )
330 End If
340 End If
350
360
370 // 空單進場
380 If 目前部位( 倉位多空 ) >= 0 Then
390 If 單K計數器( 目前K線 , 1 ) = 0 Then
400 If Vz = -1 And 前1_5分_實體K線 < 0 And 前1_5分_K線時間 < 1300 Then
410
420 操作訊號( 多單平倉 , 1口 , Ve )
430 操作訊號( 空單建倉 , 1口 , Ve )
440 Show [ K線上方 , ▼ ]
450 Vf = 目前部位( 第 1 次成本價位 )
460 S1$ = '空單'
470 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Ve )
480 發送簡訊[ 0911222333 , S2$ , 單次 ]
490 單K計數器( 目前K線 , 1 ) = 1
500 End If
510 Else
520 操作訊號( 多單平倉 , 1口 , Ve )
530 操作訊號( 空單建倉 , 1口 , Ve )
540 Show [ K線上方 , ▼ ]
550 Vf = 目前部位( 第 1 次成本價位 )
560 End If
570 End If
580
590
600
610 // 出場條件1
620 If 單K計數器( 目前K線 , 3 ) = 0 Then
630
640 If 目前部位( 倉位多空 ) > 0 And 條件觸發[ 單一筆單虧損30點 ] = 是 Then
650 Vf = Vf - 30
660 操作訊號( 多單平倉 , 1口 , Vf )
670 Show [ K線下方 , 損 ]
680 S1$ = '多單停損30出場'
690 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Vf )
700 發送簡訊[ 0911222333 , S2$ , 單次 ]
710 單K計數器( 目前K線 , 3 ) = 1
720 End If
730
740 If 目前部位( 倉位多空 ) < 0 And 條件觸發[ 單一筆單虧損30點 ] = 是 Then
750 Vf = Vf + 30
760 操作訊號( 空單平倉 , 1口 , Vf )
770 Show [ K線上方 , 損 ]
780 S1$ = '空單停損30出場'
790 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Vf )
800 發送簡訊[ 0911222333 , S2$ , 單次 ]
810 單K計數器( 目前K線 , 3 ) = 1
820 End If
830
840 Else
850
860 If 目前部位( 倉位多空 ) > 0 Then
870 Vf = Vf - 30
880 操作訊號( 多單平倉 , 1口 , Vf )
890 Show [ K線下方 , 損 ]
900 End If
910 If 目前部位( 倉位多空 ) < 0 Then
920 Vf = Vf + 30
930 操作訊號( 空單平倉 , 1口 , Vf )
940 Show [ K線上方 , 損 ]
950 End If
960 End If
970
980
990 // 出場條件2
1000 Vx = K線序號( 目前K線 ) - 目前部位( 第 1 次建倉K線序號 )
1010 If Vx > 10 Then
1020 Vx = 10
1030 End If
1040
1050
1060 If 單K計數器( 目前K線 , 4 ) = 0 Then
1070 If 目前部位( 倉位多空 ) > 0 And Vx > 0 And 條件觸發[ 自Vx根K線高點下跌30點 ] Then
1080 Vf = 5分_區間最高價( Vx ) - 30
1090 操作訊號( 多單平倉 , 1口 , Vf )
1100 Show [ K線下方 , ◎ ]
1110 S1$ = '自高點回跌30出場'
1120 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Vf )
1130 發送簡訊[ 0911222333 , S2$ , 單次 ]
1140 單K計數器( 目前K線 , 4 ) = 1
1150 End If
1160
1170 If 目前部位( 倉位多空 ) < 0 And Vx > 0 And 條件觸發[ 自Vx根K線低點上漲30點 ] Then
1180 Vf = 5分_區間最低價( Vx ) + 30
1190 操作訊號( 空單平倉 , 1口 , Vf )
1200 Show [ K線上方 , ◎ ]
1210 S1$ = '自低點上漲30出場'
1220 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Vf )
1230 發送簡訊[ 0911222333 , S2$ , 單次 ]
1240 單K計數器( 目前K線 , 4 ) = 1
1250 End If
1260
1270 Else
1280 If 目前部位( 倉位多空 ) > 0 Then
1290 Vf = 5分_區間最高價( Vx ) - 30
1300 操作訊號( 多單平倉 , 1口 , Vf )
1310 Show [ K線下方 , ◎ ]
1320 End If
1330 If 目前部位( 倉位多空 ) < 0 Then
1340 Vf = 5分_區間最低價( Vx ) + 30
1350 操作訊號( 空單平倉 , 1口 , Vf )
1360 Show [ K線上方 , ◎ ]
1370 End If
1380 End If
1390
1400
1410 // 出場條件3
1420 If 前1_5分_K線時間 = 1330 Then
1430 If 目前部位( 倉位多空 ) > 0 Then
1440
1450 操作訊號( 多單平倉 , 1口 , Ve )
1460 Show [ K線下方 , ◎ ]
1470 S1$ = '時間到多單出場'
1480 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Ve )
1490
1500 發送簡訊[ 0911222333 , S2$ , 單次 ]
1510
1520 End If
1530 If 目前部位( 倉位多空 ) < 0 Then
1540
1550 操作訊號( 空單平倉 , 1口 , Ve )
1560 Show [ K線上方 , ◎ ]
1570 S1$ = '時間到空單出場'
1580 S2$ = 'T3--' + Cstr( Vt ) + ':' + Cstr( Vu ) + ':' + Cstr( Vv ) + S1$ + Cstr( Ve )
1590 發送簡訊[ 0911222333 , S2$ , 單次 ]
1600
1610 End If
1620 End If [/SIZE]
Hunta,2009-12-16 17:01:05
單K計數器寫法的部份沒有問題。
gary09210217,2010-01-05 00:02:06
請教版主:
對於單K計數器的使用方法不甚了解
可否就其語法詳加說明
或是用簡單例子加以說明
謝謝
Hunta,2010-01-05 07:28:06
請參考[URL=http://www.huntasoft.com/leadbbs/a/a.asp?B=102&ID=278&q=1&r=223]http://www.huntasoft.com/leadbbs/a/a.asp?B=102&ID=278&q=1&r=223[/URL]
gary09210217,2010-01-05 12:40:04
若應用在我昨天討論的程式碼中....(已mail到您信箱)
請版主幫我看看
謝了
gary09210217,2010-01-11 00:02:34
版主您好
一.請問最多可開啟幾個HSP平台進行策略自動下單
a.可以開啟2個HSP平台進行策略自動下模擬單嗎?
b.可以開啟2個HSP平台進行策略自動下正式單嗎?
二.我將2個程式碼寄到您的信箱
請幫我看看所加入的單K計數器的位置有無不妥
(分別加入到多單與空單建倉的位置)
為求謹慎,煩請版主幫我check一下 謝謝!!
Hunta,2010-01-11 09:33:45
1.可以同時開3個,但是期貨帳號要不同,否則3個策略同時針對同一個帳戶就亂了。
2.ok
TIGER,2010-01-11 10:59:47
版主你好:
1.可以同時開3個,但是期貨帳號要不同,否則3個策略同時針對同一個帳戶就亂了。
可以針對此點作改善嗎?因為現在只能維護一個期貨帳號,如果開三個策略,另外兩個必須手動修改期貨帳號
可不可以改善成一次可以維護三組帳號的模式,就跟策略可以先維護好三組策略的方式一樣?
感謝!
Hunta,2010-01-11 11:39:17
我們後續再規劃一下。
97 1 8: 此主題共有9帖 此頁9帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時64.5毫秒 請求2次
|