Hunta |
門派 管理員 職務 總版主 級別 法老 聲望 +100000 財富 100002 積分 101915 經驗 642850 文章 1733 註冊 09-04-10 17:15
|
|
|
發表: 2010-01-09 11:27:07 | 第2樓 |
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]
另外,若有寄「保留優惠權益」者,費用照之前收費標準。 |
|
|