HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> HSQL語言討論區 >> 麻煩版大協助更正單k計數器寫法∼∼
麻煩版大協助更正單k計數器寫法∼∼
kimoze1,2010-01-09 01:34:36
10 If 1分_K線日期 <> 前1_1分_K線日期 Then
20 Vt = 0
30 End If
90
100 // 多單
110 If 單K計數器( 目前K線 , 0 ) = 0 Then
120 If 目前部位( 倉位多空 ) = 0 And Vt = 0 Then
130 (多單條件)
140 Show [ K線下方 , ◎ ]
150 操作訊號( 空單平倉 , 1口 , Vk )
160 操作訊號( 多單建倉 , 1口 , Vk )
170 Vt = 1
180 Vf = 目前部位( 第 1 次成本價位 )
190 單K計數器( 目前K線 , 0 ) = 1
200 End If
210 End If
220
230 // 空單
240 If 目前部位( 倉位多空 ) = 0 And Vt = 0 Then
250 (空單條件)
260 Show [ K線上方 , ◎ ]
270 操作訊號( 多單平倉 , 1口 , Vk )
280 操作訊號( 空單建倉 , 1口 , Vk )
290 Vt = -1
300 Vf = 目前部位( 第 1 次成本價位 )
310 單K計數器( 目前K線 , 0 ) = 1
320 End If
330 End If
340 End If
350
360 // 停損反手
370 If 單K計數器( 目前K線 , 1 ) = 0 Then
380 If 目前部位( 倉位多空 ) <> 0 Then
390 Vc = 目前部位( 總暫結績效 )
400 If Vt = 1 And Vc <= -30 Then
410 Vf = Vf - 30
420 Show [ K線上方 , ★ ]
430 操作訊號( 多單平倉 , 1口 , Vk )
440 操作訊號( 空單建倉 , 1口 , Vk )
450 Vf = 目前部位( 第 2 次成本價位 )
460 單K計數器( 目前K線 , 1 ) = 1
470 Vt = 2
480 ElseIf Vt = 2 Then
490 Vc = 目前部位( 總暫結績效 )
500 If Vc < -30 Then
510 Vf = Vf + 30
520 Show [ K線下方 , ※ ]
530 操作訊號( 空單平倉 , 1口 , Vk )
540 單K計數器( 目前K線 , 1 ) = 1
550 Vt = 0
560 End If
570 End If
580 If Vt = -1 And Vc <= -30 Then
590 Vf = Vf + 30
600 Show [ K線下方 , ★ ]
610 操作訊號( 空單平倉 , 1口 , Vk )
620 操作訊號( 多單建倉 , 1口 , Vk )
630 Vf = 目前部位( 第 2 次成本價位 )
640 單K計數器( 目前K線 , 1 ) = 1
650 Vt = -2
660 ElseIf Vt = -2 Then
670 Vc = 目前部位( 總暫結績效 )
680 If Vc < -30 Then
690 Vf = Vf - 30
700 Show [ K線上方 , ※ ]
710 操作訊號( 多單平倉 , 1口 , Vk )
720 單K計數器( 目前K線 , 1 ) = 1
730 Vt = 0
740 End If
750 End If
760 End If
770 End If
780
790 // 收盤
800 If 1分_K線時間 = 1340 Then
810 If 目前部位( 倉位多空 ) > 0 Then
820 Show [ K線上方 , ※ ]
830 操作訊號( 多單平倉 , 1口 , Vk )
840 End If
850 If 目前部位( 倉位多空 ) < 0 Then
860 Show [ K線下方 , ※ ]
870 操作訊號( 空單平倉 , 1口 , Vk )
880 End If
890 End If
執行回測跟圖形show的位置有差異
是否單k計數器寫錯?
另外想問的是
依照前面的k棒計算結果來決定下單位置
是否要把畫面縮小(就是讓畫面k棒的數量夠多)
如果放大就會影響計算?
最後要問的是
已經mail申請保留優惠
是否只要轉帳後告知
軟體序號即可?
優惠一樣850/月?
Hunta,2010-01-09 11:27:07
10 If 1分_K線日期 <> 前1_1分_K線日期 Then
20 Vt = 0
30 End If
90
100 // 多單
110 If 單K計數器( 目前K線 , 0 ) = 0 Then
120 If 目前部位( 倉位多空 ) = 0 And Vt = 0 Then
130 (多單條件)
if 單K計數器 = 0 then
140 Show [ K線下方 , ◎ ]
150 操作訊號( 空單平倉 , 1口 , Vk )
160 操作訊號( 多單建倉 , 1口 , Vk )
170 Vt = 1
180 Vf = 目前部位( 第 1 次成本價位 )
190 單K計數器( 目前K線 , 0 ) = 1
else
Show [ K線下方 , ◎ ]
操作訊號( 空單平倉 , 1口 , Vk )
操作訊號( 多單建倉 , 1口 , Vk )
Vt = 1
Vf = 目前部位( 第 1 次成本價位 )
end if
200 End If
210 End If
220
230 // 空單
240 If 目前部位( 倉位多空 ) = 0 And Vt = 0 Then
250 (空單條件)
if 單K計數器 = 0 then
260 Show [ K線上方 , ◎ ]
270 操作訊號( 多單平倉 , 1口 , Vk )
280 操作訊號( 空單建倉 , 1口 , Vk )
290 Vt = -1
300 Vf = 目前部位( 第 1 次成本價位 )
310 單K計數器( 目前K線 , 0 ) = 1
else
Show [ K線上方 , ◎ ]
操作訊號( 多單平倉 , 1口 , Vk )
操作訊號( 空單建倉 , 1口 , Vk )
Vt = -1
Vf = 目前部位( 第 1 次成本價位 )
end if
320 End If
330 End If
340 End If
350
360 // 停損反手
380 If 目前部位( 倉位多空 ) <> 0 Then
400 If Vt = 1 Then
if 單K計數器 = 0 then
Vc = 目前部位( 總暫結績效 )
If Vc < -30 Then
410 Vf = Vf - 30
420 Show [ K線上方 , ★ ]
430 操作訊號( 多單平倉 , 1口 , V[COLOR=#f70909]f[/COLOR] )
440 操作訊號( 空單建倉 , 1口 , V[COLOR=#f70909]f[/COLOR] )
450 Vf = 目前部位( 第 [COLOR=#f70909]1[/COLOR] 次成本價位 )
470 Vt = 2
[SIZE=2] 單K計數器 = 1[/SIZE]
[SIZE=2] else[/SIZE]
[SIZE=3][SIZE=2] Vf = Vf - 30
Show [ K線上方 , ★ ]
操作訊號( 多單平倉 , 1口 , V[COLOR=#f70909]f[/SIZE] )
操作訊號( 空單建倉 , 1口 , V[COLOR=#f70909]f[/COLOR] )
Vf = 目前部位( 第 [COLOR=#f70909]1[/COLOR] 次成本價位 ) [/SIZE]
Vt = 2 [/COLOR]
[SIZE=3] end if[/SIZE]
End if
480 ElseIf Vt = 2 Then
[SIZE=3]if 單K計數器 = 0 then[/SIZE]
[SIZE=2] 490 Vc = 目前部位( 總暫結績效 )
500 If Vc < -30 Then
510 Vf = Vf + 30
520 Show [ K線下方 , ※ ]
530 操作訊號( 空單平倉 , 1口 , V[COLOR=#f70909]f[/SIZE] )
550 Vt = 0 [/COLOR]
[SIZE=2] [SIZE=3]單K計數器 = 1[/SIZE]
560 End If [/SIZE]
[SIZE=2] else[/SIZE]
[SIZE=2] Vf = Vf + 30
Show [ K線下方 , ※ ]
操作訊號( 空單平倉 , 1口 , V[COLOR=#f70909]f[/SIZE] )
Vt = 0
[/COLOR][SIZE=2] end if
[/SIZE] 570 End If
([COLOR=#f70909]停損空單反手比照上面[/COLOR])
770 End if
780
790 // 收盤
800 If 1分_K線時間 = 1340 Then
810 If 目前部位( 倉位多空 ) > 0 Then
820 Show [ K線上方 , ※ ]
830 操作訊號( 多單平倉 , 1口 , Vk )
840 End If
850 If 目前部位( 倉位多空 ) < 0 Then
860 Show [ K線下方 , ※ ]
870 操作訊號( 空單平倉 , 1口 , Vk )
880 End If
890 End If
[COLOR=#f70909]程式改好以後再試Run一下。[/COLOR]
另外,若有寄「保留優惠權益」者,費用照之前收費標準。
kimoze1,2010-01-10 23:24:07
110的單K計數器
在130的位置要再下一次指令嗎?
另外
單K計數器可以重複用嗎?
例如已經設定多空進場使用單K計數器0的位置
反手一樣也可以在使用單K計數器0的位置嗎?
= =
97 1 8: 此主題共有3帖 此頁3帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時78.1毫秒 請求2次
|