







300 FOR hm=1 TO 39:READ hm$(hm):NEXT
730 FOR i=1 TO 39
910 FOR i=1 TO 8:IF y$=vt$(i) THEN 1080
1830 IF v$+"dechoir" THEN d=5:GOTO 3410
300 FOR hm=1 TO 38:READ hm$(hm):NEXT
730 FOR i=1 TO 38
910 FOR i=1 TO 8:IF v$=vt$(i) THEN 1080
1830 IF v$="dechoir" THEN d=5:GOTO 3410
5060 LOCATE 15,25:PRINT ap$:CALL &BB18:RETURN
5060 LOCATE 15,24:PRINT ap$:CALL &BB18:RETURN
