HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> HSQL語言討論區 >> 有關0040的問題
有關0040的問題
pop616,2009-08-01 14:35:22
10 Vf = 5分_SAR回補價( 20 , 0.02 , 0.2 )
20 Vg = 5分_SAR賣出價( 20 , 0.02 , 0.2 )
30
40 If 5分_K線時間 > 0855 And 5分_K線時間 < 1340 Then
50 If Vf = 0 And Vg > 0 Then
60 If 單K計數器( 目前K線 , 1 ) = 0 Then
70 If 目前部位( 倉位多空 ) <= 0 Then
80 Show [ K線下方 , ↑ ]
90 Va = 5分_開盤價
100 Vb = 5分_最低價 - 15
110 S2$ = '多' + Cstr( Va )
120 顯示文字[ S2$ , 主畫面 , ( 0 , Vb ) , 字型: MS Sans Serif , 大小: 008 , 顏色: 16777215 ]
130 操作訊號( 空單平倉 , 1口 , Va )
140 操作訊號( 多單建倉 , 1口 , Va )
150 單K計數器( 目前K線 , 0 ) = 單K計數器( 目前K線 , 0 ) + 1
160 If 最後K線 = 是 And 單K計數器( 目前K線 , 0 ) = 2 Then
170 S1$ = '1'
180 輸出命令檔( c:\cur_cmd.txt , [yyyy]/[mm]/[dd]□[hh]:[nn]□[S1$] )
190 單K計數器( 目前K線 , 1 ) = 1
200 End If
210 End If
220 Else
230 Va = 5分_開盤價
240 Show [ K線下方 , ↑ ]
250 操作訊號( 空單平倉 , 1口 , Va )
260 操作訊號( 多單建倉 , 1口 , Va )
270 End If
280 Else
290 單K計數器( 目前K線 , 0 ) = 0
300 End If
310
320 If Vf > 0 And Vg = 0 Then
330 If 單K計數器( 目前K線 , 2 ) = 0 Then
340 If 目前部位( 倉位多空 ) >= 0 Then
350 Show [ K線上方 , ↓ ]
360 Va = 5分_開盤價
370 Vb = 5分_最高價 + 15
380 S2$ = '空' + Cstr( Va )
390 顯示文字[ S2$ , 主畫面 , ( 0 , Vb ) , 字型: MS Sans Serif , 大小: 008 , 顏色: 16777215 ]
400 操作訊號( 多單平倉 , 1口 , Va )
410 操作訊號( 空單建倉 , 1口 , Va )
420 單K計數器( 目前K線 , 3 ) = 單K計數器( 目前K線 , 3 ) + 1
430 If 最後K線 = 是 And 單K計數器( 目前K線 , 3 ) = 2 Then
440 S1$ = '-1'
450 輸出命令檔( c:\cur_cmd.txt , [yyyy]/[mm]/[dd]□[hh]:[nn]□[S1$] )
460 單K計數器( 目前K線 , 2 ) = 1
470 End If
480 End If
490 Else
500 Va = 5分_開盤價
510 Show [ K線上方 , ↓ ]
520 操作訊號( 多單平倉 , 1口 , Va )
530 操作訊號( 空單建倉 , 1口 , Va )
540 End If
550 Else
560 單K計數器( 目前K線 , 3 ) = 0
570 End If
580 End If
幾個問題請教∼
1.是不是應該把行號80∼150改到160以後,
跟300∼370改到380以後呢???
這樣是不是才比較符合重複兩次的精神呢?
抑或是不會影響???
2.若是照現在程式的語法,是不是會不斷閃爍箭頭?
成立才輸出訊號???
但箭頭跟訊號並不一定同時存在?
3.不好意思,因現在並無即時訊號可測試,只是提出來討論討論∼
請大大解釋一下∼
pop616,2009-08-01 14:38:16
更正更正∼
應該是80∼140
跟350∼410∼
Hunta,2009-08-01 15:47:54
對的!!
程式應該照你說的搬移才比較符合重複兩次的精神。
星期一可以試Run看看,應該是沒問題了才對[EM41]!!
pop616,2009-08-01 16:44:21
大大∼在請問
220~270
490~540
這兩段的用意可否解釋一下呢?
是有什麼用意呢?
因為盤後完全看不到作用耶???
不好意思∼問題很多!
另外∼可否用goto的方式來寫呢??
謝謝
pop616,2009-08-01 17:00:16
版大∼
我將行號搬移後∼卻完全沒訊號耶??
怎麼會這樣??
回測也不行∼
Hunta,2009-08-01 17:17:29
[QUOTE][B]下面引用由[U]pop616[/U]發表的內容:[/B]
版大∼
我將行號搬移後∼卻完全沒訊號耶??
怎麼會這樣??
回測也不行∼[/QUOTE]
因為訊號必須在[U]最後一根K線[/U]並且[U]掃兩次[/U]才算成立,而你現在事後掃描,它(之前的K線)永遠不會是最後一根K線,所以不可能會成立;但是,若你是在盤中從頭到尾持續掃描到最後(不可中途中止),那麼訊號就會出現!!(回測不出現,也是同樣道理)
pop616,2009-08-01 17:27:28
嗯嗯∼懂了.....
那請問四樓的問題∼謝謝
Hunta,2009-08-01 17:27:54
[QUOTE][B]下面引用由[U]pop616[/U]發表的內容:[/B]
大大∼在請問
220~270
490~540
這兩段的用意可否解釋一下呢?
是有什麼用意呢?
因為盤後完全看不到作用耶???
不好意思∼問題很多!
另外∼可否用g...[/QUOTE]
行號220~270及490~540是當K線已換到後面K線時,只要發現該根K線的單K計數器(1)or(2)不等於0,代表當初有出現(多或空)訊號,所以直接顯示↑or↓符號,並且進行多空單進出場操作。
Goto這個指令建議少用,因為若使用不慎,容易造成程式邏輯大亂,必須小心使用。
pop616,2009-08-03 06:43:15
版大~
我在修改了一下檔案,改用next bar,
且改成訊號一次成立~
卻仍舊好像不太對,已經把檔案寄給你~
共兩個~sar1是將執行令拆兩段~
sar2是合成一段,照理說應該是一樣的吧,
但2不能跑~
麻煩您幫我看一下~
謝謝
Hunta,2009-08-03 08:15:17
[SIZE=3]跟之前一樣,因為訊號必須在[U]最後一根K線[/U]才算成立,而你現在事後掃描,它(之前的K線)永遠不會是最後一根K線,所以不可能會成立;但是,若你是在盤中從頭到尾持續掃描到最後(不可中途中止),那麼訊號就會出現!![/SIZE]
97 1 8: 此主題共有10帖 此頁10帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時62.5毫秒 請求2次
|