LN  IF X GOTO LN.A
        GOTO LN.B
   LN.A Y
        GOTO LN.C
   LN.B Z
   LN.C REM 

##</code><code>##

7130 IF B3<>0 THEN PRINT "FROM E TO S":W1=B4:X=B5:GOTO 6920
9810 IF K$="Y" AND RND(1) <.5 THEN GOTO 9820 ELSE GOTO 9770
8020 IF SO=0 THEN SO=1 ELSE SO=0
4835 IF V$="K" THEN A$="+K+" ELSE IF V$="M" THEN A$="!M!" ELSE IF V$="R" THEN A$="?R?"
1850 IF K3=0 AND EX(Q1,Q2)=0 THEN GOTO 8500 ELSE GOSUB 6000
1800 IF V$="K" THEN A$="+K+" ELSE IF V$="R" THEN A$="?R?" ELSE IF V$="M" THEN A$="!M!":Z1=R1:Z2=R2

##</code><code>##

1800   IF V$="K" THEN GOTO 1800.2
1800.1 GOTO 1800.4
1800.2 A$="+K+"
1800.3 GOTO 1800.d
1800.4 IF V$="R" THEN GOTO 1800.6
1800.5 GOTO 1800.8
1800.6 A$="?R?"
1800.7 GOTO 1800.d
1800.8 IF V$="M" THEN GOTO 1800.a
1800.9 GOTO 1800.d
1800.a A$="!M!"
1800.b Z1=R1
1800.c Z2=R2
1800.d REM