* EQU
*
* This module contains all the EQUs for all the modules
*

* VDP equates
*
VDPWA  EQU  >8C02
VDPRD  EQU  >8800
VDPWD  EQU  >8C00

* RAM bank 0 EQUs
*
IDNUM  EQU  >50A0
CRUBAS EQU  >50A2

TEMPWS EQU  >5CCC
*SAVR1  EQU  TEMPWS+2
*SAVR11 EQU  TEMPWS+22
XFER   EQU  >5850
*DSRRT  EQU  >5CA4
*PABBUF EQU  >5CC2        Copy of PAB (10 bytes)
*PABADR EQU  >5CC0        Address of PAB in VDP RAB
*FNCB   EQU  >5CEC

* RAM bank 2 EQUs
*
NCB    EQU  >5000        Name compare buffer (40 bytes)
IFOWS  EQU  >5028        Workspace for IsFileOpen routine
DFDR   EQU  >5048        Copy of FDR we want to delete
GFDRRT EQU  >5148        Return address for GETFDR routine
SFDRAU EQU  >514A        AU of the FDR used by SAVE
POSIRT EQU  >514C        Return address useb my position
POSIAU EQU  >514E        AU used by position
POSISE EQU  >5150        Sector offset used by position
G24BUF EQU  >5152        Buffer used by GPL routine >24
MKDAU1 EQU  >5200
MKDAU2 EQU  >5202
MKDIDX EQU  >5204

* The following are used as parameters to MKFDR

MKFSZ  EQU  >5252        Size of file in sectors
MKFL3  EQU  >5254        # of level 3 records
MKFLAG EQU  >5256        File flags
MKFRPS EQU  >5258        Records per sector
MKFRL  EQU  >525A        record length
MKFEOF EQU  >525B        End Of File offset
MKFAU1 EQU  >525C        AU of new FDR


MKSR11 EQU  >525E        Return address for MKFDR
RENMAU EQU  >5260        AU of FDR of file to be renamed
RENFIL EQU  >5262        Number of files in directory
RNFDIR EQU  >5264        AU of FDIR that rename works on
RNFNS  EQU  >5266        84 byte buffer for rename to store filenames

PATH   EQU  RNFNS+84     Storage for 8 path names (320 bytes)
DLTABL EQU  PATH+320     Table of all disk labels (80 bytes)

RNOLD  EQU  DLTABL+80    10 character buffer for rename
RNNEW  EQU  RNOLD+10
RNLOW  EQU  RNNEW+10
RNHIGH EQU  RNLOW+2
LONAM  EQU  RNHIGH+2
HINAM  EQU  LONAM+10

OFCASH EQU  >6000-1600   Open File Cache

* RAM bank 4 EQUs
*
FDDRWS EQU >5000+48      Workspace for Bank 4 routines
SAUTBL EQU FDDRWS+32     Sector/AU table
DSZTBL EQU SAUTBL+16     Disk size table
SAVEAU EQU DSZTBL+16
DNCASH EQU SAVEAU+2      Directory name cache

* BANKIT EQUs
*
SCSIRD EQU >0700
SCSIWT EQU >0701
SCSIPU EQU >0702
SCSIIN EQU >0703
SCSIFT EQU >0704         Format
SCSIIT EQU >0705         Interrogate
SCSI10 EQU >0706
SCSI20 EQU >0707
SCSIEX EQU >0708         Examine SCSI device
SCSICP EQU >0709         SCSI direct

* Other routines.
*
LOAD   EQU  >0100
SAVE   EQU  >0101
SCSI25 EQU  >0102        GPL program >25 - Access output file
DELETE EQU  >0500
OPEN   EQU  >0300
CLOSE  EQU  >0201
READ   EQU  >0200
REWIND EQU  >0202
WRITE  EQU  >0400
STATUS EQU  >0501
PROTEC EQU  >0502        GPL program >22 - file protect
SCSI24 EQU  >0503        GPL program >24 - Access input file
RMDIR  EQU  >0504        GPL program >29 - Delete directory
MKDIR  EQU  >0600        GPL program >28 - Create directory
RENAME EQU  >0601        GPL program >23 - Rename file
