src/mess/includes/prof80.h
| r6472 | r6473 | |
| 1 | 1 | #ifndef __PROF80__ |
| 2 | 2 | #define __PROF80__ |
| 3 | 3 | |
| 4 | | #define SCREEN_TAG "screen" |
| 5 | | |
| 6 | 4 | #define Z80_TAG "z1" |
| 7 | 5 | #define UPD765_TAG "z38" |
| 8 | 6 | #define UPD1990A_TAG "z43" |
| 7 | |
| 8 | /* ------------------------------------------------------------------------ */ |
| 9 | |
| 10 | #define SCREEN_TAG "screen" |
| 11 | #define GRIP_Z80_TAG "grip_z1" |
| 9 | 12 | #define MC6845_TAG "z30" |
| 10 | 13 | #define I8255A_TAG "z6" |
| 11 | 14 | #define Z80STI_TAG "z9" |
| 12 | | |
| 13 | | #define GRIP_Z80_TAG "grip_z1" |
| 14 | 15 | #define SPEAKER_TAG "speaker" |
| 15 | 16 | #define CENTRONICS_TAG "centronics" |
| 16 | 17 | |
| 18 | #define GRIP_VIDEORAM_SIZE 0x10000 |
| 19 | #define GRIP_VIDEORAM_MASK 0xffff |
| 20 | |
| 21 | /* ------------------------------------------------------------------------ */ |
| 22 | |
| 17 | 23 | #define UNIO_Z80STI_TAG "z5" |
| 18 | 24 | #define UNIO_Z80SIO_TAG "z15" |
| 19 | 25 | #define UNIO_Z80PIO_TAG "z13" |
| 20 | 26 | #define UNIO_CENTRONICS1_TAG "n3" |
| 21 | 27 | #define UNIO_CENTRONICS2_TAG "n4" |
| 22 | 28 | |
| 23 | | #define GRIP_VIDEORAM_SIZE 0x10000 |
| 24 | | #define GRIP_VIDEORAM_MASK 0xffff |
| 25 | | |
| 26 | 29 | typedef struct _prof80_state prof80_state; |
| 27 | 30 | struct _prof80_state |
| 28 | 31 | { |
| r6472 | r6473 | |
| 30 | 33 | UINT8 mmu[16]; /* MMU block register */ |
| 31 | 34 | int init; /* MMU enable */ |
| 32 | 35 | |
| 33 | | /* keyboard state */ |
| 34 | | UINT8 keydata; /* keyboard data */ |
| 35 | | int kbf; /* keyboard buffer full */ |
| 36 | /* RTC state */ |
| 37 | int c0; |
| 38 | int c1; |
| 39 | int c2; |
| 36 | 40 | |
| 37 | | /* video state */ |
| 38 | | UINT8 *video_ram; /* video RAM */ |
| 39 | | int lps; /* light pen sense */ |
| 40 | | int page; /* video page */ |
| 41 | | int flash; /* flash */ |
| 42 | | |
| 43 | 41 | /* floppy state */ |
| 44 | 42 | int fdc_index; /* floppy index hole sensor */ |
| 45 | 43 | int motor; /* floppy motor */ |
| r6472 | r6473 | |
| 51 | 49 | /* devices */ |
| 52 | 50 | const device_config *upd765; |
| 53 | 51 | const device_config *upd1990a; |
| 52 | |
| 53 | /* timers */ |
| 54 | emu_timer *floppy_motor_off_timer; |
| 55 | |
| 56 | /* ------------------------------------------------------------------------ */ |
| 57 | |
| 58 | /* sound state */ |
| 59 | int vol0; |
| 60 | int vol1; |
| 61 | |
| 62 | /* keyboard state */ |
| 63 | UINT8 keydata; /* keyboard data */ |
| 64 | int kbf; /* keyboard buffer full */ |
| 65 | |
| 66 | /* video state */ |
| 67 | UINT8 *video_ram; /* video RAM */ |
| 68 | int lps; /* light pen sense */ |
| 69 | int page; /* video page */ |
| 70 | int flash; /* flash */ |
| 71 | |
| 72 | /* devices */ |
| 54 | 73 | const device_config *mc6845; |
| 55 | 74 | const device_config *ppi8255; |
| 56 | 75 | const device_config *z80sti; |
| 57 | 76 | const device_config *centronics; |
| 58 | | |
| 59 | | /* timers */ |
| 60 | | emu_timer *floppy_motor_off_timer; |
| 61 | 77 | }; |
| 62 | 78 | |
| 63 | 79 | #endif |
src/mess/drivers/prof80.c
| r6472 | r6473 | |
| 209 | 209 | case 0: /* C0/TDI */ |
| 210 | 210 | upd1990a_data_in_w(state->upd1990a, fa); |
| 211 | 211 | upd1990a_c0_w(state->upd1990a, fa); |
| 212 | state->c0 = fa; |
| 212 | 213 | break; |
| 213 | 214 | |
| 214 | 215 | case 1: /* C1 */ |
| 215 | 216 | upd1990a_c1_w(state->upd1990a, fa); |
| 217 | state->c1 = fa; |
| 216 | 218 | break; |
| 217 | 219 | |
| 218 | 220 | case 2: /* C2 */ |
| 219 | 221 | upd1990a_c2_w(state->upd1990a, fa); |
| 222 | state->c2 = fa; |
| 220 | 223 | break; |
| 221 | 224 | |
| 222 | 225 | case 3: /* READY */ |
| r6472 | r6473 | |
| 361 | 364 | */ |
| 362 | 365 | |
| 363 | 366 | prof80_state *state = space->machine->driver_data; |
| 367 | UINT8 data = 0; |
| 368 | int js4 = 0, js5 = 0; |
| 364 | 369 | |
| 365 | | return (!upd1990a_data_out_r(state->upd1990a) << 7) | !state->motor; |
| 370 | /* floppy motor */ |
| 371 | data |= !state->motor; |
| 372 | |
| 373 | /* JS4 */ |
| 374 | switch (input_port_read(space->machine, "J4")) |
| 375 | { |
| 376 | case 0: js4 = 0; break; |
| 377 | case 1: js4 = 1; break; |
| 378 | case 2: js4 = !state->c0; break; |
| 379 | case 3: js4 = !state->c1; break; |
| 380 | case 4: js4 = !state->c2; break; |
| 381 | } |
| 382 | |
| 383 | data |= js4 << 4; |
| 384 | |
| 385 | /* JS5 */ |
| 386 | switch (input_port_read(space->machine, "J5")) |
| 387 | { |
| 388 | case 0: js5 = 0; break; |
| 389 | case 1: js5 = 1; break; |
| 390 | case 2: js5 = !state->c0; break; |
| 391 | case 3: js5 = !state->c1; break; |
| 392 | case 4: js5 = !state->c2; break; |
| 393 | } |
| 394 | |
| 395 | data |= js5 << 4; |
| 396 | |
| 397 | /* RTC data */ |
| 398 | data |= !upd1990a_data_out_r(state->upd1990a) << 7; |
| 399 | |
| 400 | return data; |
| 366 | 401 | } |
| 367 | 402 | |
| 368 | 403 | static WRITE8_HANDLER( par_w ) |
| r6472 | r6473 | |
| 414 | 449 | |
| 415 | 450 | /* GRIP */ |
| 416 | 451 | |
| 452 | static WRITE8_HANDLER( vol0_w ) |
| 453 | { |
| 454 | prof80_state *state = space->machine->driver_data; |
| 455 | |
| 456 | state->vol0 = BIT(data, 7); |
| 457 | } |
| 458 | |
| 459 | static WRITE8_HANDLER( vol1_w ) |
| 460 | { |
| 461 | prof80_state *state = space->machine->driver_data; |
| 462 | |
| 463 | state->vol1 = BIT(data, 7); |
| 464 | } |
| 465 | |
| 417 | 466 | static WRITE8_HANDLER( flash_w ) |
| 418 | 467 | { |
| 419 | 468 | prof80_state *state = space->machine->driver_data; |
| r6472 | r6473 | |
| 448 | 497 | */ |
| 449 | 498 | |
| 450 | 499 | prof80_state *state = space->machine->driver_data; |
| 500 | UINT8 data = 0; |
| 501 | int js0 = 0, js1 = 0; |
| 451 | 502 | |
| 452 | | return (state->lps << 7) | (centronics_fault_r(state->centronics) << 6); |
| 503 | /* JS0 */ |
| 504 | switch (input_port_read(space->machine, "GRIP-J3A")) |
| 505 | { |
| 506 | case 0: js0 = 0; break; |
| 507 | case 1: js0 = 1; break; |
| 508 | case 2: js0 = state->vol0; break; |
| 509 | case 3: js0 = state->vol1; break; |
| 510 | case 4: js0 = state->page; break; |
| 511 | } |
| 512 | |
| 513 | data |= js0 << 4; |
| 514 | |
| 515 | /* JS1 */ |
| 516 | switch (input_port_read(space->machine, "GRIP-J3B")) |
| 517 | { |
| 518 | case 0: js1 = 0; break; |
| 519 | case 1: js1 = 1; break; |
| 520 | case 2: js1 = state->vol0; break; |
| 521 | case 3: js1 = state->vol1; break; |
| 522 | case 4: js1 = state->page; break; |
| 523 | } |
| 524 | |
| 525 | data |= js1 << 5; |
| 526 | |
| 527 | /* centronics fault */ |
| 528 | data |= centronics_fault_r(state->centronics) << 6; |
| 529 | |
| 530 | /* light pen strobe */ |
| 531 | data |= state->lps << 7; |
| 532 | |
| 533 | return data; |
| 453 | 534 | } |
| 454 | 535 | |
| 455 | 536 | static READ8_HANDLER( lrs_r ) |
| r6472 | r6473 | |
| 557 | 638 | ADDRESS_MAP_GLOBAL_MASK(0xff) |
| 558 | 639 | AM_RANGE(0x00, 0x00) AM_READWRITE(cxstb_r, cxstb_w) |
| 559 | 640 | // AM_RANGE(0x10, 0x10) AM_WRITE(ccon_w) |
| 560 | | // AM_RANGE(0x11, 0x11) AM_WRITE(vol0_w) |
| 641 | AM_RANGE(0x11, 0x11) AM_WRITE(vol0_w) |
| 561 | 642 | // AM_RANGE(0x12, 0x12) AM_WRITE(rts_w) |
| 562 | 643 | AM_RANGE(0x13, 0x13) AM_WRITE(page_w) |
| 563 | 644 | // AM_RANGE(0x14, 0x14) AM_WRITE(cc1_w) |
| 564 | 645 | // AM_RANGE(0x15, 0x15) AM_WRITE(cc2_w) |
| 565 | 646 | AM_RANGE(0x16, 0x16) AM_WRITE(flash_w) |
| 566 | | // AM_RANGE(0x17, 0x17) AM_WRITE(vol1_w) |
| 647 | AM_RANGE(0x17, 0x17) AM_WRITE(vol1_w) |
| 567 | 648 | AM_RANGE(0x20, 0x2f) AM_DEVREADWRITE(Z80STI_TAG, z80sti_r, z80sti_w) |
| 568 | 649 | AM_RANGE(0x30, 0x30) AM_READWRITE(lrs_r, lrs_w) |
| 569 | 650 | AM_RANGE(0x40, 0x40) AM_READ(stat_r) |
| r6472 | r6473 | |
| 1061 | 1142 | return centronics_busy_r(state->centronics) << 3; |
| 1062 | 1143 | } |
| 1063 | 1144 | |
| 1145 | static WRITE_LINE_DEVICE_HANDLER( grip_speaker_w ) |
| 1146 | { |
| 1147 | prof80_state *driver_state = device->machine->driver_data; |
| 1148 | int level = state && ((driver_state->vol1 << 1) | driver_state->vol0); |
| 1149 | |
| 1150 | speaker_level_w(device, level); |
| 1151 | } |
| 1152 | |
| 1064 | 1153 | static Z80STI_INTERFACE( grip_z80sti_interface ) |
| 1065 | 1154 | { |
| 1066 | 1155 | 0, /* serial receive clock */ |
| r6472 | r6473 | |
| 1071 | 1160 | DEVCB_NULL, /* serial input */ |
| 1072 | 1161 | DEVCB_NULL, /* serial output */ |
| 1073 | 1162 | DEVCB_NULL, /* timer A output */ |
| 1074 | | DEVCB_DEVICE_LINE(SPEAKER_TAG, speaker_level_w), /* timer B output */ |
| 1163 | DEVCB_DEVICE_LINE(SPEAKER_TAG, grip_speaker_w), /* timer B output */ |
| 1075 | 1164 | DEVCB_LINE(z80sti_tc_w), /* timer C output */ |
| 1076 | 1165 | DEVCB_LINE(z80sti_rc_w) /* timer D output */ |
| 1077 | 1166 | }; |
| r6472 | r6473 | |
| 1108 | 1197 | prof80_bankswitch(machine); |
| 1109 | 1198 | |
| 1110 | 1199 | /* register for state saving */ |
| 1200 | state_save_register_global(machine, state->c0); |
| 1201 | state_save_register_global(machine, state->c1); |
| 1202 | state_save_register_global(machine, state->c2); |
| 1111 | 1203 | state_save_register_global_array(machine, state->mmu); |
| 1112 | 1204 | state_save_register_global(machine, state->init); |
| 1113 | 1205 | state_save_register_global(machine, state->fdc_index); |
| r6472 | r6473 | |
| 1152 | 1244 | memory_set_bank(machine, 18, 0); |
| 1153 | 1245 | |
| 1154 | 1246 | /* register for state saving */ |
| 1247 | state_save_register_global(machine, state->vol0); |
| 1248 | state_save_register_global(machine, state->vol1); |
| 1155 | 1249 | state_save_register_global(machine, state->keydata); |
| 1156 | 1250 | state_save_register_global(machine, state->kbf); |
| 1157 | 1251 | state_save_register_global_pointer(machine, state->video_ram, GRIP_VIDEORAM_SIZE); |
| r6472 | r6473 | |
| 1172 | 1266 | DO_NOT_KEEP_GEOMETRY |
| 1173 | 1267 | }; |
| 1174 | 1268 | |
| 1269 | static const INT16 speaker_levels[] = {-32768, 0, 32767, 0}; |
| 1270 | |
| 1271 | static const speaker_interface grip_speaker_interface = |
| 1272 | { |
| 1273 | 4, |
| 1274 | speaker_levels |
| 1275 | }; |
| 1276 | |
| 1175 | 1277 | /* Machine Drivers */ |
| 1278 | |
| 1176 | 1279 | static MACHINE_DRIVER_START( prof80 ) |
| 1177 | 1280 | MDRV_DRIVER_DATA(prof80_state) |
| 1178 | 1281 | |
| r6472 | r6473 | |
| 1226 | 1329 | /* sound hardware */ |
| 1227 | 1330 | MDRV_SPEAKER_STANDARD_MONO("mono") |
| 1228 | 1331 | MDRV_SOUND_ADD(SPEAKER_TAG, SPEAKER, 0) |
| 1332 | MDRV_SOUND_CONFIG(grip_speaker_interface) |
| 1229 | 1333 | MDRV_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25) |
| 1230 | 1334 | |
| 1231 | 1335 | /* devices */ |