src/mess/drivers/glasgow.c
| r1104 | r1105 | |
| 35 | 35 | key_hi,
|
| 36 | 36 | key_select,
|
| 37 | 37 | irq_flag,
|
| 38 | lcd_invert,
|
| 38 | 39 | key_selector;
|
| 40 | UINT8 board_value;
|
| 39 | 41 | static UINT16 beeper;
|
| 40 | 42 | |
| 41 | 43 | |
| 42 | 44 | // Used by Glasgow and Dallas
|
| 43 | | static WRITE16_HANDLER ( write_lcd )
|
| 45 | static WRITE16_HANDLER ( write_lcd_gg )
|
| 44 | 46 | {
|
| 45 | 47 | UINT8 lcd_data;
|
| 46 | 48 | lcd_data = data>>8;
|
| r1104 | r1105 | |
| 50 | 52 | logerror("LCD Offset = %d Data low = %x \n ",offset,lcd_data);
|
| 51 | 53 | }
|
| 52 | 54 | |
| 53 | | |
| 55 | static WRITE16_HANDLER ( write_lcd )
|
| 56 | {
|
| 57 | UINT8 lcd_data;
|
| 58 | lcd_data = data>>8;
|
| 59 | output_set_digit_value(lcd_shift_counter,lcd_invert&1?lcd_data^0xff:lcd_data);
|
| 60 | lcd_shift_counter--;
|
| 61 | lcd_shift_counter&=3;
|
| 62 | logerror("LCD Offset = %d Data low = %x \n ",offset,lcd_data);
|
| 63 | }
|
| 54 | 64 | static WRITE16_HANDLER ( write_lcd_flag )
|
| 55 | 65 | {
|
| 56 | 66 | UINT8 lcd_flag;
|
| 67 | lcd_invert=0;
|
| 57 | 68 | lcd_flag=data>>8;
|
| 69 | //beep_set_state(0,lcd_flag&1?1:0);
|
| 70 | if (lcd_flag == 0) key_selector=1;
|
| 71 | if (lcd_flag!=0) led7=255;else led7=0;
|
| 72 | logerror("LCD Flag 16 = %x \n ",data);
|
| 73 | }
|
| 74 | |
| 75 | |
| 76 | static WRITE16_HANDLER ( write_lcd_flag_gg )
|
| 77 | {
|
| 78 | UINT8 lcd_flag;
|
| 79 | lcd_flag=data>>8;
|
| 58 | 80 | beep_set_state(0,lcd_flag&1?1:0);
|
| 59 | | if ((lcd_flag &01)== 0) key_selector=1;
|
| 60 | | if ((lcd_flag &01)== 1) key_selector=0;
|
| 61 | | //if ((lcd_flag &01)== 0) {key_selector=0;}
|
| 81 | if (lcd_flag == 0) key_selector=1;
|
| 62 | 82 | if (lcd_flag!=0) led7=255;else led7=0;
|
| 63 | | logerror("LCD Flag = %x \n ",data);
|
| 83 | logerror("LCD Flag 16 = %x \n ",data);
|
| 64 | 84 | }
|
| 65 | 85 | |
| 66 | 86 | static WRITE16_HANDLER ( write_keys )
|
| r1104 | r1105 | |
| 72 | 92 | static WRITE16_HANDLER ( write_beeper )
|
| 73 | 93 | {
|
| 74 | 94 | UINT8 beep_flag;
|
| 95 | lcd_invert=1;
|
| 75 | 96 | beep_flag=data>>8;
|
| 76 | 97 | //if ((beep_flag &02)== 0) key_selector=0;else key_selector=1;
|
| 77 | 98 | logerror("Write Beeper = %x \n ",data);
|
| r1104 | r1105 | |
| 80 | 101 | |
| 81 | 102 | static WRITE16_HANDLER ( write_irq_flag )
|
| 82 | 103 | {
|
| 104 | |
| 105 | beep_set_state(0,data&0x100);
|
| 106 | logerror("Write 0x800004 = %x \n ",data);
|
| 83 | 107 | irq_flag=1;
|
| 84 | 108 | beeper=data;
|
| 85 | 109 | }
|
| r1104 | r1105 | |
| 99 | 123 | static READ16_HANDLER(read_newkeys16) //Amsterdam, Roma
|
| 100 | 124 | {
|
| 101 | 125 | UINT16 data;
|
| 126 | |
| 102 | 127 | if (key_selector==0) data=readinputport(0x00);else data=readinputport(0x01);
|
| 103 | | //if (key_selector==1) data=readinputport(0x00);else data=0;
|
| 104 | | logerror("read Keyboard Offset = %x Data = %x\n ",offset,data);
|
| 128 | logerror("read Keyboard Offset = %x Data = %x Select = %x \n ",offset,data,key_selector);
|
| 105 | 129 | data=data<<8;
|
| 106 | 130 | return data ;
|
| 107 | 131 | }
|
| 108 | 132 | |
| 109 | 133 | static READ16_HANDLER(read_board)
|
| 110 | 134 | {
|
| 135 | UINT16 data;
|
| 136 | data=board_value^0xff;
|
| 137 | data=data<<8;
|
| 111 | 138 | logerror("read board Offset = %x \n ",offset);
|
| 112 | | return 0x0000; // Mephisto need it for working
|
| 139 | return data; // Mephisto need it for working
|
| 113 | 140 | }
|
| 114 | 141 | |
| 115 | 142 | static WRITE16_HANDLER(write_board)
|
| 116 | 143 | {
|
| 144 | UINT8 board;
|
| 145 | board=data>>8;
|
| 146 | board_value=board;
|
| 147 | if (board==0xff) key_selector=0;
|
| 117 | 148 | logerror("Write Board = %x \n ",data>>8);
|
| 118 | 149 | }
|
| 119 | 150 | |
| r1104 | r1105 | |
| 136 | 167 | {
|
| 137 | 168 | UINT8 lcd_data;
|
| 138 | 169 | lcd_data = data>>8;
|
| 139 | | if (led7==0) output_set_digit_value(lcd_shift_counter,lcd_data);
|
| 170 | output_set_digit_value(lcd_shift_counter,lcd_invert&1?lcd_data^0xff:lcd_data);
|
| 140 | 171 | lcd_shift_counter--;
|
| 141 | 172 | lcd_shift_counter&=3;
|
| 142 | 173 | //logerror("LCD Offset = %d Data = %x \n ",offset,lcd_data);
|
| r1104 | r1105 | |
| 144 | 175 | static WRITE32_HANDLER ( write_lcd_flag32 )
|
| 145 | 176 | {
|
| 146 | 177 | UINT8 lcd_flag;
|
| 178 | lcd_invert=0;
|
| 147 | 179 | lcd_flag=data>>24;
|
| 148 | | if ((lcd_flag &01)== 0) key_selector=1;
|
| 149 | | if ((lcd_flag &01)== 1) key_selector=0;
|
| 180 | if (lcd_flag == 0) key_selector=1;
|
| 150 | 181 | logerror("LCD Flag 32 = %x \n ",lcd_flag);
|
| 151 | 182 | //beep_set_state(0,lcd_flag&1?1:0);
|
| 152 | 183 | if (lcd_flag!=0) led7=255;else led7=0;
|
| r1104 | r1105 | |
| 155 | 186 | |
| 156 | 187 | static WRITE32_HANDLER ( write_keys32 )
|
| 157 | 188 | {
|
| 189 | lcd_invert=1;
|
| 158 | 190 | key_select=data;
|
| 159 | 191 | logerror("Write Key = %x \n ",key_select);
|
| 160 | 192 | }
|
| r1104 | r1105 | |
| 181 | 213 | |
| 182 | 214 | static WRITE32_HANDLER(write_board32)
|
| 183 | 215 | {
|
| 184 | | logerror("Write Board = %x \n ",data);
|
| 216 | UINT8 board;
|
| 217 | board=data>>24;
|
| 218 | if (board==0xff) key_selector=0;
|
| 219 | logerror("Write Board = %x \n ",data);
|
| 185 | 220 | }
|
| 186 | 221 | |
| 187 | 222 | |
| 223 | static WRITE32_HANDLER ( write_beeper32 )
|
| 224 | {
|
| 225 | beep_set_state(0,data&0x01000000);
|
| 226 | logerror("Write 0x8000004 = %x \n ",data);
|
| 227 | irq_flag=1;
|
| 228 | beeper=data;
|
| 229 | }
|
| 230 | |
| 188 | 231 | static TIMER_CALLBACK( update_nmi )
|
| 189 | 232 | {
|
| 190 | 233 | // if (irq_flag==0)cpunum_set_input_line_and_vector(0, MC68000_IRQ_7, PULSE_LINE, MC68000_INT_ACK_AUTOVECTOR);
|
| r1104 | r1105 | |
| 199 | 242 | |
| 200 | 243 | static MACHINE_START( glasgow )
|
| 201 | 244 | {
|
| 245 | key_selector=0;
|
| 202 | 246 | irq_flag=0;
|
| 203 | 247 | lcd_shift_counter=3;
|
| 204 | 248 | mame_timer_pulse(MAME_TIME_IN_HZ(50), 0, update_nmi);
|
| r1104 | r1105 | |
| 234 | 278 | |
| 235 | 279 | static ADDRESS_MAP_START(glasgow_mem, ADDRESS_SPACE_PROGRAM, 16)
|
| 236 | 280 | AM_RANGE( 0x0000, 0xffff ) AM_ROM
|
| 237 | | AM_RANGE( 0x00ff0000, 0x00ff0001) AM_MIRROR ( 0xfe0000 ) AM_WRITE ( write_lcd )
|
| 281 | AM_RANGE( 0x00ff0000, 0x00ff0001) AM_MIRROR ( 0xfe0000 ) AM_WRITE ( write_lcd_gg )
|
| 238 | 282 | AM_RANGE( 0x00ff0002, 0x00ff0003) AM_MIRROR ( 0xfe0002 ) AM_READWRITE ( read_keys,write_keys )
|
| 239 | | AM_RANGE( 0x00ff0004, 0x00ff0005) AM_MIRROR ( 0xfe0004 ) AM_WRITE ( write_lcd_flag )
|
| 240 | | AM_RANGE( 0x00ff0006, 0x00ff0007) AM_MIRROR ( 0xfe0006 ) AM_READWRITE ( read_board, write_board )
|
| 241 | | AM_RANGE( 0x00ff0008, 0x00ff0009) AM_MIRROR ( 0xfe0008 ) AM_WRITE ( write_beeper )
|
| 283 | AM_RANGE( 0x00ff0004, 0x00ff0005) AM_MIRROR ( 0xfe0004 ) AM_WRITE ( write_lcd_flag_gg )
|
| 284 | AM_RANGE( 0x00ff0006, 0x00ff0007) AM_MIRROR ( 0xfe0006 ) AM_READWRITE ( read_board, write_beeper )
|
| 285 | AM_RANGE( 0x00ff0008, 0x00ff0009) AM_MIRROR ( 0xfe0008 ) AM_WRITE ( write_board )
|
| 242 | 286 | AM_RANGE( 0x00ffC000, 0x00ffFFFF) AM_MIRROR ( 0xfeC000 ) AM_RAM // 16KB
|
| 243 | 287 | ADDRESS_MAP_END
|
| 244 | 288 | |
| r1104 | r1105 | |
| 261 | 305 | //ADDRESS_MAP_FLAGS( AMEF_ABITS(17) )
|
| 262 | 306 | AM_RANGE( 0x0000, 0xffff ) AM_ROM
|
| 263 | 307 | AM_RANGE( 0x00800000, 0x00800003) AM_WRITE ( write_lcd32 )
|
| 308 | AM_RANGE( 0x00800004, 0x00800007) AM_WRITE ( write_beeper32 )
|
| 264 | 309 | AM_RANGE( 0x00800008, 0x0080000B) AM_WRITE ( write_lcd_flag32 )
|
| 265 | 310 | AM_RANGE( 0x00800010, 0x00800013) AM_WRITE ( write_board32 )
|
| 266 | 311 | AM_RANGE( 0x00800020, 0x00800023) AM_READ ( read_board32 )
|
| r1104 | r1105 | |
| 277 | 322 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("D4") PORT_CODE(KEYCODE_D )
|
| 278 | 323 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("E5") PORT_CODE(KEYCODE_E )
|
| 279 | 324 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("F6") PORT_CODE(KEYCODE_F )
|
| 325 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("A1") PORT_CODE(KEYCODE_1 )
|
| 326 | PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("B2") PORT_CODE(KEYCODE_2 )
|
| 327 | PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("C3") PORT_CODE(KEYCODE_3 )
|
| 328 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("D4") PORT_CODE(KEYCODE_4 )
|
| 329 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("E5") PORT_CODE(KEYCODE_5 )
|
| 330 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("F6") PORT_CODE(KEYCODE_6 )
|
| 280 | 331 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("0") PORT_CODE(KEYCODE_0 )
|
| 281 | 332 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("9") PORT_CODE(KEYCODE_9 )
|
| 282 | 333 | PORT_START
|
| r1104 | r1105 | |
| 288 | 339 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("ENT") PORT_CODE(KEYCODE_ENTER )
|
| 289 | 340 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("G7") PORT_CODE(KEYCODE_G )
|
| 290 | 341 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("H8") PORT_CODE(KEYCODE_H )
|
| 342 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("G7") PORT_CODE(KEYCODE_7 )
|
| 343 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("H8") PORT_CODE(KEYCODE_8 )
|
| 291 | 344 | INPUT_PORTS_END
|
| 292 | 345 | |
| 293 | 346 | |
| r1104 | r1105 | |
| 434 | 487 | |
| 435 | 488 | ROM_START( roma32 )
|
| 436 | 489 | ROM_REGION( 0x10000, REGION_CPU1, 0 )
|
| 437 | | ROM_LOAD("roma32.bin", 0x000000, 0x10000, CRC(83b9ff3f) SHA1(97bf4cb3c61f8ec328735b3c98281bba44b30a28) )
|
| 490 | ROM_LOAD("roma32.bin", 0x000000, 0x10000, CRC(587d03bf) SHA1(504e9ff958084700076d633f9c306fc7baf64ffd) )
|
| 438 | 491 | ROM_END
|
| 439 | 492 | |
| 440 | 493 | /***************************************************************************
|
| r1104 | r1105 | |
| 449 | 502 | |
| 450 | 503 | /* YEAR, NAME, PARENT, BIOS, COMPAT MACHINE,INPUT, INIT, CONFIG, COMPANY, FULLNAME, FLAGS */
|
| 451 | 504 | CONS( 1984, glasgow, 0, 0, glasgow, old_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto III S Glasgow", 0)
|
| 452 | | CONS( 1984, amsterd, 0, 0, amsterd, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Amsterdam", GAME_NOT_WORKING)
|
| 505 | CONS( 1984, amsterd, 0, 0, amsterd, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Amsterdam", 0)
|
| 453 | 506 | CONS( 1984, dallas, 0, 0, glasgow, old_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Dallas", 0)
|
| 454 | | CONS( 1984, roma, 0, 0, glasgow, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Roma", GAME_NOT_WORKING)
|
| 455 | | CONS( 1984, dallas32, 0, 0, dallas32, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Dallas 32 Bit", GAME_NOT_WORKING)
|
| 456 | | CONS( 1984, roma32, 0, 0, dallas32, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Roma 32 Bit", GAME_NOT_WORKING)
|
| 507 | CONS( 1984, roma, 0, 0, glasgow, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Roma", 0)
|
| 508 | CONS( 1984, dallas32, 0, 0, dallas32, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Dallas 32 Bit", 0)
|
| 509 | CONS( 1984, roma32, 0, 0, dallas32, new_keyboard, NULL, NULL, "Hegener & Glaser Muenchen", "Mephisto Roma 32 Bit", 0)
|
| 457 | 510 | |