|
0
|
1 nam W1
|
|
|
2 ttl OS-9 Level 2 Window descriptor
|
|
|
3
|
|
|
4 * Disassembled 98/08/23 22:38:05 by Disasm v1.6 (C) 1988 by RML
|
|
|
5
|
|
|
6 ifp1
|
|
|
7 use defsfile
|
|
|
8 endc
|
|
|
9
|
|
|
10 tylg set Devic+Objct
|
|
|
11 atrv set ReEnt+rev
|
|
|
12 rev set $01
|
|
|
13
|
|
|
14 * Window descriptor definitions
|
|
|
15 szx set 27 number of columns for display
|
|
|
16 szy set 11 number for rows for display
|
|
|
17 wnum set 1 window number
|
|
|
18 sty set 1 window type
|
|
|
19 cpx set 0 x cursor position
|
|
|
20 cpy set 0 y cursor position
|
|
|
21 prn1 set Black. foreground color
|
|
|
22 prn2 set White. background color
|
|
|
23 prn3 set Red. border color
|
|
|
24
|
|
|
25 mod eom,name,tylg,atrv,mgrnam,drvnam
|
|
|
26
|
|
|
27 fcb READ.+WRITE. mode byte
|
|
|
28 fcb $07 extended controller address
|
|
|
29 fdb A.W1 physical controller address
|
|
|
30 fcb initsize-*-1 initilization table size
|
|
|
31 fcb $00 device type:0=scf,1=rbf,2=pipe,3=scf
|
|
|
32 fcb $00 case:0=up&lower,1=upper only
|
|
|
33 fcb $01 backspace:0=bsp,1=bsp then sp & bsp
|
|
|
34 fcb $00 delete:0=bsp over line,1=return
|
|
|
35 fcb $01 echo:0=no echo
|
|
|
36 fcb $01 auto line feed:0=off
|
|
|
37 fcb $00 end of line null count
|
|
|
38 fcb $00 pause:0=no end of page pause
|
|
|
39 fcb 24 lines per page
|
|
|
40 fcb C$BSP backspace character
|
|
|
41 fcb C$DEL delete line character
|
|
|
42 fcb C$CR end of record character
|
|
|
43 fcb C$EOF end of file character
|
|
|
44 fcb C$RPRT reprint line character
|
|
|
45 fcb C$RPET duplicate last line character
|
|
|
46 fcb C$PAUS pause character
|
|
|
47 fcb C$INTR interrupt character
|
|
|
48 fcb C$QUIT quit character
|
|
|
49 fcb C$BSP backspace echo character
|
|
|
50 fcb C$BELL line overflow character (bell)
|
|
|
51 fcb $80 init value for dev ctl reg
|
|
|
52 fcb $00 baud rate
|
|
|
53 fdb name copy of descriptor name address
|
|
|
54 fcb $00 acia xon char
|
|
|
55 fcb $00 acia xoff char
|
|
|
56 initsize equ *
|
|
|
57 fcb szx (szx) number of columns for display
|
|
|
58 fcb szy (szy) number of rows for display
|
|
|
59 fcb wnum window number
|
|
|
60 fcb $01 data in rest of descriptor valid
|
|
|
61 fcb sty (sty) window type
|
|
|
62 fcb cpx (cpx) x cursor position
|
|
|
63 fcb cpy (cpy) y cursor position
|
|
|
64 fcb prn1 (prn1) foreground color
|
|
|
65 fcb prn2 (prn2) background color
|
|
|
66 fcb prn3 (prn3) border color
|
|
|
67
|
|
|
68 name fcc /W/
|
|
|
69 fcb 176+wnum
|
|
|
70 mgrnam fcs /SCF/
|
|
|
71 drvnam fcs /CC3IO/
|
|
|
72
|
|
|
73 emod
|
|
|
74 eom equ *
|
|
|
75 end
|
|
|
76
|
