trunk/src/mame/audio/8080bw.c
| r20121 | r20122 | |
| 846 | 846 | static const double schaser_effect_rc[8] = |
| 847 | 847 | { |
| 848 | 848 | 0, |
| 849 | (RES_K(15) + RES_K(20)) * CAP_U(1), |
| 850 | (RES_K(39) + RES_K(20)) * CAP_U(1), |
| 851 | (1.0/ (1.0/RES_K(15) + 1.0/RES_K(39)) + RES_K(20)) * CAP_U(1), |
| 849 | 852 | (RES_K(82) + RES_K(20)) * CAP_U(1), |
| 850 | | (RES_K(39) + RES_K(20)) * CAP_U(1), |
| 851 | | (1.0/ (1.0/RES_K(82) + 1.0/RES_K(39)) + RES_K(20)) * CAP_U(1), |
| 852 | | (RES_K(15) + RES_K(20)) * CAP_U(1), |
| 853 | | (1.0/ (1.0/RES_K(82) + 1.0/RES_K(15)) + RES_K(20)) * CAP_U(1), |
| 854 | | (1.0/ (1.0/RES_K(39) + 1.0/RES_K(15)) + RES_K(20)) * CAP_U(1), |
| 855 | | (1.0/ (1.0/RES_K(82) + 1.0/RES_K(39) + 1.0/RES_K(15)) + RES_K(20)) * CAP_U(1) |
| 853 | (1.0/ (1.0/RES_K(15) + 1.0/RES_K(82)) + RES_K(20)) * CAP_U(1), |
| 854 | (1.0/ (1.0/RES_K(15) + 1.0/RES_K(82)) + RES_K(20)) * CAP_U(1), |
| 855 | (1.0/ (1.0/RES_K(15) + 1.0/RES_K(39) + 1.0/RES_K(82)) + RES_K(20)) * CAP_U(1) |
| 856 | 856 | }; |
| 857 | 857 | |
| 858 | 858 | WRITE8_MEMBER(_8080bw_state::schaser_sh_port_1_w) |
| r20121 | r20122 | |
| 864 | 864 | bit 2 - Effect Sound A (SX2) |
| 865 | 865 | bit 3 - Effect Sound B (SX3) |
| 866 | 866 | bit 4 - Effect Sound C (SX4) |
| 867 | | bit 5 - Explosion (SX5) */ |
| 867 | bit 5 - Explosion (SX5) |
| 868 | 868 | |
| 869 | | //printf( "schaser_sh_port_1_w: %02x\n", data ); |
| 869 | Note that the schematic has SX2 and SX4 the wrong way around. |
| 870 | See MT 2662 for video proof. */ |
| 871 | |
| 870 | 872 | discrete_sound_w(m_discrete, space, SCHASER_DOT_EN, data & 0x01); |
| 871 | 873 | discrete_sound_w(m_discrete, space, SCHASER_DOT_SEL, data & 0x02); |
| 872 | 874 | |
| r20121 | r20122 | |
| 929 | 931 | bit 4 - Field Control B (SX10) |
| 930 | 932 | bit 5 - Flip Screen */ |
| 931 | 933 | |
| 932 | | //printf( "schaser_sh_port_2_w: %02x\n", data ); |
| 933 | | |
| 934 | 934 | discrete_sound_w(m_discrete, space, SCHASER_MUSIC_BIT, BIT(data, 0)); |
| 935 | 935 | |
| 936 | 936 | discrete_sound_w(m_discrete, space, SCHASER_SND_EN, BIT(data, 1)); |