Mercurial > hg > Members > kono > nitros9-code
annotate level2/modules/w3.asm @ 3295:6b7a7b233925 default tip
makefile: Allow PORTS with level1/2 mix
https://sourceforge.net/p/nitros9/feature-requests/10/
| author | Tormod Volden <debian.tormod@gmail.com> |
|---|---|
| date | Tue, 19 Apr 2022 18:12:17 +0200 |
| parents | e84cb928b2ef |
| children |
| rev | line source |
|---|---|
|
508
02a8ba2b9092
Added headers to most source files, added clock2_bb.asm
boisy
parents:
432
diff
changeset
|
1 ******************************************************************** |
|
1424
32f1dae476b7
Fixed references in source from OS-9 to NitrOS-9 where appropriate
boisy
parents:
1348
diff
changeset
|
2 * W3 - Window descriptor |
|
508
02a8ba2b9092
Added headers to most source files, added clock2_bb.asm
boisy
parents:
432
diff
changeset
|
3 * |
|
02a8ba2b9092
Added headers to most source files, added clock2_bb.asm
boisy
parents:
432
diff
changeset
|
4 * $Id$ |
|
02a8ba2b9092
Added headers to most source files, added clock2_bb.asm
boisy
parents:
432
diff
changeset
|
5 * |
| 1348 | 6 * Edt/Rev YYYY/MM/DD Modified by |
| 7 * Comment | |
|
508
02a8ba2b9092
Added headers to most source files, added clock2_bb.asm
boisy
parents:
432
diff
changeset
|
8 * ------------------------------------------------------------------ |
|
02a8ba2b9092
Added headers to most source files, added clock2_bb.asm
boisy
parents:
432
diff
changeset
|
9 |
| 0 | 10 nam W3 |
|
1424
32f1dae476b7
Fixed references in source from OS-9 to NitrOS-9 where appropriate
boisy
parents:
1348
diff
changeset
|
11 ttl Window descriptor |
| 0 | 12 |
| 13 * Disassembled 98/08/23 22:38:05 by Disasm v1.6 (C) 1988 by RML | |
| 14 | |
| 15 ifp1 | |
| 16 use defsfile | |
| 2624 | 17 use cocovtio.d |
| 0 | 18 endc |
| 19 | |
| 20 tylg set Devic+Objct | |
| 21 atrv set ReEnt+rev | |
| 1289 | 22 rev set $00 |
| 0 | 23 |
| 24 * Window descriptor definitions | |
|
3146
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
25 IFNE CC3FPGA |
|
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
26 szx set 80 number of columns for display |
|
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
27 szy set 24 number for rows for display |
|
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
28 sty set 2 window type |
|
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
29 cpx set 0 x cursor position |
|
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
30 cpy set 0 y cursor position |
|
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
31 ELSE |
| 0 | 32 szx set 40 number of columns for display |
| 33 szy set 12 number for rows for display | |
| 34 sty set $FF window type | |
| 35 cpx set 0 x cursor position | |
| 36 cpy set 12 y cursor position | |
|
3146
e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
Bill Pierce <merlinious999@gmail.com>
parents:
3138
diff
changeset
|
37 ENDC |
|
3138
2071c1c4b6c8
New ALTCOLOR flag for window descriptors 1-7 & term_win40/80
Bill Pierce <merlinious999@gmail.com>
parents:
2624
diff
changeset
|
38 IFNE ALTCOLOR |
|
2071c1c4b6c8
New ALTCOLOR flag for window descriptors 1-7 & term_win40/80
Bill Pierce <merlinious999@gmail.com>
parents:
2624
diff
changeset
|
39 prn1 set Green. foreground color |
|
2071c1c4b6c8
New ALTCOLOR flag for window descriptors 1-7 & term_win40/80
Bill Pierce <merlinious999@gmail.com>
parents:
2624
diff
changeset
|
40 prn2 set Black. background color |
|
2071c1c4b6c8
New ALTCOLOR flag for window descriptors 1-7 & term_win40/80
Bill Pierce <merlinious999@gmail.com>
parents:
2624
diff
changeset
|
41 prn3 set Black. border color |
|
2071c1c4b6c8
New ALTCOLOR flag for window descriptors 1-7 & term_win40/80
Bill Pierce <merlinious999@gmail.com>
parents:
2624
diff
changeset
|
42 ELSE |
| 0 | 43 prn1 set Black. foreground color |
| 44 prn2 set Cyan. background color | |
| 45 prn3 set Blue. border color | |
|
3138
2071c1c4b6c8
New ALTCOLOR flag for window descriptors 1-7 & term_win40/80
Bill Pierce <merlinious999@gmail.com>
parents:
2624
diff
changeset
|
46 ENDC |
| 0 | 47 |
| 48 mod eom,name,tylg,atrv,mgrnam,drvnam | |
| 49 | |
| 50 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
|
51 fcb HW.Page extended controller address |
| 0 | 52 fdb A.W3 physical controller address |
| 53 fcb initsize-*-1 initilization table size | |
| 54 fcb $00 device type:0=scf,1=rbf,2=pipe,3=scf | |
| 55 fcb $00 case:0=up&lower,1=upper only | |
| 56 fcb $01 backspace:0=bsp,1=bsp then sp & bsp | |
| 57 fcb $00 delete:0=bsp over line,1=return | |
| 58 fcb $01 echo:0=no echo | |
| 59 fcb $01 auto line feed:0=off | |
| 60 fcb $00 end of line null count | |
| 61 fcb $00 pause:0=no end of page pause | |
| 62 fcb 24 lines per page | |
| 63 fcb C$BSP backspace character | |
| 64 fcb C$DEL delete line character | |
| 65 fcb C$CR end of record character | |
| 66 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
|
67 fcb C$RARR reprint line character |
|
03c6934e5d62
Window descriptors set up for enhanced SCF command line edition for duplicate
boisy
parents:
410
diff
changeset
|
68 fcb C$SHRARR duplicate last line character |
| 0 | 69 fcb C$PAUS pause character |
| 70 fcb C$INTR interrupt character | |
| 71 fcb C$QUIT quit character | |
| 72 fcb C$BSP backspace echo character | |
| 73 fcb C$BELL line overflow character (bell) | |
| 74 fcb $80 init value for dev ctl reg | |
| 75 fcb $00 baud rate | |
| 76 fdb name copy of descriptor name address | |
| 77 fcb $00 acia xon char | |
| 78 fcb $00 acia xoff char | |
| 79 fcb szx (szx) number of columns for display | |
| 80 fcb szy (szy) number of rows for display | |
| 2165 | 81 fcb 3 window number |
| 0 | 82 fcb $01 data in rest of descriptor valid |
| 83 fcb sty (sty) window type | |
| 84 fcb cpx (cpx) x cursor position | |
| 85 fcb cpy (cpy) y cursor position | |
| 86 fcb prn1 (prn1) foreground color | |
| 87 fcb prn2 (prn2) background color | |
| 88 fcb prn3 (prn3) border color | |
| 622 | 89 initsize equ * |
| 0 | 90 |
| 2165 | 91 name fcs /W3/ |
| 0 | 92 mgrnam fcs /SCF/ |
| 1933 | 93 drvnam fcs /VTIO/ |
| 0 | 94 |
| 95 emod | |
| 96 eom equ * | |
| 97 end | |
| 98 |