10 DV=PEEK(186):IFDV<8THENDV=8
20 POKE53281,0:POKE53280,0:PRINTCHR$(14)
30 PRINT"[147][217]OU MUST HAVE ALREADY FOLLOWED THE"
40 PRINT"INSTRUCTIONS AND CREATED THE FILE"
50 PRINT"CALLED 'PSYCLOID.BAS'.  [201]F YOU HAVE"
60 PRINT"ALREADY CREATED IT, [211]ELECT ([195]) TO"
70 PRINT"[195]ONTINUE AND LOAD THE 'U.PSYCLOID'"
80 PRINT"ULTRAGEM.  [201]F YOU HAVE [206][207][212] CREATED"
90 PRINT"PSYCLOID.BAS, [211]ELECT ([209]) WHICH WILL"
100 PRINT"RETURN YOU TO THE [213]LTRAGEMS [208]RESENTER"
110 PRINT"PROGRAM."
120 PRINT"[211]ELECT ([195]) OR ([209]) [206]OW"
130 GETZ$:IFZ$=""THEN130
140 IFZ$="C"THEN170
150 IFZ$="Q"THEN210
160 GOTO130
170 PRINT"[147]LOAD"CHR$(34)"U.PSYCLOID"CHR$(34)","DV
180 PRINT"RUN"
190 POKE631,13:POKE632,13:POKE198,2:END
200 OPEN15,8,15,"S0:N.PSYCLOID":CLOSE15:SAVE"N.PSYCLOID",8:END
210 PRINT"[147]LOAD"CHR$(34)"B.ULTRAGEMS II"CHR$(34)","DV
220 PRINT"RUN"
230 POKE631,13:POKE632,13:POKE198,2:END
10000 OPEN15,8,15,"S0:N.PSYCLOID":CLOSE15:SAVE"N.PSYCLOID",8:END