Admin |
門派 管理員
職務 總版主
級別 法老
聲望 ＋1000000
財富 1000000
積分 1000001
經驗 644
文章 3
註冊 08-02-02 00:00
|
|
 |
 發表: 2010-11-12 09:36:04   | 第2樓 |
針對多單部份修改如下，其餘可自行修改
20 // 紅K多單
30 If 目前部位( 倉位多空 ) >= 0 Then
If 單K計數器( 目前K線 , 0 ) = 0 Then
40 If 前1_15分_收盤價 > 前1_15分_開盤價 Then
50 If 15分_收盤價 > 前1_15分_收盤價 Then
60 Show [ K線下方 , 多 ]
70 Va = 前1_15分_收盤價
80 操作訊號( 多單建倉 , 1口 , Va )
110 S1$ = '1'
120 輸出命令檔( R:\rbk.txt , [yyyy]/[mm]/[dd]□[hh]:[nn]:[ss]□[S1$]□□ , 不限 )
130 單K計數器( 目前K線 , 0 ) = 1
140 End If
150 End If
Else
Show [ K線下方 , 多 ]
Va = 前1_15分_收盤價
操作訊號( 多單建倉 , 1口 , Va )
160 End If
170 End If
180
360 // 紅K多單平倉
370 If 目前部位( 倉位多空 ) > 0 Then
If 單K計數器( 目前K線 , 1 ) = 0 Then
380 If 前1_15分_收盤價 > 前1_15分_開盤價 Then
390 If 15分_收盤價 < 前1_15分_開盤價 Then
400 Show [ K線上方 , ↓ ]
410 Vb = 前1_15分_開盤價
420 操作訊號( 多單平倉 , 全數 , Vb )
450 S1$ = '0'
460 輸出命令檔( R:\rbk.txt , [yyyy]/[mm]/[dd]□[hh]:[nn]:[ss]□[S1$]□□ , 不限 )
470 單K計數器( 目前K線 , 1 ) = 1
480 End If
490 End If
Else
Show [ K線上方 , ↓ ]
Vb = 前1_15分_開盤價
操作訊號( 多單平倉 , 全數 , Vb )
500 End If
510 End If |
|
|
