Mercurial > hg > Members > kono > nitros9-code
annotate level1/modules/term_80.asm @ 3047:a951ab0b3003
level1 6309: Switch to native mode early in rel.asm
Otherwise it will crash in the first F$Link call.
author | Robert Gault <robert.gault@att.net> |
---|---|
date | Sat, 24 Jan 2015 23:15:55 +0100 |
parents | 6e40b043d3e0 |
children | 987f995993c3 |
rev | line source |
---|---|
112 | 1 ******************************************************************** |
1933 | 2 * TERM - Word-Pak Device Descriptor |
112 | 3 * |
4 * $Id$ | |
5 * | |
1499 | 6 * Edt/Rev YYYY/MM/DD Modified by |
7 * Comment | |
112 | 8 * ------------------------------------------------------------------ |
1499 | 9 * ????/??/?? |
10 * From Tandy OS-9 Level One VR 02.00.00 | |
112 | 11 |
0 | 12 nam TERM |
1933 | 13 ttl Word-Pak Device Descriptor |
0 | 14 |
15 * Disassembled 98/08/23 17:19:25 by Disasm v1.6 (C) 1988 by RML | |
16 | |
17 ifp1 | |
18 use defsfile | |
2682
f91dc5c378f6
Remove references to include scfdefs
William Astle <lost@l-w.ca>
parents:
2624
diff
changeset
|
19 ; use scfdefs |
2624 | 20 use cocovtio.d |
0 | 21 endc |
22 | |
23 tylg set Devic+Objct | |
24 atrv set ReEnt+rev | |
1287 | 25 rev set $00 |
0 | 26 |
27 mod eom,name,tylg,atrv,mgrnam,drvnam | |
28 | |
1496 | 29 fcb UPDAT. mode byte |
112 | 30 fcb HW.Page extended controller address |
0 | 31 fdb $C000 physical controller address |
32 fcb initsize-*-1 initilization table size | |
33 fcb DT.SCF device type:0=scf,1=rbf,2=pipe,3=scf | |
34 fcb $00 case:0=up&lower,1=upper only | |
35 fcb $01 backspace:0=bsp,1=bsp then sp & bsp | |
36 fcb $00 delete:0=bsp over line,1=return | |
37 fcb $01 echo:0=no echo | |
38 fcb $01 auto line feed:0=off | |
39 fcb $00 end of line null count | |
40 fcb $01 pause:0=no end of page pause | |
41 fcb 24 lines per page | |
42 fcb C$BSP backspace character | |
43 fcb C$DEL delete line character | |
44 fcb C$CR end of record character | |
45 fcb C$EOF end of file character | |
46 fcb C$RPRT reprint line character | |
47 fcb C$RPET duplicate last line character | |
48 fcb C$PAUS pause character | |
49 fcb C$INTR interrupt character | |
50 fcb C$QUIT quit character | |
51 fcb C$BSP backspace echo character | |
52 fcb C$BELL line overflow character (bell) | |
1933 | 53 fcb ModCoWP init value for dev ctl reg |
0 | 54 fcb $00 baud rate |
55 fdb name copy of descriptor name address | |
56 fcb $00 acia xon char | |
57 fcb $00 acia xoff char | |
58 fcb 80 (szx) number of columns for display | |
59 fcb 24 (szy) number of rows for display | |
60 initsize equ * | |
61 | |
62 name fcs /TERM/ | |
63 mgrnam fcs /SCF/ | |
1933 | 64 drvnam fcs /VTIO/ |
0 | 65 |
66 emod | |
67 eom equ * | |
68 end | |
69 |