Files
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

40 lines
1.5 KiB
Plaintext
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

; CP/M disk control block equates which define the
; disk types and maximum storage capability of each
; disk type.
; CP/M to host disk constants
hstsiz EQU 1024 ;blocking/deblocking buffer size
cpmsib EQU 1024/128 ;standard sectors in block
fpysib EQU 2048/128 ;sectors in floppy disk block
hblksiz EQU 4*1024 ;M20 block size
hhstsiz EQU 512 ;M20 bytes per sector
hdspt EQU 21 ;M20 physical sectors per head/track
hhstspt EQU hdspt*8 ;M20 physical sectors per track
hhstblk EQU hhstsiz/128 ;M20 CP/M records per physical sector
hcpmspt EQU hhstblk*hhstspt ;M20 CP/M records per track
hardsib EQU hblksiz/128 ;standard records in hard disk data block
dskhd EQU 8 ;hard drive, 512-byte sectors
s1dsm EQU ((77-2)*26)/cpmsib
s2dsm EQU ((77-2)*2*26)/fpysib
d1dsm EQU ((77-2)*2*26)/fpysib
d2dsm EQU ((77-2)*2*2*26)/fpysib
d3dsm EQU ((77-2)*4*15)/fpysib
d4dsm EQU ((77-2)*2*4*15)/fpysib
d5dsm EQU ((77-2)*8*8)/fpysib
d6dsm EQU ((77-2)*2*8*8)/fpysib
h0dsm EQU 97*hcpmspt/hardsib ;1st 97 tracks of M20
h1dsm EQU h0dsm ;2nd 97 tracks of M20
h2dsm EQU 49*hcpmspt/hardsib ;last 49 tracks of M20
ndsk EQU 5 ;number of logical disk drives
csvflen equ 256/4 ;csv length for floppies
alvflen equ (d6dsm+7)/8 ;alloc vector length for floppies
alvh0ln EQU (h0dsm+7)/8 ;alv length for logical hard drive 0
alvh1ln EQU (h1dsm+7)/8 ;alv length for logical hard drive 1
alvh2ln EQU (h2dsm+7)/8 ;alv length for logical hard drive 2