HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> HSQL語言討論區 >> 加碼試寫~~
加碼試寫~~
kimoze1,2010-02-05 12:24:19
1.停損30點反手一次
2.獲利達40加碼ㄧ次為限
3.盤勢逆轉超過第一次建倉成本出場
4.收盤平倉
請版主確認程式是否有誤?
10 If 1分_K線日期 <> 前1_1分_K線日期 Then
20 Vt = 0
30 End If
130 If 目前部位( 倉位多空 ) = 0 And Vt = 0 Then
140 (多單條件)
150 Show [ K線上方 , ◎ ]
160 操作訊號( 空單平倉 , 1口 , Vk )
170 操作訊號( 多單建倉 , 1口 , Vk )
180 Vt = 1
190 Vc = 1分_K線時間
200 Vb = Vk + 40
210 End If
220 End If
230 If 目前部位( 倉位多空 ) = 0 And Vt = 0 Then
240 (空單條件)
250 Show [ K線下方 , ◎ ]
260 操作訊號( 多單平倉 , 1口 , Vk )
270 操作訊號( 空單建倉 , 1口 , Vk )
280 Vt = 1
290 Vc = 1分_K線時間
300 Vb = Vk - 40
310 End If
320 End If
330 If Vt = 1 And 1分_K線時間 > Vc Then
340 If 目前部位( 倉位多空 ) > 0 Then
350 If 條件觸發[ 單一筆單虧損30點 ] = 是 Then
360 Vk = 前1_1分_收盤價
370 Show [ K線下方 , ★ ]
380 操作訊號( 多單平倉 , 1口 , Vk )
390 操作訊號( 空單建倉 , 1口 , Vk )
400 Vt = 2
410 Vc = 1分_K線時間
420 Vb = Vk - 40
430 End If
440 Else
450 If 目前部位( 倉位多空 ) < 0 Then
460 If 條件觸發[ 單一筆單虧損30點 ] = 是 Then
470 Vk = 前1_1分_收盤價
480 Show [ K線上方 , ★ ]
490 操作訊號( 空單平倉 , 1口 , Vk )
500 操作訊號( 多單建倉 , 1口 , Vk )
510 Vt = 2
520 Vc = 1分_K線時間
530 Vb = Vk + 40
540 End If
550 End If
560 End If
570 End If
580 If Vt = 2 And 1分_K線時間 > Vc Then
590 If 目前部位( 倉位多空 ) > 0 Then
600 If 條件觸發[ 單一筆單虧損30點 ] = 是 Then
610 Vk = 前1_1分_收盤價
620 Show [ K線下方 , ※ ]
630 操作訊號( 多單平倉 , 1口 , Vk )
640 Vt = 3
650 End If
660 Else
670 If 目前部位( 倉位多空 ) < 0 Then
680 If 條件觸發[ 單一筆單虧損30點 ] = 是 Then
690 Vk = 前1_1分_收盤價
700 Show [ K線上方 , ※ ]
710 操作訊號( 空單平倉 , 1口 , Vk )
720 Vt = 3
730 End If
740 End If
750 End If
760 End If
770 If 目前部位( 倉位多空 ) > 0 And 目前部位( 口數 ) < 2 Then
780 If 前1_1分_收盤價 > Vb And 前1_1分_收盤價 > Vm Then
790 Vk = 前1_1分_收盤價
800 Show [ K線下方 , ▲ ]
810 操作訊號( 多單建倉 , 1口 , Vk )
820 Vb = Vk + 40
830 End If
840 End If
850 If 目前部位( 倉位多空 ) < 0 And 目前部位( 口數 ) < 2 Then
860 If 前1_1分_收盤價 < Vb And 前1_1分_收盤價 < Vw Then
870 Vk = 前1_1分_收盤價
880 Show [ K線上方 , ▼ ]
890 操作訊號( 空單建倉 , 1口 , Vk )
900 Vb = Vk - 40
910 End If
920 End If
930 If 目前部位( 倉位多空 ) > 0 And 目前部位( 口數 ) > 1 Then
940 If 1分_收盤價 < 目前部位( 第 1 次成本價位 ) Then
950 Show [ K線下方 , ※ ]
960 操作訊號( 多單平倉 , 全數 , Vk )
970 End If
980 End If
990 If 目前部位( 倉位多空 ) < 0 And 目前部位( 口數 ) > 1 Then
1000 If 1分_收盤價 > 目前部位( 第 1 次成本價位 ) Then
1010 Show [ K線上方 , ※ ]
1020 操作訊號( 空單平倉 , 全數 , Vk )
1030 End If
1040 End If
1050 If 1分_K線時間 >= 1340 And 目前部位( 倉位多空 ) <> 0 Then
1060 Vk = 1分_開盤價
1070 If 目前部位( 倉位多空 ) > 0 Then
1080 Show [ K線上方 , ※ ]
1090 操作訊號( 多單平倉 , 全數 , Vk )
1100 End If
1110 If 目前部位( 倉位多空 ) < 0 Then
1120 Show [ K線下方 , ※ ]
1130 操作訊號( 空單平倉 , 全數 , Vk )
1140 Vt = 3
1150 End If
1160 End If
Hunta,2010-02-05 12:36:40
直接試跑看看吧!!
kimoze1,2010-02-05 12:54:38
直接試跑少數日期出現空單建倉有誤或是多單建倉有誤
只好又上來求助~
kimoze1,2010-02-05 13:01:30
觸發條件單筆虧損30
是以加碼後的價位為觸發條件還是第一次建倉(反手建倉)
我在想是不是因為這個條件出現建立部位錯誤?
Hunta,2010-02-05 14:10:20
HSP系統有提供一個很好的除錯工具Debug函數,只要在程式中適當位置安插Debug函數,即可在盤中即時記錄各個變數的變化,事後可以從huntap資料匣內找到Debug_Info日期.txt檔案,裡面會記錄幾點幾分幾秒時某個變數的值,如此你就可以瞭解:
•為何當時某個條件無法通過
•為何程式不正常運作
•當時的某個值是多少
......
至於,要如何擺放Debug函數?
若想知道為何某個條件無法通過,就直接在該條件判斷式前,將所有相關條件值(變數值)全部Debug出來。
若想知道為何出現多空單錯誤訊息,就在「操作訊號」函數前,將多空部位或操作價位Debug出來。
若想知道為何多空訊號會不見,就在訊號成立判斷式前,將判斷式中所有相關條件值(變數值)全部Debug出來。
簡單來說,就是把「關鍵值」Debug出來,你就可以事後分析,當時那些數值是多少,自然就可以找出問題點在哪裡。
總而言之,Debug是一個非常好用的除錯工具,善用它一定可以大幅減少除錯的時間。
97 1 8: 此主題共有5帖 此頁5帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時78.1毫秒 請求2次
|