|
1741
|
1 ********************************************************************
|
|
1933
|
2 * TERM - Hi-Res 51x24 Device Descriptor
|
|
1741
|
3 *
|
|
|
4 * $Id$
|
|
|
5 *
|
|
|
6 * Edt/Rev YYYY/MM/DD Modified by
|
|
|
7 * Comment
|
|
|
8 * ------------------------------------------------------------------
|
|
|
9 * ????/??/??
|
|
|
10 * From Tandy OS-9 Level One VR 02.00.00
|
|
|
11 *
|
|
|
12 * Modified from 80 col driver to suit 51 column software
|
|
|
13 * driver from Dragon Data OS-9, 2004-12-02 P.Harvey-Smith.
|
|
|
14 *
|
|
|
15
|
|
|
16
|
|
|
17
|
|
|
18 nam TERM
|
|
1933
|
19 ttl Hi-Res 51x24 Device Descriptor
|
|
1741
|
20
|
|
|
21 * Disassembled 98/08/23 17:19:25 by Disasm v1.6 (C) 1988 by RML
|
|
|
22
|
|
|
23 ifp1
|
|
|
24 use defsfile
|
|
|
25 use scfdefs
|
|
1933
|
26 use vtiodefs
|
|
1741
|
27 endc
|
|
|
28
|
|
|
29 tylg set Devic+Objct
|
|
|
30 atrv set ReEnt+rev
|
|
|
31 rev set $00
|
|
|
32
|
|
|
33 mod eom,name,tylg,atrv,mgrnam,drvnam
|
|
|
34
|
|
|
35 fcb UPDAT. mode byte
|
|
|
36 fcb HW.Page extended controller address
|
|
|
37 fdb $C000 physical controller address
|
|
|
38 fcb initsize-*-1 initilization table size
|
|
|
39 fcb DT.SCF device type:0=scf,1=rbf,2=pipe,3=scf
|
|
|
40 fcb $00 case:0=up&lower,1=upper only
|
|
|
41 fcb $01 backspace:0=bsp,1=bsp then sp & bsp
|
|
|
42 fcb $00 delete:0=bsp over line,1=return
|
|
|
43 fcb $01 echo:0=no echo
|
|
|
44 fcb $01 auto line feed:0=off
|
|
|
45 fcb $00 end of line null count
|
|
|
46 fcb $01 pause:0=no end of page pause
|
|
|
47 fcb 24 lines per page
|
|
|
48 fcb C$BSP backspace character
|
|
|
49 fcb C$DEL delete line character
|
|
|
50 fcb C$CR end of record character
|
|
|
51 fcb C$EOF end of file character
|
|
|
52 fcb C$RPRT reprint line character
|
|
|
53 fcb C$RPET duplicate last line character
|
|
|
54 fcb C$PAUS pause character
|
|
|
55 fcb C$INTR interrupt character
|
|
|
56 fcb C$QUIT quit character
|
|
|
57 fcb C$BSP backspace echo character
|
|
|
58 fcb C$BELL line overflow character (bell)
|
|
1933
|
59 fcb ModCoHR init value for dev ctl reg
|
|
1741
|
60 fcb $00 baud rate
|
|
|
61 fdb name copy of descriptor name address
|
|
|
62 fcb $00 acia xon char
|
|
|
63 fcb $00 acia xoff char
|
|
|
64 fcb 51 (szx) number of columns for display
|
|
|
65 fcb 24 (szy) number of rows for display
|
|
|
66 initsize equ *
|
|
|
67
|
|
|
68 name fcs /TERM/
|
|
|
69 mgrnam fcs /SCF/
|
|
1933
|
70 drvnam fcs /VTIO/
|
|
1741
|
71
|
|
|
72 emod
|
|
|
73 eom equ *
|
|
|
74 end
|
