Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-04-25 09:50:04 +03:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

New working machines

Browse Source 
--------------------
Chroma-Chime [hap, Sean Riddle, John Parker, Altharic, wolf676]
This commit is contained in:
hap 2022-09-27 12:38:40 +02:00
parent 7d086ad184
commit ac7d797a20
5 changed files with 192 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/mame/appliedconcepts/ggm.cpp
View File

@ -108,7 +108,6 @@ private:
DECLARE_DEVICE_IMAGE_LOAD_MEMBER(load_cart);
DECLARE_DEVICE_IMAGE_UNLOAD_MEMBER(unload_cart);
u8 cartridge_r(offs_t offset);
void select_w(u8 data);
void control_w(u8 data);
@ -122,7 +121,6 @@ private:
u8 m_shift_data = 0;
u8 m_shift_clock = 0;
u32 m_cart_mask = 0;
u8 m_overlay = 0;
};
@ -170,8 +168,6 @@ void ggm_state::update_reset(ioport_value state)
DEVICE_IMAGE_LOAD_MEMBER(ggm_state::load_cart)
{
u32 size = m_cart->common_get_size("rom");
m_cart_mask = ((1 << (31 - count_leading_zeros_32(size))) - 1) & 0xffff;
m_cart->rom_alloc(size, GENERIC_ROM8_WIDTH, ENDIANNESS_LITTLE);
m_cart->common_load_rom(m_cart->get_rom_base(), size, "rom");
@ -196,11 +192,6 @@ DEVICE_IMAGE_UNLOAD_MEMBER(ggm_state::unload_cart)
}
}
u8 ggm_state::cartridge_r(offs_t offset)
{
return m_cart->read_rom(offset & m_cart_mask);
}
// 6522 ports
@ -266,7 +257,7 @@ u8 ggm_state::input_r()
void ggm_state::main_map(address_map &map)
{
// external slot has potential bus conflict with RAM/VIA
map(0x0000, 0xffff).r(FUNC(ggm_state::cartridge_r));
map(0x0000, 0xffff).r(m_cart, FUNC(generic_slot_device::read_rom));
map(0x0000, 0x07ff).ram().share("nvram");
map(0x8000, 0x800f).m(m_via, FUNC(via6522_device::map));
}
@ -455,7 +446,7 @@ void ggm_state::ggm(machine_config &config)
DAC_1BIT(config, m_dac).add_route(ALL_OUTPUTS, "speaker", 0.25);
/* cartridge */
GENERIC_CARTSLOT(config, m_cart, generic_plain_slot, "ggm");
GENERIC_CARTSLOT(config, m_cart, generic_linear_slot, "ggm");
m_cart->set_device_load(FUNC(ggm_state::load_cart));
m_cart->set_device_unload(FUNC(ggm_state::unload_cart));
m_cart->set_must_be_loaded(true);

18
src/mame/chess/ave_arb.cpp
View File

@ -83,7 +83,6 @@ public:
DECLARE_INPUT_CHANGED_MEMBER(halt_button) { m_maincpu->set_input_line(M6502_NMI_LINE, newval ? ASSERT_LINE : CLEAR_LINE); update_reset(); }
void update_reset();
// machine configs
void arb(machine_config &config);
void v2(machine_config &config);
@ -101,20 +100,14 @@ private:
optional_device<generic_slot_device> m_cart;
required_ioport_array<2> m_inputs;
// address maps
void main_map(address_map &map);
void v2_map(address_map &map);
// sensorboard
void init_board(int state);
bool m_altboard = false;
// cartridge
DECLARE_DEVICE_IMAGE_LOAD_MEMBER(cart_load);
u8 cartridge_r(offs_t offset);
u32 m_cart_mask;
// I/O handlers
void update_display();
void leds_w(u8 data);
void control_w(u8 data);
@ -174,8 +167,6 @@ void arb_state::init_board(int state)
DEVICE_IMAGE_LOAD_MEMBER(arb_state::cart_load)
{
u32 size = m_cart->common_get_size("rom");
m_cart_mask = ((1 << (31 - count_leading_zeros_32(size))) - 1) & 0x7fff;
m_cart->rom_alloc(size, GENERIC_ROM8_WIDTH, ENDIANNESS_LITTLE);
m_cart->common_load_rom(m_cart->get_rom_base(), size, "rom");
@ -192,11 +183,6 @@ DEVICE_IMAGE_LOAD_MEMBER(arb_state::cart_load)
return image_init_result::PASS;
}
u8 arb_state::cartridge_r(offs_t offset)
{
return m_cart->read_rom(offset & m_cart_mask);
}
// R6522 ports
@ -255,7 +241,7 @@ u8 arb_state::input_r()
void arb_state::main_map(address_map &map)
{
// external slot is A0-A14, potential bus conflict with RAM/VIA
map(0x0000, 0x7fff).mirror(0x8000).r(FUNC(arb_state::cartridge_r));
map(0x0000, 0x7fff).mirror(0x8000).r(m_cart, FUNC(generic_slot_device::read_rom));
map(0x0000, 0x07ff).mirror(0x1000).ram().share("nvram");
map(0x8000, 0x800f).mirror(0x1ff0).m(m_via, FUNC(via6522_device::map));
}
@ -341,7 +327,7 @@ void arb_state::arb(machine_config &config)
m_via->irq_handler().set_inputline(m_maincpu, M6502_IRQ_LINE);
/* cartridge */
GENERIC_CARTSLOT(config, m_cart, generic_plain_slot, "arb");
GENERIC_CARTSLOT(config, m_cart, generic_linear_slot, "arb");
m_cart->set_device_load(FUNC(arb_state::cart_load));
m_cart->set_must_be_loaded(true);

1
src/mame/handheld/gmaster.cpp
View File

@ -114,6 +114,7 @@ u32 gmaster_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, co
template<int N>
SED1520_UPDATE_CB(gmaster_state::screen_update_cb)
{
// LCD #0: top half, LCD #1: bottom half
rectangle clip = m_screen->visible_area();
if (N == 1)
clip.min_y = 32;

192
src/mame/handheld/hh_tms1k.cpp
View File

@ -24,6 +24,7 @@ not for newer ones (rev. E or TMS1400 MCUs). TMS0970/0980 osc. is on-die.
ROM source notes when dumped from another publisher, but confident it's the same:
- arrball: Tandy Zingo
- bcheetah: Fundimensions Incredible Brain Buggy
- cchime: Videomaster Door Tunes
- cmsport: Conic Basketball
- cnbaskb: Cardinal Electronic Basketball
- cnfball: Elecsonic Football
@ -67,7 +68,7 @@ on Joerg Woerner's datamath.org: http://www.datamath.org/IC_List.htm
--------------------------------------------------------------------
@CP0904A TMS0970 1977, Milton Bradley Comp IV
@MP0905B TMS0970 1977, Parker Brothers Codename Sector
*MP0027 TMS1000 1977, Texas Instruments OEM melody chip (used in eg. Chromatronics Chroma-Chime)
@MP0027A TMS1000 1977, Texas Instruments OEM melody chip (used in eg. Chromatronics Chroma-Chime)
*MP0057 TMS1000 1978, APH Student Speech+ (same ROM contents as TSI Speech+?)
*MP0121 TMS1000 1979, Waddingtons Compute-A-Tune
@MP0154 TMS1000 1979, Fonas 2 Player Baseball
@ -1454,6 +1455,183 @@ ROM_END
/***************************************************************************
Chromatronics Chroma-Chime
* PCB label: DESIGNED BY CHROMATRONICS, 118-2-003
* TMS1000NL MP0027A (die label: 1000B, MP0027A)
* 1-bit sound with volume decay
It was sold as a kit (so, the buyer had to assemble the PCB themselves).
Chromatronics claims it's the first ever processor-based musical doorbell.
It's likely they asked TI for a generic melody chip. It would be odd for
a UK product to play the US anthem (B2) much longer than the UK one (B1).
known releases:
- UK(1): Chroma-Chime, published by Chromatronics
- UK(2): Door Tunes, published by Videomaster (Chromatronics PCB, not a kit)
The MCU was also used in Bell-Fruit Oranges and Lemons (slot machine).
***************************************************************************/
class cchime_state : public hh_tms1k_state
{
public:
cchime_state(const machine_config &mconfig, device_type type, const char *tag) :
hh_tms1k_state(mconfig, type, tag),
m_volume(*this, "volume"),
m_tempo_timer(*this, "tempo")
{ }
void cchime(machine_config &config);
protected:
virtual void machine_start() override;
private:
required_device<filter_volume_device> m_volume;
required_device<timer_device> m_tempo_timer;
virtual void write_o(u16 data);
virtual void write_r(u32 data);
virtual u8 read_k();
TIMER_DEVICE_CALLBACK_MEMBER(speaker_decay_sim);
double m_speaker_volume = 0.0;
};
void cchime_state::machine_start()
{
hh_tms1k_state::machine_start();
save_item(NAME(m_speaker_volume));
}
// handlers
TIMER_DEVICE_CALLBACK_MEMBER(cchime_state::speaker_decay_sim)
{
m_volume->flt_volume_set_volume(m_speaker_volume);
// volume decays when speaker is off, decay scale is determined by tone knob
const double step = (1.005 - 1.0005) / 100.0; // approximation
m_speaker_volume /= 1.005 - (double)(u8)m_inputs[4]->read() * step;
}
void cchime_state::write_r(u32 data)
{
// R9: trigger tempo knob timer
if (m_r & ~data & 0x200)
{
const double step = 50 / 100.0; // approximation
m_tempo_timer->adjust(attotime::from_msec(50 + (u8)m_inputs[3]->read() * step));
}
// R10: power off when low (combined with doorbell)
if (~data & 0x400 && !m_inputs[2]->read())
power_off();
m_r = data;
}
void cchime_state::write_o(u16 data)
{
// O6+O7: speaker out
m_speaker->level_w(BIT(~data, 6) & BIT(~data, 7));
// O2: trigger speaker on
if (~m_o & data & 4)
m_volume->flt_volume_set_volume(m_speaker_volume = 1.0);
m_o = data;
}
u8 cchime_state::read_k()
{
u8 inp = 0;
// R0-R7 + K1-K4: selected tune
u8 rs = m_inputs[0]->read();
u8 ks = m_inputs[1]->read();
inp |= (m_r & rs) ? ks : 0;
// K4: rear doorbell
inp |= m_inputs[2]->read() << 1 & 4;
// K8: tempo knob state
if (m_tempo_timer->enabled())
inp |= 8;
return inp;
}
// config
static INPUT_PORTS_START( cchime )
PORT_START("IN.0") // R0-R7
PORT_CONFNAME( 0xff, 0x01, "Switch 1")
PORT_CONFSETTING( 0x01, "A" )
PORT_CONFSETTING( 0x02, "B" )
PORT_CONFSETTING( 0x04, "C" )
PORT_CONFSETTING( 0x08, "D" )
PORT_CONFSETTING( 0x10, "E" )
PORT_CONFSETTING( 0x20, "F" )
PORT_CONFSETTING( 0x40, "G" )
PORT_CONFSETTING( 0x80, "H" )
PORT_START("IN.1") // K1-K4
PORT_CONFNAME( 0x07, 0x01, "Switch 2")
PORT_CONFSETTING( 0x01, "1" )
PORT_CONFSETTING( 0x02, "2" )
PORT_CONFSETTING( 0x04, "3" )
PORT_START("IN.2")
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_BUTTON1 ) PORT_NAME("Front Doorbell") PORT_CHANGED_MEMBER(DEVICE_SELF, hh_tms1k_state, power_button, true)
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_BUTTON2 ) PORT_NAME("Rear Doorbell") PORT_CHANGED_MEMBER(DEVICE_SELF, hh_tms1k_state, power_button, true)
PORT_START("IN.3")
PORT_ADJUSTER(50, "Tempo Knob")
PORT_START("IN.4")
PORT_ADJUSTER(50, "Tone Knob")
INPUT_PORTS_END
void cchime_state::cchime(machine_config &config)
{
// basic machine hardware
TMS1000(config, m_maincpu, 400000); // approximation - RC osc. R=39K, C=47pF
m_maincpu->read_k().set(FUNC(cchime_state::read_k));
m_maincpu->write_o().set(FUNC(cchime_state::write_o));
m_maincpu->write_r().set(FUNC(cchime_state::write_r));
TIMER(config, "tempo").configure_generic(nullptr);
// no visual feedback!
// sound hardware
SPEAKER(config, "mono").front_center();
SPEAKER_SOUND(config, m_speaker).add_route(ALL_OUTPUTS, "volume", 0.25);
FILTER_VOLUME(config, m_volume).add_route(ALL_OUTPUTS, "mono", 1.0);
TIMER(config, "speaker_decay").configure_periodic(FUNC(cchime_state::speaker_decay_sim), attotime::from_msec(1));
}
// roms
ROM_START( cchime )
ROM_REGION( 0x0400, "maincpu", 0 )
ROM_LOAD( "mp0027a.n1", 0x0000, 0x0400, CRC(8b5e2c4d) SHA1(5364d2836e9daefee2529a20c022e811bb3c7d89) )
ROM_REGION( 867, "maincpu:mpla", 0 )
ROM_LOAD( "tms1000_common2_micro.pla", 0, 867, CRC(d33da3cf) SHA1(13c4ebbca227818db75e6db0d45b66ba5e207776) )
ROM_REGION( 365, "maincpu:opla", 0 )
ROM_LOAD( "tms1000_cchime_output.pla", 0, 365, CRC(75d68c56) SHA1(85abde0ca0bcc605720551bea360498db350a7af) )
ROM_END
/***************************************************************************
Coleco Amaze-A-Tron, by Ralph Baer
@ -5265,7 +5443,7 @@ TIMER_DEVICE_CALLBACK_MEMBER(mmarvin_state::speaker_decay_sim)
m_volume->flt_volume_set_volume(m_speaker_volume);
// volume decays when speaker is off, decay scale is determined by tone knob
double step = (1.01 - 1.003) / 100.0; // approximation
const double step = (1.01 - 1.003) / 100.0; // approximation
m_speaker_volume /= 1.01 - (double)(u8)m_inputs[5]->read() * step;
}
@ -5281,9 +5459,9 @@ void mmarvin_state::write_r(u32 data)
m_inp_mux = data >> 2 & 0xf;
// R6: trigger speed knob timer
if (m_r & 0x40 && ~data & 0x40)
if (m_r & ~data & 0x40)
{
double step = (2100 - 130) / 100.0; // duration range is around 0.13s to 2.1s
const double step = (2100 - 130) / 100.0; // duration range is around 0.13s to 2.1s
m_speed_timer->adjust(attotime::from_msec(2100 - (u8)m_inputs[4]->read() * step));
}
@ -5291,7 +5469,7 @@ void mmarvin_state::write_r(u32 data)
m_speaker->level_w(BIT(m_r, 10));
// R9: trigger speaker on
if (m_r & 0x200 && ~data & 0x200)
if (m_r & ~data & 0x200)
m_volume->flt_volume_set_volume(m_speaker_volume = 1.0);
// R0,R1: digit/led select
@ -5310,7 +5488,7 @@ void mmarvin_state::write_o(u16 data)
u8 mmarvin_state::read_k()
{
// K1-K4: multiplexed inputs
// K8: speed dial state
// K8: speed knob state
return (read_inputs(4) & 7) | (m_speed_timer->enabled() ? 0 : 8);
}
@ -14752,6 +14930,8 @@ CONS( 1981, tc7atc, 0, 0, tc7atc, tc7atc, tc7atc_state, emp
COMP( 1977, palmf31, 0, 0, palmf31, palmf31, palmf31_state, empty_init, "Canon", "Palmtronic F-31", MACHINE_SUPPORTS_SAVE | MACHINE_NO_SOUND_HW )
COMP( 1977, palmmd8, 0, 0, palmmd8, palmmd8, palmmd8_state, empty_init, "Canon", "Palmtronic MD-8 (Multi 8)", MACHINE_SUPPORTS_SAVE | MACHINE_NO_SOUND_HW )
SYST( 1977, cchime, 0, 0, cchime, cchime, cchime_state, empty_init, "Chromatronics", "Chroma-Chime", MACHINE_SUPPORTS_SAVE )
CONS( 1978, amaztron, 0, 0, amaztron, amaztron, amaztron_state, empty_init, "Coleco", "Amaze-A-Tron", MACHINE_SUPPORTS_SAVE | MACHINE_CLICKABLE_ARTWORK | MACHINE_IMPERFECT_CONTROLS ) // ***
COMP( 1979, zodiac, 0, 0, zodiac, zodiac, zodiac_state, empty_init, "Coleco", "Zodiac - The Astrology Computer", MACHINE_SUPPORTS_SAVE | MACHINE_CLICKABLE_ARTWORK )
CONS( 1978, cqback, 0, 0, cqback, cqback, cqback_state, empty_init, "Coleco", "Electronic Quarterback", MACHINE_SUPPORTS_SAVE )

1
src/mame/mame.lst
View File

@ -16806,6 +16806,7 @@ bigtrak // Milton Bradley
blastit // Entex
bship // Milton Bradley
bshipb // Milton Bradley
cchime // Chromatronics
cmsport // Conic
cnbaskb // Conic
cnfball // Conic