item_potion = 3
DO
CLS
IF item_potion > 0
print "p) Potion (";item_potion;")"
sw_item_potion = 1
else
sw_item_potion = 0
endif
IF item_hipotion > 0
print "h) Hi-Potion (";item_hipotion;")"
endif
IF inkey$() = "b" or inkey$() = "B" then goto main_f_menu
IF sw_item_potion = 1 AND inkey$() = "p" or INKEY$() = "P"
SLEEP 500
CLS
Print "You use potion..."
endif
if (hp + 50) > max_hp
hp = max_hp
else
hp = hp + 50
item_potion = (item_potion - 1)
SLEEP 1000
goto enemy_turn
endif
print
print "b) Back"
LOOP
cleaned up but not checked for logic
-RUST-
