1
0
mirror of https://github.com/rcornwell/sims.git synced 2026-01-20 17:57:40 +00:00

KA10: Another attempt to get 7track parity right on TM10

This commit is contained in:
Richard Cornwell 2019-08-11 13:57:46 -04:00
parent 5cc548d83f
commit 5d64407b34

View File

@ -615,7 +615,7 @@ t_stat mt_srv(UNIT * uptr)
if (uptr->flags & MTUF_7TRK) {
cc = 6 * (5 - uptr->CPOS);
ch = mt_buffer[uptr->BPOS];
if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^
if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^ (ch & 0x40) ^
parity_table[ch & 0x3f]) == 0) {
mt_status |= PARITY_ERR;
}
@ -694,7 +694,7 @@ t_stat mt_srv(UNIT * uptr)
if ((uptr->CNTRL & MT_BRFUL) != 0) {
if (uptr->flags & MTUF_7TRK) {
ch = mt_buffer[uptr->BPOS];
if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^
if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^ (ch & 0x40) ^
parity_table[ch & 0x3f]) == 0) {
mt_status |= PARITY_ERR;
}