HANGMAN Bn=158: i=(*7) i;"*HIGH SOFT* ";  5 n -:236099\,25:23658j\,8 82;7,6;"H A N G M A N":100d: 1;"YOU CAN CHANGE THE WORDS BY ALTERING THE DATA LINES;BUT IF THE NUMBER OF WORDS IS INCREASED OR DECREASED,ALTER LINES 30,50 & 80 TO MATCH THE NEW NUMBER OF WORDS.":300,::20 HANGMAN 7:0:0: W$(502,10 ) C$="":FL=0 &SC=0:NW=0: 2J=1502:W$(J) <J PR=(*502)+1 ULC=0:CT=10 Z;2;1,4;"WORDS:";NW;" SCORE: ";SC d J=10 1-1 n A$=W$(R,J) xA$" "150 CT=CT-1 J J=1CT 16,11 +J;"-":J G$= 7G$>"a"G$<"z"3,6;"PLEASE USE CAPITALS" G$<"A"G$>"Z"200 0.2~L,9 J=1CT 1G$=W$(R,J)16,11 +J;G$:FL=1 J C$="" J=110 T$=(16,11 +J) C$=C$+T$:J J C$=W$(R)470 #FL=1Fl=0:190 +5;9 ;20,LC+4;G$ LC=LC+1 LC1300, /110n,62>:4;20,0 " 190 ,LC23106 ./120x,62>:4;0,60< 0 190 6LC3320@ 8;120x,122z:4;20,0:190 @LC4330J B<140,122z:4;0,-10 :190 J=LC5340T:6;140,107k,4 M[139,108l:142,108l:139,106j:3,0:190 TLC6350^ V<140,102f:2;0,-15:190 ^LC7360h `=140,102f:2;-5,-11 :190 hLC8370r j<140,102f:2;5,-11 :190 rLC9 380| tW140,87W:5;-5,-12 :5;-1,1:190 |LC10 390 ~U140,87W:5;5,-12 :5;1,1:190 2140,102f:1;-5,-11 1140,101e:2;-10 ,0 1140,102f:1;5,-11 0140,101e:2;10 ,0 2,-17 1140,101e:1;-10 ,0 2140,102f:2;-5,-11 0140,101e:1;10 ,0 <140,102f:2;5,-11 :540 J=-772 :0.2~L,J J 1,9 :300, *SC=SC+1:NW=NW+1::80P J=7-7-2  0.2~L,J J &1,-9 :300, DNW=NW+1: X;2;9 ;10 ,4;"THE WORD WAS ";W$(R) b300,::80P 1"SCHOOL","TOMORROW","ADDRESS","LENGTH","EXPERT" 4"KETTLE","COMPUTER","LEGIBLE","MEDICINE","BELIEVE" 4"MYSTERY","DOLPHIN","FEBRUARY","BLANKET","SPECIAL" 6"PAVEMENT","FRAGILE","DIFFICULT","RHUBARB","PENGUIN" 2"ALPHABET","DAFFODIL","YACHT","SQUARE","THROUGH" 3"TONGUE","RASPBERRY","CUSHION","SOLDIER","GENIUS" 3"SPECTRUM","CYLINDER","OIL","DISPENSER","SCATTER" 5"CIRCUIT","DEFINITE","PERCH","CONSTRUCT","QUESTION"  6"WEATHER","DISTURB","EXHAUST","MOVEMENT","SEMBLENCE" 6"BANTAM","OCTOBER","SEPTEMBER","ANNUAL","PROPORTION" ;:i2 SCHOOL TOMORROW ADDRESS LENGTH EXPERT KETTLE COMPUTER LEGIBLE MEDICINE BELIEVE MYSTERY DOLPHIN FEBRUARY BLANKET SPECIAL PAVEMENT FRAGILE DIFFICULT RHUBARB PENGUIN ALPHABET DAFFODIL YACHT SQUARE THROUGH TONGUE RASPBERRY CUSHION SOLDIER GENIUS SPECTRUM CYLINDER OIL DISPENSER SCATTER CIRCUIT DEFINITE PERCH CONSTRUCT QUESTION WEATHER DISTURB EXHAUST MOVEMENT SEMBLENCE BANTAM OCTOBER SEPTEMBER ANNUAL PROPORTIONr ALGYT C DA---D--