1800   IF V$="K" THEN GOTO {fixup:skip}
1800.1 GOTO {fixup:after-next-goto}
1800.2 A$="+K+"
1800.3 GOTO {fixup:end}
1800.4 IF V$="R" THEN GOTO {fixup:skip}
1800.5 GOTO {fixup:after-next-goto}
1800.6 A$="?R?"
1800.7 GOTO {fixup:end}
1800.8 IF V$="M" THEN GOTO {fixup:skip}
1800.9 GOTO {fixup:end}
1800.a A$="!M!"
1800.b Z1=R1
1800.c Z2=R2
1800.d REM