diff level1/modules/term_vdg.asm @ 2690:6e40b043d3e0 lwtools-port

Removed coco port, added coco1 and coco2 ports. Cleaned term* descriptors to make unified between Level 1 and Level 2
author Boisy Pitre <boisy.pitre@nuance.com>
date Thu, 19 Jul 2012 10:09:15 -0500
parents
children 678c6848dc12
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/level1/modules/term_vdg.asm	Thu Jul 19 10:09:15 2012 -0500
@@ -0,0 +1,91 @@
+********************************************************************
+* Term - VTIO VDG Device Descriptor
+*
+* $Id$
+*
+* Edt/Rev  YYYY/MM/DD  Modified by
+* Comment
+* ------------------------------------------------------------------
+
+         nam   Term
+         ttl   VTIO VDG Device Descriptor
+
+         ifp1  
+         use   defsfile
+         use   cocovtio.d
+         endc  
+
+tylg     set   Devic+Objct
+atrv     set   ReEnt+rev
+rev      set   $00
+
+* Window descriptor definitions
+szx      set   32         number of columns for display
+szy      set   16         number for rows for display
+         IFGT  Level-1
+wnum     set   0          window number
+sty      set   1          window type
+cpx      set   0          x cursor position
+cpy      set   0          y cursor position
+prn1     set   Black.     foreground color
+prn2     set   Green.     background color
+prn3     set   Black.     border color
+         ENDC
+
+         mod   eom,name,tylg,atrv,mgrnam,drvnam
+
+         fcb   UPDAT.     mode byte
+         fcb   HW.Page    extended controller address
+         fdb   A.TermV    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&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   $01        pause:0=no end of page pause
+         fcb   szy        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$RARR     reprint line character
+         fcb   C$SHRARR   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)
+         IFGT  Level-1
+         fcb   $01        init value for dev ctl reg
+         ELSE
+         fcb   ModCoVDG   init value for dev ctl reg
+         ENDC
+         fcb   $00        baud rate
+         fdb   name       copy of descriptor name address
+         fcb   $00        acia xon char
+         fcb   $00        acia xoff char
+         fcb   szx        (szx) number of columns for display
+         fcb   szy        (szy) number of rows for display
+         IFGT  Level-1
+         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
+         ENDC
+initsize equ   *
+
+name     fcs   /Term/
+mgrnam   fcs   /SCF/
+drvnam   fcs   /VTIO/
+
+         emod  
+eom      equ   *
+         end   
+