folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

AltairZ80: IBC MCC: Clean up HDC.

Browse source
This commit is contained in:
Howard M. Harte 2023-06-18 16:12:30 -07:00
parent a7dc7567c5
commit 3acc69fbd2
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
AltairZ80/ibc_mcc_hdc.c
View file

@ -49,7 +49,8 @@
#define IBC_HDC_MAX_DRIVES 4 /* Maximum number of drives supported */
#define IBC_HDC_MAX_SECLEN 256 /* Maximum of 256 bytes per sector */
#define IBC_HDC_FORMAT_FILL_BYTE 0xe5 /* Real controller uses 0, but we
choose 0xe5 so the disk shows up as blank under CP/M. */
choose 0xe5 so the disk shows
up as blank under CP/M. */
#define IBC_HDC_MAX_CYLS 1024
#define IBC_HDC_MAX_HEADS 16
#define IBC_HDC_MAX_SPT 256
@ -67,6 +68,7 @@
#define TF_TRKH 7
#define TF_FIFO 8
#define IBC_HDC_STATUS_BUSY (1 << 4)
#define IBC_HDC_STATUS_ERROR (1 << 0)
#define IBC_HDC_ERROR_ID_NOT_FOUND (1 << 4)
@ -536,7 +538,7 @@ static t_stat IBC_HDC_doCommand(void)
IBC_HDC_DRIVE_INFO* pDrive = &ibc_hdc_info->drive[ibc_hdc_info->sel_drive];
uint8 cmd = ibc_hdc_info->taskfile[TF_CMD] & IBC_HDC_CMD_MASK;
pDrive->cur_cyl = ibc_hdc_info->taskfile[TF_TRKH] << 8;
pDrive->cur_cyl = (uint16)ibc_hdc_info->taskfile[TF_TRKH] << 8;
pDrive->cur_cyl |= ibc_hdc_info->taskfile[TF_TRKL];
pDrive->xfr_nsects = ibc_hdc_info->taskfile[TF_NSEC];
pDrive->cur_head = ibc_hdc_info->taskfile[TF_HEAD];