C64 Software  <  SCA: The C64 Software Collection / INFOMAKER PL

  Run
100 PRINT""
110 INPUT"";N$
111 INPUT"";PL$
120 INPUT"";SF$
130 INPUT"";A1
140 INPUT"";X1
150 INPUT"";Y1
160 INPUT"";S1
170 INPUT"";A2
180 INPUT"";X2
190 INPUT"";Y2
200 INPUT"";S2
210 OPEN2,8,2,""+LEFT$(N$,14)+""
220 PRINT#2,""LEFT$(SF$,14)
230 PRINT#2,A1:PRINT#2,X1:PRINT#2,Y1:PRINT#2,S1
240 PRINT#2,A2:PRINT#2,X2:PRINT#2,Y2:PRINT#2,S2
250 PRINT#2,""LEFT$(PL$,14):CLOSE2:GOTO100
READY.