117 doesn’t a zero is returned. Numbers which are embedded in other characters are ignored. So 10 A$="124ABC56" 20 PRINT VAL(A$) will print 124 . However, back to the outline of a hangman program. 10 MODE 7 20 W=RND(12):
REM 12 WORDS TO CHOOSE FROM 30 FOR X= 1 TO W 40 READ A$ 50 NEXT X 60 REM WE HAVE SELECTED A RANDOM WORD 70 REM NOW GIVE THE USER CHANCES TO 80 REM GUESS LETTERS IN THE WORD 90 L=LEN(A$) 100 CORRECT=0 110 TRIES=0 120 PRINT TAB(0,5); "The word has ";L;"letters" 130 PRINT TAB(0,6);"You have ";2*L;"tries" 140 REPEAT 150 PRINT TAB(10,7);"GUESS A LETTER"; 160 G$=GET$ 170 PRINTTAB(25,7);G$ 180 P=0 190 REPEAT 200 P=INSTR(A$,G$,P+1) 210 IF P 0 THEN PRINT TAB(P+12,15);G$ 220 IF P 0 THEN CORRECT=CORRECT +1 225 IF P=L THEN P=0 230 UNTIL P=0 240 TRIES=TRIES+1 250 PRINT TAB(0,0);"TRIES ";TRIES; TAB(20,0);"CORRECT ";CORRECT 260 UNTIL (CORRECT=L OR TRIES=2*L) 270 IF CORRECT =L THEN PRINT TAB(10,19); "Congratulations" 280 IF TRIES=2*L THEN PRINT TAB(0,16);"The word was ";A$ 290 DATA NOTWITHSTANDING 300 DATA INQUISITION 310 DATA MONUMENTAL 320 DATA PRESCRIPTION