10 POKE53281,2:POKE53280,2
15 PRINT"[158][147]"
20 PRINT"   [215]ARNING!"
30 PRINT:PRINT
40 PRINT"[217]OU ARE ABOUT TO EXIT THE [204][207][193][196][211][212][193][210]"
50 PRINT:PRINT"ENVIRONMENT."
60 PRINT:PRINT"[208]RESS 1 TO RUN THE RANDOM GAME OF [204][201][198][197]."
70 PRINT:PRINT"[208]RESS 2 TO RUN THE INPUT GAME OF [204][201][198][197]."
72 PRINT:PRINT"[208]RESS 3 TO RETURN TO [204]OADSTAR."
80 PRINT:PRINT"[215]HICH?"
90 GETK$:IFK$=""THENGOSUB60000:GOTO90
100 POKE53280,RND(1)*15
110 K=VAL(K$)
120 ONKGOTO61000,62000,63000:GOTO90
60000 IFC=0THENC=1:GOTO60005
60002 C=0
60005 IFC=0THENPRINT"   [215]ARNING!"
60010 IFC=1THENPRINT"   [215]ARNING!"
60020 RETURN
61000 REM  CONNECT TO LIF64RND
61002 PRINT"[147]LOAD"CHR$(34)"LIF64RND"CHR$(34)",8":PRINT"RUN"
61004 POKE198,0:POKE631,13:POKE632,13:POKE198,2:END
62000 REMCONNECT TO ACTUAL ENTERY PGM
62002 PRINT"[147]LOAD"CHR$(34)"LIF64INP"CHR$(34)",8":PRINT"RUN"
62004 POKE198,0:POKE631,13:POKE632,13:POKE198,2:END
63000 REM    CONNECT BACK TO L.S.
63002 PRINT"[147]LOAD"CHR$(34)"PAYLOAD"CHR$(34)",8":PRINT"RUN"
63004 POKE198,0:POKE631,13:POKE632,13:POKE198,2:END