;
; This file just contains all the equates and is 'INCLUDE'd where necessary
;
Version         equ     '1'
Mark            equ     '3'

._.SpriteData            equ     04000h
._.Sprite0Data           equ     04000h
._.Sprite1Data           equ     04100h
._.Sprite2Data           equ     04200h
._.Sprite3Data           equ     04300h
._.Sprite4Data           equ     04400h
._.Sprite5Data           equ     04500h
._.Sprite6Data           equ     04600h
._.Sprite7Data           equ     04700h
._.Sprite8Data           equ     04800h
._.Sprite9Data           equ     04900h
._.SpriteAData           equ     04A00h
._.SpriteBData           equ     04B00h
._.SpriteCData           equ     04C00h
._.SpriteDData           equ     04D00h
._.SpriteEData           equ     04E00h
._.SpriteFData           equ     04F00h


._.SpriteControls        equ     06000h
._.Sprite0Control        equ     06000h
._.Sprite1Control        equ     06008h
._.Sprite2Control        equ     06010h
._.Sprite3Control        equ     06018h
._.Sprite4Control        equ     06020h
._.Sprite5Control        equ     06028h
._.Sprite6Control        equ     06030h
._.Sprite7Control        equ     06038h
._.Sprite8Control        equ     06040h
._.Sprite9Control        equ     06048h
._.SpriteAControl        equ     06050h
._.SpriteBControl        equ     06058h
._.SpriteCControl        equ     06060h
._.SpriteDControl        equ     06068h
._.SpriteEControl        equ     06070h
._.SpriteFControl        equ     06078h
      

._.4096ColorPalette      equ     06400h
._.4096Pen0Palette       equ     06400h
._.4096Pen1Palette       equ     06402h
._.4096Pen2Palette       equ     06404h
._.4096Pen3Palette       equ     06406h
._.4096Pen4Palette       equ     06408h
._.4096Pen5Palette       equ     0640Ah
._.4096Pen6Palette       equ     0640Ch
._.4096Pen7Palette       equ     0640Eh
._.4096Pen8Palette       equ     06410h
._.4096Pen9Palette       equ     06412h
._.4096PenAPalette       equ     06414h
._.4096PenBPalette       equ     06416h
._.4096PenCPalette       equ     06418h
._.4096PenDPalette       equ     0641Ah
._.4096PenEPalette       equ     0641Ch
._.4096PenFPalette       equ     0641Eh

._.4096BorderPalette     equ     06420h

._.SpritePensPalette     equ     06422h
._.SpritePen1Palette     equ     06422h
._.SpritePen2Palette     equ     06424h
._.SpritePen3Palette     equ     06426h
._.SpritePen4Palette     equ     06428h
._.SpritePen5Palette     equ     0642Ah
._.SpritePen6Palette     equ     0642Ch
._.SpritePen7Palette     equ     0642Eh
._.SpritePen8Palette     equ     06430h
._.SpritePen9Palette     equ     06432h
._.SpritePenAPalette     equ     06434h
._.SpritePenBPalette     equ     06436h
._.SpritePenCPalette     equ     06438h
._.SpritePenDPalette     equ     0643Ah
._.SpritePenEPalette     equ     0643Ch
._.SpritePenFPalette     equ     0643Eh


._.RasterInterruptLine   equ     06800h
._.SplitScreenScanLine   equ     06801h
._.SplitScreenStartAddr  equ     06802h
._.SoftScrollControlReg  equ     06804h
._.InterruptVector       equ     06805h

._.Analog2DigChannels    equ     06808h
._.Analog2DigChannel0    equ     06808h
._.Analog2DigChannel1    equ     06809h
._.Analog2DigChannel2    equ     0680Ah
._.Analog2DigChannel3    equ     0680Bh
._.Analog2DigChannel4    equ     0680Ch
._.Analog2DigChannel5    equ     0680Dh
._.Analog2DigChannel6    equ     0680Eh
._.Analog2DigChannel7    equ     0680Fh

._.SoundDMAPointer0      equ     06C00h
._.SoundDMAPrescaler0    equ     06C02h
._.SoundDMAPointer1      equ     06C04h
._.SoundDMAPrescaler1    equ     06C06h
._.SoundDMAPointer2      equ     06C08h
._.SoundDMAPrescaler2    equ     06C0Ah
._.SoundDMAControlStatus equ     06C0Fh


CM3     equ     3822            ;note = 0  => C  -3
CSM3    equ     3608            ;note = 1  => C# -3
DM3     equ     3405            ;note = 2  => D  -3
DSM3    equ     3214            ;note = 3  => D# -3
EM3     equ     3034            ;note = 4  => E  -3
FM3     equ     2863            ;note = 5  => F  -3
FSM3    equ     2703            ;note = 6  => F# -3
GM3     equ     2551            ;note = 7  => G  -3
GSM3    equ     2408            ;note = 8  => G# -3
AM3     equ     2273            ;note = 9  => A  -3
ASM3    equ     2145            ;note = 10 => A# -3
BM3     equ     2025            ;note = 11 => B  -3

CM2     equ     1911            ;note = 12 => C  -2
CSM2    equ     1804            ;note = 13 => C# -2
DM2     equ     1703            ;note = 14 => D  -2
DSM2    equ     1607            ;note = 15 => D# -2
EM2     equ     1517            ;note = 16 => E  -2
FM2     equ     1432            ;note = 17 => F  -2
FSM2    equ     1351            ;note = 18 => F# -2
GM2     equ     1276            ;note = 19 => G  -2
GSM2    equ     1204            ;note = 20 => G# -2
AM2     equ     1136            ;note = 21 => A  -2
ASM2    equ     1073            ;note = 22 => A# -2
BM2     equ     1012            ;note = 23 => B  -2

CM1     equ     956             ;note = 24 => C  -1
CSM1    equ     902             ;note = 25 => C# -1
DM1     equ     851             ;note = 26 => D  -1
DSM1    equ     804             ;note = 27 => D# -1
EM1     equ     758             ;note = 28 => E  -1
FM1     equ     716             ;note = 29 => F  -1
FSM1    equ     676             ;note = 30 => F# -1
GM1     equ     638             ;note = 31 => G  -1
GSM1    equ     602             ;note = 32 => G# -1
AM1     equ     568             ;note = 33 => A  -1
ASM1    equ     536             ;note = 34 => A# -1
BM1     equ     506             ;note = 35 => B  -1

CO0     equ     478             ;note = 36 => C   0
CSO0    equ     451             ;note = 37 => C#  0
DO0     equ     426             ;note = 38 => D   0
DSO0    equ     402             ;note = 39 => D#  0
EO0     equ     379             ;note = 40 => E   0
FO0     equ     358             ;note = 41 => F   0
FSO0    equ     338             ;note = 42 => F#  0
GO0     equ     319             ;note = 43 => G   0
GSO0    equ     301             ;note = 44 => G#  0
AO0     equ     284             ;note = 45 => A   0
ASO0    equ     268             ;note = 46 => A#  0
BO0     equ     253             ;note = 47 => B   0

CO1     equ     239             ;note = 48 => C   1
CSO1    equ     225             ;note = 49 => C#  1
DO1     equ     213             ;note = 50 => D   1
DSO1    equ     201             ;note = 51 => D#  1
EO1     equ     190             ;note = 52 => E   1
FO1     equ     179             ;note = 53 => F   1
FSO1    equ     169             ;note = 54 => F#  1
GO1     equ     159             ;note = 55 => G   1
GSO1    equ     150             ;note = 56 => G#  1
AO1     equ     142             ;note = 57 => A   1
ASO1    equ     134             ;note = 58 => A#  1
BO1     equ     127             ;note = 59 => B   1

CO2     equ     119             ;note = 60 => C   2
CSO2    equ     113             ;note = 61 => C#  2
DO2     equ     106             ;note = 62 => D   2
DSO2    equ     100             ;note = 63 => D#  2
EO2     equ     95              ;note = 64 => E   2
FO2     equ     89              ;note = 65 => F   2
FSO2    equ     84              ;note = 66 => F#  2
GO2     equ     80              ;note = 67 => G   2
GSO2    equ     75              ;note = 68 => G#  2
AO2     equ     71              ;note = 69 => A   2
ASO2    equ     67              ;note = 70 => A#  2
BO2     equ     63              ;note = 71 => B   2

CO3     equ     60              ;note = 72 => C   3
CSO3    equ     56              ;note = 73 => C#  3
DO3     equ     53              ;note = 74 => D   3
DSO3    equ     50              ;note = 75 => D#  3
EO3     equ     47              ;note = 76 => E   3
FO3     equ     45              ;note = 77 => F   3
FSO3    equ     42              ;note = 78 => F#  3
GO3     equ     40              ;note = 79 => G   3
GSO3    equ     38              ;note = 80 => G#  3
AO3     equ     36              ;note = 81 => A   3
ASO3    equ     34              ;note = 82 => A#  3
BO3     equ     32              ;note = 83 => B   3

CO4     equ     30              ;note = 84 => C   4
CSO4    equ     28              ;note = 85 => C#  4
DO4     equ     27              ;note = 86 => D   4
DSO4    equ     25              ;note = 87 => D#  4
EO4     equ     24              ;note = 88 => E   4
FO4     equ     22              ;note = 89 => F   4
FSO4    equ     21              ;note = 90 => F#  4
GO4     equ     20              ;note = 91 => G   4
GSO4    equ     19              ;note = 92 => G#  4
AO4     equ     18              ;note = 93 => A   4
ASO4    equ     17              ;note = 94 => A#  4
BO4     equ     16              ;note = 95 => B   4



PARAM0	EQU	 0 
PARAM1	EQU	 0 
PARAM2	EQU	 0 
PARAM3	EQU	 0 
PARAM4	EQU	 0 
PARAM5	EQU	 0 
PARAM6	EQU	 0 
PARAM7	EQU	 0 
PARAM8	EQU	 0 
PARAM9	EQU	 3 		;VERSION NUMBER
;
;

; console 'copyrht1.lib:1  -  7 NOV 85 - copyright notice'

; ********************************************************************
; * THIS PROGRAM IS AN UNPUBLISHED WORK FULLY PROTECTED BY COPYRIGHT *
; * LAWS.   IT IS CONSIDERED A TRADE SECRET OF THE COPYRIGHT HOLDER. *
; *         (C) COPYRIGHT  1985  MEJ ELECTRONICS LIMITED             *
; ********************************************************************
;

; console 'defaults.asm:1  - 20 feb 87 - program defaults'
;
; defaults
; --------
;
;param0		- *** not used ***
;param1		- *** not used ***
;param2		- *** not used ***
;param3		- *** not used ***
;param4		- *** not used ***
;param5		- *** not used ***
;param6		- *** not used ***
;param7		- *** not used ***
;param8		- *** not used ***
;param9		- version number
;
; skips
; -----
;
; hardware options
;
;ant           equ 0 ;configure for ANT
;joyce           equ     0       ;configure for JOYCE
;arnold          equ     -1      ;configure for ARNOLD
;rade    equ 0 ;conigure for RADE
;
;using765  equ -1  ;using 765 fdc
;
;motorcontrol  equ -1  ;we can turn the motor on & off
;tccontrol       equ     0       ;we don't have Terminal Count control
;fdcinterrupts   equ     0       ;fdc cannot interrupt
;
;testformat      equ     -1      ;allow option to format test discs
;


; console 'defardis.lib:1  -  1 apr 85 - arnold disc interface definitions'
;
;        %if      arnold
;
; fdc io adddresses
; -----------------
;
fdcmotor	equ	0FA7Eh	;motor control
fdcstatus	equ	0FB7Eh	;address of status reg
fdcdata		equ	0FB7Fh	;address of data reg
;
; motor control
; -------------
;
motoroff	equ	0	;turn off the motorr
motoron		equ	1	;turn on the motor
;
;        %endif   ;arnold


; console 'defines .lib:2  - 15 dec 86 - bit definitions'
;
true	EQU	0FFFFH
false	EQU	0
;
bit7	EQU	80H
bit6	EQU	40H
bit5	EQU	20H
bit4	EQU	10H
bit3	EQU	08H
bit2	EQU	04H
bit1	EQU	02H
bit0	EQU	01H
;
notbit0	EQU	0H
notbit1	EQU	0H
notbit2	EQU	0H
notbit3	EQU	0H
notbit4	EQU	0H
notbit5	EQU	0H
notbit6	EQU	0H
notbit7	EQU	0H
;

; console 'defcnt  .lib:3  - 15 dec 86 - ascii control code definitions'
;
nul	equ	0
soh	equ	1
stx	equ	2
etx	equ	3
eot	equ	4
enq	equ	5
ack	equ	6
bel	equ	7
bs	equ	8
tab	equ	9
lf	equ	10
vt	equ	11
ff	equ	12
cr	equ	13
so	equ	14
si	equ	15
dle	equ	16
dc1	equ	17
dc2	equ	18
dc3	equ	19
dc4	equ	20
nak	equ	21
syn	equ	22
etb	equ	23
can	equ	24
em	equ	25
sub	equ	26
esc	equ	27
fs	equ	28
gs	equ	29
rs	equ	30
us	equ	31
;
rubout	equ	07Fh	;the rub out char

Aonly		equ	bit0	;test drive A only
Bonly		equ	bit1	;test drive B only
bothdrives	equ	Aonly + Bonly ;test both drives
;
driveA		equ	0	;address of drive A
driveB		equ	1	;address of drive B
;
; testing
; -------
;
rdonly		equ	bit7	;read only testing
rwtesting	equ	notbit7	;read after write testing
;
; drive specifications
; --------------------
;
firsttrack	equ	0	;start at track	0
lasttrack       equ     79      ;end at track 79
trackcount	equ	lasttrack - firsttrack + 1 ;number of tracks
;
; buffers
; -------
;
sectorsize	equ	512	;length of sectors
;


; console 'def765  .lib:3  - 15 dec 86 - 765 floppy disc controller definitions'
;
; fdc commands
; ------------
;
specify		equ	03h	;specify command
wrtsec		equ	05h	;write command
readsec		equ	06h	;read command
restore		equ	07h	;realign command
senseinterrupt	equ	08h	;sense interrupt command
readid		equ	0Ah	;read header id
sensedrive	equ	04h	;sense drive status
formattk	equ	0Dh	;format command
seek		equ	0Fh	;seek command
;
; other fdc definitions
; ---------------------
;
mf		equ	40h	;double density mfm mode
sk		equ	20h	;skip deleted address mark
dtl		equ	0FFh	;dtl not used
;
drivebits	equ	03h	;ls 2 bits are drive select code
;
headselect	equ	04h	;bit 2 is head select
;
; main status register
; --------------------
;
fdd0busy	equ	01h	;fdd 0 is seeking
fdd1busy	equ	02h	;fdd 1 is seeking
fdd2busy	equ	04h	;fdd 2 is seeking
fdd3busy	equ	08h	;fdd 3 is seeking
;
fdcbusy		equ	10h	;fdc is busy
executionmode	equ	20h	;fdc is in the execution phase
dio		equ	40h	;fdc data transfer direction (1 = input)
rqm		equ	80h	;request for master data transfer
;
; status register 0
; -----------------
;
st0icode	equ	bit7+bit6 ;interrupt code mask (0 => ok)
st0seekend	equ	bit5	;seek operation completed
st0echeck	equ	bit4	;equipment check
st0nready	equ	bit3	;drive not ready
st0haddress	equ	bit2	;current head address
st0unitselect	equ	bit1+bit0 ;current unit select
;
; interrupt codes
;
st0iok		equ	0	;normal termination of command
st0ierror	equ	bit6	;command failed
st0iinvalid	equ	bit7	;invalid command received
st0iready	equ	bit7+bit6 ;ready signal changed state
;
; status register 1
; -----------------
;
st1ecylinder	equ	bit7	;end of cylinder reached
st1dataerror	equ	bit5	;crc error
st1overrun	equ	bit4	;over run
st1ndata	equ	bit2	;no data (record not found)
st1nwritable	equ	bit1	;drive write protected
st1maddress	equ	bit0	;address mark missing
;
; status register 3
; -----------------
;
st3fault	equ	bit7	;drive fault line true
st3wprotect	equ	bit6	;drive write protected
st3drready	equ	bit5	;drive ready status
st3tk0		equ	bit4	;track zero flag
st3twosided	equ	bit3	;drive two sided flag
st3hdaddress	equ	bit2	;current head address
st3us1		equ	bit1	;unit select line 1
st3us0		equ	bit0	;unit select line 0
;

; console 'envmess .lib:10 - 15 dec 86 - message handler definitions'
;
; message handler definitions
; ---------------------------
;
ptescape	equ	bit7	;escape char
ptnotmess 	equ	bit7+bit6 ;not a sub message escape char
pthex		equ	bit5	;print hex value
pt16bits	equ	bit4	;print 16 bit value
ptvar		equ	bit3	;print variable contents
;
ptdrivemask	equ	bit1+bit0 ;drive number mask
ptsidemask	equ	bit2	;side number mask
ptregmask	equ	3	;reg number mask
ptdrnum		equ	ptnotmess+4 ;print drive number (in E)
ptsidenum	equ	ptnotmess+5 ;print side number (in E)
ptvarchar	equ	ptnotmess+6+ptvar ;print char in variable
;
; decimal number output
;
ptB		equ	ptnotmess+1;print the contents of reg B
ptC		equ	ptnotmess+0;print the contents of reg C
ptD		equ	ptnotmess+3;print the contents of reg D
ptE		equ	ptnotmess+2;print the contents of reg E
;
ptbc		equ	ptnotmess+pt16bits+0;print the contents of BC
ptde		equ	ptnotmess+pt16bits+2;print the contents of DE
;
ptv8		equ	ptnotmess+ptvar	     ;print the contents of an 8 bit variable
ptv16		equ	ptnotmess+ptvar+pt16bits ;print the contents of an 16 bit variable
;
; hex number output
;
pthexB		equ	ptnotmess+pthex+1;print the contents of reg B
pthexC		equ	ptnotmess+pthex+0;print the contents of reg C
pthexD		equ	ptnotmess+pthex+3;print the contents of reg D
pthexE		equ	ptnotmess+pthex+2;print the contents of reg E
;
pthexbc		equ	ptnotmess+pthex+pt16bits+0;print the contents of BC
pthexde		equ	ptnotmess+pthex+pt16bits+2;print the contents of DE
;
pthexv8         equ     ptnotmess+ptvar     ;print the contents of an 8 bit teq
pthexv16        equ     ptnotmess+ptvar+pt16bits ;print the contents of an 16 bit teq
;
printsubmessage	equ	ptescape	;print a sub message
;
; escape sequences
;
windesc		equ	27	;window escape char
;
esccurup	equ	'A'*256+windesc	;cursor up
esccurdown	equ	'B'*256+windesc	;cursor down
esccurfward	equ	'C'*256+windesc	;cursor forward
esccurbward	equ	'D'*256+windesc	;cursor backward
escclear	equ	'E'*256+windesc	;clear page
eschome		equ	'H'*256+windesc	;home the cursor
escrevindex	equ	'I'*256+windesc	;reverse index
escerapend	equ	'J'*256+windesc	;erase to end of page
esceralend	equ	'K'*256+windesc	;erase to end of line
esclineinsert	equ	'L'*256+windesc	;insert line
esclinedelete	equ	'M'*256+windesc	;delete line
escchardelete	equ	'N'*256+windesc	;delete char
escrestwindow	equ	'R'*256+windesc	;restore previous window number
escselwindow	equ	'S'*256+windesc	;select window
escsavewindow	equ	'T'*256+windesc	;save current window number
escsetwindow	equ	'W'*256+windesc	;set window size
esccuraddr	equ	'Y'*256+windesc	;set cursor addr
escforeground	equ	'b'*256+windesc	;set foreground colour
escbackground	equ	'c'*256+windesc	;set background colour
escerapstart	equ	'd'*256+windesc	;erase from beginning of page
escencursor	equ	'e'*256+windesc	;enable cursor blob
escdiscursor	equ	'f'*256+windesc	;disable cursor blob
escsavecursor	equ	'j'*256+windesc	;save cursor position
escrestcursor	equ	'k'*256+windesc	;restore cursor position
esclclear	equ	'l'*256+windesc	;erase line
esceralstart	equ	'o'*256+windesc	;erase from beginning of line
esconinverse	equ	'p'*256+windesc	;enter inverse video mode
escoffinverse	equ	'q'*256+windesc	;exit inverse video mode
escwrapenable	equ	'v'*256+windesc	;wrap at end of line
escwrapdisable	equ	'w'*256+windesc	;dont wrap at end of line
;
; default window layout
;
offset60hz	EQU	7	;60 hz systems only have 25 lines not 32
;
; window parameters
;
wintopheading	equ	0	;top line of heading window
winbotheading	equ	5	;bottom line of heading window
;
wintopuser	equ	6	;top line of user window
winbotuser	equ	30	;bottom line of user window
;
wintopstatus	equ	31	;top line of status window
winbotstatus	equ	31	;bottom line of status window
;
wintopprntest	equ	3	;top line of printer test window
winbotprntest	equ	30	;bottom line of printer test window
;
windheading	equ	0	;window 0 used for main heading
winduser	equ	1	;window 1 is user window
windstatus	equ	2	;window 2 used for status line
windprntest	equ	3	;window 3 used for printer test


; console 'envform .lib:2  - 15 dec 86 - disc formats'
;
; common to all formats
; ---------------------
;
encsecsize	equ	2	;encoded sector size (512)
filler		equ	0E5h	;format filler
fmtbits		equ	bit6+bit7 ;format code in in top 2 bits of sector number
;
; system format
; -------------
;
sfsecpertrack	equ	9	;sectors per track
sffirstsector	equ	41h	;first sector number
sfrestracks	equ	2	;reserved tracks
sfgplrw		equ	42	;gap length, read/write
sfgplformat	equ	82	;gap length, format
;
; data only format
; ----------------
;
dfsecpertrack	equ	9	;sectors per track
dffirstsector	equ	0C1h	;first sector number
dfrestracks	equ	0	;reserved tracks
dfgplrw		equ	42	;gap length, read/write
dfgplformat	equ	82	;gap length, format
;
; ibm format
; ----------
;
ifsecpertrack	equ	8	;sectors per track
iffirstsector	equ	1	;first sector number
ifrestracks	equ	1	;reserved tracks
ifgplrw		equ	2Ah	;gap length, read/write
ifgplformat	equ	50h	;gap length, format
;
; joyce format
; ------------
;
jfsecpertrack	equ	9	;sectors per track
jffirstsector	equ	1	;first sector number
jfrestracks	equ	1	;reserved tracks
jfgplrw		equ	42	;gap length, read/write
jfgplformat	equ	82	;gap length, format


; console 'envxpb  .lib:4  - 15 dec 86 - extended disc parameter block'
;
; extended disc parameter block definitions
;
xpbfirstsector	equ	0	;first sector number
xpbsecpertrack	equ	1	;number of sectors per track
xpbgplrw	equ	2	;gap length, read/write
xpbgplformat	equ	3	;gap length, format
xpbfiller	equ	4	;filler byte
xpbencsecsize	equ	5	;sector size (encoded)
xpbside		equ	6	;two sided flag
xpb80tracks	equ	7	;true if 80 track drive
xpbtrack	equ	8	;current track
xpbalign	equ	9	;true <=> aligned
xpbfreeze	equ	10	;true <=> don't auto select format
;
xpbsize		equ	11


; console 'envsysms.lib:5  - 22 may 85 - system message numbers'

sysfirstmessage	equ	11
sy              teq     sysfirstmessage
;
sysbadmessage	equ	sy	;'illegal message number: program abandoned'
sy              teq     sy + 1
syshelp		equ	sy	;'loop,error limit, quit'
sy              teq     sy + 1
sysdefaults	equ	sy	;'defaults are'
sy              teq     sy + 1
sysnodefaults	equ	sy	;'no defaults'
sy              teq     sy + 1
syscurcmnd	equ	sy	;':cmndletter looptcount'
sy              teq     sy + 1
systestabandon	equ	sy	;'err limit reached:all tests abandoned'
sy              teq     sy + 1
sysaskabandon	equ	sy	;'do you want to abandon testing'
sy              teq     sy + 1
sysclrstatus	equ	sy	;clear status window
sy              teq     sy + 1
syscounts	equ	sy	;'loop count = nn error count = nn(nn)'
sy              teq     sy + 1
syscommand	equ	sy	;'Command '
sy              teq     sy + 1
syselq		equ	sy	;'elq'
sy              teq     sy + 1
sysnopara	equ	sy	;'para error'
sy              teq     sy + 1
sysrundefaults	equ	sy	;'running defaults'
sy              teq     sy + 1
sysbadcpcmnd	equ	sy	;'is not a cmnd'
sy              teq     sy + 1
syscontc	equ	sy
sy              teq     sy + 1
;
; disc messages
;
sysnodisc	equ	sy	;'insert a disc into drive n'
sy              teq     sy + 1
syswprot	equ	sy	;'Write-enable disc in drive n'
sy              teq     sy + 1
;
lastsysmessage	equ	syswprot

;
stacksize	equ	100h	;space for stack
kbdvsize	equ	0050h	;size of keyboard variable area
ddvsize		equ	0100h	;size of disc driver area
vdvsize		equ	0100h	;size of vdu driver area
utvsize		equ	0120h	;size of utilities variable area
;
dtvsize		equ	0040h	;size of dtest variable area
kbtvsize	equ	0020h	;size of keytest variable area
iotvsize	equ	0020h	;size of iotester variable area
prtvsize	equ	1D70h	;size of printer test variable area
;
; disc buffer size
; ----------------
;
dskbufsize	equ	514	;size of disc buffers (extra 2 bytes for DTEST pattern initialisation)
;
; vdu memory sizes
; ----------------
;
stsize		equ	0400h	;ant scan table is 1k
palsize		equ	16	;length of ant palettes
vrsize		equ	90*256	;size of pixel memory
;
; ram limits
; ----------
;
ramlimit	equ	0FFF0h	;end of ram variable area
;

; console 'defs    .asm:1  - 19 feb 87 - general definitions'
;
; interrupt vectors
; -----------------
;
rst0loc		equ	00h	;restart 0
rst1loc		equ	08	;restart 1
rst2loc		equ	10h	;restart 2
rst3loc		equ	18h	;restart 3
rst4loc		equ	20h	;restart 4
rst5loc		equ	28h	;restart 5
rst6loc		equ	30h	;restart 6
rst7loc		equ	38h	;restart 7
;
nmiloc		equ	66h	;nmi restart


; console 'initial .asm:11 - 19 feb 87 - data init & set up routines'
;
; local definitions
; -----------------
;
retrycount      teq     16      ;max number of re-trys on disc errors
;
; default values
; --------------
;
defhut		equ	15	;480 ms
defhlt		equ	1*2	;4 ms
defnd		equ	1	;non dma mode
defsrt		equ	12	;default step rate
defheadsettle	equ	15	;default head settle time



