trunk/src/mame/drivers/namcos23.cpp
| r250226 | r250227 | |
| 86 | 86 | return |
| 87 | 87 | |
| 88 | 88 | |
| 89 | c8000000: |
| 90 | 8011e384: |
| 91 | if((a2000000.w & 0xfff0 != 0x0080) (c417_r, 808e or 008e) |
| 92 | +10.w = 2 |
| 93 | +16.w = 42 |
| 94 | +16.w = 23c0 |
| 95 | +10.w = 3 |
| 96 | 801deaf0.w *0x28 -> +12.w (fixed) |
| 97 | |
| 98 | |
| 99 | |
| 100 | |
| 101 | ':maincpu' (801142FC): unmapped program memory write to 0C800010 = 00020000 & FFFF0000 |
| 102 | ':maincpu' (801143A8): unmapped program memory write to 0C800010 = 00020000 & FFFF0000 |
| 103 | ':maincpu' (801143B4): unmapped program memory write to 0C800014 = 00000042 & 0000FFFF |
| 104 | ':maincpu' (801143C0): unmapped program memory write to 0C800014 = 000023C0 & 0000FFFF |
| 105 | ':maincpu' (801143CC): unmapped program memory write to 0C800010 = 00030000 & FFFF0000 |
| 106 | ':maincpu' (801143E0): unmapped program memory write to 0C800010 = 00000000 & 0000FFFF |
| 107 | ':maincpu' (801143E0): unmapped program memory write to 0C800010 = 00000000 & 0000FFFF |
| 108 | ':maincpu' (801143E0): unmapped program memory write to 0C800010 = 00000000 & 0000FFFF |
| 109 | ':maincpu' (801143E0): unmapped program memory write to 0C800010 = 00000000 & 0000FFFF |
| 110 | |
| 89 | 111 | **************************************************************************** |
| 90 | 112 | |
| 91 | 113 | Namco System 23 and Super System 23 Hardware Overview (last updated 7th April 2013 at 12.49am) |
| r250226 | r250227 | |
| 1523 | 1545 | DECLARE_WRITE16_MEMBER(iob_p6_w); |
| 1524 | 1546 | DECLARE_READ8_MEMBER(iob_gun_r); |
| 1525 | 1547 | DECLARE_READ16_MEMBER(iob_analog_r); |
| 1548 | DECLARE_WRITE16_MEMBER(c435_state_pio_w); |
| 1549 | DECLARE_WRITE16_MEMBER(c435_state_reset_w); |
| 1526 | 1550 | DECLARE_DRIVER_INIT(s23); |
| 1527 | 1551 | TILE_GET_INFO_MEMBER(TextTilemapGetInfo); |
| 1528 | 1552 | DECLARE_VIDEO_START(s23); |
| r250226 | r250227 | |
| 1537 | 1561 | UINT16 nthword(const UINT32 *pSource, int offs); |
| 1538 | 1562 | inline INT32 u32_to_s24(UINT32 v); |
| 1539 | 1563 | inline INT32 u32_to_s10(UINT32 v); |
| 1564 | float f24_to_f32(UINT32 v); |
| 1565 | |
| 1540 | 1566 | INT32 *c435_getv(UINT16 id); |
| 1541 | 1567 | INT16 *c435_getm(UINT16 id); |
| 1542 | 1568 | |
| 1569 | void c435_state_set_interrupt(const UINT16 *param); |
| 1570 | void c435_state_set_projection_matrix_line(const UINT16 *param); |
| 1571 | void c435_state_set(UINT16 type, const UINT16 *param); |
| 1572 | int c435_get_state_entry_size(UINT16 type); |
| 1573 | |
| 1543 | 1574 | void c435_matrix_matrix_mul(); |
| 1544 | 1575 | void c435_matrix_set(); |
| 1545 | 1576 | void c435_vector_set(); |
| 1546 | 1577 | void c435_matrix_vector_mul(); |
| 1547 | 1578 | void c435_vector_matrix_mul(); |
| 1579 | void c435_state_set(); |
| 1548 | 1580 | void c435_scaling_set(); |
| 1549 | | void c435_state_set_interrupt(); |
| 1550 | | void c435_state_set(); |
| 1551 | 1581 | void c435_render(); |
| 1552 | 1582 | void c435_flush(); |
| 1553 | 1583 | |
| r250226 | r250227 | |
| 1602 | 1632 | return v & 0x200 ? v | 0xfffffe00 : v & 0x1ff; |
| 1603 | 1633 | } |
| 1604 | 1634 | |
| 1635 | float namcos23_state::f24_to_f32(UINT32 v) |
| 1636 | { |
| 1637 | // 8 bits exponent, 16 mantissa |
| 1638 | // mantissa is 16-bits signed, 2-complement |
| 1639 | // value is m * 2**(e-46) |
| 1640 | // 1 is e=32, m=0x4000, -1 is e=31, m=0x8000 |
| 1605 | 1641 | |
| 1642 | // This code turns it into a standard float |
| 1643 | if(!v) |
| 1644 | return 0; |
| 1645 | |
| 1646 | UINT32 r = v & 0x8000 ? 0x80000000 : 0; |
| 1647 | UINT16 m = r ? -v : v; |
| 1648 | UINT8 e = (v >> 16) + 0x60; |
| 1649 | while(!(m & 0x8000)) { |
| 1650 | m <<= 1; |
| 1651 | e--; |
| 1652 | } |
| 1653 | |
| 1654 | r = r | (e << 23) | ((m & 0x7fff) << 8); |
| 1655 | return *(float *)&r; |
| 1656 | } |
| 1657 | |
| 1606 | 1658 | INLINE UINT8 light(UINT8 c, float l) |
| 1607 | 1659 | { |
| 1608 | 1660 | if(l < 1) |
| r250226 | r250227 | |
| 1632 | 1684 | return m_matrices[id]; |
| 1633 | 1685 | } |
| 1634 | 1686 | |
| 1687 | void namcos23_state::c435_state_set_interrupt(const UINT16 *param) |
| 1688 | { |
| 1689 | if(param[0] & 1) |
| 1690 | update_main_interrupts(m_main_irqcause | MAIN_C435_IRQ); |
| 1691 | else |
| 1692 | update_main_interrupts(m_main_irqcause & ~MAIN_C435_IRQ); |
| 1693 | } |
| 1694 | |
| 1695 | void namcos23_state::c435_state_set_projection_matrix_line(const UINT16 *param) |
| 1696 | { |
| 1697 | // timecrs2: |
| 1698 | // sx = 640/2, sy = 480/2, t = tan(fov/2) (fov=45 degrees) |
| 1699 | // line 1: 1 0 -(sx-a)/(sx/t) 0 -1 0 -(sx+a)/(sx/t) 0 |
| 1700 | // line 2: 0 1 -(sy-b)/(sx/t) 0 0 -1 -(sy+b)/(sx/t) 0 |
| 1701 | // line 3: 0 0 -1 c 0 0 0 sx/t |
| 1702 | |
| 1703 | char buf[4096]; |
| 1704 | char *p = buf; |
| 1705 | p += sprintf(p, "projection matrix line:"); |
| 1706 | for(int i=0; i<8; i++) |
| 1707 | p += sprintf(p, " %f", f24_to_f32((param[2*i+1] << 16) | param[2*i+2])); |
| 1708 | p += sprintf(p, "\n"); |
| 1709 | logerror(buf); |
| 1710 | } |
| 1711 | |
| 1712 | void namcos23_state::c435_state_set(UINT16 type, const UINT16 *param) |
| 1713 | { |
| 1714 | switch(type) { |
| 1715 | case 0x0001: c435_state_set_interrupt(param); break; |
| 1716 | case 0x00c8: c435_state_set_projection_matrix_line(param); break; |
| 1717 | default: { |
| 1718 | char buf[4096]; |
| 1719 | char *p = buf; |
| 1720 | p += sprintf(buf, "WARNING: Unhandled state type %04x :", type); |
| 1721 | for(int i=0; i<c435_get_state_entry_size(type); i++) |
| 1722 | p += sprintf(p, " %04x", param[i]); |
| 1723 | p += sprintf(p, "\n"); |
| 1724 | logerror(buf); |
| 1725 | break; |
| 1726 | } |
| 1727 | } |
| 1728 | } |
| 1729 | |
| 1730 | WRITE16_MEMBER(namcos23_state::c435_state_reset_w) |
| 1731 | { |
| 1732 | m_c435_buffer_pos = 0; |
| 1733 | } |
| 1734 | |
| 1735 | WRITE16_MEMBER(namcos23_state::c435_state_pio_w) |
| 1736 | { |
| 1737 | m_c435_buffer[m_c435_buffer_pos++] = data; |
| 1738 | int psize = c435_get_state_entry_size(m_c435_buffer[0]); |
| 1739 | if(m_c435_buffer_pos < psize+1) |
| 1740 | return; |
| 1741 | c435_state_set(m_c435_buffer[0], m_c435_buffer+1); |
| 1742 | m_c435_buffer_pos = 0; |
| 1743 | } |
| 1744 | |
| 1745 | int namcos23_state::c435_get_state_entry_size(UINT16 type) |
| 1746 | { |
| 1747 | switch(type) { |
| 1748 | case 0x0001: return 1; |
| 1749 | case 0x0009: return 19; |
| 1750 | case 0x0042: return 41; |
| 1751 | case 0x0046: return 13; |
| 1752 | case 0x00c0: return 33; |
| 1753 | case 0x00c6: return 13; |
| 1754 | case 0x00c8: return 17; |
| 1755 | default: |
| 1756 | logerror("WARNING: Unknown size for state type %04x\n", type); |
| 1757 | return -1; |
| 1758 | } |
| 1759 | } |
| 1760 | |
| 1635 | 1761 | void namcos23_state::c435_matrix_matrix_mul() // 0.0 |
| 1636 | 1762 | { |
| 1637 | 1763 | if((m_c435_buffer[0] & 0xf) != 4) { |
| 1638 | 1764 | logerror("WARNING: c435_matrix_matrix_mul with size %d\n", m_c435_buffer[0] & 0xf); |
| 1639 | 1765 | return; |
| 1640 | 1766 | } |
| 1767 | if(m_c435_buffer[0] != 0x0004) |
| 1768 | logerror("WARNING: c435_matrix_matrix_mul header %04x\n", m_c435_buffer[0]); |
| 1641 | 1769 | if(m_c435_buffer[3] != 0xffff) |
| 1642 | 1770 | logerror("WARNING: c435_matrix_matrix_mul with +2=%04x\n", m_c435_buffer[3]); |
| 1643 | 1771 | |
| r250226 | r250227 | |
| 1663 | 1791 | return; |
| 1664 | 1792 | } |
| 1665 | 1793 | |
| 1794 | if(m_c435_buffer[0] != 0x0814 && m_c435_buffer[0] != 0x1014) |
| 1795 | logerror("WARNING: c435_matrix_vector_mul header %04x\n", m_c435_buffer[0]); |
| 1796 | |
| 1797 | |
| 1666 | 1798 | if(m_c435_buffer[3] != 0xffff) { |
| 1667 | 1799 | INT32 *t = c435_getv(m_c435_buffer[1]); |
| 1668 | 1800 | const INT16 *m = c435_getm(m_c435_buffer[2]); |
| r250226 | r250227 | |
| 1690 | 1822 | logerror("WARNING: c435_matrix_set with size %d\n", m_c435_buffer[0] & 0xf); |
| 1691 | 1823 | return; |
| 1692 | 1824 | } |
| 1825 | |
| 1826 | if(m_c435_buffer[0] != 0x004a) |
| 1827 | logerror("WARNING: c435_matrix_set header %04x\n", m_c435_buffer[0]); |
| 1828 | |
| 1693 | 1829 | INT16 *t = c435_getm(m_c435_buffer[1]); |
| 1694 | 1830 | for(int i=0; i<9; i++) |
| 1695 | 1831 | t[i] = m_c435_buffer[i+2]; |
| r250226 | r250227 | |
| 1701 | 1837 | logerror("WARNING: c435_vector_set with size %d\n", m_c435_buffer[0] & 0xf); |
| 1702 | 1838 | return; |
| 1703 | 1839 | } |
| 1840 | if(m_c435_buffer[0] != 0x057) |
| 1841 | logerror("WARNING: c435_vector_set header %04x\n", m_c435_buffer[0]); |
| 1842 | |
| 1704 | 1843 | INT32 *t = c435_getv(m_c435_buffer[1]); |
| 1705 | 1844 | for(int i=0; i<3; i++) |
| 1706 | 1845 | t[i] = u32_to_s24((m_c435_buffer[2*i+2] << 16) | m_c435_buffer[2*i+3]); |
| r250226 | r250227 | |
| 1715 | 1854 | m_scaling = m_c435_buffer[1]; |
| 1716 | 1855 | } |
| 1717 | 1856 | |
| 1718 | | void namcos23_state::c435_state_set_interrupt() // 4.f.0001 |
| 1719 | | { |
| 1720 | | if(m_c435_buffer[0] != 0x4f02) { |
| 1721 | | logerror("WARNING: c435_state_set_interrupt with size %d\n", m_c435_buffer[0] & 0xff); |
| 1722 | | return; |
| 1723 | | } |
| 1724 | | if(m_c435_buffer[2] & 1) |
| 1725 | | update_main_interrupts(m_main_irqcause | MAIN_C435_IRQ); |
| 1726 | | else |
| 1727 | | update_main_interrupts(m_main_irqcause & ~MAIN_C435_IRQ); |
| 1728 | | } |
| 1729 | | |
| 1730 | 1857 | void namcos23_state::c435_state_set() // 4.f |
| 1731 | 1858 | { |
| 1732 | 1859 | if((m_c435_buffer[0] & 0xff) == 0) { |
| 1733 | | logerror("WARNING: c435_state_set with size %d\n", m_c435_buffer[0] & 0xff); |
| 1860 | logerror("WARNING: c435_state_set with zero size\n"); |
| 1734 | 1861 | return; |
| 1735 | 1862 | } |
| 1736 | | switch(m_c435_buffer[1]) { |
| 1737 | | case 0x0001: c435_state_set_interrupt(); break; |
| 1738 | | default: |
| 1739 | | logerror("WARNING: c435_state_set(%04x, ...)\n", m_c435_buffer[1]); |
| 1740 | | break; |
| 1863 | int size = c435_get_state_entry_size(m_c435_buffer[1]); |
| 1864 | if(size != (m_c435_buffer[0] & 0xff)-1) |
| 1865 | { |
| 1866 | logerror("WARNING: c435_state_set size disagreement (type=%04x, got %d, expected %d)\n", m_c435_buffer[1], (m_c435_buffer[0] & 0xff)-1, size); |
| 1867 | return; |
| 1741 | 1868 | } |
| 1869 | |
| 1870 | c435_state_set(m_c435_buffer[1], m_c435_buffer+2); |
| 1742 | 1871 | } |
| 1743 | 1872 | |
| 1744 | 1873 | void namcos23_state::c435_render() // 8 |
| 1745 | 1874 | { |
| 1746 | 1875 | if((m_c435_buffer[0] & 0xf) != 3) { |
| 1747 | | logerror("WARNING: c435_render with size %d, header %04x", m_c435_buffer[0] & 0xf, m_c435_buffer[0]); |
| 1876 | logerror("WARNING: c435_render with size %d, header %04x\n", m_c435_buffer[0] & 0xf, m_c435_buffer[0]); |
| 1748 | 1877 | return; |
| 1749 | 1878 | } |
| 1750 | 1879 | |
| r250226 | r250227 | |
| 1768 | 1897 | re->model.scaling = use_scaling ? m_scaling / 16384.0 : 1.0; |
| 1769 | 1898 | memcpy(re->model.m, m, sizeof(re->model.m)); |
| 1770 | 1899 | memcpy(re->model.v, v, sizeof(re->model.v)); |
| 1900 | // re->model.v[2] *= 768/420.0; |
| 1901 | |
| 1771 | 1902 | if(0) |
| 1772 | | fprintf(stderr, "Render %04x (%f %f %f %f %f %f %f %f %f) (%f %f %f)\n", |
| 1903 | logerror("Render %04x (%f %f %f %f %f %f %f %f %f) (%f %f %f) %f\n", |
| 1773 | 1904 | re->model.model, |
| 1774 | 1905 | re->model.m[0]/16384.0, re->model.m[1]/16384.0, re->model.m[2]/16384.0, |
| 1775 | 1906 | re->model.m[3]/16384.0, re->model.m[4]/16384.0, re->model.m[5]/16384.0, |
| 1776 | 1907 | re->model.m[6]/16384.0, re->model.m[7]/16384.0, re->model.m[8]/16384.0, |
| 1777 | | re->model.v[0]/16384.0, re->model.v[1]/16384.0, re->model.v[2]/16384.0); |
| 1908 | re->model.v[0]/16384.0, re->model.v[1]/16384.0, re->model.v[2]/16384.0, |
| 1909 | re->model.scaling); |
| 1778 | 1910 | |
| 1779 | 1911 | render.count[render.cur]++; |
| 1780 | 1912 | } |
| r250226 | r250227 | |
| 1830 | 1962 | } |
| 1831 | 1963 | |
| 1832 | 1964 | if(!known) { |
| 1833 | | logerror("c435 -"); |
| 1965 | char buf[4096]; |
| 1966 | char *p = buf; |
| 1967 | p += sprintf(p, "c435 -"); |
| 1834 | 1968 | for(int i=0; i<m_c435_buffer_pos; i++) |
| 1835 | | logerror(" %04x", m_c435_buffer[i]); |
| 1836 | | logerror("\n"); |
| 1969 | p += sprintf(p, " %04x", m_c435_buffer[i]); |
| 1970 | p += sprintf(p, "\n"); |
| 1971 | logerror(buf); |
| 1837 | 1972 | } |
| 1838 | 1973 | |
| 1839 | 1974 | m_c435_buffer_pos = 0; |
| r250226 | r250227 | |
| 1930 | 2065 | // 640/(3.125/3.75) = 768 |
| 1931 | 2066 | // 480/(2.34375/3.75) = 768 |
| 1932 | 2067 | |
| 1933 | | pv.x = 320 + 768 * pv.x; |
| 1934 | | pv.y = 240 - 768 * pv.y; |
| 2068 | #if 1 |
| 2069 | pv.x = 320 + 768*pv.x; |
| 2070 | pv.y = 240 - 768*pv.y; |
| 2071 | #else |
| 2072 | pv.x = 320 + 410*pv.x; |
| 2073 | pv.y = 240 - 410*pv.y; |
| 2074 | #endif |
| 2075 | |
| 1935 | 2076 | pv.p[0] = 1.0f / pv.p[0]; |
| 1936 | 2077 | } |
| 1937 | 2078 | |
| r250226 | r250227 | |
| 1957 | 2098 | void namcos23_state::render_one_model(const namcos23_render_entry *re) |
| 1958 | 2099 | { |
| 1959 | 2100 | render_t &render = m_render; |
| 2101 | if(re->model.model < 0x80) { |
| 2102 | logerror("WARNING: model %02x requested\n", re->model.model); |
| 2103 | return; |
| 2104 | } |
| 2105 | |
| 2106 | if(re->model.model == 3486) |
| 2107 | return; |
| 2108 | |
| 1960 | 2109 | UINT32 adr = m_ptrom[re->model.model]; |
| 1961 | 2110 | if(adr >= m_ptrom_limit) { |
| 1962 | 2111 | logerror("WARNING: model %04x base address %08x out-of-bounds - pointram?\n", re->model.model, adr); |
| r250226 | r250227 | |
| 2761 | 2910 | AM_RANGE(0x0a000000, 0x0affffff) AM_ROM AM_REGION("data", 0x1000000) AM_MIRROR(0x1000000) |
| 2762 | 2911 | AM_RANGE(0x0c000000, 0x0c00001f) AM_READWRITE16(c412_r, c412_w, 0xffffffff) |
| 2763 | 2912 | AM_RANGE(0x0c400000, 0x0c400007) AM_READWRITE16(c421_r, c421_w, 0xffffffff) |
| 2913 | AM_RANGE(0x0c800010, 0x0c800013) AM_WRITE16(c435_state_reset_w, 0xffff0000) |
| 2914 | AM_RANGE(0x0c800014, 0x0c800017) AM_WRITE16(c435_state_pio_w, 0x0000ffff) |
| 2764 | 2915 | AM_RANGE(0x0d000000, 0x0d00000f) AM_READWRITE16(ctl_r, ctl_w, 0xffffffff) |
| 2765 | 2916 | AM_RANGE(0x0e800000, 0x0e800003) AM_READWRITE16(sub_comm_r, sub_comm_w, 0xffffffff) // not sure |
| 2766 | 2917 | AM_RANGE(0x0fc00000, 0x0fffffff) AM_WRITENOP AM_ROM AM_REGION("user1", 0) |