diff options
Diffstat (limited to 'src/mame/machine/vt1682_alu.cpp')
-rw-r--r-- | src/mame/machine/vt1682_alu.cpp | 349 |
1 files changed, 349 insertions, 0 deletions
diff --git a/src/mame/machine/vt1682_alu.cpp b/src/mame/machine/vt1682_alu.cpp new file mode 100644 index 00000000000..292a33a81da --- /dev/null +++ b/src/mame/machine/vt1682_alu.cpp @@ -0,0 +1,349 @@ +// license:BSD-3-Clause +// copyright-holders:David Haywood + +#include "emu.h" +#include "machine/vt1682_alu.h" + +#define LOG_ALU (1U << 1) + +#define LOG_ALL ( LOG_ALU ) + +#define VERBOSE (0) +#include "logmacro.h" + + +DEFINE_DEVICE_TYPE(VT_VT1682_ALU, vrt_vt1682_alu_device, "vt1682alu", "VRT VT1682 ALU") + +vrt_vt1682_alu_device::vrt_vt1682_alu_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) : + device_t(mconfig, VT_VT1682_ALU, tag, owner, clock) +{ +} + +void vrt_vt1682_alu_device::device_start() +{ + save_item(NAME(m_alu_oprand)); + save_item(NAME(m_alu_oprand_mult)); + save_item(NAME(m_alu_oprand_div)); + save_item(NAME(m_alu_out)); + + +} + +void vrt_vt1682_alu_device::device_reset() +{ + for (int i=0;i<4;i++) + m_alu_oprand[i] = 0; + + for (int i = 0; i < 2; i++) + { + m_alu_oprand_mult[i] = 0; + m_alu_oprand_div[i] = 0; + } + + for (int i=0;i<6;i++) + m_alu_out[i] = 0; +} + + + +/* + Address 0x2130 WRITE (MAIN CPU & SOUND CPU) + + 0x80 - ALU Oprand 1 + 0x40 - ALU Oprand 1 + 0x20 - ALU Oprand 1 + 0x10 - ALU Oprand 1 + 0x08 - ALU Oprand 1 + 0x04 - ALU Oprand 1 + 0x02 - ALU Oprand 1 + 0x01 - ALU Oprand 1 + + Address 0x2130 READ (MAIN CPU & SOUND CPU) + + 0x80 - ALU Output 1 + 0x40 - ALU Output 1 + 0x20 - ALU Output 1 + 0x10 - ALU Output 1 + 0x08 - ALU Output 1 + 0x04 - ALU Output 1 + 0x02 - ALU Output 1 + 0x01 - ALU Output 1 +*/ + +READ8_MEMBER(vrt_vt1682_alu_device::alu_out_1_r) +{ + uint8_t ret = m_alu_out[0]; + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_out_1_r returning: %02x\n", machine().describe_context(), ret); + return ret; +} + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_1_w) +{ + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_oprand_1_w writing: %02x\n", machine().describe_context(), data); + m_alu_oprand[0] = data; +} + +/* + Address 0x2131 WRITE (MAIN CPU & SOUND CPU) + + 0x80 - ALU Oprand 2 + 0x40 - ALU Oprand 2 + 0x20 - ALU Oprand 2 + 0x10 - ALU Oprand 2 + 0x08 - ALU Oprand 2 + 0x04 - ALU Oprand 2 + 0x02 - ALU Oprand 2 + 0x01 - ALU Oprand 2 + + Address 0x2131 READ (MAIN CPU & SOUND CPU) + + 0x80 - ALU Output 2 + 0x40 - ALU Output 2 + 0x20 - ALU Output 2 + 0x10 - ALU Output 2 + 0x08 - ALU Output 2 + 0x04 - ALU Output 2 + 0x02 - ALU Output 2 + 0x01 - ALU Output 2 +*/ + +READ8_MEMBER(vrt_vt1682_alu_device::alu_out_2_r) +{ + uint8_t ret = m_alu_out[1]; + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_out_2_r returning: %02x\n", machine().describe_context(), ret); + return ret; +} + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_2_w) +{ + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_oprand_2_w writing: %02x\n", machine().describe_context(), data); + m_alu_oprand[1] = data; +} + +/* + Address 0x2132 WRITE (MAIN CPU & SOUND CPU) + + 0x80 - ALU Oprand 3 + 0x40 - ALU Oprand 3 + 0x20 - ALU Oprand 3 + 0x10 - ALU Oprand 3 + 0x08 - ALU Oprand 3 + 0x04 - ALU Oprand 3 + 0x02 - ALU Oprand 3 + 0x01 - ALU Oprand 3 + + Address 0x2132 READ (MAIN CPU & SOUND CPU) + + 0x80 - ALU Output 3 + 0x40 - ALU Output 3 + 0x20 - ALU Output 3 + 0x10 - ALU Output 3 + 0x08 - ALU Output 3 + 0x04 - ALU Output 3 + 0x02 - ALU Output 3 + 0x01 - ALU Output 3 +*/ + +READ8_MEMBER(vrt_vt1682_alu_device::alu_out_3_r) +{ + uint8_t ret = m_alu_out[2]; + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_out_3_r returning: %02x\n", machine().describe_context(), ret); + return ret; +} + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_3_w) +{ + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_oprand_3_w writing: %02x\n", machine().describe_context(), data); + m_alu_oprand[2] = data; +} + + +/* + Address 0x2133 WRITE (MAIN CPU & SOUND CPU) + + 0x80 - ALU Oprand 4 + 0x40 - ALU Oprand 4 + 0x20 - ALU Oprand 4 + 0x10 - ALU Oprand 4 + 0x08 - ALU Oprand 4 + 0x04 - ALU Oprand 4 + 0x02 - ALU Oprand 4 + 0x01 - ALU Oprand 4 + + Address 0x2133 READ (MAIN CPU & SOUND CPU) + + 0x80 - ALU Output 4 + 0x40 - ALU Output 4 + 0x20 - ALU Output 4 + 0x10 - ALU Output 4 + 0x08 - ALU Output 4 + 0x04 - ALU Output 4 + 0x02 - ALU Output 4 + 0x01 - ALU Output 4 +*/ + +READ8_MEMBER(vrt_vt1682_alu_device::alu_out_4_r) +{ + uint8_t ret = m_alu_out[3]; + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_out_4_r returning: %02x\n", machine().describe_context(), ret); + return ret; +} + + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_4_w) +{ + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_oprand_4_w writing: %02x\n", machine().describe_context(), data); + m_alu_oprand[3] = data; +} + +/* + Address 0x2134 WRITE (MAIN CPU & SOUND CPU) + + 0x80 - ALU Mul Oprand 5 + 0x40 - ALU Mul Oprand 5 + 0x20 - ALU Mul Oprand 5 + 0x10 - ALU Mul Oprand 5 + 0x08 - ALU Mul Oprand 5 + 0x04 - ALU Mul Oprand 5 + 0x02 - ALU Mul Oprand 5 + 0x01 - ALU Mul Oprand 5 + + Address 0x2134 READ (MAIN CPU & SOUND CPU) + + 0x80 - ALU Output 5 + 0x40 - ALU Output 5 + 0x20 - ALU Output 5 + 0x10 - ALU Output 5 + 0x08 - ALU Output 5 + 0x04 - ALU Output 5 + 0x02 - ALU Output 5 + 0x01 - ALU Output 5 +*/ + +READ8_MEMBER(vrt_vt1682_alu_device::alu_out_5_r) +{ + uint8_t ret = m_alu_out[4]; + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_out_5_r returning: %02x\n", machine().describe_context(), ret); + return ret; +} + + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_5_mult_w) +{ + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_oprand_5_mult_w writing: %02x\n", machine().describe_context(), data); + m_alu_oprand_mult[0] = data; +} + + +/* + Address 0x2135 WRITE (MAIN CPU & SOUND CPU) + + 0x80 - ALU Mul Oprand 6 + 0x40 - ALU Mul Oprand 6 + 0x20 - ALU Mul Oprand 6 + 0x10 - ALU Mul Oprand 6 + 0x08 - ALU Mul Oprand 6 + 0x04 - ALU Mul Oprand 6 + 0x02 - ALU Mul Oprand 6 + 0x01 - ALU Mul Oprand 6 + + Address 0x2135 READ (MAIN CPU & SOUND CPU) + + 0x80 - ALU Output 6 + 0x40 - ALU Output 6 + 0x20 - ALU Output 6 + 0x10 - ALU Output 6 + 0x08 - ALU Output 6 + 0x04 - ALU Output 6 + 0x02 - ALU Output 6 + 0x01 - ALU Output 6 +*/ + +READ8_MEMBER(vrt_vt1682_alu_device::alu_out_6_r) +{ + uint8_t ret = m_alu_out[5]; + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_out_6_r returning: %02x\n", machine().describe_context(), ret); + return ret; +} + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_6_mult_w) +{ + // used one of the 32in1 menus + + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_oprand_6_mult_w writing: %02x\n", machine().describe_context(), data); + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "------------------------------------------ MULTIPLICATION REQUESTED ------------------------------------\n"); + m_alu_oprand_mult[1] = data; + + int param1 = (m_alu_oprand_mult[1] << 8) | m_alu_oprand_mult[0]; + int param2 = (m_alu_oprand[1] << 8) | m_alu_oprand[0]; + + uint32_t result = param1 * param2; + + m_alu_out[0] = result & 0xff; + m_alu_out[1] = (result >> 8) & 0xff; + m_alu_out[2] = (result >> 16) & 0xff; + m_alu_out[3] = (result >> 24) & 0xff; + + // oprands 5/6 cleared? +} + + +/* + Address 0x2136 WRITE ONLY (MAIN CPU & SOUND CPU) + + 0x80 - ALU Div Oprand 5 + 0x40 - ALU Div Oprand 5 + 0x20 - ALU Div Oprand 5 + 0x10 - ALU Div Oprand 5 + 0x08 - ALU Div Oprand 5 + 0x04 - ALU Div Oprand 5 + 0x02 - ALU Div Oprand 5 + 0x01 - ALU Div Oprand 5 + +*/ + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_5_div_w) +{ + if (!m_is_sound_alu) LOGMASKED(LOG_ALU, "%s: alu_oprand_5_div_w writing: %02x\n", machine().describe_context(), data); + m_alu_oprand_div[0] = data; +} + +/* + Address 0x2137 WRITE ONLY (MAIN CPU & SOUND CPU) + + 0x80 - ALU Div Oprand 6 + 0x40 - ALU Div Oprand 6 + 0x20 - ALU Div Oprand 6 + 0x10 - ALU Div Oprand 6 + 0x08 - ALU Div Oprand 6 + 0x04 - ALU Div Oprand 6 + 0x02 - ALU Div Oprand 6 + 0x01 - ALU Div Oprand 6 +*/ + +WRITE8_MEMBER(vrt_vt1682_alu_device::alu_oprand_6_div_w) +{ + //LOGMASKED(LOG_ALU, "%s: alu_oprand_6_div_w writing: %02x\n", machine().describe_context(), data); + m_alu_oprand_div[1] = data; + + uint32_t param1 = (m_alu_oprand[3] << 24) | (m_alu_oprand[2] << 16) | (m_alu_oprand[1] << 8) | m_alu_oprand[0]; + // sources say the mult registers areu sed here, but that makes little sense? + uint32_t param2 = (m_alu_oprand_div[1] << 8) | m_alu_oprand_div[0]; + + if (param2 != 0) + { + //if (!m_is_sound_alu) popmessage("------------------------------------------ DIVISION REQUESTED ------------------------------------\n"); + + uint32_t result = param1 / param2; + + m_alu_out[0] = result & 0xff; + m_alu_out[1] = (result >> 8) & 0xff; + m_alu_out[2] = (result >> 16) & 0xff; + m_alu_out[3] = (result >> 24) & 0xff; + + // should be the remainder? + m_alu_out[4] = 0x00;// machine().rand(); + m_alu_out[5] = 0x00;// machine().rand(); + + } +}
\ No newline at end of file |