trunk/src/mame/drivers/whitestar.c
| r23969 | r23970 | |
| 6 | 6 | #include "emu.h" |
| 7 | 7 | #include "video/mc6845.h" |
| 8 | 8 | #include "audio/decobsmt.h" |
| 9 | #include "video/decodmd2.h" |
| 9 | 10 | #include "rendlay.h" |
| 10 | 11 | |
| 11 | 12 | class whitestar_state : public driver_device |
| r23969 | r23970 | |
| 14 | 15 | whitestar_state(const machine_config &mconfig, device_type type, const char *tag) |
| 15 | 16 | : driver_device(mconfig, type, tag), |
| 16 | 17 | m_maincpu(*this, "maincpu"), |
| 17 | | m_dmdcpu(*this, "dmdcpu"), |
| 18 | | m_mc6845(*this, "mc6845"), |
| 19 | 18 | m_decobsmt(*this, "decobsmt"), |
| 20 | | m_vram(*this, "vram"){ } |
| 19 | m_decodmd(*this, "decodmd") |
| 20 | { } |
| 21 | 21 | |
| 22 | 22 | required_device<cpu_device> m_maincpu; |
| 23 | | required_device<cpu_device> m_dmdcpu; |
| 24 | | required_device<mc6845_device> m_mc6845; |
| 23 | //required_device<cpu_device> m_dmdcpu; |
| 24 | //required_device<mc6845_device> m_mc6845; |
| 25 | 25 | required_device<decobsmt_device> m_decobsmt; |
| 26 | required_device<decodmd_type2_device> m_decodmd; |
| 26 | 27 | |
| 27 | 28 | UINT8 m_dmd_latch; |
| 28 | 29 | UINT8 m_dmd_ctrl; |
| 29 | 30 | UINT8 m_dmd_status; |
| 30 | 31 | UINT8 m_dmd_busy; |
| 31 | 32 | |
| 32 | | required_shared_ptr<UINT8> m_vram; |
| 33 | | |
| 34 | 33 | DECLARE_WRITE8_MEMBER(dmd_latch_w); |
| 35 | 34 | DECLARE_READ8_MEMBER(dmd_latch_r); |
| 36 | 35 | DECLARE_WRITE8_MEMBER(dmd_ctrl_w); |
| r23969 | r23970 | |
| 40 | 39 | |
| 41 | 40 | DECLARE_WRITE8_MEMBER(bank_w); |
| 42 | 41 | DECLARE_WRITE8_MEMBER(dmd_bank_w); |
| 42 | DECLARE_WRITE8_MEMBER(dmddata_w); |
| 43 | 43 | |
| 44 | 44 | DECLARE_READ8_MEMBER(dips_r); |
| 45 | 45 | DECLARE_READ8_MEMBER(switch_r); |
| r23969 | r23970 | |
| 47 | 47 | DECLARE_READ8_MEMBER(dedicated_switch_r); |
| 48 | 48 | DECLARE_DRIVER_INIT(whitestar); |
| 49 | 49 | virtual void machine_reset(); |
| 50 | | virtual void palette_init(); |
| 51 | 50 | INTERRUPT_GEN_MEMBER(whitestar_firq_interrupt); |
| 52 | 51 | }; |
| 53 | 52 | |
| r23969 | r23970 | |
| 82 | 81 | AM_RANGE(0x3200, 0x3200) AM_WRITE(bank_w) |
| 83 | 82 | AM_RANGE(0x3300, 0x3300) AM_WRITE(switch_w) |
| 84 | 83 | AM_RANGE(0x3400, 0x3400) AM_READ(switch_r) |
| 85 | | AM_RANGE(0x3600, 0x3600) AM_WRITE(dmd_latch_w) |
| 86 | | AM_RANGE(0x3601, 0x3601) AM_READWRITE(dmd_ctrl_r, dmd_ctrl_w) |
| 87 | | AM_RANGE(0x3700, 0x3700) AM_READ(dmd_status_r) |
| 84 | AM_RANGE(0x3600, 0x3600) AM_WRITE(dmddata_w) |
| 85 | AM_RANGE(0x3601, 0x3601) AM_DEVREADWRITE("decodmd",decodmd_type2_device,ctrl_r, ctrl_w) |
| 86 | AM_RANGE(0x3700, 0x3700) AM_DEVREAD("decodmd",decodmd_type2_device,busy_r) |
| 88 | 87 | AM_RANGE(0x3800, 0x3800) AM_DEVWRITE(DECOBSMT_TAG, decobsmt_device, bsmt_comms_w) |
| 89 | 88 | AM_RANGE(0x4000, 0x7fff) AM_ROMBANK("bank1") |
| 90 | 89 | AM_RANGE(0x8000, 0xffff) AM_ROM AM_REGION("user1", 0x18000) |
| r23969 | r23970 | |
| 104 | 103 | membank("bank1")->set_base(memregion("user1")->base() + (data & 0x1f) * 0x4000); |
| 105 | 104 | } |
| 106 | 105 | |
| 107 | | WRITE8_MEMBER(whitestar_state::dmd_bank_w) |
| 106 | // Whitestar automatically pulses the DMD IRQ line? DE hardware doesn't do that... |
| 107 | WRITE8_MEMBER(whitestar_state::dmddata_w) |
| 108 | 108 | { |
| 109 | | membank("dmd_bank1")->set_base(memregion("dmdcpu")->base() + (data & 0x1f) * 0x4000); |
| 109 | m_decodmd->data_w(space,offset,data); |
| 110 | m_decodmd->ctrl_w(space,0,1); |
| 111 | m_decodmd->ctrl_w(space,0,0); |
| 110 | 112 | } |
| 111 | | |
| 112 | | READ8_MEMBER(whitestar_state::dmd_latch_r) |
| 113 | | { |
| 114 | | m_dmd_busy = 0; |
| 115 | | m_dmdcpu->set_input_line(M6809_IRQ_LINE, CLEAR_LINE); |
| 116 | | return m_dmd_latch; |
| 117 | | } |
| 118 | | |
| 119 | | WRITE8_MEMBER(whitestar_state::dmd_latch_w) |
| 120 | | { |
| 121 | | m_dmd_latch = data; |
| 122 | | m_dmd_busy = 1; |
| 123 | | m_dmdcpu->set_input_line(M6809_IRQ_LINE, CLEAR_LINE); |
| 124 | | m_dmdcpu->set_input_line(M6809_IRQ_LINE, ASSERT_LINE); |
| 125 | | } |
| 126 | | |
| 127 | | READ8_MEMBER(whitestar_state::dmd_ctrl_r) |
| 128 | | { |
| 129 | | return m_dmd_ctrl; |
| 130 | | } |
| 131 | | |
| 132 | | WRITE8_MEMBER(whitestar_state::dmd_ctrl_w) |
| 133 | | { |
| 134 | | m_dmd_ctrl = data; |
| 135 | | m_dmdcpu->set_input_line(M6809_IRQ_LINE, CLEAR_LINE); |
| 136 | | if (data!=0) { |
| 137 | | bank_w(space,0,0); |
| 138 | | m_dmdcpu->reset(); |
| 139 | | } |
| 140 | | } |
| 141 | | |
| 142 | | /*U202 - HC245 |
| 143 | | D0 = BUSY -> SOUND BUSY? |
| 144 | | D1 = SSTO -> SOUND RELATED |
| 145 | | D2 = MPIN -> ?? |
| 146 | | D3 = CN8-22 -> DMD STAT0 |
| 147 | | D4 = CN8-23 -> DMD STAT1 |
| 148 | | D5 = CN8-24 -> DMD STAT2 |
| 149 | | D6 = CN8-25 -> DMD STAT3 |
| 150 | | D7 = CN8-26 -> DMD BUSY |
| 151 | | */ |
| 152 | | READ8_MEMBER(whitestar_state::dmd_status_r) |
| 153 | | { |
| 154 | | return (m_dmd_busy ? 0x80 : 0x00) | (m_dmd_status << 3); |
| 155 | | } |
| 156 | | |
| 157 | | WRITE8_MEMBER(whitestar_state::dmd_status_w) |
| 158 | | { |
| 159 | | m_dmd_status = data & 0x0f; |
| 160 | | } |
| 161 | | |
| 162 | | static ADDRESS_MAP_START( whitestar_dmd_map, AS_PROGRAM, 8, whitestar_state ) |
| 163 | | AM_RANGE(0x0000, 0x1fff) AM_RAM |
| 164 | | AM_RANGE(0x2000, 0x2fff) AM_RAM AM_SHARE("vram") // video out |
| 165 | | AM_RANGE(0x3000, 0x3000) AM_DEVREADWRITE("mc6845", mc6845_device, register_r, address_w) |
| 166 | | AM_RANGE(0x3001, 0x3001) AM_DEVWRITE("mc6845", mc6845_device, register_w) |
| 167 | | AM_RANGE(0x3002, 0x3002) AM_WRITE(dmd_bank_w) |
| 168 | | AM_RANGE(0x3003, 0x3003) AM_READ(dmd_latch_r) |
| 169 | | AM_RANGE(0x4000, 0x7fff) AM_ROMBANK("dmd_bank1") |
| 170 | | AM_RANGE(0x4000, 0x4000) AM_WRITE(dmd_status_w) |
| 171 | | AM_RANGE(0x8000, 0xffff) AM_ROM AM_REGION("dmdcpu", 0x78000) |
| 172 | | ADDRESS_MAP_END |
| 173 | | |
| 174 | 113 | void whitestar_state::machine_reset() |
| 175 | 114 | { |
| 176 | 115 | membank("bank1")->set_base(memregion("user1")->base()); |
| 177 | | membank("dmd_bank1")->set_base(memregion("dmdcpu")->base()); |
| 178 | 116 | } |
| 179 | 117 | |
| 180 | 118 | DRIVER_INIT_MEMBER(whitestar_state,whitestar) |
| r23969 | r23970 | |
| 187 | 125 | device.execute().set_input_line(M6809_FIRQ_LINE, HOLD_LINE); |
| 188 | 126 | } |
| 189 | 127 | |
| 190 | | #define DMD_CHUNK_SIZE 10 |
| 191 | | #define MCFG_DMD_ADD(_tag, _width, _height) \ |
| 192 | | MCFG_DEVICE_ADD(_tag, SCREEN, 0) \ |
| 193 | | MCFG_SCREEN_TYPE(LCD) \ |
| 194 | | MCFG_SCREEN_REFRESH_RATE(60) \ |
| 195 | | MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) \ |
| 196 | | MCFG_SCREEN_UPDATE_DEVICE("mc6845", mc6845_device, screen_update) \ |
| 197 | | MCFG_SCREEN_SIZE( _width * DMD_CHUNK_SIZE, _height *DMD_CHUNK_SIZE) \ |
| 198 | | MCFG_SCREEN_VISIBLE_AREA( 0, _width * DMD_CHUNK_SIZE-1, 0, _height*DMD_CHUNK_SIZE-1 ) \ |
| 199 | | MCFG_DEFAULT_LAYOUT( layout_lcd ) |
| 200 | | |
| 201 | | |
| 202 | | void dmd_put_pixel(bitmap_rgb32 &bitmap, int x, int y, rgb_t color) |
| 128 | static const decodmd_intf decodmd_interface = |
| 203 | 129 | { |
| 204 | | int midx = x * DMD_CHUNK_SIZE + DMD_CHUNK_SIZE/2; |
| 205 | | int midy = y * DMD_CHUNK_SIZE + DMD_CHUNK_SIZE/2; |
| 206 | | int width = DMD_CHUNK_SIZE-2; |
| 207 | | // compute parameters |
| 208 | | width /= 2; |
| 209 | | float ooradius2 = 1.0f / (float)(width * width); |
| 210 | | |
| 211 | | // iterate over y |
| 212 | | for (UINT32 y = 0; y <= width; y++) |
| 213 | | { |
| 214 | | UINT32 *d0 = &bitmap.pix32(midy - y); |
| 215 | | UINT32 *d1 = &bitmap.pix32(midy + y); |
| 216 | | float xval = width * sqrt(1.0f - (float)(y * y) * ooradius2); |
| 217 | | INT32 left, right; |
| 218 | | |
| 219 | | // compute left/right coordinates |
| 220 | | left = midx - (INT32)(xval + 0.5f); |
| 221 | | right = midx + (INT32)(xval + 0.5f); |
| 222 | | |
| 223 | | // draw this scanline |
| 224 | | for (UINT32 x = left; x < right; x++) |
| 225 | | d0[x] = d1[x] = color; |
| 226 | | } |
| 227 | | } |
| 228 | | |
| 229 | | MC6845_UPDATE_ROW( whitestar_update_row ) |
| 230 | | { |
| 231 | | whitestar_state *state = device->machine().driver_data<whitestar_state>(); |
| 232 | | const rgb_t *palette = palette_entry_list_raw(bitmap.palette()); |
| 233 | | UINT8 *vram = state->m_vram + ((ma & 0x100)<<2) + (ra << 4); |
| 234 | | int xi; |
| 235 | | |
| 236 | | for (int x = 0; x < 128/8; x++) |
| 237 | | { |
| 238 | | UINT16 val = (vram[x]<<8) + vram[x+0x200]; |
| 239 | | val = BITSWAP16(val,15,7,14,6,13,5,12,4,11,3,10,2,9,1,8,0); |
| 240 | | |
| 241 | | for(xi=0;xi<8;xi++) |
| 242 | | dmd_put_pixel(bitmap, (x*8 + xi), ra, palette[((val>>(14-xi*2)) & 0x03) + 1]); |
| 243 | | } |
| 244 | | } |
| 245 | | |
| 246 | | static MC6845_INTERFACE( whitestar_crtc6845_interface ) |
| 247 | | { |
| 248 | | NULL, |
| 249 | | false, /* show border area */ |
| 250 | | 1, |
| 251 | | NULL, |
| 252 | | whitestar_update_row, |
| 253 | | NULL, |
| 254 | | DEVCB_NULL, |
| 255 | | DEVCB_NULL, |
| 256 | | DEVCB_NULL, |
| 257 | | DEVCB_NULL, |
| 258 | | NULL |
| 130 | ":dmdcpu" // region containing DMD ROM data |
| 259 | 131 | }; |
| 260 | 132 | |
| 261 | | void whitestar_state::palette_init() |
| 262 | | { |
| 263 | | palette_set_color(machine(), 0, MAKE_RGB(0, 0, 0)); |
| 264 | | |
| 265 | | palette_set_color(machine(), 1, MAKE_RGB(20, 20, 20)); |
| 266 | | palette_set_color(machine(), 2, MAKE_RGB(84, 73, 10)); |
| 267 | | palette_set_color(machine(), 3, MAKE_RGB(168, 147, 21)); |
| 268 | | palette_set_color(machine(), 4, MAKE_RGB(255, 224, 32)); |
| 269 | | } |
| 270 | | |
| 271 | 133 | static MACHINE_CONFIG_START( whitestar, whitestar_state ) |
| 272 | 134 | /* basic machine hardware */ |
| 273 | 135 | MCFG_CPU_ADD("maincpu", M6809, 2000000) |
| 274 | 136 | MCFG_CPU_PROGRAM_MAP(whitestar_map) |
| 275 | 137 | MCFG_CPU_PERIODIC_INT_DRIVER(whitestar_state, whitestar_firq_interrupt, 976) // value taken from PinMAME |
| 276 | 138 | |
| 277 | | MCFG_CPU_ADD("dmdcpu", M6809, (8000000/4)) |
| 278 | | MCFG_CPU_PROGRAM_MAP(whitestar_dmd_map) |
| 279 | | MCFG_CPU_PERIODIC_INT_DRIVER(whitestar_state, whitestar_firq_interrupt, 80) // value taken from PinMAME |
| 280 | | |
| 281 | | |
| 282 | 139 | /* sound hardware */ |
| 283 | 140 | MCFG_DECOBSMT_ADD(DECOBSMT_TAG) |
| 284 | 141 | |
| 285 | | MCFG_MC6845_ADD("mc6845", MC6845, 2000000, whitestar_crtc6845_interface) |
| 286 | | |
| 287 | | /* video hardware */ |
| 288 | | MCFG_DMD_ADD("screen", 128, 32) |
| 289 | | |
| 290 | | MCFG_PALETTE_LENGTH(5) |
| 142 | MCFG_DECODMD_TYPE2_ADD("decodmd",decodmd_interface) |
| 291 | 143 | MACHINE_CONFIG_END |
| 292 | 144 | |
| 293 | 145 | // 8Mbit ROMs are mapped oddly: the first 4Mbit of each of the ROMs goes in order u17, u21, u36, u37 |