int pc1350_ina(device_t *device)
{
pc1350_state *state = device->machine().driver_data<pc1350_state>();
running_machine &machine = device->machine();
int data = state->m_outa;
int t = pc1350_keyboard_line_r(machine);
if (t & 0x01)
data |= machine.root_device().ioport("KEY0")->read();
if (t & 0x02)
data |= machine.root_device().ioport("KEY1")->read();
if (t & 0x04)
data |= machine.root_device().ioport("KEY2")->read();
if (t & 0x08)
data |= machine.root_device().ioport("KEY3")->read();
if (t & 0x10)
data |= machine.root_device().ioport("KEY4")->read();
if (t & 0x20)
data |= machine.root_device().ioport("KEY5")->read();
if (state->m_outa & 0x01)
data |= machine.root_device().ioport("KEY6")->read();
if (state->m_outa & 0x02)
data |= machine.root_device().ioport("KEY7")->read();
if (state->m_outa & 0x04)
{
data |= machine.root_device().ioport("KEY8")->read();
/* At Power Up we fake a 'CLS' pressure */
if (state->m_power)
data |= 0x08;
}
if (state->m_outa & 0x08)
data |= machine.root_device().ioport("KEY9")->read();
if (state->m_outa & 0x10)
data |= machine.root_device().ioport("KEY10")->read();
if (state->m_outa & 0xc0)
data |= machine.root_device().ioport("KEY11")->read();
// missing lshift
return data;
}
int pc1350_ina(void)
{
int data=outa;
int t=pc1350_keyboard_line_r();
if (t&1) {
if (PC1350_KEY_BRACE_CLOSE) data|=1;
if (PC1350_KEY_COLON) data|=2;
if (PC1350_KEY_SEMICOLON) data|=4;
if (PC1350_KEY_COMMA) data|=8;
if (PC1350_KEY_SML) data|=0x10;
if (PC1350_KEY_DEF) data|=0x20;
// not sure if both shifts are wired to the same contacts
if (PC1350_KEY_LSHIFT||PC1350_KEY_RSHIFT) data|=0x40;
}
if (t&2) {
if (PC1350_KEY_BRACE_OPEN) data|=1;
if (PC1350_KEY_SLASH) data|=2;
if (PC1350_KEY_ASTERIX) data|=4;
if (PC1350_KEY_MINUS) data|=8;
if (PC1350_KEY_Z) data|=0x10;
if (PC1350_KEY_A) data|=0x20;
if (PC1350_KEY_Q) data|=0x40;
}
if (t&4) {
if (PC1350_KEY_9) data|=1;
if (PC1350_KEY_6) data|=2;
if (PC1350_KEY_3) data|=4;
if (PC1350_KEY_PLUS) data|=8;
if (PC1350_KEY_X) data|=0x10;
if (PC1350_KEY_S) data|=0x20;
if (PC1350_KEY_W) data|=0x40;
}
if (t&8) {
if (PC1350_KEY_8) data|=1;
if (PC1350_KEY_5) data|=2;
if (PC1350_KEY_2) data|=4;
if (PC1350_KEY_POINT) data|=8;
if (PC1350_KEY_C) data|=0x10;
if (PC1350_KEY_D) data|=0x20;
if (PC1350_KEY_E) data|=0x40;
}
if (t&0x10) {
if (PC1350_KEY_7) data|=1;
if (PC1350_KEY_4) data|=2;
if (PC1350_KEY_1) data|=4;
if (PC1350_KEY_0) data|=8;
if (PC1350_KEY_V) data|=0x10;
if (PC1350_KEY_F) data|=0x20;
if (PC1350_KEY_R) data|=0x40;
}
if (t&0x20) {
if (PC1350_KEY_UP) data|=1;
if (PC1350_KEY_DOWN) data|=2;
if (PC1350_KEY_LEFT) data|=4;
if (PC1350_KEY_RIGHT) data|=8;
if (PC1350_KEY_B) data|=0x10;
if (PC1350_KEY_G) data|=0x20;
if (PC1350_KEY_T) data|=0x40;
}
if (outa&1) {
// if (PC1350_KEY_1) data|=2; //?
if (PC1350_KEY_INS) data|=4;
if (PC1350_KEY_DEL) data|=8;
if (PC1350_KEY_N) data|=0x10;
if (PC1350_KEY_H) data|=0x20;
if (PC1350_KEY_Y) data|=0x40;
}
if (outa&2) {
// if (PC1350_KEY_2) data|=4; //?
if (PC1350_KEY_MODE) data|=8;
if (PC1350_KEY_M) data|=0x10;
if (PC1350_KEY_J) data|=0x20;
if (PC1350_KEY_U) data|=0x40;
}
if (outa&4) {
if (power||PC1350_KEY_CLS) data|=8;
if (PC1350_KEY_SPACE) data|=0x10;
if (PC1350_KEY_K) data|=0x20;
if (PC1350_KEY_I) data|=0x40;
}
if (outa&8) {
if (PC1350_KEY_ENTER) data|=0x10;
if (PC1350_KEY_L) data|=0x20;
if (PC1350_KEY_O) data|=0x40;
}
if (outa&0x10) {
if (PC1350_KEY_EQUALS) data|=0x20;
if (PC1350_KEY_P) data|=0x40;
}
if (PC1350_KEY_OFF&&(outa&0xc0) ) data|=0xc0;
// missing lshift
return data;
}
