<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">********************************************************************
* P - CoCo serial printer device descriptor
*
* $Id$
*
* Ed.    Comments                                       Who YY/MM/DD
* ------------------------------------------------------------------
*        From Tandy OS-9 Level One VR 02.00.00

         nam   P
         ttl   CoCo serial printer device descriptor

* Disassembled 98/08/23 21:15:24 by Disasm v1.6 (C) 1988 by RML

         ifp1  
         use   defsfile
         use   scfdefs
         endc  

tylg     set   Devic+Objct
atrv     set   ReEnt+rev
rev      set   $01

         mod   eom,name,tylg,atrv,mgrnam,drvnam

         fcb   READ.+WRITE. mode byte
         fcb   HW.Page    extended controller address
         fdb   $0000      physical controller address
         fcb   initsize-*-1 initilization table size
         fcb   DT.SCF     device type:0=scf,1=rbf,2=pipe,3=scf
         fcb   $00        case:0=up&amp;lower,1=upper only
         fcb   $00        backspace:0=bsp,1=bsp then sp &amp; bsp
         fcb   $01        delete:0=bsp over line,1=return
         fcb   $00        echo:0=no echo
         fcb   $00        auto line feed:0=off
         fcb   $00        end of line null count
         fcb   $00        pause:0=no end of page pause
         fcb   66         lines per page
         fcb   C$BSP      backspace character
         fcb   C$DEL      delete line character
         fcb   C$CR       end of record character
         fcb   $00        end of file character
         fcb   C$RPRT     reprint line character
         fcb   C$RPET     duplicate last line character
         fcb   C$PAUS     pause character
         fcb   $00        interrupt character
         fcb   $00        quit character
         fcb   $5F        backspace echo character
         fcb   C$BELL     line overflow character (bell)
         fcb   $00        init value for dev ctl reg
         fcb   B600       baud rate
         fdb   name       copy of descriptor name address
         fcb   $00        acia xon char
         fcb   $00        acia xoff char
         fcb   80         (szx) number of columns for display
         fcb   66         (szy) number of rows for display
initsize equ   *

name     fcs   /P/
mgrnam   fcs   /SCF/
drvnam   fcs   /PRINTER/

         emod  
eom      equ   *
         end   

</pre></body></html>