Files
Digital-Research-Source-Code/CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 3.1 SOURCE/D5/DPBS.EQU
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

40 lines
1.5 KiB
Plaintext
Raw 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