home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nibble Magazine
/
nib11.dsk
/
CTRL-PRINTER.bas
< prev
next >
Wrap
BASIC Source File
|
2023-02-26
|
589b
|
19 lines
10 REM **********************
20 REM * CTRL-PRINTER *
30 REM * BY LESLIE GLASSER *
40 REM * COPYRIGHT (C) 1982 *
50 REM * BY MICRO-SPARC INC *
60 REM * LINCOLN, MA. 01773 *
70 REM **********************
80 DATA 201,141,240,6
90 DATA 201,160,176,2
100 DATA 105,96,76,2,93
110 FOR I = 768 TO 780
120 READ V: POKE I,V: NEXT
130 PRINT CHR$(4)"PR#1"
140 PRINT
150 POKE 43603,0: POKE 43604,3
160 REM POKES $300 INTO $AA53.AA54
170 PRINT "INITIALIZE PRINTER WITH PR#1"
180 PRINT "THEN POKE 43603,0:POKE 43604,3"
190 PRINT "IN ORDER TO LINK IN PRINT DRIVER"