#include "driver.h"
#include "video/generic.h"
#include "includes/gamecom.h"

#define Y_PIXELS 200

int scanline;
unsigned int base_address;

void gamecom_video_init( void ) {
	scanline = 0;
}

INTERRUPT_GEN( gamecom_scanline ) {
	// draw line
	if ( scanline == 0 ) {
		base_address = ( internal_registers[SM8521_LCDC] & 0x40 ) ? 0x2000 : 0x0000;
	}
	if ( ! internal_registers[SM8521_LCDC] & 0x80 ) {
		rectangle rec;
		rec.min_x = 0;
		rec.max_x = Y_PIXELS - 1;
		rec.min_y = rec.max_y = scanline;
		fillbitmap( tmpbitmap, Machine->pens[ 0 ], &rec );
		return;
	} else {
		UINT8 *line = &gamecom_vram[ base_address + 40 * scanline ];
		int	pal[4];
		int	i;

		switch( internal_registers[SM8521_LCDC] & 0x30 ) {
		case 0x00:
			pal[0] = 4;
			pal[1] = 3;
			pal[2] = 2;
			pal[3] = 0;
			break;
		case 0x10:
			pal[0] = 4;
			pal[1] = 3;
			pal[2] = 1;
			pal[3] = 0;
			break;
		case 0x20:
			pal[0] = 4;
			pal[1] = 3;
			pal[2] = 1;
			pal[3] = 0;
			break;
		case 0x30:
			pal[0] = 4;
			pal[1] = 2;
			pal[2] = 1;
			pal[3] = 0;
			break;
		}
		for( i = 0; i < 40; i++ ) {
			UINT8 p = line[i];
			*BITMAP_ADDR16(tmpbitmap, i * 4 + 0, scanline) = Machine->pens[ pal[ ( p >> 6 ) & 3 ] ];
			*BITMAP_ADDR16(tmpbitmap, i * 4 + 1, scanline) = Machine->pens[ pal[ ( p >> 4 ) & 3 ] ];
			*BITMAP_ADDR16(tmpbitmap, i * 4 + 2, scanline) = Machine->pens[ pal[ ( p >> 2 ) & 3 ] ];
			*BITMAP_ADDR16(tmpbitmap, i * 4 + 3, scanline) = Machine->pens[ pal[ ( p      ) & 3 ] ];
		}
	}

	scanline = ( scanline + 1 ) % Y_PIXELS;
}