|
1575
|
1 ********************************************************************
|
|
|
2 * TERM - CoCo serial device descriptor for terminal
|
|
|
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 nam T1
|
|
|
13 ttl CoCo serial device descriptor for terminal
|
|
|
14
|
|
|
15 * Disassembled 98/08/23 21:16:45 by Disasm v1.6 (C) 1988 by RML
|
|
|
16
|
|
|
17 ifp1
|
|
|
18 use defsfile
|
|
|
19 use scfdefs
|
|
|
20 endc
|
|
|
21
|
|
|
22 tylg set Devic+Objct
|
|
|
23 atrv set ReEnt+rev
|
|
|
24 rev set $00
|
|
|
25
|
|
|
26 mod eom,name,tylg,atrv,mgrnam,drvnam
|
|
|
27
|
|
|
28 fcb UPDAT. mode byte
|
|
|
29 fcb HW.Page extended controller address
|
|
|
30 fdb $0000 physical controller address
|
|
|
31 fcb initsize-*-1 initilization table size
|
|
|
32 fcb DT.SCF device type:0=scf,1=rbf,2=pipe,3=scf
|
|
|
33 fcb $00 case:0=up&lower,1=upper only
|
|
|
34 fcb $01 backspace:0=bsp,1=bsp then sp & bsp
|
|
|
35 fcb $00 delete:0=bsp over line,1=return
|
|
|
36 fcb $01 echo:0=no echo
|
|
|
37 fcb $01 auto line feed:0=off
|
|
|
38 fcb $00 end of line null count
|
|
|
39 fcb $01 pause:0=no end of page pause
|
|
|
40 fcb 24 lines per page
|
|
|
41 fcb C$BSP backspace character
|
|
|
42 fcb C$DEL delete line character
|
|
|
43 fcb C$CR end of record character
|
|
|
44 fcb C$EOF end of file character
|
|
|
45 fcb C$RPRT reprint line character
|
|
|
46 fcb C$RPET duplicate last line character
|
|
|
47 fcb C$PAUS pause character
|
|
|
48 fcb C$INTR interrupt character
|
|
|
49 fcb C$QUIT quit character
|
|
|
50 fcb C$BSP backspace echo character
|
|
|
51 fcb C$BELL line overflow character (bell)
|
|
|
52 fcb PARNONE init value for dev ctl reg
|
|
|
53 fcb B300+WORD8+STOP1 baud rate
|
|
|
54 fdb name copy of descriptor name address
|
|
|
55 fcb $00 acia xon char
|
|
|
56 fcb $00 acia xoff char
|
|
|
57 fcb 80 (szx) number of columns for display
|
|
|
58 fcb 24 (szy) number of rows for display
|
|
|
59 initsize equ *
|
|
|
60
|
|
|
61 name fcs /term/
|
|
|
62 mgrnam fcs /SCF/
|
|
|
63 drvnam fcs /SIO/
|
|
|
64
|
|
|
65 emod
|
|
|
66 eom equ *
|
|
|
67 end
|
|
|
68
|
