実験作

不具合と奮闘中。

For i = 1 To 240
ClearPicture
Oval 240 240 (240 - i) 1

If 攻撃方向 = 左右 Then
If KeyState(37) = 1 Or KeyState(39) = 1 Then
対応回避 = 成功
Break
Else
対応回避 = 失敗
Break
EndIf
EndIf

Wait 1.06
Refresh
Next

↑んな感じで【とりあえず】は作ってみました。
これを
準備アニメで呼び出す→円が最小になる前に入力する
→キーボードの左右なら成功→回避を上げる処理
→攻撃を回避という流れなのですが

何だかWait処理まですっ飛ばされてる？