Endings 179
730 PEN 3:PRINT" YOU DARE TO CHALLENGE?" 740 FOR J=1 TO 600:NEXT
750 IF L5=1 THEN L5=0: GOTO 810
760 PEN 2:PRINT"YOU ARE WRONG! ";:PEN 3: PRINT GS(0):PEN 1
770 PRINT CHRS(24)"CHECK IF YOU DON'T BE LEIVE ME!";CHRS(24);
780 M1=M1+1
800 X(Q)=1:PS="":PRINT"YOU START NEXT... ..":GOSUB 1180:GOTO 850
810 PRINT "I OWN UP	YOU'RE RIGHT.I M
ADEIT UP'/'//":PEN 2:PRINT"I WILL STA RT AGAIN. ..... ":PEN 1
820 M2=M2+1:PS="":GOSUB 1180:GOTO 320 830 REM COMPUTERS GO COMPLETE
840 X(0)=1:GOTO 850
850 LOCATE 1,20:PRINT CHR$(20):LOCATE 1, 20:INPUT OS:IF Q$="" THEN 850 ELSE QS=UP PERS(0$)
860 IF PS="" THEN 910
870 B$= RIGHTS(PS,1)
880 IF BS=LEFTS(QS,1) THEN 910
890 PRINT CHR$(24)"	ILLEGAL ENTR
Y 		WRONG INITIAL LETTER
";CHR$(24)
900 FOR VV=1 TO 2000: NEXT: GOTO 850 910 REM CHECKED AND 0.K
920 FOR J=1 TO N
930 IF GS(J)=Q$ AND X(J)=1 THEN 960 940 IF GS(J)=0$ THEN X(J)=1:GOTO 970 950 NEXT J:GOTO 970
960 LOCATE 1,21: PRINT CHR$(24)"
NOT ACCEPTABLE 	IT'S B
EEN USED BEFORE..";CHRS(24);:FOR VV=1 TO 2000: NEXT:GOTO 850
970 REM DOES THE COMPUTER CHALLENGE 9eo IF RND>0.5 THEN 1000
990 GOTO 1080
1000 SOUND 1,120,5:PEN 2:PRINT"CHALLENGE '":PEN 1
1010 PRINT CHRS(24)"I DON'T BELEIVE YOU. ";CHR$(24)
1020 PEN 2:PRINT"NOW YOU WILL HAVE TO BE HONEST BECAUSE IT IS NOT IN MY DATA!!" :PEN 1