trunk/src/mess/drivers/fp200.c
| r21861 | r21862 | |
| 26 | 26 | required_device<cpu_device> m_maincpu; |
| 27 | 27 | UINT8 m_io_type; |
| 28 | 28 | UINT8 *m_chargen; |
| 29 | UINT8 m_keyb_mux; |
| 29 | 30 | |
| 30 | 31 | struct{ |
| 31 | 32 | UINT8 x; |
| r21861 | r21862 | |
| 34 | 35 | UINT8 *vram; |
| 35 | 36 | UINT8 *attr; |
| 36 | 37 | }m_lcd; |
| 38 | UINT8 read_lcd_attr(UINT16 X, UINT16 Y); |
| 39 | UINT8 read_lcd_vram(UINT16 X, UINT16 Y); |
| 37 | 40 | void write_lcd_attr(UINT16 X, UINT16 Y,UINT8 data); |
| 38 | 41 | void write_lcd_vram(UINT16 X, UINT16 Y,UINT8 data); |
| 39 | 42 | |
| r21861 | r21862 | |
| 44 | 47 | DECLARE_WRITE8_MEMBER(fp200_io_w); |
| 45 | 48 | DECLARE_READ8_MEMBER(fp200_lcd_r); |
| 46 | 49 | DECLARE_WRITE8_MEMBER(fp200_lcd_w); |
| 50 | DECLARE_READ8_MEMBER(fp200_keyb_r); |
| 51 | DECLARE_WRITE8_MEMBER(fp200_keyb_w); |
| 52 | DECLARE_INPUT_CHANGED_MEMBER(keyb_irq); |
| 47 | 53 | |
| 48 | 54 | DECLARE_WRITE_LINE_MEMBER(sod_w); |
| 49 | 55 | DECLARE_READ_LINE_MEMBER(sid_r); |
| r21861 | r21862 | |
| 77 | 83 | pix = ((m_chargen[vram*8+(x & 7)]) >> (7-(y & 7))) & 1; |
| 78 | 84 | bitmap.pix16(y,x) = pix; |
| 79 | 85 | } |
| 86 | /* fake, to see where the scrolling should stay. */ |
| 87 | if(m_lcd.attr[x/8+y*20] == 0x50) |
| 88 | bitmap.pix16(y,x) = machine().rand() & 1; |
| 80 | 89 | } |
| 81 | 90 | } |
| 82 | 91 | |
| r21861 | r21862 | |
| 85 | 94 | |
| 86 | 95 | |
| 87 | 96 | /* |
| 88 | | [8] SSSS --YY Status code (?) / upper part of Y address |
| 97 | [1] DDDD DDDD vram data/attr (left half) |
| 98 | [2] DDDD DDDD vram data/attr (right half) |
| 99 | [8] SSSS --YY Status code (1=vram type/0xb=attr type) / upper part of Y address |
| 89 | 100 | [9] YYYY XXXX lower part of Y address / X address |
| 90 | 101 | */ |
| 102 | UINT8 fp200_state::read_lcd_attr(UINT16 X, UINT16 Y) |
| 103 | { |
| 104 | UINT16 base_offs; |
| 105 | UINT8 res; |
| 106 | |
| 107 | for(int yi=0;yi<8;yi++) |
| 108 | { |
| 109 | base_offs = X+(Y+yi)*20; |
| 110 | |
| 111 | if(base_offs >= 20*64) |
| 112 | return 0xff; |
| 113 | |
| 114 | res = m_lcd.attr[base_offs]; |
| 115 | } |
| 116 | |
| 117 | return res; |
| 118 | } |
| 119 | |
| 120 | UINT8 fp200_state::read_lcd_vram(UINT16 X, UINT16 Y) |
| 121 | { |
| 122 | UINT16 base_offs; |
| 123 | UINT8 res; |
| 124 | |
| 125 | for(int yi=0;yi<8;yi++) |
| 126 | { |
| 127 | base_offs = X+(Y+yi)*20; |
| 128 | |
| 129 | if(base_offs >= 20*64) |
| 130 | return 0xff; |
| 131 | |
| 132 | res = m_lcd.vram[base_offs]; |
| 133 | } |
| 134 | |
| 135 | return res; |
| 136 | } |
| 137 | |
| 91 | 138 | READ8_MEMBER(fp200_state::fp200_lcd_r) |
| 92 | 139 | { |
| 93 | 140 | UINT8 res; |
| r21861 | r21862 | |
| 97 | 144 | switch(offset) |
| 98 | 145 | { |
| 99 | 146 | case 1: |
| 100 | | printf("%d %d -> (L)\n",m_lcd.x,m_lcd.y); |
| 147 | printf("%d %d -> (L) %02x\n",m_lcd.x,m_lcd.y,m_lcd.status); |
| 148 | if(m_lcd.status == 0xb) |
| 149 | res = read_lcd_attr(m_lcd.x,m_lcd.y); |
| 150 | else if(m_lcd.status == 1) |
| 151 | res = read_lcd_vram(m_lcd.x,m_lcd.y); |
| 101 | 152 | break; |
| 102 | 153 | case 2: |
| 103 | | printf("%d %d -> (R)\n",m_lcd.x,m_lcd.y); |
| 154 | printf("%d %d -> (R) %02x\n",m_lcd.x,m_lcd.y,m_lcd.status); |
| 155 | if(m_lcd.status == 0xb) |
| 156 | res = read_lcd_attr(m_lcd.x + 10,m_lcd.y); |
| 157 | else if(m_lcd.status == 1) |
| 158 | res = read_lcd_vram(m_lcd.x + 10,m_lcd.y); |
| 104 | 159 | break; |
| 105 | 160 | case 8: |
| 106 | 161 | res = (m_lcd.status & 0xf) << 4; |
| r21861 | r21862 | |
| 127 | 182 | if(base_offs >= 20*64) |
| 128 | 183 | return; |
| 129 | 184 | |
| 185 | //if(data != 0x60) |
| 186 | // printf("%d %d %02x\n",X,Y,data); |
| 187 | |
| 130 | 188 | m_lcd.attr[base_offs] = data; |
| 131 | 189 | } |
| 132 | 190 | } |
| r21861 | r21862 | |
| 151 | 209 | switch(offset) |
| 152 | 210 | { |
| 153 | 211 | case 1: |
| 154 | | printf("%d %d -> %02x (%c) (L %02x)\n",m_lcd.x,m_lcd.y,data,data,m_lcd.status); |
| 212 | //printf("%d %d -> %02x (%c) (L %02x)\n",m_lcd.x,m_lcd.y,data,data,m_lcd.status); |
| 155 | 213 | if(m_lcd.status == 0xb) |
| 156 | 214 | write_lcd_attr(m_lcd.x,m_lcd.y,data); |
| 157 | 215 | else if(m_lcd.status == 1) |
| 158 | 216 | write_lcd_vram(m_lcd.x,m_lcd.y,data); |
| 159 | 217 | break; |
| 160 | 218 | case 2: |
| 161 | | printf("%d %d -> %02x (%c) (R %02x)\n",m_lcd.x + 10,m_lcd.y,data,data,m_lcd.status); |
| 219 | //printf("%d %d -> %02x (%c) (R %02x)\n",m_lcd.x + 10,m_lcd.y,data,data,m_lcd.status); |
| 162 | 220 | if(m_lcd.status == 0xb) |
| 163 | 221 | write_lcd_attr(m_lcd.x + 10,m_lcd.y,data); |
| 164 | 222 | else if(m_lcd.status == 1) |
| r21861 | r21862 | |
| 176 | 234 | } |
| 177 | 235 | } |
| 178 | 236 | |
| 237 | READ8_MEMBER(fp200_state::fp200_keyb_r) |
| 238 | { |
| 239 | const char *const keynames[16] = { "KEY0", "KEY1", "KEY2", "KEY3", |
| 240 | "KEY4", "KEY5", "KEY6", "KEY7", |
| 241 | "KEY8", "KEY9", "UNUSED", "UNUSED", |
| 242 | "UNUSED", "UNUSED", "UNUSED", "UNUSED"}; |
| 243 | UINT8 res; |
| 179 | 244 | |
| 245 | if(offset == 0) |
| 246 | res = ioport(keynames[m_keyb_mux])->read(); |
| 247 | else |
| 248 | { |
| 249 | printf("Unknown keyboard offset read access %02x\n",offset + 0x20); |
| 250 | res = 0; |
| 251 | } |
| 252 | |
| 253 | return res; |
| 254 | } |
| 255 | |
| 256 | WRITE8_MEMBER(fp200_state::fp200_keyb_w) |
| 257 | { |
| 258 | if(offset == 1) |
| 259 | m_keyb_mux = data & 0xf; |
| 260 | else if(offset == 0) |
| 261 | { |
| 262 | // ... ? |
| 263 | } |
| 264 | else |
| 265 | printf("Unknown keyboard offset write access %02x %02x\n",offset + 0x20,data); |
| 266 | } |
| 267 | |
| 180 | 268 | /* |
| 181 | 269 | Annoyingly the i/o map uses the SOD to access different devices, so we need trampolines. |
| 182 | 270 | SOD = 0 |
| 183 | 271 | 0x10 - 0x1f Timer control (RPC05 RTC) |
| 184 | 272 | 0x20 - 0x2f AUTO-POWER OFF |
| 185 | | 0x40 - 0x4f Device Code |
| 273 | 0x40 - 0x4f FDC Device ID Code (5 for "FP-1021FD") |
| 186 | 274 | 0x80 - 0xff FDD (unknown type) |
| 187 | 275 | SOD = 1 |
| 188 | 276 | 0x00 - 0x0f LCD control. |
| r21861 | r21862 | |
| 206 | 294 | { |
| 207 | 295 | //case 0x00: return; |
| 208 | 296 | case 0x00: res = fp200_lcd_r(space, offset & 0xf); break; |
| 297 | case 0x20: res = fp200_keyb_r(space, offset & 0xf); break; |
| 209 | 298 | default: res = 0; logerror("Unemulated I/O read %02x (%02x)\n",offset,m_io_type); break; |
| 210 | 299 | } |
| 211 | 300 | } |
| r21861 | r21862 | |
| 227 | 316 | switch(offset & 0xf0) |
| 228 | 317 | { |
| 229 | 318 | case 0x00: fp200_lcd_w(space, offset & 0xf,data); break; |
| 319 | case 0x20: fp200_keyb_w(space, offset & 0xf,data); break; |
| 230 | 320 | default:logerror("Unemulated I/O write %02x (%02x) <- %02x\n",offset,m_io_type,data); break; |
| 231 | 321 | } |
| 232 | 322 | } |
| r21861 | r21862 | |
| 236 | 326 | AM_RANGE(0x0000, 0x7fff) AM_ROM |
| 237 | 327 | AM_RANGE(0x8000, 0x9fff) AM_RAM |
| 238 | 328 | // 0xa000, 0xffff exp RAM |
| 329 | AM_RANGE(0xa000, 0xbfff) AM_RAM |
| 330 | AM_RANGE(0xc000, 0xdfff) AM_RAM |
| 331 | AM_RANGE(0xe000, 0xffff) AM_RAM |
| 239 | 332 | ADDRESS_MAP_END |
| 240 | 333 | |
| 241 | 334 | static ADDRESS_MAP_START( fp200_io, AS_IO, 8, fp200_state ) |
| 242 | 335 | AM_RANGE(0x00, 0xff) AM_READWRITE(fp200_io_r,fp200_io_w) |
| 243 | 336 | ADDRESS_MAP_END |
| 244 | 337 | |
| 338 | INPUT_CHANGED_MEMBER(fp200_state::keyb_irq) |
| 339 | { |
| 340 | /* a keyboard stroke causes a rst7.5 */ |
| 341 | m_maincpu->set_input_line(I8085_RST75_LINE, (newval) ? ASSERT_LINE : CLEAR_LINE); |
| 342 | |
| 343 | } |
| 344 | |
| 245 | 345 | static INPUT_PORTS_START( fp200 ) |
| 246 | | /* dummy active high structure */ |
| 247 | | PORT_START("SYSA") |
| 248 | | PORT_DIPNAME( 0x01, 0x00, "SYSA" ) |
| 249 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 250 | | PORT_DIPSETTING( 0x01, DEF_STR( On ) ) |
| 251 | | PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unknown ) ) |
| 252 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 253 | | PORT_DIPSETTING( 0x02, DEF_STR( On ) ) |
| 254 | | PORT_DIPNAME( 0x04, 0x00, DEF_STR( Unknown ) ) |
| 255 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 256 | | PORT_DIPSETTING( 0x04, DEF_STR( On ) ) |
| 257 | | PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) |
| 258 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 259 | | PORT_DIPSETTING( 0x08, DEF_STR( On ) ) |
| 260 | | PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) |
| 261 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 262 | | PORT_DIPSETTING( 0x10, DEF_STR( On ) ) |
| 263 | | PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) |
| 264 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 265 | | PORT_DIPSETTING( 0x20, DEF_STR( On ) ) |
| 266 | | PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) |
| 267 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 268 | | PORT_DIPSETTING( 0x40, DEF_STR( On ) ) |
| 269 | | PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) |
| 270 | | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 271 | | PORT_DIPSETTING( 0x80, DEF_STR( On ) ) |
| 346 | PORT_START("KEY0") |
| 347 | PORT_BIT( 0x0f, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| 348 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("7") PORT_CODE(KEYCODE_7) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 349 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("U") PORT_CODE(KEYCODE_U) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 350 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("J") PORT_CODE(KEYCODE_J) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 351 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("M") PORT_CODE(KEYCODE_M) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 272 | 352 | |
| 273 | | /* dummy active low structure */ |
| 274 | | PORT_START("DSWA") |
| 275 | | PORT_DIPNAME( 0x01, 0x01, "DSWA" ) |
| 276 | | PORT_DIPSETTING( 0x01, DEF_STR( Off ) ) |
| 277 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 278 | | PORT_DIPNAME( 0x02, 0x02, DEF_STR( Unknown ) ) |
| 279 | | PORT_DIPSETTING( 0x02, DEF_STR( Off ) ) |
| 280 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 281 | | PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unknown ) ) |
| 282 | | PORT_DIPSETTING( 0x04, DEF_STR( Off ) ) |
| 283 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 284 | | PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) ) |
| 285 | | PORT_DIPSETTING( 0x08, DEF_STR( Off ) ) |
| 286 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 287 | | PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unknown ) ) |
| 288 | | PORT_DIPSETTING( 0x10, DEF_STR( Off ) ) |
| 289 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 290 | | PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unknown ) ) |
| 291 | | PORT_DIPSETTING( 0x20, DEF_STR( Off ) ) |
| 292 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 293 | | PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) ) |
| 294 | | PORT_DIPSETTING( 0x40, DEF_STR( Off ) ) |
| 295 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 296 | | PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) ) |
| 297 | | PORT_DIPSETTING( 0x80, DEF_STR( Off ) ) |
| 298 | | PORT_DIPSETTING( 0x00, DEF_STR( On ) ) |
| 353 | PORT_START("KEY1") |
| 354 | PORT_BIT( 0x0f, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| 355 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("8") PORT_CODE(KEYCODE_8) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 356 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("I") PORT_CODE(KEYCODE_I) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 357 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("K") PORT_CODE(KEYCODE_K) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 358 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("/") PORT_CODE(KEYCODE_SLASH) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 359 | |
| 360 | PORT_START("KEY2") |
| 361 | PORT_BIT( 0x0f, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| 362 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("9") PORT_CODE(KEYCODE_9) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 363 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("O") PORT_CODE(KEYCODE_O) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 364 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("L") PORT_CODE(KEYCODE_L) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 365 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME(".") PORT_CODE(KEYCODE_STOP) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 366 | |
| 367 | PORT_START("KEY3") |
| 368 | PORT_BIT( 0x0f, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| 369 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("0") PORT_CODE(KEYCODE_0) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 370 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("P") PORT_CODE(KEYCODE_P) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 371 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME(",") PORT_CODE(KEYCODE_COMMA) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 372 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME(";") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 373 | |
| 374 | PORT_START("KEY4") |
| 375 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("SML") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 376 | PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("INS") PORT_CODE(KEYCODE_INSERT) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 377 | PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("CLR") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 378 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("F0") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 379 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("1") PORT_CODE(KEYCODE_1) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 380 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("Q") PORT_CODE(KEYCODE_Q) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 381 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("A") PORT_CODE(KEYCODE_A) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 382 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("Z") PORT_CODE(KEYCODE_Z) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 383 | |
| 384 | PORT_START("KEY5") |
| 385 | PORT_BIT( 0x03, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| 386 | PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("RA") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 387 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("F1") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 388 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("2") PORT_CODE(KEYCODE_2) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 389 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("W") PORT_CODE(KEYCODE_W) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 390 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("S") PORT_CODE(KEYCODE_S) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 391 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("X") PORT_CODE(KEYCODE_X) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 392 | |
| 393 | PORT_START("KEY6") |
| 394 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("SPACE") PORT_CODE(KEYCODE_SPACE) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 395 | PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("^") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 396 | PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("LA") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 397 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("F2") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 398 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("3") PORT_CODE(KEYCODE_3) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 399 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("E") PORT_CODE(KEYCODE_E) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 400 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("D") PORT_CODE(KEYCODE_D) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 401 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("C") PORT_CODE(KEYCODE_C) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 402 | |
| 403 | PORT_START("KEY7") |
| 404 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("@") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 405 | PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("-") PORT_CODE(KEYCODE_MINUS) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 406 | PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("DA") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 407 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("F3") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 408 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("4") PORT_CODE(KEYCODE_4) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 409 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("R") PORT_CODE(KEYCODE_R) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 410 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("F") PORT_CODE(KEYCODE_F) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 411 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("V") PORT_CODE(KEYCODE_V) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 412 | |
| 413 | PORT_START("KEY8") |
| 414 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("[") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 415 | PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME(":") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 416 | PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("UA") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 417 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("F4") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 418 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("5") PORT_CODE(KEYCODE_5) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 419 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("T") PORT_CODE(KEYCODE_T) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 420 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("G") PORT_CODE(KEYCODE_G) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 421 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("B") PORT_CODE(KEYCODE_B) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 422 | |
| 423 | PORT_START("KEY9") |
| 424 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("RETURN") PORT_CODE(KEYCODE_ENTER) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 425 | PORT_BIT( 0x06, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| 426 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("_") PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 427 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("6") PORT_CODE(KEYCODE_6) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 428 | PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("Y") PORT_CODE(KEYCODE_Y) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 429 | PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("H") PORT_CODE(KEYCODE_H) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 430 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("N") PORT_CODE(KEYCODE_N) PORT_IMPULSE(1) PORT_CHANGED_MEMBER(DEVICE_SELF, fp200_state,keyb_irq, 0) |
| 431 | |
| 432 | PORT_START("UNUSED") |
| 433 | PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED) |
| 299 | 434 | INPUT_PORTS_END |
| 300 | 435 | |
| 301 | 436 | static const gfx_layout charlayout = |
| r21861 | r21862 | |
| 344 | 479 | READ_LINE_MEMBER( fp200_state::sid_r ) |
| 345 | 480 | { |
| 346 | 481 | /* TODO: key mods */ |
| 347 | | return 0; |
| 482 | return 1; |
| 348 | 483 | } |
| 349 | 484 | |
| 350 | 485 | static I8085_CONFIG( cpu_config ) |