CLEAR
ON ERROR GOTO zot
CLS
OPEN "data\enemy.bob" FOR INPUT AS #1
DO
INPUT #1, name$
PRINT name$
w$ = INPUT$(1)
 FOR i = 1 TO 32
 INPUT #1, name$
 NEXT
LOOP
zot: CLOSE #1: BEEP: SYSTEM

'enemy-32
'weapon-38