ag@floyd.ATT.COM (03/08/89)
I'm looking for a parallel printer driver that supports the J&M Disk
Controller with the parallel port. There was such an animal a while
back on Delphi, but it has disappeared. Any info would be appreciated....
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
________
/_______/| __________________________
| ||----->/ / Ag Primatic
| ||<----/_________________________/ ag@floyd.ATT.com
|_______|/ / / / / / / / / / / /
/oooooooo/ /_________________________/
/oooooooo/
---------
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=dnelson@umbio.MIAMI.EDU (Dru Nelson) (03/14/89)
in article <42053@clyde.ATT.COM>, ag@floyd.ATT.COM says: > Xref: umbio comp.os.os9:394 comp.sys.m6809:220 > > I'm looking for a parallel printer driver that supports the J&M Disk I have it in the manual. I will type it in and post it here. It is not large. . -- Dru Nelson UUCP: ....!uunet!gould!umbio!dnelson Miami, Florida MCI: dnelson Internet: dnelson%umbio@umigw.miami.edu
dnelson@umbio.MIAMI.EDU (Dru Nelson) (03/14/89)
in article <42053@clyde.ATT.COM>, ag@floyd.ATT.COM says: > Xref: umbio comp.os.os9:394 comp.sys.m6809:220 > > I'm looking for a parallel printer driver that supports the J&M Disk > Controller with the parallel port. There was such an animal a while > back on Delphi, but it has disappeared. Any info would be appreciated.... > As promised p1.dr nam cpprint ttl Parallel Printer Driver ************************** * Printer Port Equates ************************** cp.port equ $FF44 Data Port cp.stat equ $FF4C Status Port cp.busy equ $01 ************************** * OS9 Def Files ************************** use /dd/defs/os9defs opt l I can't tell if it is an L or 1 opt l I used the L (lower case), I am not familiar with assembler (Yet!) use /dd/defs/scfdefs opt l ************************** * Static Storage ************************** CPMEM equ V.SCF+1 ************************** * Module Header ************************** mod cplen, cpnam, drivr+objct+reent+1 fdb cpent Execution Offset fdb cpmem Permanent Storage Size cpnam fcs "cpprint" fcb 1 Edition Number ************************** * Branch Table ************************* cpent lbra init lbra read lbra write lbra getsta lbra putsta lbra term ************************** * Write to Printer ************************** write equ * ldb cp.stat read status bitb #cp.busy test busy bit bne write loop back if busy sta cp.port write out data clrb rts done return ************************** * Do Nothing Entry ************************** init equ * read equ * getsta equ * putsta equ * term equ * clrb rts emmod cplen equ * end ------------------------------------------------------------------- p1.dd nam P1 ttl Parallel Printer Device Descriptor ************************** * OS9 Def Files * Note: since these occur before * the 'mod' statemen, none of the 'rmb's, etc will become * part of the memory resident module. ************************** use /dd/defs/os9defs opt l I can't tell if it is an L or 1 opt l I used the L (lower case), I am not familiar with assembler (Yet!) use /dd/defs/scfdefs opt l ************************** * Module Header ************************** mod p1end, p1nam, devic+objct+reent+1 fdb p1fmgr SCF Name String fdb p1dvr Driver Name String fcb $52 Public Write Mode fcb $ff I/O Page fcb $ff40 Base of Controller fcb it.end-it Top init table size ************************** * Initialization Table ************************** it.top equ * Top of Init Table it.dvc fcb dt.scf SCF Device Type it.upc fcb 0 Upper and Lower Case it.bso fcb 0 Allow backspace it.dlo fcb 1 Backspace over line it.eko fcb 0 No Echo it.alf fcb 0 No Auto LF it.nul fcb 0 End of line null count it.pau fcb 0 No end of page pause it.pag fcb 66 Lines per page it.bsp fcb $08 Backspace char it.del fcb $18 Delete character it.eor fcb $0D End of Record Char it.eof fcb 0 End of File Char it.rpr fcb $04 Reprint Last line char it.dup fcb $01 DUP last line char it.psc fcb $17 Pause char it.int fcb 0 Interupt char it.qut fcb 0 Quit Char it.bse fcb $57 Backspace Char it.ovf fcb $07 Line overflow char it.par fcb 0 Parity code it.bau fcb $04 Acia Baud Rate (Well I guess you can tell where they got there driver copied from) it.end equ * End of init table ************************** * Name Strings ************************** p1nam fcs "P1" Device Name p1fmgr fcs "SCF" File Manager Name p1dvr fcs "CPPRINT" Name of Driver ************************** * End of Module Ritual ************************** emmod p1end equ * end Just glad to finally give something back to the coco community. -- Dru Nelson UUCP: ....!uunet!gould!umbio!dnelson Miami, Florida MCI: dnelson Internet: dnelson%umbio@umigw.miami.edu
ag@floyd.ATT.COM (03/14/89)
In article <1477@umbio.MIAMI.EDU> dnelson@umbio.MIAMI.EDU (Dru Nelson) writes: >in article <42053@clyde.ATT.COM>, ag@floyd.ATT.COM says: >> Xref: umbio comp.os.os9:394 comp.sys.m6809:220 >> >> I'm looking for a parallel printer driver that supports the J&M Disk >> Controller with the parallel port. There was such an animal a while >> back on Delphi, but it has disappeared. Any info would be appreciated.... >> > >As promised > >p1.dr > > (Rest of code deleted....) OK, that's wonderful. Now, my biggest problem is how to assemble this using RMA, my whiz-bang brand-spanking-new assembler from RS. I don't have ASM (which is getting to be a major inconvenience), and I can't seem to find a way to get the linker to write the module header correctly, specifically the mode byte at 0x0d. Any suggestions? I'm not entering this by hand!!! -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= ________ /_______/| __________________________ | ||----->/ / Ag Primatic | ||<----/_________________________/ ag@floyd.ATT.com |_______|/ / / / / / / / / / / / /oooooooo/ /_________________________/ /oooooooo/ --------- -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
wynkoop@esquire.UUCP (Brett Wynkoop) (03/17/89)
In article <42423@clyde.ATT.COM> ag@floyd.UUCP (Agesino Primatic) writes: >In article <1477@umbio.MIAMI.EDU> dnelson@umbio.MIAMI.EDU (Dru Nelson) writes: >>in article <42053@clyde.ATT.COM>, ag@floyd.ATT.COM says: >>> Xref: umbio comp.os.os9:394 comp.sys.m6809:220 >>> >>> I'm looking for a parallel printer driver that supports the J&M Disk >>> Controller with the parallel port. There was such an animal a while >>> back on Delphi, but it has disappeared. Any info would be appreciated.... >>> >> >>As promised >> >>p1.dr >> >> (Rest of code deleted....) > >OK, that's wonderful. Now, my biggest problem is how to assemble this >using RMA, my whiz-bang brand-spanking-new assembler from RS. I don't >have ASM (which is getting to be a major inconvenience), and I can't >seem to find a way to get the linker to write the module header correctly, >specifically the mode byte at 0x0d. Any suggestions? I'm not entering >this by hand!!! Greeting- Go to radio shack and buy the upgrade to v2.00 of level 1. It has a lot of utilities you need anyway, as well as an asembler that will handle the job. It only costs $25. It is part # 26-3030. If they do not have it then ask them to order it for you. -Brett uucp .....cmcl2!esquire!wynkoop
bgun@trwind.UUCP (Bill Gunshannon) (03/19/89)
In article <1476@umbio.MIAMI.EDU>, dnelson@umbio.MIAMI.EDU (Dru Nelson) writes: > in article <42053@clyde.ATT.COM>, ag@floyd.ATT.COM says: > > Xref: umbio comp.os.os9:394 comp.sys.m6809:220 > > > > I'm looking for a parallel printer driver that supports the J&M Disk > > I have it in the manual. I will type it in and post it here. It is > not large. > While your at it, is there a device driver in your book for the COCO ACIA pack under OS9 level 1. I have been unable to get the RS232 Pack to do anything but put any process attached to it to sleep. Anybody out there that can help??? bill gunshannon bgun@trwind.ind.TRW.COM