home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS 1992 June
/
SIMTEL_0692.cdr
/
msdos
/
pctech
/
apr86.arc
/
PRRESET.BAS
< prev
next >
Wrap
BASIC Source File
|
1985-11-03
|
195b
|
8 lines
10 ' Interpreted BASIC program
20 ' to reset any parallel printer
30 DEF SEG = &H40
40 PORTNO = 2 + PEEK(8) + 256*PEEK(9)
50 OUT PORTNO,232
60 FOR DELAY = 1 TO 50: NEXT
70 OUT PORTNO,236