Mercurial > hg > Members > kono > nitros9-code
view level2/modules/term_vdg.asm @ 1904:fd159d660df5
Changes for cobber
author | afra |
---|---|
date | Thu, 03 Nov 2005 01:37:41 +0000 |
parents | f75c7aaa864b |
children | 1e312b144f4d |
line wrap: on
line source
******************************************************************** * Term - VDG descriptor * * $Id$ * * Edt/Rev YYYY/MM/DD Modified by * Comment * ------------------------------------------------------------------ nam Term ttl VDG descriptor * Disassembled 98/08/23 22:38:05 by Disasm v1.6 (C) 1988 by RML ifp1 use defsfile 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 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 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 16 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) fcb $01 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 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 initsize equ * name fcs /Term/ mgrnam fcs /SCF/ drvnam fcs /CC3IO/ emod eom equ * end