180 Endings
1030 PRINT CHR$(24)"	IS IT A REAL PLA
CE? (Y/N)	";CHR$(24);
1040 A$=INKEY$:IF A$="" THEN 1040 ELSE A $=UPPER$(A$)
1050 IF A$="Y" THEN 1110
1060 IF A$="N" THEN 1140
1070 GOTO 1040
1080 LOCATE PS,VPS:PRINT 0$;" ";:PS=POS( #0):VPS=VPOS(#0): P$7=0$:647(N)=P$
1090 C(N)=1:X(N)=1:N=N41
1100 GOTO 320
1110 LOCATE 1,20:PRINT CHR$(20);:LOCATE 1,20: PEN 2:PRINT"OK..I BOW TO YOUR SUPE RIOR	KNOWLEDGE'!" :PEN 1:M2=M2+1
1130 PEN 2:PRINT"I' LL START NOW ".P EN 1:LOCATE PS,VPS:PRINT 0$;" ";:PS=POS( #0):VPS=VPOS(#0):P$="":GOSUB 1180:GOTO 3 20
1140 LOCATE 1,20:PRINT CHR$(20);:LOCATE 1,20: PEN 3:PRINT"YOU ARE VERY HONEST.TH ANK YOU.";:PEN 1
1150 M1=M1+1
1160 P$="":PEN 2:PRINT"YOU START NOW.... .":GOSUB 1180:GOTO 850
1165 STOP
1170 REM SCORE ROUTINE
1180 PEN 3:LOCATE 1,2:PRINT SPACE$(31);: LOCATE 1,2:PRINT"SCORE IS";:PEN 1:PRINT M1;:PEN 3:PRINT"TO ME AND";:PEN 1:PRINT M2;:PEN 3:PRINT"TO YOU":PEN 1:FOR VV=1 T 0 2000:NEXT:RETURN