alec/bmik
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add files to repository

Browse source
This commit is contained in:
Alec Murphy 2022-01-14 11:29:08 -05:00
parent 443c63b64d
commit 12553eeeb1
7 changed files with 1489 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

26
Src/BootHelper.HC Normal file
View file

@ -0,0 +1,26 @@
// This script will clean up non-existent removable drives when booting in QEMU
U0 BootHelper() {
I64 i;
Bool is_qemu = FALSE;
U8 *drv_model = DrvModelNum(':');
if (!MemCmp("QEMU", drv_model, 4))
is_qemu = TRUE;
Free(drv_model);
if (is_qemu) {
// Remove non-existent removable drives
for (i = 'T'; i < 'X'; i++) {
if (Let2Drv(i, 0))
DrvDel(Let2Drv(i));
}
// Add default QEMU CDROM
CBlkDev *bd = CAlloc(sizeof(CBlkDev));
bd = BlkDevNextFreeSlot('T', 5);
bd->unit = 0;
bd->base0 = 0x170;
bd->base1 = 0x374;
BlkDevAdd(bd, , 0, 0);
}
}
BootHelper;