view level2/modules/w6.asm @ 0:6641a883d6b0

Initial revision
author boisy
date Thu, 04 Apr 2002 16:34:12 +0000
parents
children b3bfa479f8d0
line wrap: on
line source

         nam   W6
         ttl   OS-9 Level 2 Window descriptor

* Disassembled 98/08/23 22:38:05 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

* Window descriptor definitions
szx      set   80         number of columns for display
szy      set   12         number for rows for display
wnum     set   6          window number
sty      set   $FF        window type
cpx      set   0          x cursor position
cpy      set   12         y cursor position
prn1     set   Black.     foreground color
prn2     set   White.     background color
prn3     set   Red.       border color

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

         fcb   READ.+WRITE. mode byte
         fcb   $07        extended controller address
         fdb   A.W6       physical controller address
         fcb   initsize-*-1 initilization table size
         fcb   $00        device type:0=scf,1=rbf,2=pipe,3=scf
         fcb   $00        case:0=up&lower,1=upper only
         fcb   $01        backspace:0=bsp,1=bsp then sp & bsp
         fcb   $00        delete:0=bsp over line,1=return
         fcb   $01        echo:0=no echo
         fcb   $01        auto line feed:0=off
         fcb   $00        end of line null count
         fcb   $00        pause:0=no end of page pause
         fcb   24         lines per page
         fcb   C$BSP      backspace character
         fcb   C$DEL      delete line character
         fcb   C$CR       end of record character
         fcb   C$EOF      end of file character
         fcb   C$RPRT     reprint line character
         fcb   C$RPET     duplicate last line character
         fcb   C$PAUS     pause character
         fcb   C$INTR     interrupt character
         fcb   C$QUIT     quit character
         fcb   C$BSP      backspace echo character
         fcb   C$BELL     line overflow character (bell)
         fcb   $80        init value for dev ctl reg
         fcb   $00        baud rate
         fdb   name       copy of descriptor name address
         fcb   $00        acia xon char
         fcb   $00        acia xoff char
initsize equ   *
         fcb   szx        (szx) number of columns for display
         fcb   szy        (szy) number of rows for display
         fcb   wnum       window number
         fcb   $01        data in rest of descriptor valid
         fcb   sty        (sty) window type
         fcb   cpx        (cpx) x cursor position
         fcb   cpy        (cpy) y cursor position
         fcb   prn1       (prn1) foreground color
         fcb   prn2       (prn2) background color
         fcb   prn3       (prn3) border color

name     fcc   /W/
         fcb   176+wnum
mgrnam   fcs   /SCF/
drvnam   fcs   /CC3IO/

         emod  
eom      equ   *
         end