120  REM
130  DIM A$[100],B$[100]
140  PRINT "How many pages for system log ";
150  INPUT C
160  PRINT 
170  PRINT "Please adjust paper at perforation, press <RETURN>"
180  ENTER 255,Z9,A$
190  IF Z9<1 THEN 180
200  A$="_________/ ________  |__________________|"
210  B$="           ________  |"
220  FOR I=1 TO C
230  GOSUB 330
240  FOR J=1 TO 8
250  PRINT  USING 260;A$,B$
260  IMAGE /2x  43a, 28("_")// 2x 22a 1x, 48("_")// 13x,  60("_")
270  PRINT 
280  NEXT J
290  PRINT LIN(2)
300  NEXT I
310  PRINT LIN(3)
320  END 
330  REM(C) ********************************************  page heading
340  PRINT LIN(1)
350  PRINT "              S Y S T E M  L O G            OPERATOR______________"
360  PRINT "_____________________________________________________________________"
370  PRINT 
380  PRINT "    date      time/          Activity         Description/ Comment"
390  PRINT "              operator"
400  RETURN 
410  END 
