反自公 -34ページ目

反自公

ぷー

今朝から新システム稼働です


珍しく寄り引け、寄り寄り共にサインが出て2枚売り


雲行き怪しいのですが、どうか初戦勝利で飾って下さい


そんな売りか買いか見ている時、売りでも買いでもサイン出てるんちゃうんと少し思う事が有りました。結局売りだけだったのですが


でもその場合はどっちを優先するの?とプロシージャを見直してて気付きました


そのプロシージャはこんなん

'水
ElseIf wsk.Range("b" & p).Value = "水" Then
'売り
If th * st * sd * sw = 1 Or sb * ss * sd * tl = 1 Then
wsk.Range("ag" & p).Value = -wsk.Range("r" & p).Value
End If
'買い
If sl * sc * sx = 1 Or sf * sc * sx = 1 Or sx * ss * sc * tl Then
wsk.Range("ag" & p).Value = wsk.Range("r" & p).Value
End If

売り条件に合ったら-で、買い条件に合ったら+で結果入力


この2つのIf構文は元々Elseifで繋がってたのですが、売りだけ買いだけで検証するためにばらしたのです


よく考えたら繋がってたら売りが優先なのに、ばらしたら買いが優先されるんですよね


朝から良い気づきがあったのでブログ少々


改善された損益