Mercurial > hg > Members > kono > nitros9-code
annotate level2/modules/w1.asm @ 432:03c6934e5d62
Window descriptors set up for enhanced SCF command line edition for duplicate
and repeat characters
author | boisy |
---|---|
date | Sun, 22 Sep 2002 17:16:10 +0000 |
parents | 9ed77eeace37 |
children | 02a8ba2b9092 |
rev | line source |
---|---|
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 | |
410
9ed77eeace37
All floppy disk descriptor modules now made with dx.asm and different targets
boisy
parents:
372
diff
changeset
|
28 fcb HW.Page extended controller address |
0 | 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 | |
432
03c6934e5d62
Window descriptors set up for enhanced SCF command line edition for duplicate
boisy
parents:
410
diff
changeset
|
44 fcb C$RARR reprint line character |
03c6934e5d62
Window descriptors set up for enhanced SCF command line edition for duplicate
boisy
parents:
410
diff
changeset
|
45 fcb C$SHRARR duplicate last line character |
0 | 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 |