Previous 15994 Revisions Next

r3530 Monday 10th November, 2008 at 14:07:28 UTC by Miodrag Milanović
[PECOM] Some more fixes
[src/mess/drivers]pecom.c
[src/mess/machine]pecom.c

src/mess/machine/pecom.c
r3529r3530
8888static CDP1802_EF_READ( pecom64_ef_r )
8989{
9090   int flags = 0x0f;
91   flags -= input_port_read(machine, "CNT");
92 
93   if (cassette_input(cassette_device_image(machine)) > +0.5) flags -= EF2;
94   
91   if (cassette_get_state(cassette_device_image(machine)) & CASSETTE_PLAY) {
92      if (cassette_input(cassette_device_image(machine)) > +0.05) flags -= EF2;
93   } else {
94      flags -= input_port_read(machine, "CNT");
95   }
9596   return flags;
9697}
9798 
src/mess/drivers/pecom.c
r3529r3530
114114      PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_CODE(KEYCODE_PGDN) // ??
115115   PORT_START("CNT")       
116116      PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_CODE(KEYCODE_LCONTROL) PORT_CODE(KEYCODE_RCONTROL)
117      PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_UNUSED ) // cassete in
118      PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_LSHIFT) PORT_CODE(KEYCODE_RSHIFT)
117      PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_CODE(KEYCODE_RSHIFT)
118      PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD  ) PORT_CODE(KEYCODE_LSHIFT) 
119119      PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_UNUSED ) 
120120INPUT_PORTS_END
121121 

Previous 15994 Revisions Next


© 1998-2018 The MESS Team