Super Problem of DOOM PLZ HELP

[Ambivalentiowa]

Or you could try this:

If Inniative = 1 Then 
FrmBattle.ImgTop = LoadPicture(App.Path + "/forest.bmp") 
FrmBattle.List1.AddItem ("You won inniative, proceed with battle..") 
goto 10:

and then at the end of the repeat, do this:

End If 
10:
FrmChooseAction.Show 
End Sub