Add read-only cassette emulation to IBM 5150 PC. Patch from JohnElliott.

This commit is contained in:
SarahW 2019-04-17 20:37:23 +01:00
commit 84a098bc98
18 changed files with 1891 additions and 1136 deletions

View file

@ -1,5 +1,6 @@
#include "ibm.h"
#include "device.h"
#include "cassette.h"
#include "fdd.h"
#include "io.h"
#include "mem.h"
@ -126,7 +127,9 @@ void keyboard_xt_write(uint16_t port, uint8_t val, void *priv)
timer_process();
timer_update_outstanding();
if (keyboard_xt.pb2_turbo)
if (romset == ROM_IBMPC)
cassette_set_motor((val & 8) ? 0 : 1);
else if (keyboard_xt.pb2_turbo)
cpu_set_turbo((val & 4) ? 0 : 1);
speaker_update();
@ -183,6 +186,8 @@ uint8_t keyboard_xt_read(uint16_t port, void *priv)
temp = ((mem_size-64) / 32) & 0xf;
else
temp = ((mem_size-64) / 32) >> 4;
temp |= (cassette_input()) ? 0x10 : 0;
}
else if (romset == ROM_ATARIPC3)
{