Casio FP-200 - Page 147

GAME
670 IF TX2>17 THEN TX2=17
680 IF TY2<1 THEN TY2=1
690 IF TY2)5 THEN TY2=5
700 GOSUB 770
710 LOCATE SXS,SYS:PRINT" ":RETURN
720 IF SX<13 THEN SX=13
730 IF SX)17 THEN SX=17
740 IF SY<1 THEN·SY=l
750 IF SY>S THEN SY=S
760 GOTO 600
770 LOCATE SXS, SYS: PR INT" ": LOCATE TX2S, TY2S: F'f..:IN
T" ":RETURN
780 CLS:PRINT"*** GAME OVER ***":LOCATE 3,3:PRINT
" SCORE="; Bt(: END
The INKEY$ function of the FP-200 obtains one character of input from the
buffer. Hence, only one character is read even if the key is kept depfessed. Pressing
the key several times causes
the same number of moves as the l<eystrokes to be
made subsequently. In
order to prevent this, it is advisable to manipulate the key
while
obser.'ing the screen display.
151