Mercurial > hg > Members > kono > nitros9-code

changeset 1953:8ae0268695b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Appropriate references to symbols placed
author boisy
date Tue, 20 Dec 2005 15:17:26 +0000
parents 0902ccedce07
children e5ad0755bf40
files level2/modules/term_vdg.asm
diffstat 1 files changed, 11 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/level2/modules/term_vdg.asm	Tue Dec 20 15:16:52 2005 +0000
+++ b/level2/modules/term_vdg.asm	Tue Dec 20 15:17:26 2005 +0000
@@ -1,5 +1,5 @@
 ********************************************************************
-* Term - VDG descriptor
+* Term - VTIO VDG Device Descriptor
 *
 * $Id$
 *
@@ -8,9 +8,7 @@
 * ------------------------------------------------------------------
 
          nam   Term
-         ttl   VDG descriptor
-
-* Disassembled 98/08/23 22:38:05 by Disasm v1.6 (C) 1988 by RML
+         ttl   VTIO VDG Device Descriptor
 
          ifp1  
          use   defsfile
@@ -23,6 +21,7 @@
 * 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
@@ -30,6 +29,7 @@
 prn1     set   Black.     foreground color
 prn2     set   Green.     background color
 prn3     set   Black.     border color
+         ENDC
 
          mod   eom,name,tylg,atrv,mgrnam,drvnam
 
@@ -45,7 +45,7 @@
          fcb   $01        auto line feed:0=off
          fcb   $00        end of line null count
          fcb   $01        pause:0=no end of page pause
-         fcb   16         lines per page
+         fcb   szy        lines per page
          fcb   C$BSP      backspace character
          fcb   C$DEL      delete line character
          fcb   C$CR       end of record character
@@ -57,13 +57,18 @@
          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
@@ -72,6 +77,7 @@
          fcb   prn1       (prn1) foreground color
          fcb   prn2       (prn2) background color
          fcb   prn3       (prn3) border color
+         ENDC
 initsize equ   *
 
 name     fcs   /Term/