diff options
Diffstat (limited to 'trunk/src/emu/video/psx.c')
-rw-r--r-- | trunk/src/emu/video/psx.c | 3730 |
1 files changed, 3730 insertions, 0 deletions
diff --git a/trunk/src/emu/video/psx.c b/trunk/src/emu/video/psx.c new file mode 100644 index 00000000000..d1a55a20060 --- /dev/null +++ b/trunk/src/emu/video/psx.c @@ -0,0 +1,3730 @@ +/* + * PlayStation GPU emulator + * + * Copyright 2003-2011 smf + * + */ + +#include "emu.h" +#include "video/psx.h" +#include "includes/psx.h" + +#define VERBOSE_LEVEL ( 0 ) + +// device type definition +const device_type CXD8514Q = &device_creator<cxd8514q_device>; +const device_type CXD8538Q = &device_creator<cxd8538q_device>; +const device_type CXD8561Q = &device_creator<cxd8561q_device>; +const device_type CXD8561BQ = &device_creator<cxd8561bq_device>; +const device_type CXD8561CQ = &device_creator<cxd8561cq_device>; +const device_type CXD8654Q = &device_creator<cxd8654q_device>; + +psxgpu_device::psxgpu_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, UINT32 clock) + : device_t(mconfig, type, name, tag, owner, clock) +{ +} + +void psxgpu_device::device_start( void ) +{ + if( m_type == CXD8538Q ) + { + psx_gpu_init( 1 ); + } + else + { + psx_gpu_init( 2 ); + } +} + +void psxgpu_device::device_reset( void ) +{ + gpu_reset(); +} + +cxd8514q_device::cxd8514q_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) + : psxgpu_device(mconfig, CXD8514Q, "CXD8514Q", tag, owner, clock) +{ +} + +cxd8538q_device::cxd8538q_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) + : psxgpu_device(mconfig, CXD8538Q, "CXD8538Q", tag, owner, clock) +{ +} + +cxd8561q_device::cxd8561q_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) + : psxgpu_device(mconfig, CXD8561Q, "CXD8561Q", tag, owner, clock) +{ +} + +cxd8561bq_device::cxd8561bq_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) + : psxgpu_device(mconfig, CXD8561BQ, "CXD8561BQ", tag, owner, clock) +{ +} + +cxd8561cq_device::cxd8561cq_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) + : psxgpu_device(mconfig, CXD8561CQ, "CXD8561CQ", tag, owner, clock) +{ +} + +cxd8654q_device::cxd8654q_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) + : psxgpu_device(mconfig, CXD8654Q, "CXD8654Q", tag, owner, clock) +{ +} + +static const UINT16 p_n_rightpointlist[] = { 1, 2, 0 }; +static const UINT16 p_n_leftpointlist[] = { 2, 0, 1 }; + +#define SINT11( x ) ( ( (INT32)( x ) << 21 ) >> 21 ) + +#define COORD_X( a ) ( a.sw.l ) +#define COORD_Y( a ) ( a.sw.h ) +#define COORD_DX( a ) ( n_drawoffset_x + a.sw.l ) +#define COORD_DY( a ) ( n_drawoffset_y + a.sw.h ) +#define SIZE_W( a ) ( a.w.l ) +#define SIZE_H( a ) ( a.w.h ) +#define BGR_C( a ) ( a.b.h3 ) +#define BGR_B( a ) ( a.b.h2 ) +#define BGR_G( a ) ( a.b.h ) +#define BGR_R( a ) ( a.b.l ) +#define TEXTURE_V( a ) ( (UINT8)a.b.h ) +#define TEXTURE_U( a ) ( (UINT8)a.b.l ) + +INLINE void ATTR_PRINTF(3,4) verboselog( running_machine& machine, int n_level, const char *s_fmt, ... ) +{ + if( VERBOSE_LEVEL >= n_level ) + { + va_list v; + char buf[ 32768 ]; + va_start( v, s_fmt ); + vsprintf( buf, s_fmt, v ); + va_end( v ); + logerror( "%s: %s", machine.describe_context(), buf ); + } +} + +#if defined( MAME_DEBUG ) + +void psxgpu_device::DebugMeshInit( void ) +{ + screen_device *screen = machine().primary_screen; + int width = screen->width(); + int height = screen->height(); + + m_debug.b_mesh = 0; + m_debug.b_texture = 0; + m_debug.n_interleave = -1; + m_debug.b_clear = 1; + m_debug.n_coord = 0; + m_debug.n_skip = 0; + m_debug.mesh = auto_bitmap_alloc( machine(), width, height, BITMAP_FORMAT_INDEXED16 ); +} + +void psxgpu_device::DebugMesh( int n_coordx, int n_coordy ) +{ + int n_coord; + int n_colour; + screen_device *screen = machine().primary_screen; + int width = screen->width(); + int height = screen->height(); + + if( m_debug.b_clear ) + { + bitmap_fill( m_debug.mesh, NULL , 0x0000); + m_debug.b_clear = 0; + } + + if( m_debug.n_coord < DEBUG_COORDS ) + { + n_coordx += m_n_displaystartx; + n_coordy += n_displaystarty; + + n_coordx *= 511; + n_coordx /= DEBUG_MAX - 1; + n_coordx += 256; + n_coordy *= 511; + n_coordy /= DEBUG_MAX - 1; + n_coordy += 256; + + m_debug.n_coordx[ m_debug.n_coord ] = n_coordx; + m_debug.n_coordy[ m_debug.n_coord ] = n_coordy; + m_debug.n_coord++; + } + + n_colour = 0x1f; + for( n_coord = 0; n_coord < m_debug.n_coord; n_coord++ ) + { + if( n_coordx != m_debug.n_coordx[ n_coord ] || + n_coordy != m_debug.n_coordy[ n_coord ] ) + { + break; + } + } + if( n_coord == m_debug.n_coord && m_debug.n_coord > 1 ) + { + n_colour = 0xffff; + } + for( n_coord = 0; n_coord < m_debug.n_coord; n_coord++ ) + { + PAIR n_x; + PAIR n_y; + INT32 n_xstart; + INT32 n_ystart; + INT32 n_xend; + INT32 n_yend; + INT32 n_xlen; + INT32 n_ylen; + INT32 n_len; + INT32 n_dx; + INT32 n_dy; + + n_xstart = m_debug.n_coordx[ n_coord ]; + n_xend = n_coordx; + if( n_xend > n_xstart ) + { + n_xlen = n_xend - n_xstart; + } + else + { + n_xlen = n_xstart - n_xend; + } + + n_ystart = m_debug.n_coordy[ n_coord ]; + n_yend = n_coordy; + if( n_yend > n_ystart ) + { + n_ylen = n_yend - n_ystart; + } + else + { + n_ylen = n_ystart - n_yend; + } + + if( n_xlen > n_ylen ) + { + n_len = n_xlen; + } + else + { + n_len = n_ylen; + } + + n_x.w.h = n_xstart; n_x.w.l = 0; + n_y.w.h = n_ystart; n_y.w.l = 0; + + if( n_len == 0 ) + { + n_len = 1; + } + + n_dx = (INT32)( ( n_xend << 16 ) - n_x.d ) / n_len; + n_dy = (INT32)( ( n_yend << 16 ) - n_y.d ) / n_len; + while( n_len > 0 ) + { + if( (INT16)n_x.w.h >= 0 && + (INT16)n_y.w.h >= 0 && + (INT16)n_x.w.h <= width - 1 && + (INT16)n_y.w.h <= height - 1 ) + { + if( *BITMAP_ADDR16(m_debug.mesh, n_y.w.h, n_x.w.h) != 0xffff ) + *BITMAP_ADDR16(m_debug.mesh, n_y.w.h, n_x.w.h) = n_colour; + } + n_x.d += n_dx; + n_y.d += n_dy; + n_len--; + } + } +} + +void psxgpu_device::DebugMeshEnd( void ) +{ + m_debug.n_coord = 0; +} + +void psxgpu_device::DebugCheckKeys( void ) +{ + if( machine().input().code_pressed_once( KEYCODE_M ) ) + m_debug.b_mesh = !m_debug.b_mesh; + + if( machine().input().code_pressed_once( KEYCODE_V ) ) + m_debug.b_texture = !m_debug.b_texture; + + if( m_debug.b_mesh || m_debug.b_texture ) + { + screen_device *screen = machine().primary_screen; + int width = screen->width(); + int height = screen->height(); + machine().primary_screen->set_visible_area( 0, width - 1, 0, height - 1 ); + } + else + machine().primary_screen->set_visible_area( 0, n_screenwidth - 1, 0, n_screenheight - 1 ); + + if( machine().input().code_pressed_once( KEYCODE_I ) ) + { + if( m_debug.b_texture ) + { + m_debug.n_interleave++; + + if( m_debug.n_interleave == 2 ) + m_debug.n_interleave = -1; + + if( m_debug.n_interleave == -1 ) + popmessage( "interleave off" ); + else if( m_debug.n_interleave == 0 ) + popmessage( "4 bit interleave" ); + else if( m_debug.n_interleave == 1 ) + popmessage( "8 bit interleave" ); + } + else + { + m_debug.n_skip++; + + if( m_debug.n_skip > 15 ) + m_debug.n_skip = 0; + + popmessage( "debug skip %d", m_debug.n_skip ); + } + } + +#if 0 + if( machine().input().code_pressed_once( KEYCODE_D ) ) + { + FILE *f; + int n_x; + f = fopen( "dump.txt", "w" ); + for( n_y = 256; n_y < 512; n_y++ ) + for( n_x = 640; n_x < 1024; n_x++ ) + fprintf( f, "%04u,%04u = %04x\n", n_y, n_x, p_p_vram[ n_y ][ n_x ] ); + fclose( f ); + } + if( machine().input().code_pressed_once( KEYCODE_S ) ) + { + FILE *f; + popmessage( "saving..." ); + f = fopen( "VRAM.BIN", "wb" ); + for( n_y = 0; n_y < 1024; n_y++ ) + fwrite( p_p_vram[ n_y ], 1024 * 2, 1, f ); + fclose( f ); + } + if( machine().input().code_pressed_once( KEYCODE_L ) ) + { + FILE *f; + popmessage( "loading..." ); + f = fopen( "VRAM.BIN", "rb" ); + for( n_y = 0; n_y < 1024; n_y++ ) + fread( p_p_vram[ n_y ], 1024 * 2, 1, f ); + fclose( f ); + } +#endif +} + +int psxgpu_device::DebugMeshDisplay( bitmap_t *bitmap, const rectangle *cliprect ) +{ + if( m_debug.mesh ) + { + copybitmap( bitmap, m_debug.mesh, 0, 0, 0, 0, cliprect ); + } + m_debug.b_clear = 1; + return m_debug.b_mesh; +} + +int psxgpu_device::DebugTextureDisplay( bitmap_t *bitmap ) +{ + UINT32 n_y; + + if( m_debug.b_texture ) + { + screen_device *screen = machine().primary_screen; + int width = screen->width(); + int height = screen->height(); + + for( n_y = 0; n_y < height; n_y++ ) + { + int n_x; + int n_xi; + int n_yi; + UINT16 p_n_interleave[ 1024 ]; + + for( n_x = 0; n_x < width; n_x++ ) + { + if( m_debug.n_interleave == 0 ) + { + n_xi = ( n_x & ~0x3c ) + ( ( n_y << 2 ) & 0x3c ); + n_yi = ( n_y & ~0xf ) + ( ( n_x >> 2 ) & 0xf ); + } + else if( m_debug.n_interleave == 1 ) + { + n_xi = ( n_x & ~0x78 ) + ( ( n_x << 3 ) & 0x40 ) + ( ( n_y << 3 ) & 0x38 ); + n_yi = ( n_y & ~0x7 ) + ( ( n_x >> 4 ) & 0x7 ); + } + else + { + n_xi = n_x; + n_yi = n_y; + } + p_n_interleave[ n_x ] = p_p_vram[ n_yi ][ n_xi ]; + } + draw_scanline16( bitmap, 0, n_y, width, p_n_interleave, machine().pens ); + } + } + return m_debug.b_texture; +} + +#endif + +void psxgpu_device::updatevisiblearea() +{ + rectangle visarea; + float refresh; + + if( ( n_gpustatus & ( 1 << 0x14 ) ) != 0 ) + { + /* pal */ + refresh = 50; + switch( ( n_gpustatus >> 0x13 ) & 1 ) + { + case 0: + n_screenheight = 256; + break; + case 1: + n_screenheight = 512; + break; + } + } + else + { + /* ntsc */ + refresh = 60; + switch( ( n_gpustatus >> 0x13 ) & 1 ) + { + case 0: + n_screenheight = 240; + break; + case 1: + n_screenheight = 480; + break; + } + } + switch( ( n_gpustatus >> 0x11 ) & 3 ) + { + case 0: + switch( ( n_gpustatus >> 0x10 ) & 1 ) + { + case 0: + n_screenwidth = 256; + break; + case 1: + n_screenwidth = 368; + break; + } + break; + case 1: + switch( ( n_gpustatus >> 0x10 ) & 1 ) + { + case 0: + n_screenwidth = 320; + break; + case 1: + n_screenwidth = 384; + break; + } + break; + case 2: + n_screenwidth = 512; + break; + case 3: + n_screenwidth = 640; + break; + } + visarea.min_x = visarea.min_y = 0; + visarea.max_x = n_screenwidth - 1; + visarea.max_y = n_screenheight - 1; + machine().primary_screen->configure(n_screenwidth, n_screenheight, visarea, HZ_TO_ATTOSECONDS(refresh)); +} + +void psxgpu_device::psx_gpu_init( int n_gputype ) +{ + int n_line; + int n_level; + int n_level2; + int n_shade; + int n_shaded; + int width = 1024; + int height = ( vramSize / width ) / sizeof( UINT16 ); + + m_n_gputype = n_gputype; + +#if defined( MAME_DEBUG ) + DebugMeshInit(); +#endif + + n_gpustatus = 0x14802000; + n_gpuinfo = 0; + n_gpu_buffer_offset = 0; + n_lightgun_x = 0; + n_lightgun_y = 0; + b_reverseflag = 0; + + p_vram = auto_alloc_array_clear( machine(), UINT16, width * height ); + + for( n_line = 0; n_line < 1024; n_line++ ) + { + p_p_vram[ n_line ] = &p_vram[ ( n_line % height ) * width ]; + } + + for( n_level = 0; n_level < MAX_LEVEL; n_level++ ) + { + for( n_shade = 0; n_shade < MAX_SHADE; n_shade++ ) + { + /* shaded */ + n_shaded = ( n_level * n_shade ) / MID_SHADE; + if( n_shaded > MAX_LEVEL - 1 ) + { + n_shaded = MAX_LEVEL - 1; + } + p_n_redshade[ ( n_level * MAX_SHADE ) | n_shade ] = n_shaded; + p_n_greenshade[ ( n_level * MAX_SHADE ) | n_shade ] = n_shaded << 5; + p_n_blueshade[ ( n_level * MAX_SHADE ) | n_shade ] = n_shaded << 10; + + /* 1/4 x transparency */ + n_shaded = ( n_level * n_shade ) / MID_SHADE; + n_shaded >>= 2; + if( n_shaded > MAX_LEVEL - 1 ) + { + n_shaded = MAX_LEVEL - 1; + } + p_n_f025[ ( n_level * MAX_SHADE ) | n_shade ] = n_shaded; + + /* 1/2 x transparency */ + n_shaded = ( n_level * n_shade ) / MID_SHADE; + n_shaded >>= 1; + if( n_shaded > MAX_LEVEL - 1 ) + { + n_shaded = MAX_LEVEL - 1; + } + p_n_f05[ ( n_level * MAX_SHADE ) | n_shade ] = n_shaded; + + /* 1 x transparency */ + n_shaded = ( n_level * n_shade ) / MID_SHADE; + if( n_shaded > MAX_LEVEL - 1 ) + { + n_shaded = MAX_LEVEL - 1; + } + p_n_f1[ ( n_level * MAX_SHADE ) | n_shade ] = n_shaded; + } + } + + for( n_level = 0; n_level < 0x10000; n_level++ ) + { + p_n_redlevel[ n_level ] = ( n_level & ( MAX_LEVEL - 1 ) ) * MAX_SHADE; + p_n_greenlevel[ n_level ] = ( ( n_level >> 5 ) & ( MAX_LEVEL - 1 ) ) * MAX_SHADE; + p_n_bluelevel[ n_level ] = ( ( n_level >> 10 ) & ( MAX_LEVEL - 1 ) ) * MAX_SHADE; + + /* 0.5 * background */ + p_n_redb05[ n_level ] = ( ( n_level & ( MAX_LEVEL - 1 ) ) / 2 ) * MAX_LEVEL; + p_n_greenb05[ n_level ] = ( ( ( n_level >> 5 ) & ( MAX_LEVEL - 1 ) ) / 2 ) * MAX_LEVEL; + p_n_blueb05[ n_level ] = ( ( ( n_level >> 10 ) & ( MAX_LEVEL - 1 ) ) / 2 ) * MAX_LEVEL; + + /* 1 * background */ + p_n_redb1[ n_level ] = ( n_level & ( MAX_LEVEL - 1 ) ) * MAX_LEVEL; + p_n_greenb1[ n_level ] = ( ( n_level >> 5 ) & ( MAX_LEVEL - 1 ) ) * MAX_LEVEL; + p_n_blueb1[ n_level ] = ( ( n_level >> 10 ) & ( MAX_LEVEL - 1 ) ) * MAX_LEVEL; + + /* 24bit to 15 bit conversion */ + p_n_g0r0[ n_level ] = ( ( ( n_level >> 11 ) & ( MAX_LEVEL - 1 ) ) << 5 ) | ( ( ( n_level >> 3 ) & ( MAX_LEVEL - 1 ) ) << 0 ); + p_n_b0[ n_level ] = ( ( n_level >> 3 ) & ( MAX_LEVEL - 1 ) ) << 10; + p_n_r1[ n_level ] = ( ( n_level >> 11 ) & ( MAX_LEVEL - 1 ) ) << 0; + p_n_b1g1[ n_level ] = ( ( ( n_level >> 11 ) & ( MAX_LEVEL - 1 ) ) << 10 ) | ( ( ( n_level >> 3 ) & ( MAX_LEVEL - 1 ) ) << 5 ); + } + + for( n_level = 0; n_level < MAX_LEVEL; n_level++ ) + { + for( n_level2 = 0; n_level2 < MAX_LEVEL; n_level2++ ) + { + /* add transparency */ + n_shaded = ( n_level + n_level2 ); + if( n_shaded > MAX_LEVEL - 1 ) + { + n_shaded = MAX_LEVEL - 1; + } + p_n_redaddtrans[ ( n_level * MAX_LEVEL ) | n_level2 ] = n_shaded; + p_n_greenaddtrans[ ( n_level * MAX_LEVEL ) | n_level2 ] = n_shaded << 5; + p_n_blueaddtrans[ ( n_level * MAX_LEVEL ) | n_level2 ] = n_shaded << 10; + + /* sub transparency */ + n_shaded = ( n_level - n_level2 ); + if( n_shaded < 0 ) + { + n_shaded = 0; + } + p_n_redsubtrans[ ( n_level * MAX_LEVEL ) | n_level2 ] = n_shaded; + p_n_greensubtrans[ ( n_level * MAX_LEVEL ) | n_level2 ] = n_shaded << 5; + p_n_bluesubtrans[ ( n_level * MAX_LEVEL ) | n_level2 ] = n_shaded << 10; + } + } + + // icky!!! + machine().save().save_memory( "globals", NULL, 0, "m_packet", (UINT8 *)&m_packet, 1, sizeof( m_packet ) ); + + state_save_register_global_pointer( machine(), p_vram, width * height ); + state_save_register_global( machine(), n_gpu_buffer_offset ); + state_save_register_global( machine(), n_vramx ); + state_save_register_global( machine(), n_vramy ); + state_save_register_global( machine(), n_twy ); + state_save_register_global( machine(), n_twx ); + state_save_register_global( machine(), n_tww ); + state_save_register_global( machine(), n_drawarea_x1 ); + state_save_register_global( machine(), n_drawarea_y1 ); + state_save_register_global( machine(), n_drawarea_x2 ); + state_save_register_global( machine(), n_drawarea_y2 ); + state_save_register_global( machine(), n_horiz_disstart ); + state_save_register_global( machine(), n_horiz_disend ); + state_save_register_global( machine(), n_vert_disstart ); + state_save_register_global( machine(), n_vert_disend ); + state_save_register_global( machine(), b_reverseflag ); + state_save_register_global( machine(), n_drawoffset_x ); + state_save_register_global( machine(), n_drawoffset_y ); + state_save_register_global( machine(), m_n_displaystartx ); + state_save_register_global( machine(), n_displaystarty ); + state_save_register_global( machine(), n_gpustatus ); + state_save_register_global( machine(), n_gpuinfo ); + state_save_register_global( machine(), n_lightgun_x ); + state_save_register_global( machine(), n_lightgun_y ); + state_save_register_global( machine(), m_n_tx ); + state_save_register_global( machine(), m_n_ty ); + state_save_register_global( machine(), n_abr ); + state_save_register_global( machine(), n_tp ); + state_save_register_global( machine(), n_ix ); + state_save_register_global( machine(), n_iy ); + state_save_register_global( machine(), n_ti ); + + machine().save().register_postload( save_prepost_delegate( FUNC( psxgpu_device::updatevisiblearea ), this ) ); +} + +void psxgpu_device::update_screen(bitmap_t *bitmap, const rectangle *cliprect) +{ + UINT32 n_x; + UINT32 n_y; + int n_top; + int n_line; + int n_lines; + int n_left; + int n_column; + int n_columns; + int n_displaystartx; + int n_overscantop; + int n_overscanleft; + +#if defined( MAME_DEBUG ) + if( DebugMeshDisplay( bitmap, cliprect ) ) + { + return; + } + if( DebugTextureDisplay( bitmap ) ) + { + return; + } +#endif + + if( ( n_gpustatus & ( 1 << 0x17 ) ) != 0 ) + { + /* todo: only draw to necessary area */ + bitmap_fill( bitmap, cliprect , 0); + } + else + { + if( b_reverseflag ) + { + n_displaystartx = ( 1023 - m_n_displaystartx ); + /* todo: make this flip the screen, in the meantime.. */ + n_displaystartx -= ( n_screenwidth - 1 ); + } + else + { + n_displaystartx = m_n_displaystartx; + } + + if( ( n_gpustatus & ( 1 << 0x14 ) ) != 0 ) + { + /* pal */ + n_overscantop = 0x23; + n_overscanleft = 0x27e; + } + else + { + /* ntsc */ + n_overscantop = 0x10; + n_overscanleft = 0x260; + } + + n_top = (INT32)n_vert_disstart - n_overscantop; + n_lines = (INT32)n_vert_disend - (INT32)n_vert_disstart; + if( n_top < 0 ) + { + n_y = -n_top; + n_lines += n_top; + } + else + { + /* todo: draw top border */ + n_y = 0; + } + if( ( n_gpustatus & ( 1 << 0x16 ) ) != 0 ) + { + /* interlaced */ + n_lines *= 2; + } + if( n_lines > n_screenheight - ( n_y + n_top ) ) + { + n_lines = n_screenheight - ( n_y + n_top ); + } + else + { + /* todo: draw bottom border */ + } + + n_left = ( ( (INT32)n_horiz_disstart - n_overscanleft ) * (INT32)n_screenwidth ) / 2560; + n_columns = ( ( ( (INT32)n_horiz_disend - n_horiz_disstart ) * (INT32)n_screenwidth ) / 2560 ); + if( n_left < 0 ) + { + n_x = -n_left; + n_columns += n_left; + } + else + { + /* todo: draw left border */ + n_x = 0; + } + if( n_columns > n_screenwidth - ( n_x + n_left ) ) + { + n_columns = n_screenwidth - ( n_x + n_left ); + } + else + { + /* todo: draw right border */ + } + + if( ( n_gpustatus & ( 1 << 0x15 ) ) != 0 ) + { + /* 24bit */ + n_line = n_lines; + while( n_line > 0 ) + { + UINT16 *p_n_src = p_p_vram[ n_y + n_displaystarty ] + ((n_x + n_displaystartx) * 3); + UINT16 *p_n_dest = BITMAP_ADDR16(bitmap, n_y + n_top, n_x + n_left); + + n_column = n_columns; + while( n_column > 0 ) + { + UINT32 n_g0r0 = *( p_n_src++ ); + UINT32 n_r1b0 = *( p_n_src++ ); + UINT32 n_b1g1 = *( p_n_src++ ); + + *( p_n_dest++ ) = p_n_g0r0[ n_g0r0 ] | p_n_b0[ n_r1b0 ]; + n_column--; + if( n_column > 0 ) + { + *( p_n_dest++ ) = p_n_r1[ n_r1b0 ] | p_n_b1g1[ n_b1g1 ]; + n_column--; + } + } + n_y++; + n_line--; + } + } + else + { + /* 15bit */ + n_line = n_lines; + while( n_line > 0 ) + { + draw_scanline16( bitmap, n_x + n_left, n_y + n_top, n_columns, p_p_vram[ n_y + n_displaystarty ] + n_x + n_displaystartx, NULL ); + n_y++; + n_line--; + } + } + } +} + +#define WRITE_PIXEL( p ) *( p_vram ) = p + +/* +type 1 +f e| d| c b| a 9| 8 7| 6 5| 4| 3 2 1 0 + |ti| | tp| abr| ty| | tx +*/ + +/* +type 2 +f e| d c| b| a 9| 8 7| 6 5| 4| 3 2 1 0 + |iy|ix|ty| | tp| abr|ty| tx +*/ + +void psxgpu_device::decode_tpage( UINT32 tpage ) +{ + if( m_n_gputype == 2 ) + { + n_gpustatus = ( n_gpustatus & 0xfffff800 ) | ( tpage & 0x7ff ); + + m_n_tx = ( tpage & 0x0f ) << 6; + m_n_ty = ( ( tpage & 0x10 ) << 4 ) | ( ( tpage & 0x800 ) >> 2 ); + n_abr = ( tpage & 0x60 ) >> 5; + n_tp = ( tpage & 0x180 ) >> 7; + n_ix = ( tpage & 0x1000 ) >> 12; + n_iy = ( tpage & 0x2000 ) >> 13; + n_ti = 0; + if( ( tpage & ~0x39ff ) != 0 ) + { + verboselog( machine(), 1, "not handled: draw mode %08x\n", tpage & ~0x39ff ); + } + if( n_tp == 3 ) + { + verboselog( machine(), 0, "not handled: tp == 3\n" ); + } + } + else + { + n_gpustatus = ( n_gpustatus & 0xffffe000 ) | ( tpage & 0x1fff ); + + m_n_tx = ( tpage & 0x0f ) << 6; + m_n_ty = ( ( tpage & 0x60 ) << 3 ); + n_abr = ( tpage & 0x180 ) >> 7; + n_tp = ( tpage & 0x600 ) >> 9; + n_ti = ( tpage & 0x2000 ) >> 13; + n_ix = 0; + n_iy = 0; + if( ( tpage & ~0x27ef ) != 0 ) + { + verboselog( machine(), 1, "not handled: draw mode %08x\n", tpage & ~0x27ef ); + } + if( n_tp == 3 ) + { + verboselog( machine(), 0, "not handled: tp == 3\n" ); + } + else if( n_tp == 2 && n_ti != 0 ) + { + verboselog( machine(), 0, "not handled: interleaved 15 bit texture\n" ); + } + } +} + +#define SPRITESETUP \ + if( n_iy != 0 ) \ + { \ + n_dv = -1; \ + } \ + else \ + { \ + n_dv = 1; \ + } \ + if( n_ix != 0 ) \ + { \ + n_du = -1; \ + } \ + else \ + { \ + n_du = 1; \ + } + +#define TRANSPARENCYSETUP \ + p_n_f = p_n_f1; \ + p_n_redb = p_n_redb1; \ + p_n_greenb = p_n_greenb1; \ + p_n_blueb = p_n_blueb1; \ + p_n_redtrans = p_n_redaddtrans; \ + p_n_greentrans = p_n_greenaddtrans; \ + p_n_bluetrans = p_n_blueaddtrans; \ + \ + switch( n_cmd & 0x02 ) \ + { \ + case 0x02: \ + switch( n_abr ) \ + { \ + case 0x00: \ + p_n_f = p_n_f05; \ + p_n_redb = p_n_redb05; \ + p_n_greenb = p_n_greenb05; \ + p_n_blueb = p_n_blueb05; \ + p_n_redtrans = p_n_redaddtrans; \ + p_n_greentrans = p_n_greenaddtrans; \ + p_n_bluetrans = p_n_blueaddtrans; \ + verboselog( machine(), 2, "Transparency Mode: 0.5*B + 0.5*F\n" ); \ + break; \ + case 0x01: \ + p_n_f = p_n_f1; \ + p_n_redb = p_n_redb1; \ + p_n_greenb = p_n_greenb1; \ + p_n_blueb = p_n_blueb1; \ + p_n_redtrans = p_n_redaddtrans; \ + p_n_greentrans = p_n_greenaddtrans; \ + p_n_bluetrans = p_n_blueaddtrans; \ + verboselog( machine(), 2, "Transparency Mode: 1.0*B + 1.0*F\n" ); \ + break; \ + case 0x02: \ + p_n_f = p_n_f1; \ + p_n_redb = p_n_redb1; \ + p_n_greenb = p_n_greenb1; \ + p_n_blueb = p_n_blueb1; \ + p_n_redtrans = p_n_redsubtrans; \ + p_n_greentrans = p_n_greensubtrans; \ + p_n_bluetrans = p_n_bluesubtrans; \ + verboselog( machine(), 2, "Transparency Mode: 1.0*B - 1.0*F\n" ); \ + break; \ + case 0x03: \ + p_n_f = p_n_f025; \ + p_n_redb = p_n_redb1; \ + p_n_greenb = p_n_greenb1; \ + p_n_blueb = p_n_blueb1; \ + p_n_redtrans = p_n_redaddtrans; \ + p_n_greentrans = p_n_greenaddtrans; \ + p_n_bluetrans = p_n_blueaddtrans; \ + verboselog( machine(), 2, "Transparency Mode: 1.0*B + 0.25*F\n" ); \ + break; \ + } \ + break; \ + } + +#define SOLIDSETUP \ + TRANSPARENCYSETUP + +#define TEXTURESETUP \ + n_tx = m_n_tx; \ + n_ty = m_n_ty; \ + p_clut = p_p_vram[ n_cluty ] + n_clutx; \ + switch( n_tp ) \ + { \ + case 0: \ + n_tx += n_twx >> 2; \ + n_ty += n_twy; \ + break; \ + case 1: \ + n_tx += n_twx >> 1; \ + n_ty += n_twy; \ + break; \ + case 2: \ + n_tx += n_twx >> 0; \ + n_ty += n_twy; \ + break; \ + } \ + TRANSPARENCYSETUP + +#define FLATPOLYGONUPDATE +#define FLATRECTANGEUPDATE +#define GOURAUDPOLYGONUPDATE \ + n_r.d += n_dr; \ + n_g.d += n_dg; \ + n_b.d += n_db; + +#define SOLIDFILL( PIXELUPDATE ) \ + if( n_distance > ( (INT32)n_drawarea_x2 - n_x ) + 1 ) \ + { \ + n_distance = ( n_drawarea_x2 - n_x ) + 1; \ + } \ + p_vram = p_p_vram[ n_y ] + n_x; \ + \ + switch( n_cmd & 0x02 ) \ + { \ + case 0x00: \ + /* transparency off */ \ + while( n_distance > 0 ) \ + { \ + WRITE_PIXEL( \ + p_n_redshade[ MID_LEVEL | n_r.w.h ] | \ + p_n_greenshade[ MID_LEVEL | n_g.w.h ] | \ + p_n_blueshade[ MID_LEVEL | n_b.w.h ] ); \ + p_vram++; \ + PIXELUPDATE \ + n_distance--; \ + } \ + break; \ + case 0x02: \ + /* transparency on */ \ + while( n_distance > 0 ) \ + { \ + WRITE_PIXEL( \ + p_n_redtrans[ p_n_f[ MID_LEVEL | n_r.w.h ] | p_n_redb[ *( p_vram ) ] ] | \ + p_n_greentrans[ p_n_f[ MID_LEVEL | n_g.w.h ] | p_n_greenb[ *( p_vram ) ] ] | \ + p_n_bluetrans[ p_n_f[ MID_LEVEL | n_b.w.h ] | p_n_blueb[ *( p_vram ) ] ] ); \ + p_vram++; \ + PIXELUPDATE \ + n_distance--; \ + } \ + break; \ + } \ + +#define FLATTEXTUREDPOLYGONUPDATE \ + n_u.d += n_du; \ + n_v.d += n_dv; + +#define GOURAUDTEXTUREDPOLYGONUPDATE \ + n_r.d += n_dr; \ + n_g.d += n_dg; \ + n_b.d += n_db; \ + n_u.d += n_du; \ + n_v.d += n_dv; + +#define FLATTEXTUREDRECTANGLEUPDATE \ + n_u += n_du; + +#define TEXTURE_LOOP \ + while( n_distance > 0 ) \ + { + +#define TEXTURE_ENDLOOP \ + } + +#define TEXTURE4BIT( TXV, TXU ) \ + TEXTURE_LOOP \ + n_bgr = p_clut[ ( *( p_p_vram[ n_ty + TXV ] + n_tx + ( TXU >> 2 ) ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ]; + +#define TEXTURE8BIT( TXV, TXU ) \ + TEXTURE_LOOP \ + n_bgr = p_clut[ ( *( p_p_vram[ n_ty + TXV ] + n_tx + ( TXU >> 1 ) ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff ]; + +#define TEXTURE15BIT( TXV, TXU ) \ + TEXTURE_LOOP \ + n_bgr = *( p_p_vram[ n_ty + TXV ] + n_tx + TXU ); + +#define TEXTUREWINDOW4BIT( TXV, TXU ) TEXTURE4BIT( ( TXV & n_twh ), ( TXU & n_tww ) ) +#define TEXTUREWINDOW8BIT( TXV, TXU ) TEXTURE8BIT( ( TXV & n_twh ), ( TXU & n_tww ) ) +#define TEXTUREWINDOW15BIT( TXV, TXU ) TEXTURE15BIT( ( TXV & n_twh ), ( TXU & n_tww ) ) + +#define TEXTUREINTERLEAVED4BIT( TXV, TXU ) \ + TEXTURE_LOOP \ + int n_xi = ( ( TXU >> 2 ) & ~0x3c ) + ( ( TXV << 2 ) & 0x3c ); \ + int n_yi = ( TXV & ~0xf ) + ( ( TXU >> 4 ) & 0xf ); \ + n_bgr = p_clut[ ( *( p_p_vram[ n_ty + n_yi ] + n_tx + n_xi ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ]; + +#define TEXTUREINTERLEAVED8BIT( TXV, TXU ) \ + TEXTURE_LOOP \ + int n_xi = ( ( TXU >> 1 ) & ~0x78 ) + ( ( TXU << 2 ) & 0x40 ) + ( ( TXV << 3 ) & 0x38 ); \ + int n_yi = ( TXV & ~0x7 ) + ( ( TXU >> 5 ) & 0x7 ); \ + n_bgr = p_clut[ ( *( p_p_vram[ n_ty + n_yi ] + n_tx + n_xi ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff ]; + +#define TEXTUREINTERLEAVED15BIT( TXV, TXU ) \ + TEXTURE_LOOP \ + int n_xi = TXU; \ + int n_yi = TXV; \ + n_bgr = *( p_p_vram[ n_ty + n_yi ] + n_tx + n_xi ); + +#define TEXTUREWINDOWINTERLEAVED4BIT( TXV, TXU ) TEXTUREINTERLEAVED4BIT( ( TXV & n_twh ), ( TXU & n_tww ) ) +#define TEXTUREWINDOWINTERLEAVED8BIT( TXV, TXU ) TEXTUREINTERLEAVED8BIT( ( TXV & n_twh ), ( TXU & n_tww ) ) +#define TEXTUREWINDOWINTERLEAVED15BIT( TXV, TXU ) TEXTUREINTERLEAVED15BIT( ( TXV & n_twh ), ( TXU & n_tww ) ) + +#define SHADEDPIXEL( PIXELUPDATE ) \ + if( n_bgr != 0 ) \ + { \ + WRITE_PIXEL( \ + p_n_redshade[ p_n_redlevel[ n_bgr ] | n_r.w.h ] | \ + p_n_greenshade[ p_n_greenlevel[ n_bgr ] | n_g.w.h ] | \ + p_n_blueshade[ p_n_bluelevel[ n_bgr ] | n_b.w.h ] ); \ + } \ + p_vram++; \ + PIXELUPDATE \ + n_distance--; \ + TEXTURE_ENDLOOP + +#define TRANSPARENTPIXEL( PIXELUPDATE ) \ + if( n_bgr != 0 ) \ + { \ + if( ( n_bgr & 0x8000 ) != 0 ) \ + { \ + WRITE_PIXEL( \ + p_n_redtrans[ p_n_f[ p_n_redlevel[ n_bgr ] | n_r.w.h ] | p_n_redb[ *( p_vram ) ] ] | \ + p_n_greentrans[ p_n_f[ p_n_greenlevel[ n_bgr ] | n_g.w.h ] | p_n_greenb[ *( p_vram ) ] ] | \ + p_n_bluetrans[ p_n_f[ p_n_bluelevel[ n_bgr ] | n_b.w.h ] | p_n_blueb[ *( p_vram ) ] ] ); \ + } \ + else \ + { \ + WRITE_PIXEL( \ + p_n_redshade[ p_n_redlevel[ n_bgr ] | n_r.w.h ] | \ + p_n_greenshade[ p_n_greenlevel[ n_bgr ] | n_g.w.h ] | \ + p_n_blueshade[ p_n_bluelevel[ n_bgr ] | n_b.w.h ] ); \ + } \ + } \ + p_vram++; \ + PIXELUPDATE \ + n_distance--; \ + TEXTURE_ENDLOOP + +#define TEXTUREFILL( PIXELUPDATE, TXU, TXV ) \ + if( n_distance > ( (INT32)n_drawarea_x2 - n_x ) + 1 ) \ + { \ + n_distance = ( n_drawarea_x2 - n_x ) + 1; \ + } \ + p_vram = p_p_vram[ n_y ] + n_x; \ + \ + if( n_ti != 0 ) \ + { \ + /* interleaved texture */ \ + if( n_twh != 255 || \ + n_tww != 255 || \ + n_twx != 0 || \ + n_twy != 0 ) \ + { \ + /* texture window */ \ + switch( n_cmd & 0x02 ) \ + { \ + case 0x00: \ + /* shading */ \ + switch( n_tp ) \ + { \ + case 0: \ + /* 4 bit clut */ \ + TEXTUREWINDOWINTERLEAVED4BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTUREWINDOWINTERLEAVED8BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTUREWINDOWINTERLEAVED15BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + case 0x02: \ + /* semi transparency */ \ + switch( n_tp ) \ + { \ + case 0: \ + /* 4 bit clut */ \ + TEXTUREWINDOWINTERLEAVED4BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTUREWINDOWINTERLEAVED8BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTUREWINDOWINTERLEAVED15BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + } \ + } \ + else \ + { \ + /* no texture window */ \ + switch( n_cmd & 0x02 ) \ + { \ + case 0x00: \ + /* shading */ \ + switch( n_tp ) \ + { \ + case 0: \ + /* 4 bit clut */ \ + TEXTUREINTERLEAVED4BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTUREINTERLEAVED8BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTUREINTERLEAVED15BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + case 0x02: \ + /* semi transparency */ \ + switch( n_tp ) \ + { \ + case 0: \ + /* 4 bit clut */ \ + TEXTUREINTERLEAVED4BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTUREINTERLEAVED8BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTUREINTERLEAVED15BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + } \ + } \ + } \ + else \ + { \ + /* standard texture */ \ + if( n_twh != 255 || \ + n_tww != 255 || \ + n_twx != 0 || \ + n_twy != 0 ) \ + { \ + /* texture window */ \ + switch( n_cmd & 0x02 ) \ + { \ + case 0x00: \ + /* shading */ \ + switch( n_tp ) \ + { \ + case 0: \ + /* 4 bit clut */ \ + TEXTUREWINDOW4BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTUREWINDOW8BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTUREWINDOW15BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + case 0x02: \ + /* semi transparency */ \ + switch( n_tp ) \ + { \ + case 0: \ + /* 4 bit clut */ \ + TEXTUREWINDOW4BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTUREWINDOW8BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTUREWINDOW15BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + } \ + } \ + else \ + { \ + /* no texture window */ \ + switch( n_cmd & 0x02 ) \ + { \ + case 0x00: \ + /* shading */ \ + switch( n_tp ) \ + { \ + case 0: \ + TEXTURE4BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTURE8BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTURE15BIT( TXV, TXU ) \ + SHADEDPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + case 0x02: \ + /* semi transparency */ \ + switch( n_tp ) \ + { \ + case 0: \ + /* 4 bit clut */ \ + TEXTURE4BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 1: \ + /* 8 bit clut */ \ + TEXTURE8BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + case 2: \ + /* 15 bit */ \ + TEXTURE15BIT( TXV, TXU ) \ + TRANSPARENTPIXEL( PIXELUPDATE ) \ + break; \ + } \ + break; \ + } \ + } \ + } + +void psxgpu_device::FlatPolygon( int n_startpoint ) +{ + INT16 n_y; + INT16 n_x; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + PAIR n_cx1; + PAIR n_cx2; + INT32 n_dx1; + INT32 n_dx2; + + UINT8 n_cmd; + + INT32 n_distance; + UINT16 n_point; + UINT16 n_rightpoint; + UINT16 n_leftpoint; + UINT16 *p_vram; + struct FLATVERTEX *vertex = &m_packet.FlatPolygon.vertex[ n_startpoint ]; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 1 ) + { + return; + } + for( n_point = 0; n_point < 3; n_point++ ) + { + DebugMesh( COORD_DX( vertex[ n_point ].n_coord ), COORD_DY( vertex[ n_point ].n_coord ) ); + } + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.FlatPolygon.n_bgr ); + + n_cx1.d = 0; + n_cx2.d = 0; + + SOLIDSETUP + + n_r.w.h = BGR_R( m_packet.FlatPolygon.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.FlatPolygon.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.FlatPolygon.n_bgr ); n_b.w.l = 0; + + n_leftpoint = 0; + for( n_point = 1; n_point < 3; n_point++ ) + { + if( COORD_DY( vertex[ n_point ].n_coord ) < COORD_DY( vertex[ n_leftpoint ].n_coord ) || + ( COORD_DY( vertex[ n_point ].n_coord ) == COORD_DY( vertex[ n_leftpoint ].n_coord ) && + COORD_DX( vertex[ n_point ].n_coord ) < COORD_DX( vertex[ n_leftpoint ].n_coord ) ) ) + { + n_leftpoint = n_point; + } + } + n_rightpoint = n_leftpoint; + + n_dx1 = 0; + n_dx2 = 0; + + n_y = COORD_DY( vertex[ n_rightpoint ].n_coord ); + + for( ;; ) + { + if( n_y == COORD_DY( vertex[ n_leftpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_leftpointlist[ n_leftpoint ] ].n_coord ) ) + { + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + if( n_leftpoint == n_rightpoint ) + { + break; + } + } + n_cx1.w.h = COORD_DX( vertex[ n_leftpoint ].n_coord ); n_cx1.w.l = 0; + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + n_distance = COORD_DY( vertex[ n_leftpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx1 = (INT32)( ( COORD_DX( vertex[ n_leftpoint ].n_coord ) << 16 ) - n_cx1.d ) / n_distance; + } + if( n_y == COORD_DY( vertex[ n_rightpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_rightpointlist[ n_rightpoint ] ].n_coord ) ) + { + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + if( n_rightpoint == n_leftpoint ) + { + break; + } + } + n_cx2.w.h = COORD_DX( vertex[ n_rightpoint ].n_coord ); n_cx2.w.l = 0; + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + n_distance = COORD_DY( vertex[ n_rightpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx2 = (INT32)( ( COORD_DX( vertex[ n_rightpoint ].n_coord ) << 16 ) - n_cx2.d ) / n_distance; + } + if( (INT16)n_cx1.w.h != (INT16)n_cx2.w.h && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( (INT16)n_cx1.w.h < (INT16)n_cx2.w.h ) + { + n_x = n_cx1.w.h; + n_distance = (INT16)n_cx2.w.h - n_x; + } + else + { + n_x = n_cx2.w.h; + n_distance = (INT16)n_cx1.w.h - n_x; + } + + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + SOLIDFILL( FLATPOLYGONUPDATE ) + } + n_cx1.d += n_dx1; + n_cx2.d += n_dx2; + n_y++; + } +} + +void psxgpu_device::FlatTexturedPolygon( int n_startpoint ) +{ + INT16 n_y; + INT16 n_x; + int n_tx; + int n_ty; + + UINT8 n_cmd; + + UINT32 n_clutx; + UINT32 n_cluty; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + PAIR n_u; + PAIR n_v; + + PAIR n_cx1; + PAIR n_cx2; + PAIR n_cu1; + PAIR n_cv1; + PAIR n_cu2; + PAIR n_cv2; + INT32 n_du; + INT32 n_dv; + INT32 n_dx1; + INT32 n_dx2; + INT32 n_du1; + INT32 n_dv1; + INT32 n_du2; + INT32 n_dv2; + + INT32 n_distance; + UINT16 n_point; + UINT16 n_rightpoint; + UINT16 n_leftpoint; + UINT16 *p_clut; + UINT16 *p_vram; + UINT32 n_bgr; + struct FLATTEXTUREDVERTEX *vertex = &m_packet.FlatTexturedPolygon.vertex[ n_startpoint ]; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 2 ) + { + return; + } + for( n_point = 0; n_point < 3; n_point++ ) + { + DebugMesh( COORD_DX( vertex[ n_point ].n_coord ), COORD_DY( vertex[ n_point ].n_coord ) ); + } + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.FlatTexturedPolygon.n_bgr ); + + n_clutx = ( m_packet.FlatTexturedPolygon.vertex[ 0 ].n_texture.w.h & 0x3f ) << 4; + n_cluty = ( m_packet.FlatTexturedPolygon.vertex[ 0 ].n_texture.w.h >> 6 ) & 0x3ff; + + n_r.d = 0; + n_g.d = 0; + n_b.d = 0; + n_cx1.d = 0; + n_cu1.d = 0; + n_cv1.d = 0; + n_cx2.d = 0; + n_cu2.d = 0; + n_cv2.d = 0; + + decode_tpage( m_packet.FlatTexturedPolygon.vertex[ 1 ].n_texture.w.h ); + TEXTURESETUP + + switch( n_cmd & 0x01 ) + { + case 0: + n_r.w.h = BGR_R( m_packet.FlatTexturedPolygon.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.FlatTexturedPolygon.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.FlatTexturedPolygon.n_bgr ); n_b.w.l = 0; + break; + case 1: + n_r.w.h = 0x80; n_r.w.l = 0; + n_g.w.h = 0x80; n_g.w.l = 0; + n_b.w.h = 0x80; n_b.w.l = 0; + break; + } + + n_leftpoint = 0; + for( n_point = 1; n_point < 3; n_point++ ) + { + if( COORD_DY( vertex[ n_point ].n_coord ) < COORD_DY( vertex[ n_leftpoint ].n_coord ) || + ( COORD_DY( vertex[ n_point ].n_coord ) == COORD_DY( vertex[ n_leftpoint ].n_coord ) && + COORD_DX( vertex[ n_point ].n_coord ) < COORD_DX( vertex[ n_leftpoint ].n_coord ) ) ) + { + n_leftpoint = n_point; + } + } + n_rightpoint = n_leftpoint; + + n_dx1 = 0; + n_dx2 = 0; + n_du1 = 0; + n_du2 = 0; + n_dv1 = 0; + n_dv2 = 0; + + n_y = COORD_DY( vertex[ n_rightpoint ].n_coord ); + + for( ;; ) + { + if( n_y == COORD_DY( vertex[ n_leftpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_leftpointlist[ n_leftpoint ] ].n_coord ) ) + { + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + if( n_leftpoint == n_rightpoint ) + { + break; + } + } + n_cx1.w.h = COORD_DX( vertex[ n_leftpoint ].n_coord ); n_cx1.w.l = 0; + n_cu1.w.h = TEXTURE_U( vertex[ n_leftpoint ].n_texture ); n_cu1.w.l = 0; + n_cv1.w.h = TEXTURE_V( vertex[ n_leftpoint ].n_texture ); n_cv1.w.l = 0; + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + n_distance = COORD_DY( vertex[ n_leftpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx1 = (INT32)( ( COORD_DX( vertex[ n_leftpoint ].n_coord ) << 16 ) - n_cx1.d ) / n_distance; + n_du1 = (INT32)( ( TEXTURE_U( vertex[ n_leftpoint ].n_texture ) << 16 ) - n_cu1.d ) / n_distance; + n_dv1 = (INT32)( ( TEXTURE_V( vertex[ n_leftpoint ].n_texture ) << 16 ) - n_cv1.d ) / n_distance; + } + if( n_y == COORD_DY( vertex[ n_rightpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_rightpointlist[ n_rightpoint ] ].n_coord ) ) + { + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + if( n_rightpoint == n_leftpoint ) + { + break; + } + } + n_cx2.w.h = COORD_DX( vertex[ n_rightpoint ].n_coord ); n_cx2.w.l = 0; + n_cu2.w.h = TEXTURE_U( vertex[ n_rightpoint ].n_texture ); n_cu2.w.l = 0; + n_cv2.w.h = TEXTURE_V( vertex[ n_rightpoint ].n_texture ); n_cv2.w.l = 0; + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + n_distance = COORD_DY( vertex[ n_rightpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx2 = (INT32)( ( COORD_DX( vertex[ n_rightpoint ].n_coord ) << 16 ) - n_cx2.d ) / n_distance; + n_du2 = (INT32)( ( TEXTURE_U( vertex[ n_rightpoint ].n_texture ) << 16 ) - n_cu2.d ) / n_distance; + n_dv2 = (INT32)( ( TEXTURE_V( vertex[ n_rightpoint ].n_texture ) << 16 ) - n_cv2.d ) / n_distance; + } + if( (INT16)n_cx1.w.h != (INT16)n_cx2.w.h && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( (INT16)n_cx1.w.h < (INT16)n_cx2.w.h ) + { + n_x = n_cx1.w.h; + n_distance = (INT16)n_cx2.w.h - n_x; + + n_u.d = n_cu1.d; + n_v.d = n_cv1.d; + n_du = (INT32)( n_cu2.d - n_cu1.d ) / n_distance; + n_dv = (INT32)( n_cv2.d - n_cv1.d ) / n_distance; + } + else + { + n_x = n_cx2.w.h; + n_distance = (INT16)n_cx1.w.h - n_x; + + n_u.d = n_cu2.d; + n_v.d = n_cv2.d; + n_du = (INT32)( n_cu1.d - n_cu2.d ) / n_distance; + n_dv = (INT32)( n_cv1.d - n_cv2.d ) / n_distance; + } + + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_u.d += n_du * ( n_drawarea_x1 - n_x ); + n_v.d += n_dv * ( n_drawarea_x1 - n_x ); + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + TEXTUREFILL( FLATTEXTUREDPOLYGONUPDATE, n_u.w.h, n_v.w.h ); + } + n_cx1.d += n_dx1; + n_cu1.d += n_du1; + n_cv1.d += n_dv1; + n_cx2.d += n_dx2; + n_cu2.d += n_du2; + n_cv2.d += n_dv2; + n_y++; + } +} + +void psxgpu_device::GouraudPolygon( int n_startpoint ) +{ + INT16 n_y; + INT16 n_x; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + UINT8 n_cmd; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + PAIR n_cx1; + PAIR n_cx2; + PAIR n_cr1; + PAIR n_cg1; + PAIR n_cb1; + PAIR n_cr2; + PAIR n_cg2; + PAIR n_cb2; + INT32 n_dr; + INT32 n_dg; + INT32 n_db; + INT32 n_dx1; + INT32 n_dx2; + INT32 n_dr1; + INT32 n_dg1; + INT32 n_db1; + INT32 n_dr2; + INT32 n_dg2; + INT32 n_db2; + + INT32 n_distance; + UINT16 n_point; + UINT16 n_rightpoint; + UINT16 n_leftpoint; + UINT16 *p_vram; + struct GOURAUDVERTEX *vertex = &m_packet.GouraudPolygon.vertex[ n_startpoint ]; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 3 ) + { + return; + } + for( n_point = 0; n_point < 3; n_point++ ) + { + DebugMesh( COORD_DX( vertex[ n_point ].n_coord ), COORD_DY( vertex[ n_point ].n_coord ) ); + } + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.GouraudPolygon.vertex[ 0 ].n_bgr ); + + n_cx1.d = 0; + n_cr1.d = 0; + n_cg1.d = 0; + n_cb1.d = 0; + n_cx2.d = 0; + n_cr2.d = 0; + n_cg2.d = 0; + n_cb2.d = 0; + + SOLIDSETUP + + n_leftpoint = 0; + for( n_point = 1; n_point < 3; n_point++ ) + { + if( COORD_DY( vertex[ n_point ].n_coord ) < COORD_DY( vertex[ n_leftpoint ].n_coord ) || + ( COORD_DY( vertex[ n_point ].n_coord ) == COORD_DY( vertex[ n_leftpoint ].n_coord ) && + COORD_DX( vertex[ n_point ].n_coord ) < COORD_DX( vertex[ n_leftpoint ].n_coord ) ) ) + { + n_leftpoint = n_point; + } + } + n_rightpoint = n_leftpoint; + + n_dx1 = 0; + n_dx2 = 0; + n_dr1 = 0; + n_dr2 = 0; + n_dg1 = 0; + n_dg2 = 0; + n_db1 = 0; + n_db2 = 0; + + n_y = COORD_DY( vertex[ n_rightpoint ].n_coord ); + + for( ;; ) + { + if( n_y == COORD_DY( vertex[ n_leftpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_leftpointlist[ n_leftpoint ] ].n_coord ) ) + { + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + if( n_leftpoint == n_rightpoint ) + { + break; + } + } + n_cx1.w.h = COORD_DX( vertex[ n_leftpoint ].n_coord ); n_cx1.w.l = 0; + n_cr1.w.h = BGR_R( vertex[ n_leftpoint ].n_bgr ); n_cr1.w.l = 0; + n_cg1.w.h = BGR_G( vertex[ n_leftpoint ].n_bgr ); n_cg1.w.l = 0; + n_cb1.w.h = BGR_B( vertex[ n_leftpoint ].n_bgr ); n_cb1.w.l = 0; + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + n_distance = COORD_DY( vertex[ n_leftpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx1 = (INT32)( ( COORD_DX( vertex[ n_leftpoint ].n_coord ) << 16 ) - n_cx1.d ) / n_distance; + n_dr1 = (INT32)( ( BGR_R( vertex[ n_leftpoint ].n_bgr ) << 16 ) - n_cr1.d ) / n_distance; + n_dg1 = (INT32)( ( BGR_G( vertex[ n_leftpoint ].n_bgr ) << 16 ) - n_cg1.d ) / n_distance; + n_db1 = (INT32)( ( BGR_B( vertex[ n_leftpoint ].n_bgr ) << 16 ) - n_cb1.d ) / n_distance; + } + if( n_y == COORD_DY( vertex[ n_rightpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_rightpointlist[ n_rightpoint ] ].n_coord ) ) + { + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + if( n_rightpoint == n_leftpoint ) + { + break; + } + } + n_cx2.w.h = COORD_DX( vertex[ n_rightpoint ].n_coord ); n_cx2.w.l = 0; + n_cr2.w.h = BGR_R( vertex[ n_rightpoint ].n_bgr ); n_cr2.w.l = 0; + n_cg2.w.h = BGR_G( vertex[ n_rightpoint ].n_bgr ); n_cg2.w.l = 0; + n_cb2.w.h = BGR_B( vertex[ n_rightpoint ].n_bgr ); n_cb2.w.l = 0; + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + n_distance = COORD_DY( vertex[ n_rightpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx2 = (INT32)( ( COORD_DX( vertex[ n_rightpoint ].n_coord ) << 16 ) - n_cx2.d ) / n_distance; + n_dr2 = (INT32)( ( BGR_R( vertex[ n_rightpoint ].n_bgr ) << 16 ) - n_cr2.d ) / n_distance; + n_dg2 = (INT32)( ( BGR_G( vertex[ n_rightpoint ].n_bgr ) << 16 ) - n_cg2.d ) / n_distance; + n_db2 = (INT32)( ( BGR_B( vertex[ n_rightpoint ].n_bgr ) << 16 ) - n_cb2.d ) / n_distance; + } + if( (INT16)n_cx1.w.h != (INT16)n_cx2.w.h && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( (INT16)n_cx1.w.h < (INT16)n_cx2.w.h ) + { + n_x = n_cx1.w.h; + n_distance = (INT16)n_cx2.w.h - n_x; + + n_r.d = n_cr1.d; + n_g.d = n_cg1.d; + n_b.d = n_cb1.d; + n_dr = (INT32)( n_cr2.d - n_cr1.d ) / n_distance; + n_dg = (INT32)( n_cg2.d - n_cg1.d ) / n_distance; + n_db = (INT32)( n_cb2.d - n_cb1.d ) / n_distance; + } + else + { + n_x = n_cx2.w.h; + n_distance = (INT16)n_cx1.w.h - n_x; + + n_r.d = n_cr2.d; + n_g.d = n_cg2.d; + n_b.d = n_cb2.d; + n_dr = (INT32)( n_cr1.d - n_cr2.d ) / n_distance; + n_dg = (INT32)( n_cg1.d - n_cg2.d ) / n_distance; + n_db = (INT32)( n_cb1.d - n_cb2.d ) / n_distance; + } + + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_r.d += n_dr * ( n_drawarea_x1 - n_x ); + n_g.d += n_dg * ( n_drawarea_x1 - n_x ); + n_b.d += n_db * ( n_drawarea_x1 - n_x ); + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + SOLIDFILL( GOURAUDPOLYGONUPDATE ) + } + n_cx1.d += n_dx1; + n_cr1.d += n_dr1; + n_cg1.d += n_dg1; + n_cb1.d += n_db1; + n_cx2.d += n_dx2; + n_cr2.d += n_dr2; + n_cg2.d += n_dg2; + n_cb2.d += n_db2; + n_y++; + } +} + +void psxgpu_device::GouraudTexturedPolygon( int n_startpoint ) +{ + INT16 n_y; + INT16 n_x; + int n_tx; + int n_ty; + + UINT8 n_cmd; + + UINT32 n_clutx; + UINT32 n_cluty; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + PAIR n_u; + PAIR n_v; + + PAIR n_cx1; + PAIR n_cx2; + PAIR n_cu1; + PAIR n_cv1; + PAIR n_cu2; + PAIR n_cv2; + PAIR n_cr1; + PAIR n_cg1; + PAIR n_cb1; + PAIR n_cr2; + PAIR n_cg2; + PAIR n_cb2; + INT32 n_dr; + INT32 n_dg; + INT32 n_db; + INT32 n_du; + INT32 n_dv; + INT32 n_dx1; + INT32 n_dx2; + INT32 n_dr1; + INT32 n_dg1; + INT32 n_db1; + INT32 n_dr2; + INT32 n_dg2; + INT32 n_db2; + INT32 n_du1; + INT32 n_dv1; + INT32 n_du2; + INT32 n_dv2; + + INT32 n_distance; + UINT16 n_point; + UINT16 n_rightpoint; + UINT16 n_leftpoint; + UINT16 *p_clut; + UINT16 *p_vram; + UINT32 n_bgr; + struct GOURAUDTEXTUREDVERTEX *vertex = &m_packet.GouraudTexturedPolygon.vertex[ n_startpoint ]; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 4 ) + { + return; + } + for( n_point = 0; n_point < 3; n_point++ ) + { + DebugMesh( COORD_DX( vertex[ n_point ].n_coord ), COORD_DY( vertex[ n_point ].n_coord ) ); + } + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.GouraudTexturedPolygon.vertex[ 0 ].n_bgr ); + + n_clutx = ( m_packet.GouraudTexturedPolygon.vertex[ 0 ].n_texture.w.h & 0x3f ) << 4; + n_cluty = ( m_packet.GouraudTexturedPolygon.vertex[ 0 ].n_texture.w.h >> 6 ) & 0x3ff; + + n_cx1.d = 0; + n_cr1.d = 0; + n_cg1.d = 0; + n_cb1.d = 0; + n_cu1.d = 0; + n_cv1.d = 0; + n_cx2.d = 0; + n_cr2.d = 0; + n_cg2.d = 0; + n_cb2.d = 0; + n_cu2.d = 0; + n_cv2.d = 0; + + decode_tpage( m_packet.GouraudTexturedPolygon.vertex[ 1 ].n_texture.w.h ); + TEXTURESETUP + + n_leftpoint = 0; + for( n_point = 1; n_point < 3; n_point++ ) + { + if( COORD_DY( vertex[ n_point ].n_coord ) < COORD_DY( vertex[ n_leftpoint ].n_coord ) || + ( COORD_DY( vertex[ n_point ].n_coord ) == COORD_DY( vertex[ n_leftpoint ].n_coord ) && + COORD_DX( vertex[ n_point ].n_coord ) < COORD_DX( vertex[ n_leftpoint ].n_coord ) ) ) + { + n_leftpoint = n_point; + } + } + n_rightpoint = n_leftpoint; + + n_dx1 = 0; + n_dx2 = 0; + n_du1 = 0; + n_du2 = 0; + n_dr1 = 0; + n_dr2 = 0; + n_dg1 = 0; + n_dg2 = 0; + n_db1 = 0; + n_db2 = 0; + n_dv1 = 0; + n_dv2 = 0; + + n_y = COORD_DY( vertex[ n_rightpoint ].n_coord ); + + for( ;; ) + { + if( n_y == COORD_DY( vertex[ n_leftpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_leftpointlist[ n_leftpoint ] ].n_coord ) ) + { + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + if( n_leftpoint == n_rightpoint ) + { + break; + } + } + n_cx1.w.h = COORD_DX( vertex[ n_leftpoint ].n_coord ); n_cx1.w.l = 0; + switch( n_cmd & 0x01 ) + { + case 0x00: + n_cr1.w.h = BGR_R( vertex[ n_leftpoint ].n_bgr ); n_cr1.w.l = 0; + n_cg1.w.h = BGR_G( vertex[ n_leftpoint ].n_bgr ); n_cg1.w.l = 0; + n_cb1.w.h = BGR_B( vertex[ n_leftpoint ].n_bgr ); n_cb1.w.l = 0; + break; + case 0x01: + n_cr1.w.h = 0x80; n_cr1.w.l = 0; + n_cg1.w.h = 0x80; n_cg1.w.l = 0; + n_cb1.w.h = 0x80; n_cb1.w.l = 0; + break; + } + n_cu1.w.h = TEXTURE_U( vertex[ n_leftpoint ].n_texture ); n_cu1.w.l = 0; + n_cv1.w.h = TEXTURE_V( vertex[ n_leftpoint ].n_texture ); n_cv1.w.l = 0; + n_leftpoint = p_n_leftpointlist[ n_leftpoint ]; + n_distance = COORD_DY( vertex[ n_leftpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx1 = (INT32)( ( COORD_DX( vertex[ n_leftpoint ].n_coord ) << 16 ) - n_cx1.d ) / n_distance; + switch( n_cmd & 0x01 ) + { + case 0x00: + n_dr1 = (INT32)( ( BGR_R( vertex[ n_leftpoint ].n_bgr ) << 16 ) - n_cr1.d ) / n_distance; + n_dg1 = (INT32)( ( BGR_G( vertex[ n_leftpoint ].n_bgr ) << 16 ) - n_cg1.d ) / n_distance; + n_db1 = (INT32)( ( BGR_B( vertex[ n_leftpoint ].n_bgr ) << 16 ) - n_cb1.d ) / n_distance; + break; + case 0x01: + n_dr1 = 0; + n_dg1 = 0; + n_db1 = 0; + break; + } + n_du1 = (INT32)( ( TEXTURE_U( vertex[ n_leftpoint ].n_texture ) << 16 ) - n_cu1.d ) / n_distance; + n_dv1 = (INT32)( ( TEXTURE_V( vertex[ n_leftpoint ].n_texture ) << 16 ) - n_cv1.d ) / n_distance; + } + if( n_y == COORD_DY( vertex[ n_rightpoint ].n_coord ) ) + { + while( n_y == COORD_DY( vertex[ p_n_rightpointlist[ n_rightpoint ] ].n_coord ) ) + { + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + if( n_rightpoint == n_leftpoint ) + { + break; + } + } + n_cx2.w.h = COORD_DX( vertex[ n_rightpoint ].n_coord ); n_cx2.w.l = 0; + switch( n_cmd & 0x01 ) + { + case 0x00: + n_cr2.w.h = BGR_R( vertex[ n_rightpoint ].n_bgr ); n_cr2.w.l = 0; + n_cg2.w.h = BGR_G( vertex[ n_rightpoint ].n_bgr ); n_cg2.w.l = 0; + n_cb2.w.h = BGR_B( vertex[ n_rightpoint ].n_bgr ); n_cb2.w.l = 0; + break; + case 0x01: + n_cr2.w.h = 0x80; n_cr2.w.l = 0; + n_cg2.w.h = 0x80; n_cg2.w.l = 0; + n_cb2.w.h = 0x80; n_cb2.w.l = 0; + break; + } + n_cu2.w.h = TEXTURE_U( vertex[ n_rightpoint ].n_texture ); n_cu2.w.l = 0; + n_cv2.w.h = TEXTURE_V( vertex[ n_rightpoint ].n_texture ); n_cv2.w.l = 0; + n_rightpoint = p_n_rightpointlist[ n_rightpoint ]; + n_distance = COORD_DY( vertex[ n_rightpoint ].n_coord ) - n_y; + if( n_distance < 1 ) + { + break; + } + n_dx2 = (INT32)( ( COORD_DX( vertex[ n_rightpoint ].n_coord ) << 16 ) - n_cx2.d ) / n_distance; + switch( n_cmd & 0x01 ) + { + case 0x00: + n_dr2 = (INT32)( ( BGR_R( vertex[ n_rightpoint ].n_bgr ) << 16 ) - n_cr2.d ) / n_distance; + n_dg2 = (INT32)( ( BGR_G( vertex[ n_rightpoint ].n_bgr ) << 16 ) - n_cg2.d ) / n_distance; + n_db2 = (INT32)( ( BGR_B( vertex[ n_rightpoint ].n_bgr ) << 16 ) - n_cb2.d ) / n_distance; + break; + case 0x01: + n_dr2 = 0; + n_dg2 = 0; + n_db2 = 0; + break; + } + n_du2 = (INT32)( ( TEXTURE_U( vertex[ n_rightpoint ].n_texture ) << 16 ) - n_cu2.d ) / n_distance; + n_dv2 = (INT32)( ( TEXTURE_V( vertex[ n_rightpoint ].n_texture ) << 16 ) - n_cv2.d ) / n_distance; + } + if( (INT16)n_cx1.w.h != (INT16)n_cx2.w.h && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( (INT16)n_cx1.w.h < (INT16)n_cx2.w.h ) + { + n_x = n_cx1.w.h; + n_distance = (INT16)n_cx2.w.h - n_x; + + n_r.d = n_cr1.d; + n_g.d = n_cg1.d; + n_b.d = n_cb1.d; + n_u.d = n_cu1.d; + n_v.d = n_cv1.d; + n_dr = (INT32)( n_cr2.d - n_cr1.d ) / n_distance; + n_dg = (INT32)( n_cg2.d - n_cg1.d ) / n_distance; + n_db = (INT32)( n_cb2.d - n_cb1.d ) / n_distance; + n_du = (INT32)( n_cu2.d - n_cu1.d ) / n_distance; + n_dv = (INT32)( n_cv2.d - n_cv1.d ) / n_distance; + } + else + { + n_x = n_cx2.w.h; + n_distance = (INT16)n_cx1.w.h - n_x; + + n_r.d = n_cr2.d; + n_g.d = n_cg2.d; + n_b.d = n_cb2.d; + n_u.d = n_cu2.d; + n_v.d = n_cv2.d; + n_dr = (INT32)( n_cr1.d - n_cr2.d ) / n_distance; + n_dg = (INT32)( n_cg1.d - n_cg2.d ) / n_distance; + n_db = (INT32)( n_cb1.d - n_cb2.d ) / n_distance; + n_du = (INT32)( n_cu1.d - n_cu2.d ) / n_distance; + n_dv = (INT32)( n_cv1.d - n_cv2.d ) / n_distance; + } + + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_r.d += n_dr * ( n_drawarea_x1 - n_x ); + n_g.d += n_dg * ( n_drawarea_x1 - n_x ); + n_b.d += n_db * ( n_drawarea_x1 - n_x ); + n_u.d += n_du * ( n_drawarea_x1 - n_x ); + n_v.d += n_dv * ( n_drawarea_x1 - n_x ); + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + TEXTUREFILL( GOURAUDTEXTUREDPOLYGONUPDATE, n_u.w.h, n_v.w.h ); + } + n_cx1.d += n_dx1; + n_cr1.d += n_dr1; + n_cg1.d += n_dg1; + n_cb1.d += n_db1; + n_cu1.d += n_du1; + n_cv1.d += n_dv1; + n_cx2.d += n_dx2; + n_cr2.d += n_dr2; + n_cg2.d += n_dg2; + n_cb2.d += n_db2; + n_cu2.d += n_du2; + n_cv2.d += n_dv2; + n_y++; + } +} + +void psxgpu_device::MonochromeLine( void ) +{ + PAIR n_x; + PAIR n_y; + INT32 n_dx; + INT32 n_dy; + INT32 n_len; + INT32 n_xlen; + INT32 n_ylen; + INT32 n_xstart; + INT32 n_ystart; + INT32 n_xend; + INT32 n_yend; + UINT32 n_r; + UINT32 n_g; + UINT32 n_b; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 5 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.MonochromeLine.vertex[ 0 ].n_coord ), COORD_DY( m_packet.MonochromeLine.vertex[ 0 ].n_coord ) ); + DebugMesh( COORD_DX( m_packet.MonochromeLine.vertex[ 1 ].n_coord ), COORD_DY( m_packet.MonochromeLine.vertex[ 1 ].n_coord ) ); + DebugMeshEnd(); +#endif + + n_xstart = COORD_DX( m_packet.MonochromeLine.vertex[ 0 ].n_coord ); + n_xend = COORD_DX( m_packet.MonochromeLine.vertex[ 1 ].n_coord ); + n_ystart = COORD_DY( m_packet.MonochromeLine.vertex[ 0 ].n_coord ); + n_yend = COORD_DY( m_packet.MonochromeLine.vertex[ 1 ].n_coord ); + + n_r = BGR_R( m_packet.MonochromeLine.n_bgr ); + n_g = BGR_G( m_packet.MonochromeLine.n_bgr ); + n_b = BGR_B( m_packet.MonochromeLine.n_bgr ); + + if( n_xend > n_xstart ) + { + n_xlen = n_xend - n_xstart; + } + else + { + n_xlen = n_xstart - n_xend; + } + + if( n_yend > n_ystart ) + { + n_ylen = n_yend - n_ystart; + } + else + { + n_ylen = n_ystart - n_yend; + } + + if( n_xlen > n_ylen ) + { + n_len = n_xlen; + } + else + { + n_len = n_ylen; + } + + if( n_len == 0 ) + { + n_len = 1; + } + + n_x.w.h = n_xstart; n_x.w.l = 0; + n_y.w.h = n_ystart; n_y.w.l = 0; + + n_dx = (INT32)( ( n_xend << 16 ) - n_x.d ) / n_len; + n_dy = (INT32)( ( n_yend << 16 ) - n_y.d ) / n_len; + + while( n_len > 0 ) + { + if( (INT16)n_x.w.h >= (INT32)n_drawarea_x1 && + (INT16)n_y.w.h >= (INT32)n_drawarea_y1 && + (INT16)n_x.w.h <= (INT32)n_drawarea_x2 && + (INT16)n_y.w.h <= (INT32)n_drawarea_y2 ) + { + p_vram = p_p_vram[ n_y.w.h ] + n_x.w.h; + WRITE_PIXEL( + p_n_redshade[ MID_LEVEL | n_r ] | + p_n_greenshade[ MID_LEVEL | n_g ] | + p_n_blueshade[ MID_LEVEL | n_b ] ); + } + n_x.d += n_dx; + n_y.d += n_dy; + n_len--; + } +} + +void psxgpu_device::GouraudLine( void ) +{ + PAIR n_x; + PAIR n_y; + INT32 n_dx; + INT32 n_dy; + INT32 n_dr; + INT32 n_dg; + INT32 n_db; + INT32 n_distance; + INT32 n_xlen; + INT32 n_ylen; + INT32 n_xstart; + INT32 n_ystart; + INT32 n_xend; + INT32 n_yend; + PAIR n_r; + PAIR n_g; + PAIR n_b; + PAIR n_cr1; + PAIR n_cg1; + PAIR n_cb1; + PAIR n_cr2; + PAIR n_cg2; + PAIR n_cb2; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 6 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.GouraudLine.vertex[ 0 ].n_coord ), COORD_DY( m_packet.GouraudLine.vertex[ 0 ].n_coord ) ); + DebugMesh( COORD_DX( m_packet.GouraudLine.vertex[ 1 ].n_coord ), COORD_DY( m_packet.GouraudLine.vertex[ 1 ].n_coord ) ); + DebugMeshEnd(); +#endif + + n_xstart = COORD_DX( m_packet.GouraudLine.vertex[ 0 ].n_coord ); + n_ystart = COORD_DY( m_packet.GouraudLine.vertex[ 0 ].n_coord ); + n_cr1.w.h = BGR_R( m_packet.GouraudLine.vertex[ 0 ].n_bgr ); n_cr1.w.l = 0; + n_cg1.w.h = BGR_G( m_packet.GouraudLine.vertex[ 0 ].n_bgr ); n_cg1.w.l = 0; + n_cb1.w.h = BGR_B( m_packet.GouraudLine.vertex[ 0 ].n_bgr ); n_cb1.w.l = 0; + + n_xend = COORD_DX( m_packet.GouraudLine.vertex[ 1 ].n_coord ); + n_yend = COORD_DY( m_packet.GouraudLine.vertex[ 1 ].n_coord ); + n_cr2.w.h = BGR_R( m_packet.GouraudLine.vertex[ 1 ].n_bgr ); n_cr1.w.l = 0; + n_cg2.w.h = BGR_G( m_packet.GouraudLine.vertex[ 1 ].n_bgr ); n_cg1.w.l = 0; + n_cb2.w.h = BGR_B( m_packet.GouraudLine.vertex[ 1 ].n_bgr ); n_cb1.w.l = 0; + + n_x.w.h = n_xstart; n_x.w.l = 0; + n_y.w.h = n_ystart; n_y.w.l = 0; + n_r.d = n_cr1.d; + n_g.d = n_cg1.d; + n_b.d = n_cb1.d; + + if( n_xend > n_xstart ) + { + n_xlen = n_xend - n_xstart; + } + else + { + n_xlen = n_xstart - n_xend; + } + + if( n_yend > n_ystart ) + { + n_ylen = n_yend - n_ystart; + } + else + { + n_ylen = n_ystart - n_yend; + } + + if( n_xlen > n_ylen ) + { + n_distance = n_xlen; + } + else + { + n_distance = n_ylen; + } + + if( n_distance == 0 ) + { + n_distance = 1; + } + + n_dx = (INT32)( ( n_xend << 16 ) - n_x.d ) / n_distance; + n_dy = (INT32)( ( n_yend << 16 ) - n_y.d ) / n_distance; + n_dr = (INT32)( n_cr2.d - n_cr1.d ) / n_distance; + n_dg = (INT32)( n_cg2.d - n_cg1.d ) / n_distance; + n_db = (INT32)( n_cb2.d - n_cb1.d ) / n_distance; + + while( n_distance > 0 ) + { + if( (INT16)n_x.w.h >= (INT32)n_drawarea_x1 && + (INT16)n_y.w.h >= (INT32)n_drawarea_y1 && + (INT16)n_x.w.h <= (INT32)n_drawarea_x2 && + (INT16)n_y.w.h <= (INT32)n_drawarea_y2 ) + { + p_vram = p_p_vram[ n_y.w.h ] + n_x.w.h; + WRITE_PIXEL( + p_n_redshade[ MID_LEVEL | n_r.w.h ] | + p_n_greenshade[ MID_LEVEL | n_g.w.h ] | + p_n_blueshade[ MID_LEVEL | n_b.w.h ] ); + } + n_x.d += n_dx; + n_y.d += n_dy; + n_r.d += n_dr; + n_g.d += n_dg; + n_b.d += n_db; + n_distance--; + } +} + +void psxgpu_device::FrameBufferRectangleDraw( void ) +{ + PAIR n_r; + PAIR n_g; + PAIR n_b; + INT32 n_distance; + INT32 n_h; + INT16 n_y; + INT16 n_x; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 7 ) + { + return; + } + DebugMesh( COORD_X( m_packet.FlatRectangle.n_coord ), COORD_Y( m_packet.FlatRectangle.n_coord ) ); + DebugMesh( COORD_X( m_packet.FlatRectangle.n_coord ) + SIZE_W( m_packet.FlatRectangle.n_size ), COORD_Y( m_packet.FlatRectangle.n_coord ) ); + DebugMesh( COORD_X( m_packet.FlatRectangle.n_coord ), COORD_Y( m_packet.FlatRectangle.n_coord ) + SIZE_H( m_packet.FlatRectangle.n_size ) ); + DebugMesh( COORD_X( m_packet.FlatRectangle.n_coord ) + SIZE_W( m_packet.FlatRectangle.n_size ), COORD_Y( m_packet.FlatRectangle.n_coord ) + SIZE_H( m_packet.FlatRectangle.n_size ) ); + DebugMeshEnd(); +#endif + + n_r.w.h = BGR_R( m_packet.FlatRectangle.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.FlatRectangle.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.FlatRectangle.n_bgr ); n_b.w.l = 0; + + n_y = COORD_Y( m_packet.FlatRectangle.n_coord ); + n_h = SIZE_H( m_packet.FlatRectangle.n_size ); + + while( n_h > 0 ) + { + n_x = COORD_X( m_packet.FlatRectangle.n_coord ); + + n_distance = SIZE_W( m_packet.FlatRectangle.n_size ); + while( n_distance > 0 ) + { + p_vram = p_p_vram[ n_y & 1023 ] + ( n_x & 1023 ); + WRITE_PIXEL( + p_n_redshade[ MID_LEVEL | n_r.w.h ] | + p_n_greenshade[ MID_LEVEL | n_g.w.h ] | + p_n_blueshade[ MID_LEVEL | n_b.w.h ] ); + n_x++; + n_distance--; + } + n_y++; + n_h--; + } +} + +void psxgpu_device::FlatRectangle( void ) +{ + INT16 n_y; + INT16 n_x; + + UINT8 n_cmd; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + + INT32 n_distance; + INT32 n_h; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 8 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.FlatRectangle.n_coord ), COORD_DY( m_packet.FlatRectangle.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatRectangle.n_coord ) + SIZE_W( m_packet.FlatRectangle.n_size ), COORD_DY( m_packet.FlatRectangle.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatRectangle.n_coord ), COORD_DY( m_packet.FlatRectangle.n_coord ) + SIZE_H( m_packet.FlatRectangle.n_size ) ); + DebugMesh( COORD_DX( m_packet.FlatRectangle.n_coord ) + SIZE_W( m_packet.FlatRectangle.n_size ), COORD_DY( m_packet.FlatRectangle.n_coord ) + SIZE_H( m_packet.FlatRectangle.n_size ) ); + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.FlatRectangle.n_bgr ); + + SOLIDSETUP + + n_r.w.h = BGR_R( m_packet.FlatRectangle.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.FlatRectangle.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.FlatRectangle.n_bgr ); n_b.w.l = 0; + + n_y = COORD_DY( m_packet.FlatRectangle.n_coord ); + n_h = SIZE_H( m_packet.FlatRectangle.n_size ); + + while( n_h > 0 ) + { + n_x = COORD_DX( m_packet.FlatRectangle.n_coord ); + + n_distance = SIZE_W( m_packet.FlatRectangle.n_size ); + if( n_distance > 0 && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + SOLIDFILL( FLATRECTANGEUPDATE ) + } + n_y++; + n_h--; + } +} + +void psxgpu_device::FlatRectangle8x8( void ) +{ + INT16 n_y; + INT16 n_x; + + UINT8 n_cmd; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + + INT32 n_distance; + INT32 n_h; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 9 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.FlatRectangle8x8.n_coord ), COORD_DY( m_packet.FlatRectangle8x8.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatRectangle8x8.n_coord ) + 8, COORD_DY( m_packet.FlatRectangle8x8.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatRectangle8x8.n_coord ), COORD_DY( m_packet.FlatRectangle8x8.n_coord ) + 8 ); + DebugMesh( COORD_DX( m_packet.FlatRectangle8x8.n_coord ) + 8, COORD_DY( m_packet.FlatRectangle8x8.n_coord ) + 8 ); + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.FlatRectangle8x8.n_bgr ); + + SOLIDSETUP + + n_r.w.h = BGR_R( m_packet.FlatRectangle8x8.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.FlatRectangle8x8.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.FlatRectangle8x8.n_bgr ); n_b.w.l = 0; + + n_y = COORD_DY( m_packet.FlatRectangle8x8.n_coord ); + n_h = 8; + + while( n_h > 0 ) + { + n_x = COORD_DX( m_packet.FlatRectangle8x8.n_coord ); + + n_distance = 8; + if( n_distance > 0 && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + SOLIDFILL( FLATRECTANGEUPDATE ) + } + n_y++; + n_h--; + } +} + +void psxgpu_device::FlatRectangle16x16( void ) +{ + INT16 n_y; + INT16 n_x; + + UINT8 n_cmd; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + + INT32 n_distance; + INT32 n_h; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 10 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.FlatRectangle16x16.n_coord ), COORD_DY( m_packet.FlatRectangle16x16.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatRectangle16x16.n_coord ) + 16, COORD_DY( m_packet.FlatRectangle16x16.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatRectangle16x16.n_coord ), COORD_DY( m_packet.FlatRectangle16x16.n_coord ) + 16 ); + DebugMesh( COORD_DX( m_packet.FlatRectangle16x16.n_coord ) + 16, COORD_DY( m_packet.FlatRectangle16x16.n_coord ) + 16 ); + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.FlatRectangle16x16.n_bgr ); + + SOLIDSETUP + + n_r.w.h = BGR_R( m_packet.FlatRectangle16x16.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.FlatRectangle16x16.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.FlatRectangle16x16.n_bgr ); n_b.w.l = 0; + + n_y = COORD_DY( m_packet.FlatRectangle16x16.n_coord ); + n_h = 16; + + while( n_h > 0 ) + { + n_x = COORD_DX( m_packet.FlatRectangle16x16.n_coord ); + + n_distance = 16; + if( n_distance > 0 && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + SOLIDFILL( FLATRECTANGEUPDATE ) + } + n_y++; + n_h--; + } +} + +void psxgpu_device::FlatTexturedRectangle( void ) +{ + INT16 n_y; + INT16 n_x; + int n_tx; + int n_ty; + + UINT8 n_cmd; + + UINT32 n_clutx; + UINT32 n_cluty; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + UINT8 n_u; + UINT8 n_v; + int n_du; + int n_dv; + + INT16 n_distance; + UINT32 n_h; + UINT16 *p_vram; + UINT16 *p_clut; + UINT16 n_bgr; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 11 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.FlatTexturedRectangle.n_coord ), COORD_DY( m_packet.FlatTexturedRectangle.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatTexturedRectangle.n_coord ) + SIZE_W( m_packet.FlatTexturedRectangle.n_size ), COORD_DY( m_packet.FlatTexturedRectangle.n_coord ) ); + DebugMesh( COORD_DX( m_packet.FlatTexturedRectangle.n_coord ), COORD_DY( m_packet.FlatTexturedRectangle.n_coord ) + SIZE_H( m_packet.FlatTexturedRectangle.n_size ) ); + DebugMesh( COORD_DX( m_packet.FlatTexturedRectangle.n_coord ) + SIZE_W( m_packet.FlatTexturedRectangle.n_size ), COORD_DY( m_packet.FlatTexturedRectangle.n_coord ) + SIZE_H( m_packet.FlatTexturedRectangle.n_size ) ); + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.FlatTexturedRectangle.n_bgr ); + + n_clutx = ( m_packet.FlatTexturedRectangle.n_texture.w.h & 0x3f ) << 4; + n_cluty = ( m_packet.FlatTexturedRectangle.n_texture.w.h >> 6 ) & 0x3ff; + + n_r.d = 0; + n_g.d = 0; + n_b.d = 0; + + TEXTURESETUP + SPRITESETUP + + switch( n_cmd & 0x01 ) + { + case 0: + n_r.w.h = BGR_R( m_packet.FlatTexturedRectangle.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.FlatTexturedRectangle.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.FlatTexturedRectangle.n_bgr ); n_b.w.l = 0; + break; + case 1: + n_r.w.h = 0x80; n_r.w.l = 0; + n_g.w.h = 0x80; n_g.w.l = 0; + n_b.w.h = 0x80; n_b.w.l = 0; + break; + } + + n_v = TEXTURE_V( m_packet.FlatTexturedRectangle.n_texture ); + n_y = COORD_DY( m_packet.FlatTexturedRectangle.n_coord ); + n_h = SIZE_H( m_packet.FlatTexturedRectangle.n_size ); + + while( n_h > 0 ) + { + n_x = COORD_DX( m_packet.FlatTexturedRectangle.n_coord ); + n_u = TEXTURE_U( m_packet.FlatTexturedRectangle.n_texture ); + + n_distance = SIZE_W( m_packet.FlatTexturedRectangle.n_size ); + if( n_distance > 0 && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_u += ( n_drawarea_x1 - n_x ) * n_du; + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + TEXTUREFILL( FLATTEXTUREDRECTANGLEUPDATE, n_u, n_v ); + } + n_v += n_dv; + n_y++; + n_h--; + } +} + +void psxgpu_device::Sprite8x8( void ) +{ + INT16 n_y; + INT16 n_x; + int n_tx; + int n_ty; + + UINT8 n_cmd; + + UINT32 n_clutx; + UINT32 n_cluty; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + UINT8 n_u; + UINT8 n_v; + int n_du; + int n_dv; + + INT16 n_distance; + UINT32 n_h; + UINT16 *p_vram; + UINT16 *p_clut; + UINT16 n_bgr; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 12 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.Sprite8x8.n_coord ), COORD_DY( m_packet.Sprite8x8.n_coord ) ); + DebugMesh( COORD_DX( m_packet.Sprite8x8.n_coord ) + 7, COORD_DY( m_packet.Sprite8x8.n_coord ) ); + DebugMesh( COORD_DX( m_packet.Sprite8x8.n_coord ), COORD_DY( m_packet.Sprite8x8.n_coord ) + 7 ); + DebugMesh( COORD_DX( m_packet.Sprite8x8.n_coord ) + 7, COORD_DY( m_packet.Sprite8x8.n_coord ) + 7 ); + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.Sprite8x8.n_bgr ); + + n_clutx = ( m_packet.Sprite8x8.n_texture.w.h & 0x3f ) << 4; + n_cluty = ( m_packet.Sprite8x8.n_texture.w.h >> 6 ) & 0x3ff; + + n_r.d = 0; + n_g.d = 0; + n_b.d = 0; + + TEXTURESETUP + SPRITESETUP + + switch( n_cmd & 0x01 ) + { + case 0: + n_r.w.h = BGR_R( m_packet.Sprite8x8.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.Sprite8x8.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.Sprite8x8.n_bgr ); n_b.w.l = 0; + break; + case 1: + n_r.w.h = 0x80; n_r.w.l = 0; + n_g.w.h = 0x80; n_g.w.l = 0; + n_b.w.h = 0x80; n_b.w.l = 0; + break; + } + + n_v = TEXTURE_V( m_packet.Sprite8x8.n_texture ); + n_y = COORD_DY( m_packet.Sprite8x8.n_coord ); + n_h = 8; + + while( n_h > 0 ) + { + n_x = COORD_DX( m_packet.Sprite8x8.n_coord ); + n_u = TEXTURE_U( m_packet.Sprite8x8.n_texture ); + + n_distance = 8; + if( n_distance > 0 && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_u += ( n_drawarea_x1 - n_x ) * n_du; + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + TEXTUREFILL( FLATTEXTUREDRECTANGLEUPDATE, n_u, n_v ); + } + n_v += n_dv; + n_y++; + n_h--; + } +} + +void psxgpu_device::Sprite16x16( void ) +{ + INT16 n_y; + INT16 n_x; + int n_tx; + int n_ty; + + UINT8 n_cmd; + + UINT32 n_clutx; + UINT32 n_cluty; + + UINT16 *p_n_f; + UINT16 *p_n_redb; + UINT16 *p_n_greenb; + UINT16 *p_n_blueb; + UINT16 *p_n_redtrans; + UINT16 *p_n_greentrans; + UINT16 *p_n_bluetrans; + + PAIR n_r; + PAIR n_g; + PAIR n_b; + UINT8 n_u; + UINT8 n_v; + int n_du; + int n_dv; + + INT16 n_distance; + UINT32 n_h; + UINT16 *p_vram; + UINT16 *p_clut; + UINT16 n_bgr; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 13 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.Sprite16x16.n_coord ), COORD_DY( m_packet.Sprite16x16.n_coord ) ); + DebugMesh( COORD_DX( m_packet.Sprite16x16.n_coord ) + 7, COORD_DY( m_packet.Sprite16x16.n_coord ) ); + DebugMesh( COORD_DX( m_packet.Sprite16x16.n_coord ), COORD_DY( m_packet.Sprite16x16.n_coord ) + 7 ); + DebugMesh( COORD_DX( m_packet.Sprite16x16.n_coord ) + 7, COORD_DY( m_packet.Sprite16x16.n_coord ) + 7 ); + DebugMeshEnd(); +#endif + + n_cmd = BGR_C( m_packet.Sprite16x16.n_bgr ); + + n_clutx = ( m_packet.Sprite16x16.n_texture.w.h & 0x3f ) << 4; + n_cluty = ( m_packet.Sprite16x16.n_texture.w.h >> 6 ) & 0x3ff; + + n_r.d = 0; + n_g.d = 0; + n_b.d = 0; + + TEXTURESETUP + SPRITESETUP + + switch( n_cmd & 0x01 ) + { + case 0: + n_r.w.h = BGR_R( m_packet.Sprite16x16.n_bgr ); n_r.w.l = 0; + n_g.w.h = BGR_G( m_packet.Sprite16x16.n_bgr ); n_g.w.l = 0; + n_b.w.h = BGR_B( m_packet.Sprite16x16.n_bgr ); n_b.w.l = 0; + break; + case 1: + n_r.w.h = 0x80; n_r.w.l = 0; + n_g.w.h = 0x80; n_g.w.l = 0; + n_b.w.h = 0x80; n_b.w.l = 0; + break; + } + + n_v = TEXTURE_V( m_packet.Sprite16x16.n_texture ); + n_y = COORD_DY( m_packet.Sprite16x16.n_coord ); + n_h = 16; + + while( n_h > 0 ) + { + n_x = COORD_DX( m_packet.Sprite16x16.n_coord ); + n_u = TEXTURE_U( m_packet.Sprite16x16.n_texture ); + + n_distance = 16; + if( n_distance > 0 && n_y >= (INT32)n_drawarea_y1 && n_y <= (INT32)n_drawarea_y2 ) + { + if( ( (INT32)n_drawarea_x1 - n_x ) > 0 ) + { + n_u += ( n_drawarea_x1 - n_x ) * n_du; + n_distance -= ( n_drawarea_x1 - n_x ); + n_x = n_drawarea_x1; + } + TEXTUREFILL( FLATTEXTUREDRECTANGLEUPDATE, n_u, n_v ); + } + n_v += n_dv; + n_y++; + n_h--; + } +} + +void psxgpu_device::Dot( void ) +{ + INT32 n_x; + INT32 n_y; + UINT32 n_r; + UINT32 n_g; + UINT32 n_b; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 14 ) + { + return; + } + DebugMesh( COORD_DX( m_packet.Dot.vertex.n_coord ), COORD_DY( m_packet.Dot.vertex.n_coord ) ); + DebugMeshEnd(); +#endif + + n_r = BGR_R( m_packet.Dot.n_bgr ); + n_g = BGR_G( m_packet.Dot.n_bgr ); + n_b = BGR_B( m_packet.Dot.n_bgr ); + n_x = COORD_DX( m_packet.Dot.vertex.n_coord ); + n_y = COORD_DY( m_packet.Dot.vertex.n_coord ); + + if( (INT16)n_x >= (INT32)n_drawarea_x1 && + (INT16)n_y >= (INT32)n_drawarea_y1 && + (INT16)n_x <= (INT32)n_drawarea_x2 && + (INT16)n_y <= (INT32)n_drawarea_y2 ) + { + p_vram = p_p_vram[ n_y ] + n_x; + WRITE_PIXEL( + p_n_redshade[ MID_LEVEL | n_r ] | + p_n_greenshade[ MID_LEVEL | n_g ] | + p_n_blueshade[ MID_LEVEL | n_b ] ); + } +} + +void psxgpu_device::MoveImage( void ) +{ + INT16 n_w; + INT16 n_h; + INT16 n_srcx; + INT16 n_srcy; + INT16 n_dsty; + INT16 n_dstx; + UINT16 *p_vram; + +#if defined( MAME_DEBUG ) + if( m_debug.n_skip == 15 ) + { + return; + } + DebugMesh( COORD_X( m_packet.MoveImage.vertex[ 1 ].n_coord ), COORD_Y( m_packet.MoveImage.vertex[ 1 ].n_coord ) ); + DebugMesh( COORD_X( m_packet.MoveImage.vertex[ 1 ].n_coord ) + SIZE_W( m_packet.MoveImage.n_size ), COORD_Y( m_packet.MoveImage.vertex[ 1 ].n_coord ) ); + DebugMesh( COORD_X( m_packet.MoveImage.vertex[ 1 ].n_coord ), COORD_Y( m_packet.MoveImage.vertex[ 1 ].n_coord ) + SIZE_H( m_packet.MoveImage.n_size ) ); + DebugMesh( COORD_X( m_packet.MoveImage.vertex[ 1 ].n_coord ) + SIZE_W( m_packet.MoveImage.n_size ), COORD_Y( m_packet.MoveImage.vertex[ 1 ].n_coord ) + SIZE_H( m_packet.MoveImage.n_size ) ); + DebugMeshEnd(); +#endif + + n_srcy = COORD_Y( m_packet.MoveImage.vertex[ 0 ].n_coord ); + n_dsty = COORD_Y( m_packet.MoveImage.vertex[ 1 ].n_coord ); + n_h = SIZE_H( m_packet.MoveImage.n_size ); + + while( n_h > 0 ) + { + n_srcx = COORD_X( m_packet.MoveImage.vertex[ 0 ].n_coord ); + n_dstx = COORD_X( m_packet.MoveImage.vertex[ 1 ].n_coord ); + n_w = SIZE_W( m_packet.MoveImage.n_size ); + while( n_w > 0 ) + { + p_vram = p_p_vram[ n_dsty & 1023 ] + ( n_dstx & 1023 ); + WRITE_PIXEL( *( p_p_vram[ n_srcy & 1023 ] + ( n_srcx & 1023 ) ) ); + n_srcx++; + n_dstx++; + n_w--; + } + n_srcy++; + n_dsty++; + n_h--; + } +} + +void psxgpu_device::dma_write( UINT32 n_address, INT32 n_size ) +{ + psx_state *p_psx = machine().driver_data<psx_state>(); + UINT32 *p_n_psxram = p_psx->m_p_n_psxram; + + gpu_write( &p_n_psxram[ n_address / 4 ], n_size ); +} + +void psxgpu_device::gpu_write( UINT32 *p_ram, INT32 n_size ) +{ + while( n_size > 0 ) + { + UINT32 data = *( p_ram ); + + verboselog( machine(), 2, "PSX Packet #%u %08x\n", n_gpu_buffer_offset, data ); + m_packet.n_entry[ n_gpu_buffer_offset ] = data; + switch( m_packet.n_entry[ 0 ] >> 24 ) + { + case 0x00: + verboselog( machine(), 1, "not handled: GPU Command 0x00: (%08x)\n", data ); + break; + case 0x01: + verboselog( machine(), 1, "not handled: clear cache\n" ); + break; + case 0x02: + if( n_gpu_buffer_offset < 2 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: frame buffer rectangle %u,%u %u,%u\n", m_packet.n_entry[ 0 ] >> 24, + m_packet.n_entry[ 1 ] & 0xffff, m_packet.n_entry[ 1 ] >> 16, m_packet.n_entry[ 2 ] & 0xffff, m_packet.n_entry[ 2 ] >> 16 ); + FrameBufferRectangleDraw(); + n_gpu_buffer_offset = 0; + } + break; + case 0x20: + case 0x21: + case 0x22: + case 0x23: + if( n_gpu_buffer_offset < 3 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: monochrome 3 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + FlatPolygon( 0 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x24: + case 0x25: + case 0x26: + case 0x27: + if( n_gpu_buffer_offset < 6 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: textured 3 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + FlatTexturedPolygon( 0 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x28: + case 0x29: + case 0x2a: + case 0x2b: + if( n_gpu_buffer_offset < 4 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: monochrome 4 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + FlatPolygon( 0 ); + FlatPolygon( 1 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x2c: + case 0x2d: + case 0x2e: + case 0x2f: + if( n_gpu_buffer_offset < 8 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: textured 4 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + FlatTexturedPolygon( 0 ); + FlatTexturedPolygon( 1 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x30: + case 0x31: + case 0x32: + case 0x33: + if( n_gpu_buffer_offset < 5 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: gouraud 3 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + GouraudPolygon( 0 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x34: + case 0x35: + case 0x36: + case 0x37: + if( n_gpu_buffer_offset < 8 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: gouraud textured 3 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + GouraudTexturedPolygon( 0 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x38: + case 0x39: + case 0x3a: + case 0x3b: + if( n_gpu_buffer_offset < 7 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: gouraud 4 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + GouraudPolygon( 0 ); + GouraudPolygon( 1 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x3c: + case 0x3d: + case 0x3e: + case 0x3f: + if( n_gpu_buffer_offset < 11 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: gouraud textured 4 point polygon\n", m_packet.n_entry[ 0 ] >> 24 ); + GouraudTexturedPolygon( 0 ); + GouraudTexturedPolygon( 1 ); + n_gpu_buffer_offset = 0; + } + break; + case 0x40: + case 0x41: + case 0x42: + if( n_gpu_buffer_offset < 2 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: monochrome line\n", m_packet.n_entry[ 0 ] >> 24 ); + MonochromeLine(); + n_gpu_buffer_offset = 0; + } + break; + case 0x48: + case 0x4a: + case 0x4c: + case 0x4e: + if( n_gpu_buffer_offset < 3 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: monochrome polyline\n", m_packet.n_entry[ 0 ] >> 24 ); + MonochromeLine(); + if( ( m_packet.n_entry[ 3 ] & 0xf000f000 ) != 0x50005000 ) + { + m_packet.n_entry[ 1 ] = m_packet.n_entry[ 2 ]; + m_packet.n_entry[ 2 ] = m_packet.n_entry[ 3 ]; + n_gpu_buffer_offset = 3; + } + else + { + n_gpu_buffer_offset = 0; + } + } + break; + case 0x50: + case 0x51: + case 0x52: + case 0x53: + if( n_gpu_buffer_offset < 3 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: gouraud line\n", m_packet.n_entry[ 0 ] >> 24 ); + GouraudLine(); + n_gpu_buffer_offset = 0; + } + break; + case 0x58: + case 0x5a: + case 0x5c: + case 0x5e: + if( n_gpu_buffer_offset < 5 && + ( n_gpu_buffer_offset != 4 || ( m_packet.n_entry[ 4 ] & 0xf000f000 ) != 0x50005000 ) ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: gouraud polyline\n", m_packet.n_entry[ 0 ] >> 24 ); + GouraudLine(); + if( ( m_packet.n_entry[ 4 ] & 0xf000f000 ) != 0x50005000 ) + { + m_packet.n_entry[ 0 ] = ( m_packet.n_entry[ 0 ] & 0xff000000 ) | ( m_packet.n_entry[ 2 ] & 0x00ffffff ); + m_packet.n_entry[ 1 ] = m_packet.n_entry[ 3 ]; + m_packet.n_entry[ 2 ] = m_packet.n_entry[ 4 ]; + m_packet.n_entry[ 3 ] = m_packet.n_entry[ 5 ]; + n_gpu_buffer_offset = 4; + } + else + { + n_gpu_buffer_offset = 0; + } + } + break; + case 0x60: + case 0x61: + case 0x62: + case 0x63: + if( n_gpu_buffer_offset < 2 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: rectangle %d,%d %d,%d\n", + m_packet.n_entry[ 0 ] >> 24, + (INT16)( m_packet.n_entry[ 1 ] & 0xffff ), (INT16)( m_packet.n_entry[ 1 ] >> 16 ), + (INT16)( m_packet.n_entry[ 2 ] & 0xffff ), (INT16)( m_packet.n_entry[ 2 ] >> 16 ) ); + FlatRectangle(); + n_gpu_buffer_offset = 0; + } + break; + case 0x64: + case 0x65: + case 0x66: + case 0x67: + if( n_gpu_buffer_offset < 3 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: sprite %d,%d %u,%u %08x, %08x\n", + m_packet.n_entry[ 0 ] >> 24, + (INT16)( m_packet.n_entry[ 1 ] & 0xffff ), (INT16)( m_packet.n_entry[ 1 ] >> 16 ), + m_packet.n_entry[ 3 ] & 0xffff, m_packet.n_entry[ 3 ] >> 16, + m_packet.n_entry[ 0 ], m_packet.n_entry[ 2 ] ); + FlatTexturedRectangle(); + n_gpu_buffer_offset = 0; + } + break; + case 0x68: + case 0x6a: + if( n_gpu_buffer_offset < 1 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: dot %d,%d %08x\n", + m_packet.n_entry[ 0 ] >> 24, + (INT16)( m_packet.n_entry[ 1 ] & 0xffff ), (INT16)( m_packet.n_entry[ 1 ] >> 16 ), + m_packet.n_entry[ 0 ] & 0xffffff ); + Dot(); + n_gpu_buffer_offset = 0; + } + break; + case 0x70: + case 0x71: + /* 8*8 rectangle */ + if( n_gpu_buffer_offset < 1 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: 16x16 rectangle %08x %08x\n", m_packet.n_entry[ 0 ] >> 24, + m_packet.n_entry[ 0 ], m_packet.n_entry[ 1 ] ); + FlatRectangle8x8(); + n_gpu_buffer_offset = 0; + } + break; + case 0x74: + case 0x75: + case 0x76: + case 0x77: + if( n_gpu_buffer_offset < 2 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: 8x8 sprite %08x %08x %08x\n", m_packet.n_entry[ 0 ] >> 24, + m_packet.n_entry[ 0 ], m_packet.n_entry[ 1 ], m_packet.n_entry[ 2 ] ); + Sprite8x8(); + n_gpu_buffer_offset = 0; + } + break; + case 0x78: + case 0x79: + /* 16*16 rectangle */ + if( n_gpu_buffer_offset < 1 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: 16x16 rectangle %08x %08x\n", m_packet.n_entry[ 0 ] >> 24, + m_packet.n_entry[ 0 ], m_packet.n_entry[ 1 ] ); + FlatRectangle16x16(); + n_gpu_buffer_offset = 0; + } + break; + case 0x7c: + case 0x7d: + case 0x7e: + case 0x7f: + if( n_gpu_buffer_offset < 2 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: 16x16 sprite %08x %08x %08x\n", m_packet.n_entry[ 0 ] >> 24, + m_packet.n_entry[ 0 ], m_packet.n_entry[ 1 ], m_packet.n_entry[ 2 ] ); + Sprite16x16(); + n_gpu_buffer_offset = 0; + } + break; + case 0x80: + if( n_gpu_buffer_offset < 3 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "move image in frame buffer %08x %08x %08x %08x\n", m_packet.n_entry[ 0 ], m_packet.n_entry[ 1 ], m_packet.n_entry[ 2 ], m_packet.n_entry[ 3 ] ); + MoveImage(); + n_gpu_buffer_offset = 0; + } + break; + case 0xa0: + if( n_gpu_buffer_offset < 3 ) + { + n_gpu_buffer_offset++; + } + else + { + UINT32 n_pixel; + for( n_pixel = 0; n_pixel < 2; n_pixel++ ) + { + UINT16 *p_vram; + + verboselog( machine(), 2, "send image to framebuffer ( pixel %u,%u = %u )\n", + ( n_vramx + m_packet.n_entry[ 1 ] ) & 1023, + ( n_vramy + ( m_packet.n_entry[ 1 ] >> 16 ) ) & 1023, + data & 0xffff ); + + p_vram = p_p_vram[ ( n_vramy + ( m_packet.n_entry[ 1 ] >> 16 ) ) & 1023 ] + ( ( n_vramx + m_packet.n_entry[ 1 ] ) & 1023 ); + WRITE_PIXEL( data & 0xffff ); + n_vramx++; + if( n_vramx >= ( m_packet.n_entry[ 2 ] & 0xffff ) ) + { + n_vramx = 0; + n_vramy++; + if( n_vramy >= ( m_packet.n_entry[ 2 ] >> 16 ) ) + { + verboselog( machine(), 1, "%02x: send image to framebuffer %u,%u %u,%u\n", m_packet.n_entry[ 0 ] >> 24, + m_packet.n_entry[ 1 ] & 0xffff, ( m_packet.n_entry[ 1 ] >> 16 ), + m_packet.n_entry[ 2 ] & 0xffff, ( m_packet.n_entry[ 2 ] >> 16 ) ); + n_gpu_buffer_offset = 0; + n_vramx = 0; + n_vramy = 0; + break; + } + } + data >>= 16; + } + } + break; + case 0xc0: + if( n_gpu_buffer_offset < 2 ) + { + n_gpu_buffer_offset++; + } + else + { + verboselog( machine(), 1, "%02x: copy image from frame buffer\n", m_packet.n_entry[ 0 ] >> 24 ); + n_gpustatus |= ( 1L << 0x1b ); + } + break; + case 0xe1: + verboselog( machine(), 1, "%02x: draw mode %06x\n", m_packet.n_entry[ 0 ] >> 24, + m_packet.n_entry[ 0 ] & 0xffffff ); + decode_tpage( m_packet.n_entry[ 0 ] & 0xffffff ); + break; + case 0xe2: + n_twy = ( ( ( m_packet.n_entry[ 0 ] >> 15 ) & 0x1f ) << 3 ); + n_twx = ( ( ( m_packet.n_entry[ 0 ] >> 10 ) & 0x1f ) << 3 ); + n_twh = 255 - ( ( ( m_packet.n_entry[ 0 ] >> 5 ) & 0x1f ) << 3 ); + n_tww = 255 - ( ( m_packet.n_entry[ 0 ] & 0x1f ) << 3 ); + verboselog( machine(), 1, "%02x: texture window %u,%u %u,%u\n", m_packet.n_entry[ 0 ] >> 24, + n_twx, n_twy, n_tww, n_twh ); + break; + case 0xe3: + n_drawarea_x1 = m_packet.n_entry[ 0 ] & 1023; + if( m_n_gputype == 2 ) + { + n_drawarea_y1 = ( m_packet.n_entry[ 0 ] >> 10 ) & 1023; + } + else + { + n_drawarea_y1 = ( m_packet.n_entry[ 0 ] >> 12 ) & 1023; + } + verboselog( machine(), 1, "%02x: drawing area top left %d,%d\n", m_packet.n_entry[ 0 ] >> 24, + n_drawarea_x1, n_drawarea_y1 ); + break; + case 0xe4: + n_drawarea_x2 = m_packet.n_entry[ 0 ] & 1023; + if( m_n_gputype == 2 ) + { + n_drawarea_y2 = ( m_packet.n_entry[ 0 ] >> 10 ) & 1023; + } + else + { + n_drawarea_y2 = ( m_packet.n_entry[ 0 ] >> 12 ) & 1023; + } + verboselog( machine(), 1, "%02x: drawing area bottom right %d,%d\n", m_packet.n_entry[ 0 ] >> 24, + n_drawarea_x2, n_drawarea_y2 ); + break; + case 0xe5: + n_drawoffset_x = SINT11( m_packet.n_entry[ 0 ] & 2047 ); + if( m_n_gputype == 2 ) + { + n_drawoffset_y = SINT11( ( m_packet.n_entry[ 0 ] >> 11 ) & 2047 ); + } + else + { + n_drawoffset_y = SINT11( ( m_packet.n_entry[ 0 ] >> 12 ) & 2047 ); + } + verboselog( machine(), 1, "%02x: drawing offset %d,%d\n", m_packet.n_entry[ 0 ] >> 24, + n_drawoffset_x, n_drawoffset_y ); + break; + case 0xe6: + n_gpustatus &= ~( 3L << 0xb ); + n_gpustatus |= ( data & 0x03 ) << 0xb; + if( ( m_packet.n_entry[ 0 ] & 3 ) != 0 ) + { + verboselog( machine(), 1, "not handled: mask setting %d\n", m_packet.n_entry[ 0 ] & 3 ); + } + else + { + verboselog( machine(), 1, "mask setting %d\n", m_packet.n_entry[ 0 ] & 3 ); + } + break; + default: +#if defined( MAME_DEBUG ) + popmessage( "unknown GPU packet %08x", m_packet.n_entry[ 0 ] ); +#endif + verboselog( machine(), 0, "unknown GPU packet %08x (%08x)\n", m_packet.n_entry[ 0 ], data ); +#if ( STOP_ON_ERROR ) + n_gpu_buffer_offset = 1; +#endif + break; + } + p_ram++; + n_size--; + } +} + +WRITE32_MEMBER( psxgpu_device::write ) +{ + switch( offset ) + { + case 0x00: + gpu_write( &data, 1 ); + break; + case 0x01: + switch( data >> 24 ) + { + case 0x00: + gpu_reset(); + break; + case 0x01: + verboselog( machine(), 1, "not handled: reset command buffer\n" ); + n_gpu_buffer_offset = 0; + break; + case 0x02: + verboselog( machine(), 1, "not handled: reset irq\n" ); + break; + case 0x03: + n_gpustatus &= ~( 1L << 0x17 ); + n_gpustatus |= ( data & 0x01 ) << 0x17; + break; + case 0x04: + verboselog( machine(), 1, "dma setup %d\n", data & 3 ); + n_gpustatus &= ~( 3L << 0x1d ); + n_gpustatus |= ( data & 0x03 ) << 0x1d; + n_gpustatus &= ~( 1L << 0x19 ); + if( ( data & 3 ) == 1 || ( data & 3 ) == 2 ) + { + n_gpustatus |= ( 1L << 0x19 ); + } + break; + case 0x05: + m_n_displaystartx = data & 1023; + if( m_n_gputype == 2 ) + { + n_displaystarty = ( data >> 10 ) & 1023; + } + else + { + n_displaystarty = ( data >> 12 ) & 1023; + } + verboselog( machine(), 1, "start of display area %d %d\n", m_n_displaystartx, n_displaystarty ); + break; + case 0x06: + n_horiz_disstart = data & 4095; + n_horiz_disend = ( data >> 12 ) & 4095; + verboselog( machine(), 1, "horizontal display range %d %d\n", n_horiz_disstart, n_horiz_disend ); + break; + case 0x07: + n_vert_disstart = data & 1023; + n_vert_disend = ( data >> 10 ) & 2047; + verboselog( machine(), 1, "vertical display range %d %d\n", n_vert_disstart, n_vert_disend ); + break; + case 0x08: + verboselog( machine(), 1, "display mode %02x\n", data & 0xff ); + n_gpustatus &= ~( 127L << 0x10 ); + n_gpustatus |= ( data & 0x3f ) << 0x11; /* width 0 + height + videmode + isrgb24 + isinter */ + n_gpustatus |= ( ( data & 0x40 ) >> 0x06 ) << 0x10; /* width 1 */ + if( m_n_gputype == 1 ) + { + b_reverseflag = ( data >> 7 ) & 1; + } + updatevisiblearea(); + break; + case 0x09: + verboselog( machine(), 1, "not handled: GPU Control 0x09: %08x\n", data ); + break; + case 0x0d: + verboselog( machine(), 1, "reset lightgun coordinates %08x\n", data ); + n_lightgun_x = 0; + n_lightgun_y = 0; + break; + case 0x10: + switch( data & 0xff ) + { + case 0x03: + if( m_n_gputype == 2 ) + { + n_gpuinfo = n_drawarea_x1 | ( n_drawarea_y1 << 10 ); + } + else + { + n_gpuinfo = n_drawarea_x1 | ( n_drawarea_y1 << 12 ); + } + verboselog( machine(), 1, "GPU Info - Draw area top left %08x\n", n_gpuinfo ); + break; + case 0x04: + if( m_n_gputype == 2 ) + { + n_gpuinfo = n_drawarea_x2 | ( n_drawarea_y2 << 10 ); + } + else + { + n_gpuinfo = n_drawarea_x2 | ( n_drawarea_y2 << 12 ); + } + verboselog( machine(), 1, "GPU Info - Draw area bottom right %08x\n", n_gpuinfo ); + break; + case 0x05: + if( m_n_gputype == 2 ) + { + n_gpuinfo = ( n_drawoffset_x & 2047 ) | ( ( n_drawoffset_y & 2047 ) << 11 ); + } + else + { + n_gpuinfo = ( n_drawoffset_x & 2047 ) | ( ( n_drawoffset_y & 2047 ) << 12 ); + } + verboselog( machine(), 1, "GPU Info - Draw offset %08x\n", n_gpuinfo ); + break; + case 0x07: + n_gpuinfo = m_n_gputype; + verboselog( machine(), 1, "GPU Info - GPU Type %08x\n", n_gpuinfo ); + break; + case 0x08: + n_gpuinfo = n_lightgun_x | ( n_lightgun_y << 16 ); + verboselog( machine(), 1, "GPU Info - lightgun coordinates %08x\n", n_gpuinfo ); + break; + default: + verboselog( machine(), 0, "GPU Info - unknown request (%08x)\n", data ); + n_gpuinfo = 0; + break; + } + break; + case 0x20: + verboselog( machine(), 1, "not handled: GPU Control 0x20: %08x\n", data ); + break; + default: +#if defined( MAME_DEBUG ) + popmessage( "unknown GPU command %08x", data ); +#endif + verboselog( machine(), 0, "gpu_w( %08x ) unknown GPU command\n", data ); + break; + } + break; + default: + verboselog( machine(), 0, "gpu_w( %08x, %08x, %08x ) unknown register\n", offset, data, mem_mask ); + break; + } +} + + +void psxgpu_device::dma_read( UINT32 n_address, INT32 n_size ) +{ + psx_state *p_psx = machine().driver_data<psx_state>(); + UINT32 *p_n_psxram = p_psx->m_p_n_psxram; + + gpu_read( &p_n_psxram[ n_address / 4 ], n_size ); +} + +void psxgpu_device::gpu_read( UINT32 *p_ram, INT32 n_size ) +{ + while( n_size > 0 ) + { + if( ( n_gpustatus & ( 1L << 0x1b ) ) != 0 ) + { + UINT32 n_pixel; + PAIR data; + + verboselog( machine(), 2, "copy image from frame buffer ( %d, %d )\n", n_vramx, n_vramy ); + data.d = 0; + for( n_pixel = 0; n_pixel < 2; n_pixel++ ) + { + data.w.l = data.w.h; + data.w.h = *( p_p_vram[ n_vramy + ( m_packet.n_entry[ 1 ] >> 16 ) ] + n_vramx + ( m_packet.n_entry[ 1 ] & 0xffff ) ); + n_vramx++; + if( n_vramx >= ( m_packet.n_entry[ 2 ] & 0xffff ) ) + { + n_vramx = 0; + n_vramy++; + if( n_vramy >= ( m_packet.n_entry[ 2 ] >> 16 ) ) + { + verboselog( machine(), 1, "copy image from frame buffer end\n" ); + n_gpustatus &= ~( 1L << 0x1b ); + n_gpu_buffer_offset = 0; + n_vramx = 0; + n_vramy = 0; + if( n_pixel == 0 ) + { + data.w.l = data.w.h; + data.w.h = 0; + } + break; + } + } + } + *( p_ram ) = data.d; + } + else + { + verboselog( machine(), 2, "read GPU info (%08x)\n", n_gpuinfo ); + *( p_ram ) = n_gpuinfo; + } + p_ram++; + n_size--; + } +} + +READ32_MEMBER( psxgpu_device::read ) +{ + UINT32 data; + + switch( offset ) + { + case 0x00: + gpu_read( &data, 1 ); + break; + case 0x01: + data = n_gpustatus; + verboselog( machine(), 1, "read GPU status (%08x)\n", data ); + break; + default: + verboselog( machine(), 0, "gpu_r( %08x, %08x ) unknown register\n", offset, mem_mask ); + data = 0; + break; + } + return data; +} + +void psxgpu_device::vblank(screen_device &screen, bool vblank_state) +{ + if( vblank_state ) + { + #if defined( MAME_DEBUG ) + DebugCheckKeys(); + #endif + + psx_state *p_psx = screen.machine().driver_data<psx_state>(); + if(p_psx->b_need_sianniv_vblank_hack) + { + /// HACK: find out what this is for? + UINT32 pc = cpu_get_pc(screen.machine().device("maincpu")); + if((pc >= 0x80010018 && pc <= 0x80010028) || pc == 0x8002a4f0) + return; + } + + n_gpustatus ^= ( 1L << 31 ); + + psx_irq_set( machine(), 0x0001 ); + } +} + +void psxgpu_device::gpu_reset( void ) +{ + verboselog( machine(), 1, "reset gpu\n" ); + n_gpu_buffer_offset = 0; + n_gpustatus = 0x14802000; + n_drawarea_x1 = 0; + n_drawarea_y1 = 0; + n_drawarea_x2 = 1023; + n_drawarea_y2 = 1023; + n_drawoffset_x = 0; + n_drawoffset_y = 0; + m_n_displaystartx = 0; + n_displaystarty = 0; + n_horiz_disstart = 0x260; + n_horiz_disend = 0xc60; + n_vert_disstart = 0x010; + n_vert_disend = 0x100; + n_vramx = 0; + n_vramy = 0; + n_twx = 0; + n_twy = 0; + n_twh = 255; + n_tww = 255; + updatevisiblearea(); +} + +void psxgpu_device::lightgun_set( int n_x, int n_y ) +{ + n_lightgun_x = n_x; + n_lightgun_y = n_y; +} + +PALETTE_INIT( psx ) +{ + UINT32 n_colour; + + for( n_colour = 0; n_colour < 0x10000; n_colour++ ) + { + palette_set_color_rgb( machine, n_colour, pal5bit(n_colour >> 0), pal5bit(n_colour >> 5), pal5bit(n_colour >> 10) ); + } +} + +SCREEN_UPDATE( psx ) +{ + psxgpu_device *gpu = downcast<psxgpu_device *>(screen->owner()); + gpu->update_screen( bitmap, cliprect ); + return 0; +} + +MACHINE_CONFIG_FRAGMENT( psxgpu ) + MCFG_SCREEN_ADD("screen", RASTER) + MCFG_SCREEN_REFRESH_RATE( 60 ) + MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC( 0 )) + MCFG_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) + MCFG_SCREEN_SIZE( 1024, 1024 ) + MCFG_SCREEN_VISIBLE_AREA( 0, 639, 0, 479 ) + MCFG_SCREEN_UPDATE( psx ) + ((screen_device *)device)->register_vblank_callback(vblank_state_delegate(FUNC(psxgpu_device::vblank), (psxgpu_device *) owner)); + + MCFG_PALETTE_LENGTH( 65536 ) + driver_device::static_set_palette_init(*owner->owner(), PALETTE_INIT_NAME(psx)); // MCFG_PALETTE_INIT( psx ) +MACHINE_CONFIG_END + +//------------------------------------------------- +// machine_config_additions - device-specific +// machine configurations +//------------------------------------------------- + +machine_config_constructor psxgpu_device::device_mconfig_additions() const +{ + return MACHINE_CONFIG_NAME( psxgpu ); +} |