10 F$="NT":PRINT"[147]  THIS PROGRAM WILL CREATE A MACHINE"
20 PRINT"  LANGUAGE OBJECT FILE CALLED
30 [153]"  "[199](34)"INPUT.OBJ" [199](34)". YOU ARE GIVEN THE
40 PRINT"  OPTION TO SAVE THIS FILE TO TAPE OR"
50 PRINT"  DISK. SINCE THE GAZETTE DISK IS WRITE
60 [153]"  PROTECTED "[199](34)"INPUT.OBJ"[199](34)" HAS BEEN CREATED
70 PRINT"  FOR YOU AND IS INCLUDED ON THIS DISK.
80 [153]"  TO CREATE ANOTHER COPY, INSERT A"
90 [153]"  DIFFERENT DISK OR TAPE AND PRESS"
100 [153]"  <RETURN>. PRESS ANY OTHER KEY TO
110 PRINT"  RELOAD THE MENU."
120 POKE198,0:WAIT198,1:GETMT$
130 IFMT$=CHR$(13)THENF$="INPUT WINDOWS":CK=1
140 REM POKE53280,14:POKE53281,14:PRINT"[147][154]LOAD";CHR$(34);F$;CHR$(34);",8"
141 POKE53280,14:POKE53281,14:PRINT"[147]":IFCKTHENGOSUB190
142 PRINT"[154]LOAD";CHR$(34);F$;CHR$(34);",8"
160 A$=CHR$(13)+"RUN"+CHR$(13)
170 FORI=1TOLEN(A$):POKE630+I,ASC(MID$(A$,I)):NEXT:POKE198,I-1
180 NEW
190 PRINT"       LOADING "CHR$(34)"INPUT WINDOWS"CHR$(34):RETURN