annotate defs/systype @ 1480:3df50a75a675

Fixed typo
author boisy
date Mon, 15 Dec 2003 15:27:46 +0000
parents 8056d7e1c562
children 8d4b5ee1cee4
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
1 IFEQ SYSTYPE
373
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
2
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
3 SYSTYPE set 1
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
4
1200
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
5 ********************************************************************
1377
7e26b1ec9738 Fixed some kernel length problems
boisy
parents: 1363
diff changeset
6 * SysType - NitrOS-9 System Specific Definitions
1200
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
7 *
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
8 * $Id$
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
9 *
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
10 * Edt/Rev YYYY/MM/DD Modified by
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
11 * Comment
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
12 * ------------------------------------------------------------------
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
13 * 1998/10/13 Boisy G. Pitre
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
14 * Added defs by Bruce Isted from his Eliminator archive.
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
15 *
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
16 * 1998/10/31 Boisy G. Pitre
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
17 * Merged cc3global.defs into this file.
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
18 *
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
19 * 2002/04/30 Boisy G. Pitre
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
20 * Merged Level One and Level Two sysdefs.
1216
d2c85aaaccb8 PIA.U4 and PIA.U8 removed
boisy
parents: 1200
diff changeset
21 *
d2c85aaaccb8 PIA.U4 and PIA.U8 removed
boisy
parents: 1200
diff changeset
22 * 2002/06/22 Boisy G. Pitre
d2c85aaaccb8 PIA.U4 and PIA.U8 removed
boisy
parents: 1200
diff changeset
23 * Removed PIA.U4 and PIA.U8, improved comments
1417
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
24 *
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
25 * 2003/11/05 Robert Gault
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
26 * Made changes in window globals and grfdrv memory to handle regW
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
27 * in 6809 systems.
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
28 *
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
29 * 2003/11/30 Boisy G. Pitre
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
30 * Statics now are prefaced with V. to identify them easier in source.
1200
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
31
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
32 nam SysType
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
33 IFEQ Level-1
1363
53c50c807d55 Major move to new NitrOS-9 project
boisy
parents: 1297
diff changeset
34 ttl NitrOS-9 Level 1 System Type Definitions
1439
8056d7e1c562 Fixed duplicate ttl
boisy
parents: 1423
diff changeset
35 ELSE
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
36 IFEQ Level-2
1363
53c50c807d55 Major move to new NitrOS-9 project
boisy
parents: 1297
diff changeset
37 ttl NitrOS-9 Level 2 System Type Definitions
1386
2415d285db30 Ram now RAM
boisy
parents: 1377
diff changeset
38 ENDC
2415d285db30 Ram now RAM
boisy
parents: 1377
diff changeset
39 IFEQ Level-3
1363
53c50c807d55 Major move to new NitrOS-9 project
boisy
parents: 1297
diff changeset
40 ttl NitrOS-9 Level 3 System Type Definitions
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
41 ENDC
1439
8056d7e1c562 Fixed duplicate ttl
boisy
parents: 1423
diff changeset
42 ENDC
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
43
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
44
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
45 **********************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
46 * CPU Type Definitions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
47 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
48 Color set 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
49 Color3 set 2
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
50 IFEQ Level-1
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
51 CPUType set Color
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
52 ELSE
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
53 CPUType set Color3
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
54 ENDC
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
55
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
56
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
57 ******************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
58 * Clock Speed Type Definitions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
59 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
60 OneMHz equ 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
61 TwoMHz equ 2
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
62 IFEQ CPUType-Color
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
63 CPUSpeed set OneMHz
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
64 ELSE
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
65 CPUSpeed set TwoMHz
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
66 ENDC
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
67
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
68
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
69 **********************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
70 * Power Line Frequency Definitions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
71 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
72 Hz50 equ 1 Assemble clock for 50 hz power
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
73 Hz60 equ 2 Assemble clock for 60 hz power
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
74 PwrLnFrq set Hz60 Set to Appropriate freq
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
75
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
76
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
77 **********************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
78 * Ticks per second
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
79 *
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
80 IFEQ PwrLnFrq-Hz50
1269
e5aaa79b0f72 Changes for clock and clock2
boisy
parents: 1264
diff changeset
81 TkPerSec set 50
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
82 ELSE
1269
e5aaa79b0f72 Changes for clock and clock2
boisy
parents: 1264
diff changeset
83 TkPerSec set 60
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
84 ENDC
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
85
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
86
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
87 ******************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
88 * ACIA type set up
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
89 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
90 org 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
91 ACIA6850 rmb 1 MC6850 acia.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
92 ACIA6551 rmb 1 SY6551 acia.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
93 ACIA2661 rmb 1 SC2661 acia.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
94 ACIATYPE set ACIA6551
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
95
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
96
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
97 ****************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
98 * Special character Bit position equates
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
99 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
100 SHIFTBIT equ %00000001
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
101 CNTRLBIT equ %00000010
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
102 ALTERBIT equ %00000100
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
103 UPBIT equ %00001000
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
104 DOWNBIT equ %00010000
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
105 LEFTBIT equ %00100000
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
106 RIGHTBIT equ %01000000
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
107 SPACEBIT equ %10000000
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
108
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
109
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
110 ******************
1216
d2c85aaaccb8 PIA.U4 and PIA.U8 removed
boisy
parents: 1200
diff changeset
111 * Device addresses for miscellaneous hardware
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
112 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
113 A.AciaP set $FF68 Aciapak Address
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
114 A.ModP set $FF6C ModPak Address
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
115 DPort set $FF40 Disk controller base address
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
116 MPI.Slct set $FF7F Multi-Pak slot select
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
117 MPI.Slot set $03 Multi-Pak default slot
64
275aa5cf7639 PIA.U4 and PIA.U8 for CoCo 1/2 now set
boisy
parents: 61
diff changeset
118 PIA0Base equ $FF00
275aa5cf7639 PIA.U4 and PIA.U8 for CoCo 1/2 now set
boisy
parents: 61
diff changeset
119 PIA1Base equ $FF20
1216
d2c85aaaccb8 PIA.U4 and PIA.U8 removed
boisy
parents: 1200
diff changeset
120
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
121
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
122 ******************
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
123 * VDG Devices
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
124 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
125 A.TermV set $FFC0 VDG Term
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
126 A.V1 set $FFC1 Possible additional VDG Devices
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
127 A.V2 set $FFC2
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
128 A.V3 set $FFC3
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
129 A.V4 set $FFC4
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
130 A.V5 set $FFC5
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
131 A.V6 set $FFC6
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
132 A.V7 set $FFC7
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
133
1200
0a678473d5cf Major overhaul of headers to 'new' style
boisy
parents: 1147
diff changeset
134
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
135 IFEQ Level-1
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
136
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
137 *************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
138 *
1417
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
139 * NitrOS-9 Level 1 Section
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
140 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
141 *************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
142
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
143 HW.Page set $FF Device descriptor hardware page
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
144
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
145 ELSE
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
146
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
147 *************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
148 *
1417
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
149 * NitrOS-9 Level 2 Section
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
150 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
151 *************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
152
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
153 ****************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
154 * Dynamic Address Translator Definitions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
155 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
156 DAT.BlCt equ 8 D.A.T. blocks/address space
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
157 DAT.BlSz equ (256/DAT.BlCt)*256 D.A.T. block size
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
158 DAT.ImSz equ DAT.BlCt*2 D.A.T. Image size
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
159 DAT.Addr equ -(DAT.BlSz/256) D.A.T. MSB Address bits
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
160 DAT.Task equ $FF91 Task Register address
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
161 DAT.TkCt equ 32 Number of DAT Tasks
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
162 DAT.Regs equ $FFA0 DAT Block Registers base address
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
163 DAT.Free equ $333E Free Block Number
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
164 DAT.BlMx equ $3F Maximum Block number
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
165 DAT.BMSz equ $40 Memory Block Map size
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
166 DAT.WrPr equ 0 no write protect
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
167 DAT.WrEn equ 0 no write enable
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
168 SysTask equ 0 Coco System Task number
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
169 IOBlock equ $3F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
170 ROMBlock equ $3F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
171 IOAddr equ $7F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
172 ROMCount equ 1 number of blocks of ROM (High RAM Block)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
173 RAMCount equ 1 initial blocks of RAM
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
174 MoveBlks equ DAT.BlCt-ROMCount-2 Block numbers used for copies
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
175 BlockTyp equ 1 chk only first bytes of RAM block
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
176 ByteType equ 2 chk entire block of RAM
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
177 Limited equ 1 chk only upper memory for ROM modules
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
178 UnLimitd equ 2 chk all NotRAM for modules
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
179 * NOTE: this check assumes any NotRAM with a module will
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
180 * always start with $87CD in first two bytes of block
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
181 RAMCheck equ BlockTyp chk only beg bytes of block
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
182 ROMCheck equ Limited chk only upper few blocks for ROM
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
183 LastRAM equ IOBlock maximum RAM block number
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
184
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
185 ***************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
186 * Color Computer 3 Specific
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
187 *
1242
bdd2f61d5dbc Fixed case issues in several files (thanks Rodney H.)
boisy
parents: 1216
diff changeset
188 MappedIO equ true (Actually False but it works better this way)
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
189
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
190 ********************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
191 * Hardware addresses
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
192 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
193 GIMERegs equ $FF00 Base address of GIME registers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
194 IrqEnR equ $FF92 GIME IRQ enable/status register
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
195 BordReg equ $FF9A Border color register
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
196 PalAdr equ $FFB0 Palette registers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
197
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
198 HW.Page set $07 Device descriptor hardware page
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
199
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
200 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
201 * Window Devices
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
202 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
203 org $FF9F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
204 A.W rmb 1 $FF9F Generic Window Descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
205 A.TermW rmb 1 $FFA0 Windowing Term
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
206 A.W1 rmb 1 $FFA1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
207 A.W2 rmb 1 $FFA2
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
208 A.W3 rmb 1 $FFA3
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
209 A.W4 rmb 1 $FFA4
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
210 A.W5 rmb 1 $FFA5
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
211 A.W6 rmb 1 $FFA6
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
212 A.W7 rmb 1 $FFA7
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
213 A.W8 rmb 1 $FFA8
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
214 A.W9 rmb 1 $FFA9
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
215 A.W10 rmb 1 $FFAA
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
216 A.W11 rmb 1 $FFAB
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
217 A.W12 rmb 1 $FFAC
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
218 A.W13 rmb 1 $FFAD
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
219 A.W14 rmb 1 $FFAE
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
220 A.W15 rmb 1 $FFAF
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
221
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
222 **********************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
223 * Pointer Device Packet Definition
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
224 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
225 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
226 Pt.Valid rmb 1 Is returned info valid (0=no/1=yes)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
227 Pt.Actv rmb 1 Active Side 0=off/1=Right/2=left
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
228 Pt.ToTm rmb 1 Time out Initial value
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
229 rmb 2 reserved
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
230 Pt.TTTo rmb 1 Time Till Timeout
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
231 Pt.TSSt rmb 2 Time Since Start Counter
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
232 Pt.CBSA rmb 1 Current Button State Button A
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
233 Pt.CBSB rmb 1 Current Button State Button B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
234 Pt.CCtA rmb 1 Click Count Button A
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
235 Pt.CCtB rmb 1 Click Count Button B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
236 Pt.TTSA rmb 1 Time This State Counter Button A
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
237 Pt.TTSB rmb 1 Time This State Counter Button B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
238 Pt.TLSA rmb 1 Time Last State Counter Button A
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
239 Pt.TLSB rmb 1 Time Last State Counter Button B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
240 rmb 2 Reserved
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
241 Pt.BDX rmb 2 Button down X value EXPERIMENTAL
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
242 Pt.BDY rmb 2 Button down Y value
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
243 Pt.Stat rmb 1 Window Pointer type location
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
244 Pt.Res rmb 1 Resolution (0..640 by: 0=ten/1=one)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
245 Pt.AcX rmb 2 Actual X Value
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
246 Pt.AcY rmb 2 Actual Y Value
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
247 Pt.WRX rmb 2 Window Relative X
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
248 Pt.WRY rmb 2 Window Relative Y
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
249 Pt.Siz equ . Packet Size 32 bytes
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
250
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
251 **************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
252 * window regions for mouse
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
253 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
254 WR.Cntnt equ 0 content region
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
255 WR.Cntrl equ 1 control region
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
256 WR.OfWin equ 2 off window
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
257
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
258 *************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
259 * Standard system get/put buffer defs
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
260 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
261 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
262 * system group numbers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
263 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
264 org 200
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
265 Grp.Fnt rmb 1 font group
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
266 Grp.Clip rmb 1 clipboard group
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
267 Grp.Ptr rmb 1 pointer group
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
268 Grp.Pat2 rmb 1 pattern group 2 color
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
269 Grp.Pat4 rmb 1 pattern group 4 color
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
270 Grp.Pat6 rmb 1 pattern group 16 color
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
271 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
272 * font buffer numbers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
273 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
274 org 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
275 Fnt.S8x8 rmb 1 standard 8x8 font
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
276 Fnt.S6x8 rmb 1 standard 6x8 font
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
277 Fnt.G8x8 rmb 1 standard graphics 8x8 font
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
278 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
279 * pattern buffer numbers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
280 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
281 org 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
282 Pat.Dot rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
283 Pat.Vrt rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
284 Pat.Hrz rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
285 Pat.XHtc rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
286 Pat.LSnt rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
287 Pat.RSnt rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
288 Pat.SDot rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
289 Pat.BDot rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
290 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
291 * pointer buffer numbers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
292 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
293 org 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
294 Ptr.Arr rmb 1 Arrow pointer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
295 Ptr.Pen rmb 1 Pencil pointer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
296 Ptr.LCH rmb 1 Large cross hair pointer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
297 Ptr.Slp rmb 1 Wait timer pointer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
298 Ptr.Ill rmb 1 Illegal action pointer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
299 Ptr.Txt rmb 1 Text pointer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
300 Ptr.SCH rmb 1 Small cross hair pointer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
301
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
302 ********************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
303 * Window/Menu Bar Data Structure
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
304 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
305 * To be used in SS.WnSet SETSTAT to set up a Framed Window
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
306 * for use in the high level windowing package.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
307 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
308 NUMMENS equ 10 maximum number of menus on menu bar
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
309 NUMITMS equ 20 maximum number of items in a menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
310 MXTTLEN equ 15 max chars for menu and item names
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
311 WINSYNC equ $C0C0 synch bytes for window validation
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
312 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
313 * Menu Item Descriptor : (MN.ITEMS)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
314 * one required for each item within the menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
315 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
316 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
317 MI.TTL rmb MXTTLEN item name
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
318 MI.ENBL rmb 1 enable flag
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
319 MI.RES rmb 5 reserved bytes
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
320 MI.SIZ equ . size of menu item descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
321 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
322 * Menu Descriptor :
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
323 * one for each menu on the manu bar
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
324 * each is pointed to by MB.MPTR below
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
325 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
326 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
327 MN.TTL rmb MXTTLEN menu title
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
328 MN.ID rmb 1 menu id number (1-255)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
329 MN.XSIZ rmb 1 horiz. size of desired pull down
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
330 MN.NITS rmb 1 number of items in menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
331 MN.ENBL rmb 1 enable flag
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
332 MN.RES rmb 2 reserved bytes
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
333 MN.ITEMS rmb 2 pointer to array of menu items
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
334 MN.SIZ equ . size of menu descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
335 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
336 * Window Descriptor:
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
337 * one required for each application in a framed window
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
338 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
339 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
340 WN.TTL rmb 20 title of window for title bar
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
341 WN.NMNS rmb 1 number of menus in menu bar
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
342 WN.XMIN rmb 1 minimal horiz. size for application to run
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
343 WN.YMIN rmb 1 minimal vert. size for application to run
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
344 WN.SYNC rmb 2 synch bytes ($C0C0)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
345 WN.RES rmb 7 reserved bytes
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
346 WN.BAR rmb 2 pointer to arry of menu descriptors
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
347 WN.SIZ equ . size of window/menu bar descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
348
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
349 *************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
350 * Window Type Definitions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
351 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
352 * To be used in setting up the border of the window in
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
353 * the SS.WnSel SETSTAT
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
354 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
355 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
356 WT.NBox rmb 1 No Box
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
357 WT.FWin rmb 1 Framed Window
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
358 WT.FSWin rmb 1 Framed Window w/Scroll Bars
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
359 WT.SBox rmb 1 Shadowed Box
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
360 WT.DBox rmb 1 Double Box
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
361 WT.PBox rmb 1 Plain Box
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
362
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
363 *************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
364 * Pre-Defined Menu IDs for the system
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
365 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
366 org 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
367 MId.Mov rmb 1 move box
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
368 MId.Cls rmb 1 close box
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
369 MId.Grw rmb 1 grow box
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
370 MId.SUp rmb 1 scroll up
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
371 MId.SDn rmb 1 scroll down
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
372 MId.SRt rmb 1 scroll right
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
373 MId.SLt rmb 1 scroll left
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
374 MId.Chr rmb 1 character was depressed
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
375 org 20
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
376 MId.Tdy rmb 1 Tandy menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
377 MId.Fil rmb 1 Files Menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
378 MId.Edt rmb 1 Edit Menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
379 MId.Sty rmb 1 Styles menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
380 MId.Fnt rmb 1 Font menu
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
381
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
382
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
383 ******************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
384 ******************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
385 ** **
1377
7e26b1ec9738 Fixed some kernel length problems
boisy
parents: 1363
diff changeset
386 ** NitrOS-9 Windowing system Global data definitions **
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
387 ** **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
388 ******************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
389 ******************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
390 ** **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
391 ** System memory block 0 layout: **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
392 ** **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
393 ** $0000-$0001 : FHL/Isted WD 1002-05 - interface base address **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
394 ** $0002 : FHL/Isted WD 1002-05 - boot device physical drive # **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
395 ** $0008 : Bruce Isted Serial mouse - button counter & rx count **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
396 ** $0009-$000B : Bruce Isted Serial mouse - RX buffer **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
397 ** $000C-$000D : Bruce Isted Serial mouse - Current X position **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
398 ** $000E-$000F : Bruce Isted Serial mouse - Current Y position **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
399 ** $0010-$001F : unused (User definable) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
400 ** $0020-$00FF : system direct page & some IRQ vectors **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
401 ** $0100-$011F : Task usage table **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
402 ** $0120-$01FF : Virtual DAT tasks (pointed to by <D.TskIPt) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
403 ** $0200-$02FF : memory block usage map ($80=Not RAM,$01=in use,$02=module) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
404 ** $0300-$03FF : system's system call dispatch table **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
405 ** $0400-$04FF : user's sysem call dispatch table **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
406 ** $0500-$05FF : process descriptor pointer table **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
407 ** $0600-$07FF : System task (Task 0, ID 1) process descriptor **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
408 ** $0800-$08FF : System's stack space (initial ptr is $0900) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
409 ** $0900-$09FF : SMAP table ($01=in used, $80=NOT RAM) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
410 ** $0A00-$0FFF : module directory DAT Images (8 bytes each) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
411 ** $1000-$10FF : System Global memory (pointed to by D.CCMem) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
412 ** $1100-$11FF : GRFDRV global memory (DP=$11 in GRFDRV) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
413 ** $1200-$1247 : shared buffer between Grf/WindInt & GRFDRV (GP buffers) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
414 ** $1248-$127F : ???? **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
415 ** $1280-$1A7F : the window tables (32 of $40 bytes each) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
416 ** $1A80-$1C7F : the screen tables (16 of $20 bytes each) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
417 ** $1C80-$2000 : the CC3 global mem stack (for windowing) **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
418 ** **
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
419 ******************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
420 ******************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
421
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
422 * User settable values for CC3IO/TC9IO/GrfInt/WindInt & GrfDrv
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
423 MaxLines equ 25 Max. Y coord text value
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
424 Meg set false "true" if 1 or 2 meg machine
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
425
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
426 COMP equ 0 composite monitor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
427 RGB equ 1 RGB Analog monitor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
428 MONO equ 2 monochrome monitor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
429
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
430 Monitor set RGB
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
431
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
432 * Global definitions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
433 KeyMse equ %00000001 keyboard mouse enabled
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
434 NumLck equ %00000010 Numlock enabled (TC-9 use only)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
435 CapsLck equ %00000100 Capslock enabled
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
436 MaxRows equ 640 maximum X co-ordinate allowed on mouse
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
437 IFEQ MaxLines-25
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
438 MaxLine equ 198 maximum Y co-ordinate allowed on mouse
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
439 ELSE
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
440 MaxLine equ 191 maximum Y co-ordinate allowed on mouse
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
441 ENDC
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
442
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
443 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
444 * Static memory area for each window (CC3IO/TC9IO)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
445 * Should set up a write buffer (using parm area?) between SCF, CC3IO & Grfdrv
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
446 * so we can 'burst mode' text output (copy up to 48 chars to Grfdrv's parm
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
447 * area, and have grfdrv loop through & write all 48 chars to screen in 1 loop
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
448 * May have to have smaller limit for text to gfx screens, as it will run much
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
449 * slower, unless GrfDrv is made Partially/Fully Re-Entrant
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
450 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
451 * STRONG CAUTION: scfdefs MUST be included first before this file if
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
452 * V.SCF is to be resolved properly in pass 1!!
1417
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
453 org V.SCF
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
454 V.WinType rmb 1 window type (0=Windint/GrfInt,2=VDGInt) $1D
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
455 V.InfVld rmb 1 Rest of info here valid? (0=NO, >0 = YES) $1E
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
456 V.DevPar rmb 2 high bit=window device $1F
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
457 V.ULCase rmb 1 special key flags (Capslck & keyboard mouse) $21
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
458 V.KySnsFlg rmb 1 flag for key sense setstat $22
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
459 V.ScrChg rmb 1 screen change flag $23
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
460 V.SSigID rmb 1 data ready process ID $24
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
461 V.SSigSg rmb 1 data ready signal code $25
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
462 V.MSigID rmb 1 mouse signal process ID $26
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
463 V.MSigSg rmb 1 mouse signal signal code $27
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
464 V.MSmpl rmb 1 mouse sample rate $28
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
465 V.MTime rmb 1 mouse timeout value $29
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
466 rmb 1 unused $2A
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
467 V.MAutoF rmb 1 auto follow mouse flag $2B
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
468 V.ParmCnt rmb 1 parameter count $2C
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
469 V.ParmVct rmb 2 parameter vector $2D
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
470 V.PrmStrt rmb 2 pointer to params start $2F
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
471 V.NxtPrm rmb 2 pointer to next param storage $31
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
472 V.EndPtr rmb 1 last character read offset $33
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
473 V.InpPtr rmb 1 next character read offset $34
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
474 V.WinNum rmb 1 window table entry # $35
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
475 V.DWNum rmb 1 dwnum from descriptor $36
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
476 V.CallCde rmb 1 internal comod call code # $37
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
477 CC3Parm rmb 128-. global parameter area
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
478 ReadBuf rmb 256-. read input buffer (keyboard)
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
479 CC3DSiz equ .
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
480
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
481 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
482 * GrfInt/WindInt global memory area
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
483 * This area sits in system block 0 from $1000 to $10ff
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
484 WGlobal equ $1000 useful value (points to address starting below)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
485 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
486 G.CurTik rmb 1 Constant - # Clock ticks/cursor updates (2)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
487 G.CntTik rmb 1 Current tick count for cursor updates
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
488 G.GfBusy rmb 1 Grfdrv is busy flag (1=busy)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
489 g0003 rmb 2 NEW: UNUSED
1417
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
490 g0005 rmb 2 Temp save in Windint RG
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
491 G.GrfStk rmb 2 grfdrv stack pointer ($07)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
492 G.MonTyp rmb 1 monitor type
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
493 g000A equ . Old label for compatibility
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
494 G.CrDvFl rmb 1 Are we current device flag (only set when all
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
495 * Parms have been moved to Dev Mem)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
496 * 0=We are not on our device
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
497 * 1=We are the current device
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
498 * (Used by comod (GRF/WIND/VDGInt) to determine
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
499 * whether or not to update GIME regs themselves
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
500 * If not current device, they don't.)
1423
4ab5990789f7 Updated global name in systype, windint and cc3io.
boisy
parents: 1417
diff changeset
501 G.WinType rmb 1 current device's V.TYPE
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
502 G.CurDvM rmb 2 current device memory pointer for co-module use
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
503 G.WIBusy rmb 1 WindInt is busy flag (1=busy)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
504 G.AlPckt rmb 6 F$Alarm time packet
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
505 G.AlPID rmb 1 F$Alarm proc ID ($15)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
506 G.AlSig rmb 1 F$Alarm signal code ($16)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
507 G.BelVec rmb 2 BELL routine vector
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
508 G.DefPal rmb 2 pointer to default palette data in global mem
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
509 G.TnCnt rmb 1 SS.Tone duration counter
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
510 G.BelTnF rmb 1 BELL tone flag
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
511 g001D rmb 3
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
512 G.CurDev rmb 2 current device's static memory pointer ($20)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
513 G.PrWMPt rmb 2 previous window static mem pointer $(22)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
514 G.BCFFlg rmb 1 bit coded co-module found flags ($24)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
515 * 00000010 : VDGInt found
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
516 * 10000000 : GrfDrv found
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
517 g0025 rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
518 G.KTblLC rmb 1 Key table entry# last checked (1-3)
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
519 * IFEQ TC9-true
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
520 *CurLght rmb 1 current keyboard light settings
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
521 * ELSE
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
522 G.LastCh rmb 1 last keyboard character (ASCII value)
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
523 * ENDC
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
524 G.LKeyCd rmb 1 last keyboard code
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
525 G.KyRept rmb 1 key repeat counter
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
526 * A secondary 3 key table (same format as g002D below)
359
f7384b5a59c8 Added for cc3io for nitros
boisy
parents: 64
diff changeset
527 G.2Key1 rmb 1 $2A
f7384b5a59c8 Added for cc3io for nitros
boisy
parents: 64
diff changeset
528 G.2Key2 rmb 1 $2B
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
529 G.2Key3 rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
530 * Up to 3 keys can be registerd at once, and they are stored here. If more
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
531 * than 3 are hit, the last key is overwritten with the very last key down that
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
532 * was checked. Format for all three is the same as the PIA column/row byte @
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
533 * KeyFlag below.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
534 G.Key1 rmb 1 Key 1 being held down (Row/Column #)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
535 G.Key2 rmb 1 Key 2 being held down (Row/Column #)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
536 G.Key3 rmb 1 Key 3 being held down (Row/Column #)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
537 G.ShftDn rmb 1 SHIFT key down flag (COM'd) ($30)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
538 G.CntlDn rmb 1 CTRL key down flag (0=NO)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
539 G.KeyFlg rmb 1 Keyboard PIA bit #'s for columns/rows
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
540 * %00000111-Column # (Output, 0-7)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
541 * %00111000-Row # (Input, 0-6)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
542 G.AltDwn rmb 1 ALT key down flag (0=NO)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
543 G.KySns rmb 1 key sense byte
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
544 G.KySame rmb 1 same key flag
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
545 G.CapLok rmb 1 CapsLock/SysRq key down flag
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
546 rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
547 g0038 rmb 1 grfdrv initialized flag
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
548 rmb 2
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
549 G.MSmpRt rmb 1 Current mouse sample # (# ticks till next read)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
550 G.Mouse rmb Pt.Siz mouse packet ($3C)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
551 g005C rmb 2 Temp for relative mouse X coord calculation
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
552 g005E rmb 2 Temp for relative mouse Y coord calculation
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
553 G.MSmpRV rmb 1 Mouse sample reset value (# ticks till next read)
1264
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
554 G.KyDly rmb 1 initial key repeat delay constant ($61)
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
555 G.KySpd rmb 1 secondary key repeat delay constant
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
556 * IFEQ TC9-true
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
557 *KeyParm rmb 1 keyboard command parameter byte
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
558 * ELSE
1264
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
559 G.KyMse rmb 1 keyboard mouse flag ($63)
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
560 * ENDC
1264
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
561 G.Clear rmb 1 "one-shot" CapsLock/SysRq key flag ($64)
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
562 G.KyButt rmb 1 keyboard F1 and F2 "fire" button info ($65)
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
563 G.AutoMs rmb 1 Auto-follow mouse flag for current device (0=NO)
1264
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
564 G.MseMv rmb 1 mouse moved flag ($67)
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
565 G.CoTble rmb 6 co-module table ($68)
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
566 G.GrfEnt rmb 2 GRFDRV Entry address ($6E)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
567 g0070 rmb 1 # bytes to move in 1 block (1-72)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
568 G.WUseTb rmb 4 windows in use bit table (0=unused, 32 windows) ($71)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
569 G.GfxTbl rmb 2 Pointer to GFX tables ($75)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
570 G.WrkWTb rmb $40 Work window table. WindInt only ($77)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
571 g00B7 rmb 2 Current Device static mem ptr for WindInt
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
572 g00B9 rmb 2 Current window table ptr for WindInt
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
573 g00BB rmb 2 Pointer to work window table (g0077+$10)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
574 g00BD rmb 1 Current screen type for work window table
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
575 g00BE rmb 1 Topmost overlay window # when check for title bars
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
576 g00BF rmb 1 Flag for keypress while processing menu select
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
577 g00C0 rmb 2 Ptr to current path descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
578 G.WindBk rmb 2 shift-clear routine vector
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
579 G.MsInit rmb 2 set mouse routine vector
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
580 G.MsSig rmb 1 mouse signal flag
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
581 G.DefPls rmb 16 Default palettes (2 repeats of 8 is default) ($C7)
1264
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
582 g00D7 rmb 9
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
583 G.KeyEnt rmb 2 entry to keydrv subroutine module ($E0)
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
584 G.KeyMem rmb 8 static memory for keydrv subroutine module
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
585 G.JoyEnt rmb 2 entry to joydrv subroutine module ($EA)
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
586 G.JoyMem rmb 8 static memory for joydrv subroutine module
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
587 G.SndEnt rmb 2 entry to snddrv subroutine module ($F4)
64a0273a846a Case fixes, etc.
boisy
parents: 1242
diff changeset
588 G.SndMem rmb 8 static memory for snddrv subroutine module
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
589
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
590 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
591 * GrfDrv global memory data definitions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
592 * This area sits in system block 0 from $1100 to $119E
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
593 GrfMem equ $1100 useful label used to point to mem starting below
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
594 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
595 gr0000 rmb 1 Pixel mask for 1st byte of GP line
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
596 gr0001 rmb 1 Pixel mask for last byte of a GP line
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
597 gr0002 rmb 2 Ptr to table of bit masks for colors
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
598 gr0004 rmb 1 # of bytes wide GP buffer is (including partials)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
599 gr0005 rmb 1 # pixels per byte in GP Buffer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
600 gr0006 rmb 1 # of pixels used in 1st byte of GP buffer line
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
601 gr0007 rmb 1 # of pixels used in last byte of GP buffer line
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
602 gr0008 rmb 1 Bit mask that is common to both screen & GP buffer
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
603 gr0009 rmb 1 # bytes for width of overlay window
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
604 gr000A rmb 1 # bytes to offset to get to next line after
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
605 * overlay width has been copied
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
606 gr000B rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
607 gr000C rmb 2 Cursor address for proportional spacing?
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
608 gr000E rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
609 gr000F rmb 1 Left-based bit mask for proportional spacing?
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
610 gr0010 rmb 2 Vector for text to gfx screen (either prop. or normal)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
611 gr0012 rmb 6
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
612 gr0018 rmb 2 Working Center X coord for Circle/Ellipse
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
613 gr001A rmb 2 Working Center Y coord for Circle/Ellipse
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
614 gr001C rmb 2 Some variable for Circle/Ellipse (initially 0)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
615 gr001E rmb 2 Working Y radius value for Circle/Ellipse
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
616 gr0020 rmb 2 Arc 'clip line' X01
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
617 gr0022 rmb 2 Arc 'clip line' Y01
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
618 gr0024 rmb 2 Arc 'clip line' X02
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
619 gr0026 rmb 2 Arc 'clip line' Y02
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
620 gr0028 rmb 1 full-byte background color to FFILL on mask
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
621 gr0029 rmb 1 pixels per byte: set up by FFILL
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
622 gr002A rmb 1 Flag for FFill: 1=no error, 0=Stack overflow error
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
623 gr002B rmb 1 current Y-direction to travel in FFILL
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
624 gr002C rmb 2
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
625 gr002E rmb 2 current window table entry
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
626 gr0030 rmb 2 current screen table ptr
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
627 gr0032 rmb 1 Last block # we used for buffers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
628 gr0033 rmb 2 Last offset we used for buffers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
629 gr0035 rmb 1 group
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
630 gr0036 rmb 2 offset
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
631 gr0038 rmb 1 group returned (new)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
632 gr0039 rmb 1 0=Text cursor inverted off, >0 is inverted on
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
633 gr003A rmb 1 0=Graphics cursor XOR'd off,>0 is XOR'd on scrn
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
634 gr003B rmb 2 end of vars ptr?
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
635 gr003D rmb 2 Last X coordinate Graphics cursor was ON at
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
636 gr003F rmb 2 Last Y coordinate Graphics cursor was ON at
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
637 gr0041 rmb 2 Screen address for start of current gfx cursor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
638 gr0043 rmb 1 Pixel mask for start of gfx cursor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
639 gr0044 rmb 1 Block # Graphics cursor is in
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
640 gr0045 rmb 2 Offset in block Graphics cursor is in
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
641 gr0047 rmb 2 'Working' X coordinate
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
642 gr0049 rmb 2 'Working' Y coordinate
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
643 gr004B rmb 2 current X
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
644 gr004D rmb 2 current Y
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
645 gr004F rmb 2 X Size (in bytes)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
646 gr0051 rmb 2 Y Size (in bytes)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
647 gr0053 rmb 2 Horizontal radius (circle/ellipse/arc)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
648 gr0055 rmb 2 Vertical radius (circle/ellipse/arc)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
649 gr0057 rmb 1 group
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
650 gr0058 rmb 1 buffer #
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
651 gr0059 rmb 1 save switch for overlay
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
652 gr005A rmb 1 PRN
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
653 gr005B rmb 2 X coordinate of Graphics cursor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
654 gr005D rmb 2 Y coordinate of Graphics cursor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
655 gr005F rmb 1 ATD: new video mode for 24/25/28-line windows
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
656 Gr.STYMk rmb 1 STY marker
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
657 gr0061 rmb 1 foreground RGB data
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
658 gr0062 rmb 1 background RGB data
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
659 gr0063 rmb 1 bytes/row (on current screen...not window)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
660 gr0064 rmb 2 PSet vector
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
661 gr0066 rmb 2 pset offset
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
662 gr0068 rmb 2 LSet vector
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
663 gr006A rmb 2 max X co-ordinate
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
664 gr006C rmb 2 max Y co-ordinate
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
665 gr006E rmb 2 X pixel count
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
666 gr0070 rmb 2 Y pixel count
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
667 gr0072 rmb 2 Screen address of pixel we are doing
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
668 gr0074 rmb 1 Pixel mask for pixel we are doing
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
669 gr0075 rmb 2 ??? Pixel mask for last byte of GP buffer?
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
670 gr0077 rmb 2 Vector for right direction FFill
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
671 gr0079 rmb 1 bit mask for 1st pixel in byte for right dir. FFill
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
672 gr007A rmb 2 Vector for left direction FFill
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
673 gr007C rmb 1 bit mask for last pixel in byte for left dir. FFill
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
674 gr007D rmb 1 buffer block #
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
675 gr007E rmb 2 buffer offset #
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
676 gr0080 rmb 2 Buffer length (in bytes)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
677 gr0082 rmb 3 3 byte extended screen address
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
678 gr0085 rmb 2 temp
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
679 gr0087 rmb 16 grfdrv (sysmap 1) DAT image
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
680 gr0097 rmb 1 temp
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
681 gr0098 rmb 1 temp
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
682 * In ARC, 97-98 is the width of the clip line in pixels (after scaling)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
683 gr0099 rmb 2 temp
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
684 * In ARC, 99-9A is the height of the clip line in pixels (after scaling)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
685 gr009B rmb 1 counter temp
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
686 gr009C rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
687 gr009D rmb 2 offset to buffer in block
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
688 gr009F rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
689 gr00A0 rmb 1 # lines left to do of GP buffer onto screen
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
690 gr00A1 rmb 2 vector routine for (changes lots)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
691 * In ARC A1-A2 is the vector to the proper clipping routine
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
692 gr00A3 rmb 2 Vector for shifting GP buffers
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
693 gr00A5 rmb 2 Vector for shifting GP buffers (can dupe A1)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
694 gr00A7 rmb 2
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
695 gr00A9 rmb 2 NEW: Window tbl ptr for last window GRFDRV used
373
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
696 grBigFnt rmb 2 Flag for 224 char font/gfx mode on (0=No) V2.00a
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
697 gr00AD rmb 2 FFill:orig. start X coord|Circ/Ell saved start X
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
698 gr00AF rmb 2 FFill:orig. start Y coord|Circ/Ell saved end X
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
699 gr00B1 rmb 1 Flag in FFill: 1=1st time through, 0=not 1st time
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
700 gr00B2 rmb 1 Filled (circle,ellipse) flag 0=Not filled
1417
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
701 *gr00B3 rmb 256-. ??? UNUSED
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
702 gr00B3 rmb 1 temp veriable grfdrv
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
703 gr00B4 rmb 1 temp veriable grfdrv
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
704 gr00B5 rmb 1 regW for grfdrv
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
705 gr00B6 rmb 1
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
706 gr00B7 rmb 2
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
707 gr00B9 rmb 2 previously used in grfdrv at $B2 but not for Filled Flag
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
708 gr00BB rmb 2 previously used in grfdrv at $B4
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
709 gr00BD rmb 2 previously used in grfdrv at $B6
b7b173926ea1 Changes and fixes by Robert Gault
boisy
parents: 1386
diff changeset
710 gr00BF rmb 256-.
61
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
711 * GPLoad buffer - $1200 in system block 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
712 GPBuf rmb 72 common move buffer for gpload/get/put
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
713 gb0000 equ 72 Size of get/put buffer ($48)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
714
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
715 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
716 * Window table entry structure
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
717 * These tables sit in system block 0 and there is 1 for every window init'd
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
718 * including any overlay windows.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
719 MaxWind equ 32 maximum allowable window tables
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
720 WinBase equ $1290 base address to start of window tables
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
721 org -$10
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
722 Wt.STbl rmb 2 Screen table pointer ($FFFF=Not used) -$10
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
723 Wt.BLnk rmb 1 overlay window parent entry # ($FF=base) -$0E
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
724 Wt.LStrt rmb 2 screen logical start address -$0D
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
725 Wt.CPX rmb 1 current X coord. start -$0B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
726 Wt.CPY rmb 1 current Y coord. start -$0A
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
727 Wt.SZX rmb 1 current X size (CWArea) -$09
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
728 Wt.SZY rmb 1 current Y size (CWArea) -$08
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
729 Wt.SXFct rmb 1 X scaling factor -$07
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
730 Wt.SYFct rmb 1 Y scaling factor (0=no scaling) -$06
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
731 Wt.Cur rmb 2 cursor physical address on screen -$05
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
732 Wt.FMsk rmb 1 font bit mask (based from left) -$03
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
733 Wt.CurX rmb 2 X coord of cursor -$02
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
734 Wt.CurY rmb 2 Y Coord of cursor $00
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
735 Wt.XBCnt rmb 1 width of window (in bytes) $02
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
736 Wt.CWTmp rmb 1 bytes wide each text chr (1,2,4) $03
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
737 Wt.BRow rmb 2 bytes/text row (8x width in gfx) $04
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
738 Wt.Fore rmb 1 foreground palette # $06
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
739 Wt.Back rmb 1 background palette # $07
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
740 Wt.Attr rmb 1 default attributes (FUTTTBBB) $08
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
741 Wt.BSW rmb 1 character BSW switches $09
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
742 Wt.LSet rmb 1 LSet type $0A
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
743 Wt.FBlk rmb 1 Font memory block # $0B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
744 Wt.FOff rmb 2 Font offset in block $0C
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
745 Wt.PBlk rmb 1 PSet memory block # $0E
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
746 Wt.POff rmb 2 PSet offset in block $0F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
747 Wt.OBlk rmb 1 Overlay memory block # $11
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
748 Wt.OOff rmb 2 Overlay offset in block $12
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
749 Wt.LVec rmb 2 LSet vector $14
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
750 Wt.PVec rmb 2 PSet vector $16
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
751 Wt.GBlk rmb 1 GCursor memory block # $18
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
752 Wt.GOff rmb 2 GCursor offset in block $19
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
753 Wt.MaxX rmb 2 Maximum X cord. (0-79,0-639) $1B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
754 Wt.MaxY rmb 2 Maximum Y cord. (0-24,0-191) $1D
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
755 Wt.BLen rmb 2 bytes left in GPLoad block below $1F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
756 Wt.NBlk rmb 1 memory block # for next GPLoad $21
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
757 Wt.NOff rmb 2 Offset in block for next GPLoad $22
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
758 Wt.LStDf rmb 2 screen logical start default $24
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
759 * NOTE: The following default settings are what the window was initialized
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
760 * with, and thus are the MAXIMUM start/size the window can handle
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
761 * until it is restarted (DWEnd & DWSet)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
762 * They also appear to be used in WindInt to determine the coords &
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
763 * sizes for control+content regions
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
764 Wt.DfCPX rmb 1 default X cord. start $26
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
765 Wt.DfCPY rmb 1 default Y cord. start $27
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
766 Wt.DfSZX rmb 1 default X size $28
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
767 Wt.DfSZY rmb 1 default Y size $29
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
768 Wt.Res rmb 6 unused $2A-$2F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
769 Wt.Siz equ .+$10
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
770
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
771 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
772 * Screen table entrys
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
773 * These tables sit in system block 0 base=$1A80
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
774
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
775 STblMax equ 16 Maximum number of screen tables
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
776 STblBse equ $1A80 base address of screen tables
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
777 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
778 St.Sty rmb 1 Screen type $00
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
779 St.SBlk rmb 1 Ram block start # $01
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
780 St.LStrt rmb 2 Screen logical start (for GIME) $02
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
781 St.BRow rmb 1 Bytes per row $04
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
782 St.Brdr rmb 1 Border palette register # $05
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
783 St.Fore rmb 1 Foreground palette register # $06
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
784 St.Back rmb 1 Background palette register # $07
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
785 St.ScSiz rmb 1 screen size: 24..28 lines $08
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
786 St.Res rmb 7 UNUSED??? $09
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
787 * NOTE: SHOULD USE ONE OF THESE UNUSED BYTES TO KEEP THE # OF DEVICE WINDOW
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
788 * TABLES THAT ARE USING THIS SCREEN TABLE. DWSET & DWEND WOULD KEEP TRACK OF
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
789 * THESE, AND THE WINDINT TITLE BAR ROUTINE WOULD CHECK IT. IF IT IS ONLY 1,
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
790 * IT WON'T BOTHER CHANGING THE TITLE BAR WHEN SELECTING WINDOWS
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
791 St.Pals rmb 16 Palette register contents $10
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
792 St.Siz equ .
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
793
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
794 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
795 * Graphics buffer tables
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
796 * They contain a 20 byte header (shown below), followed by the raw pixel
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
797 * data.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
798 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
799 Grf.Bck rmb 1 back block link # $00
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
800 Grf.Off rmb 2 back block header offset $01
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
801 Grf.Grp rmb 1 group # $03
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
802 Grf.Buff rmb 1 buffer # $04
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
803 Grf.BSz rmb 2 buffer size (not including header) $05
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
804 Grf.XSz rmb 2 X size (in pixels) $07
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
805 Grf.YSz rmb 2 Y size (in pixels/bytes) $09
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
806 Grf.XBSz rmb 1 X size in bytes $0B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
807 Grf.LfPx rmb 1 # pixels used in first byte of line $0C
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
808 Grf.RtPx rmb 1 # pixels used in last byte of line $0D
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
809 Grf.STY rmb 1 Screen type buffer intended for $0E
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
810 Grf.NBlk rmb 1 number blocks used $0F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
811 Grf.Pal rmb 16 Copy of palette registers? $10
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
812 Grf.Siz equ . $20
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
813
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
814 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
815 * GFX tables (1 for each window, 18 ($12) bytes each) pointed to by
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
816 * $1075-$0176
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
817 * GRFINT only uses gt0001-gt0004, the rest is exclusive to WINDINT
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
818 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
819 Gt.WTyp rmb 1 WindInt window type (Framed, Scroll Bar, etc.) $00
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
820 Gt.GXCur rmb 2 X coord of graphics cursor $01
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
821 Gt.GYCur rmb 2 Y coord of graphics cursor $03
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
822 Gt.DPtr rmb 2 Ptr to WindInt window descriptor $05
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
823 Gt.FClr rmb 1 Foreground color $07
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
824 Gt.BClr rmb 1 Background color $08
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
825 Gt.FMsk rmb 1 Foreground mask $09
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
826 Gt.BMsk rmb 1 Background mask $0A
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
827 Gt.GBlk rmb 1 Block # of graphics cursor $0B
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
828 Gt.GOff rmb 2 Offset into block of graphics cursor $0C
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
829 Gt.Proc rmb 1 Process # of window creator $0E
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
830 Gt.PBlk rmb 1 Process descriptor block # of creator $0F
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
831 Gt.Res rmb 2 ??? RESERVED ??? $10
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
832 GTabSz equ .
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
833
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
834 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
835 * This table is located in the graphics table memory and is offset from
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
836 * graphics table pointer stored at $1075-$1076. This is used exclusively by
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
837 * WindInt.
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
838 * NOTE: USING UNUSED BYTES IN CC3 GLOBAL MEM, SET UP SEPARATE PTRS FOR EACH
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
839 * OF THE BELOW SO WE CAN SPEED UP ACCESS BY NOT HAVING TO DO A LOAD/LEAx
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
840 * COMBINATION EVERY TIME
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
841 org $0240
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
842 rmb WN.SIZ copy of last accessed window descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
843 rmb MN.SIZ copy of last accessed menu descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
844 rmb MI.SIZ copy of last accessed item descriptor
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
845 rmb 65 menu handling table (16 entrys of 4 bytes)
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
846
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
847 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
848 * WindInt menu handling table entry definition
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
849 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
850 MnuXNum rmb 1 menu #
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
851 MnuXStrt rmb 1 X start text co-ordinate
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
852 MnuXEnd rmb 1 X end text co-ordinate
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
853 rmb 1 unused?
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
854 MnuHSiz equ .
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
855
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
856 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
857 * Character binary switches
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
858 TChr equ %10000000 transparent characters
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
859 Under equ %01000000 underline characters
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
860 Bold equ %00100000 bold characters
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
861 Prop equ %00010000 proportional spacing of characters
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
862 Scale equ %00001000 automatic window scaling
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
863 Invers equ %00000100 inverse characters
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
864 NoCurs equ %00000010 no cursor display
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
865 Protect equ %00000001 device window protection
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
866
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
867 *****************************************************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
868 * Screen types (high bit set=hardware text, else graphics) in GRFDRV
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
869 Current equ $ff Current screen
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
870 * equ 1 640x200x2
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
871 * equ 2 320x200x4
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
872 * equ 3 640x200x4
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
873 * equ 4 320x200x16
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
874 * equ $85 80 column text
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
875 * equ $86 40 column text
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
876
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
877 *************************************
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
878 * Window default palette color codes
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
879 *
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
880 org 0
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
881 White. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
882 Blue. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
883 Black. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
884 Green. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
885 Red. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
886 Yellow. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
887 Magenta. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
888 Cyan. rmb 1
f01eb0d6c456 Merged systype.l1 and systype.l2 into one systype
boisy
parents:
diff changeset
889
1147
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
890 ENDC
ba4b50f63658 Dressed up
boisy
parents: 976
diff changeset
891 ENDC
373
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 359
diff changeset
892