Previous

15994 Revisions

Next

r9073 Wednesday 8th September, 2010 at 22:22:26 UTC by MooglyGuy
[ACAN] Improved mosaic behavior. Improved layer 2 behavior via a hack; possibly not actually a hack. Implemented per-line ROZ priority. Implemented sprite X scaling. Fixed sprite tile flipping.

[src/mess/drivers]

supracan.c

src/mess/drivers/supracan.c

r9072	r9073
170	170	INT32 roz_changed;
171	171	INT32 roz_cx;
172	172	INT32 roz_cy;
	173	UINT16 unk_1d0;
173	174
174	175	UINT16 video_regs[256];
175	176
r9072	r9073
203	204
204	205	static VIDEO_START( supracan )
205	206	{
206		// crash debug: printf("A"); fflush(stdout);
207	207	supracan_state *state = machine->driver_data<supracan_state>();
208	208	state->roz_bitmap = auto_bitmap_alloc(machine, 1024, 1024, BITMAP_FORMAT_INDEXED16);
209	209	state->roz_final_bitmap = auto_bitmap_alloc(machine, 320, 240, BITMAP_FORMAT_INDEXED16);
r9072	r9073
218	218
219	219	static UINT16 fetch_8bpp_tile_pixel(running_machine *machine, int tile, int palette, bool xflip, bool yflip, int x, int y)
220	220	{
221		// crash debug: printf("B"); fflush(stdout);
222	221	supracan_state *state = machine->driver_data<supracan_state>();
223	222	UINT16 *supracan_vram = state->vram;
224	223
r9072	r9073
233	232
234	233	static UINT16 fetch_4bpp_tile_pixel(running_machine *machine, int tile, int palette, bool xflip, bool yflip, int x, int y)
235	234	{
236		// crash debug: printf("C"); fflush(stdout);
237	235	supracan_state *state = machine->driver_data<supracan_state>();
238	236	UINT16 *supracan_vram = state->vram;
239	237
r9072	r9073
248	246
249	247	static UINT16 fetch_2bpp_tile_pixel(running_machine *machine, int tile, int palette, bool xflip, bool yflip, int x, int y)
250	248	{
251		// crash debug: printf("D"); fflush(stdout);
252	249	supracan_state *state = machine->driver_data<supracan_state>();
253	250	UINT16 *supracan_vram = state->vram;
254	251
r9072	r9073
258	255	UINT32 address = (tile * 8 * 2 + y * 2 + (x >> 2)) >> 1;
259	256	UINT8 shift = (7 - (x & 7)) * 2;
260	257
261		return (palette << 2) | ((supracan_vram[address] >> shift) & 0x0003);
	258	return (palette << 4) | ((supracan_vram[address] >> shift) & 0x0003);
262	259	}
263	260
264		static void draw_tile(running_machine *machine, UINT8* primap, bitmap_t *bitmap, const rectangle *cliprect, int tile, int palette, bool xflip, bool yflip, int x, int y, int priority, int depth, int mask)
	261	static void draw_tile(running_machine *machine, UINT8* primap, bitmap_t *bitmap, const rectangle *cliprect, int tile, int palette, bool xflip, bool yflip, int x, int y, int priority, int depth, int mask, int xprioffset = 0, int yprioffset = 0, UINT32 xwrap = 0, UINT32 ywrap = 0)
265	262	{
266		// crash debug: printf("E"); fflush(stdout);
267	263	for(int tiley = 0; tiley < 8; tiley++)
268	264	{
269	265	for(int tilex = 0; tilex < 8; tilex++)
r9072	r9073
295	291
296	292	int total_x = x + tilex;
297	293	int total_y = y + tiley;
	294	if(xwrap)
	295	{
	296	while(total_x < 0) total_x += xwrap;
	297	while(total_x >= xwrap) total_x -= xwrap;
	298	}
	299	if(ywrap)
	300	{
	301	while(total_y < 0) total_y += ywrap;
	302	while(total_y >= ywrap) total_y -= ywrap;
	303	}
298	304	if((cliprect != NULL && total_x >= cliprect->min_x && total_y >= cliprect->min_y && total_x < cliprect->max_x && total_y < cliprect->max_y) || cliprect == NULL)
299	305	{
300	306	if(pixel)
r9072	r9073
303	309	{
304	310	case 0: // Default
305	311	*BITMAP_ADDR16(bitmap, total_y, total_x) = pixel;
306		primap[total_y*1024 + total_x] = (UINT8)priority;
	312	primap[(total_y + yprioffset)*1024 + total_x + xprioffset] = (UINT8)priority;
307	313	break;
308	314	case 1: // Mask against previous alpha
309	315	if(*BITMAP_ADDR16(bitmap, total_y, total_x) & 0x8000)
310	316	{
311	317	*BITMAP_ADDR16(bitmap, total_y, total_x) = pixel | 0x8000;
312		primap[total_y*1024 + total_x] = (UINT8)priority;
	318	primap[(total_y + yprioffset)*1024 + total_x + xprioffset] = (UINT8)priority;
313	319	}
314	320	break;
315	321	case 2: // Write to alpha
r9072	r9073
335	341	{
336	342	for(int x = 0; x < 320; x++)
337	343	{
338		priline[x] = 8;
	344	priline[x] = 9;
339	345	scanline[x] = 0;
340	346	}
341	347	return;
r9072	r9073
383	389	for(int x = 0; x < 320; x++)
384	390	{
385	391	scanline[x] = 0;
386		priline[x] = 8;
	392	priline[x] = 9;
387	393	}
388	394	return;
389	395	}
390	396	}
391	397
392		int mosaic = (state->tilemap_flags[layer] & 0x001c) >> 2;
393		UINT32 mask = 0xffffffff;
	398	int mosaic_count = (state->tilemap_flags[layer] & 0x001c) >> 2;
	399	int mosaic_mask = 0xffffffff << mosaic_count;
394	400
395		if(mosaic)
396		{
397		mosaic--;
398		mask = ~(1 << mosaic);
399		}
	401	UINT16 *src = BITMAP_ADDR16(state->tilemap_bitmap[layer], wrapped_y & mosaic_mask, 0);
	402	UINT8 *srcpri = &state->tilemap_pri[layer][1024*(wrapped_y & mosaic_mask)];
400	403
401		UINT16 *src = BITMAP_ADDR16(state->tilemap_bitmap[layer], wrapped_y & mask, 0);
402		UINT8 *srcpri = &state->tilemap_pri[layer][1024*(wrapped_y & mask)];
403
404	404	if(state->tilemap_flags[layer] & 0x20)
405	405	{
406	406	while(wrapped_x >= width*8) wrapped_x -= width*8;
r9072	r9073
408	408
409	409	for(int x = 0; x < 320; x++)
410	410	{
411		scanline[x] = src[wrapped_x & mask] ? src[wrapped_x & mask] : scanline[x];
412		priline[x] = src[wrapped_x & mask] ? srcpri[wrapped_x & mask] : 8;
	411	scanline[x] = src[wrapped_x & mosaic_mask] ? src[wrapped_x & mosaic_mask] : scanline[x];
	412	priline[x] = src[wrapped_x & mosaic_mask] ? srcpri[wrapped_x & mosaic_mask] : 9;
413	413	wrapped_x++;
414	414	while(wrapped_x >= width*8) wrapped_x -= width*8;
415	415	}
r9072	r9073
420	420	{
421	421	if(wrapped_x >= 0 && wrapped_x < width*8)
422	422	{
423		scanline[x] = src[wrapped_x & mask] ? src[wrapped_x & mask] : scanline[x];
424		priline[x] = src[wrapped_x & mask] ? srcpri[wrapped_x & mask] : 8;
	423	scanline[x] = src[wrapped_x & mosaic_mask] ? src[wrapped_x & mosaic_mask] : scanline[x];
	424	priline[x] = src[wrapped_x & mosaic_mask] ? srcpri[wrapped_x & mosaic_mask] : 9;
425	425	}
426	426	else
427	427	{
428	428	scanline[x] = scanline[x];
429		priline[x] = 8;
	429	priline[x] = 9;
430	430	}
431	431	wrapped_x++;
432	432	}
r9072	r9073
465	465	break;
466	466	}
467	467
468		UINT8 priority = ((state->tilemap_flags[layer] >> 12) & 7) + 1;
	468	UINT8 priority = ((state->tilemap_flags[layer] >> 13) & 7) + 1;
469	469
470	470	int scrollx = state->tilemap_scrollx[layer];
471	471	int scrolly = state->tilemap_scrolly[layer];
r9072	r9073
510	510
511	511	if(layer == 2)
512	512	{
513		region = 1;
514		tile_bank = 0x400;
515		palette_bank = 0x00;
	513	region = 2;
	514	tile_bank = 0x1000;
516	515	}
517	516
518	517	if(state->tilemap_flags[layer] & 0x20)
r9072	r9073
524	523	for(int x = 0; x < xsize; x++)
525	524	{
526	525	int tile = (supracan_vram[count] & 0x03ff) + tile_bank;
527		int flipx = (supracan_vram[count] & 0x0800) ? 1 : 0;
528		int flipy = (supracan_vram[count] & 0x0400) ? 1 : 0;
	526	bool flipx = (supracan_vram[count] & 0x0800) ? true : false;
	527	bool flipy = (supracan_vram[count] & 0x0400) ? true : false;
529	528	int palette = ((supracan_vram[count] & 0xf000) >> 12) + palette_bank;
530	529
531	530	draw_tile(machine, state->tilemap_pri[layer], bitmap, NULL, tile, palette, flipx, flipy, x*8, y*8, priority, region, 0);
r9072	r9073
543	542	for(int x = 0; x < xsize; x++)
544	543	{
545	544	int tile = (supracan_vram[count] & 0x03ff) + tile_bank;
546		int flipx = (supracan_vram[count] & 0x0800) ? 1 : 0;
547		int flipy = (supracan_vram[count] & 0x0400) ? 1 : 0;
	545	bool flipx = (supracan_vram[count] & 0x0800) ? true : false;
	546	bool flipy = (supracan_vram[count] & 0x0400) ? true : false;
548	547	int palette = ((supracan_vram[count] & 0xf000) >> 12) + palette_bank;
549	548
550	549	draw_tile(machine, state->tilemap_pri[layer], bitmap, cliprect, tile, palette, flipx, flipy, x*8/*-scrollx*/, y*8/*-scrolly*/, priority, region, 0);
r9072	r9073
557	556
558	557	static void draw_roz_bitmap_scanline(running_machine *machine, bitmap_t *roz_bitmap, UINT16 *scanline, UINT8 *priline, int ypos, INT32 X, INT32 Y, INT32 PA, INT32 PB, INT32 PC, INT32 PD, INT32 *currentx, INT32 *currenty, int changed)
559	558	{
560		// crash debug: printf("G"); fflush(stdout);
561	559	supracan_state *state = machine->driver_data<supracan_state>();
562
	560	//UINT16 *supracan_vram = state->vram;
	561	//UINT16 roztbl0 = supracan_vram[(state->roz_unk_base0 >> 1) + ypos];
	562	//UINT32 roztbl1 = supracan_vram[(state->roz_unk_base1 >> 1) + ypos*2] << 16;
	563	//       roztbl1 |= supracan_vram[(state->roz_unk_base1 >> 1) + ypos*2 + 1];
	564	//UINT32 roztbl2 = supracan_vram[(state->roz_unk_base2 >> 1) + ypos*2] << 16;
	565	//       roztbl2 |= supracan_vram[(state->roz_unk_base2 >> 1) + ypos*2 + 1];
563	566	INT32 sx = 0;
564	567	INT32 sy = 0;
565	568
	569	//if(state->roz_mode & 0x20 && (roztbl0 == 0 && roztbl1 == 0 && roztbl2 == 0))
	570	{
	571	//return;
	572	}
	573
566	574	switch(state->roz_mode & 0x0f00)
567	575	{
568	576	case 0x600: sx = 64*8; sy = 32*8; break;
r9072	r9073
586	594
587	595	// re-assign parameters for convenience's sake
588	596	INT32 dx = PA;
589		INT32 dmx = PB;
	597	INT32 dmx = PB;//roztbl1;
590	598	INT32 dy = PC;
591		INT32 dmy = PD;
	599	INT32 dmy = PD;//roztbl2;
592	600	INT32 startx = X;
593	601	INT32 starty = Y;
594	602
r9072	r9073
618	626	INT32 rx = *currentx;
619	627	INT32 ry = *currenty;
620	628
	629	//printf("%08x\n", ry);
621	630	INT32 pixx = rx >> 8;
622	631	INT32 pixy = ry >> 8;
623	632
r9072	r9073
631	640	while(pixy >= sy) pixy -= sy;
632	641
633	642	scanline[x] = *BITMAP_ADDR16(roz_bitmap, pixy, pixx);
634		priline[x] = state->roz_pri[pixy*1024 + pixx];
	643	priline[x] = ((state->roz_mode >> 13) & 7) + 1;
635	644	}
636	645	else
637	646	{
638	647	if(pixx >= 0 && pixy >= 0 && pixx < sx && pixy < sy)
639	648	{
640	649	scanline[x] = *BITMAP_ADDR16(roz_bitmap, pixy, pixx);
641		priline[x] = state->roz_pri[pixy*1024 + pixx];
	650	priline[x] = ((state->roz_mode >> 13) & 7) + 1;
642	651	}
643	652	}
644	653
r9072	r9073
654	663
655	664	static void draw_roz_bitmap(running_machine *machine, const rectangle *cliprect)
656	665	{
657		// crash debug: printf("H"); fflush(stdout);
658	666	supracan_state *state = machine->driver_data<supracan_state>();
659	667	UINT16 *supracan_vram = state->vram;
660	668	UINT32 addr = state->roz_tile_bank << 1;
r9072	r9073
675	683	if(bit)
676	684	{
677	685	*BITMAP_ADDR16(roz_bitmap, y, x) = bit;
678		state->roz_pri[y*1024 + x] = (state->roz_mode >> 12) & 7;
	686	state->roz_pri[y*1024 + x] = ((state->roz_mode >> 13) & 7) + 1;
679	687	}
680	688	}
681	689	for (int x = 0; x < 32; x++)
r9072	r9073
684	692	if(bit)
685	693	{
686	694	*BITMAP_ADDR16(roz_bitmap, y, x+32) = bit;
687		state->roz_pri[y*1024 + x + 32] = (state->roz_mode >> 12) & 7;
	695	state->roz_pri[y*1024 + x + 32] = ((state->roz_mode >> 13) & 7) + 1;
688	696	}
689	697	}
690	698	}
r9072	r9073
692	700
693	701	static void draw_roz(running_machine *machine, const rectangle *cliprect)
694	702	{
695		// crash debug: printf("I"); fflush(stdout);
696	703	supracan_state *state = machine->driver_data<supracan_state>();
697	704	UINT16 *supracan_vram = state->vram;
698	705	UINT32 roz_base_addr = state->roz_base_addr;
r9072	r9073
746	753	}
747	754
748	755	UINT32 count = 0;
749		UINT8 priority = ((state->roz_mode >> 12) & 7) + 1;
	756	UINT8 priority = ((state->roz_mode >> 13) & 7) + 1;
750	757
751	758	bitmap_t *roz_bitmap = state->roz_bitmap;
752	759	for (int y = 0; y < ysize; y++)
r9072	r9073
765	772	}
766	773	}
767	774
	775	#define DRAW_DEBUG_SPRITE_PRI \
	776	tile = 0; xflip = false; yflip = false; palette = 0; \
	777	for(int ypix = 0; ypix < 8; ypix++) \
	778	for(int xpix = 0; xpix < 8; xpix++) \
	779	if((y + ytile*8 + ypix) < 240 && (y + ytile*8 + ypix) >= 0 && \
	780	(x + xtile*8 + xpix) < 320 && (x + xtile*8 + xpix) >= 0) \
	781	*BITMAP_ADDR16(bitmap, y + ytile*8 + ypix, x + xtile*8 + xpix) = supracan_vram[i+2] >> 9;
	782
768	783	static void draw_sprites(running_machine *machine, bitmap_t *bitmap, const rectangle *cliprect)
769	784	{
770		// crash debug: printf("J"); fflush(stdout);
771	785	supracan_state *state = machine->driver_data<supracan_state>();
772	786	UINT16 *supracan_vram = state->vram;
773	787
r9072	r9073
776	790	#endif
777	791
778	792	//      [0]
779		//      ---h hhh- ---- ---- Y size
780		//      ---- ---y yyyy yyyy Y offset
	793	//      ---h hhh- ---- ---- Y size (not always right)
	794	//      ---- ---y yyyy yyyy Y position
781	795	//      [1]
782		//      bbbb ---- ---- ---- sprite offset bank
783		//      ---- h--- ---- ---- horizontal flip
784		//      ---- -v-- ---- ---- vertical flip
785		//      ---- --mm ---- ---- masking
	796	//      bbbb ---- ---- ---- Tile bank
	797	//      ---- h--- ---- ---- Horizontal flip
	798	//      ---- -v-- ---- ---- Vertical flip
	799	//      ---- --mm ---- ---- Masking mode
786	800	//      ---- ---- ---- -www X size
787	801	//      [2]
788		//      zzz- uuu- ---- ---- unknown
789		//      ---- ---x xxxx xxxx X offset
	802	//      zzzz ---- ---- ---- X scale
	803	//      ---- ---x xxxx xxxx X position
790	804	//      [3]
791		//      oooo oooo oooo oooo sprite pointer
	805	//      oooo oooo oooo oooo Sprite address
792	806
793		UINT32 start_word = (state->sprite_base_addr >> 1) + 0 * 4;
794		UINT32 end_word = start_word + state->sprite_count * 4;
	807	UINT32 skip_count = 0;
	808	UINT32 start_word = (state->sprite_base_addr >> 1) + skip_count * 4;
	809	UINT32 end_word = start_word + (state->sprite_count - skip_count) * 4;
795	810	for(int i = start_word; i < end_word; i += 4)
796	811	{
797	812	int x = supracan_vram[i+2] & 0x01ff;
r9072	r9073
801	816	int mask = (supracan_vram[i+1] & 0x0300) >> 8;
802	817	bool hflip = (supracan_vram[i+1] & 0x0800) ? true : false;
803	818	bool vflip = (supracan_vram[i+1] & 0x0400) ? true : false;
	819	int xscale = (supracan_vram[i+2] & 0xf000) >> 12;
804	820	#if !(DRAW_DEBUG_UNK_SPRITE)
805		UINT8 priority = ((supracan_vram[i+2] >> 12) & 7) + 1;
	821	UINT8 priority = ((supracan_vram[i+0] >> 13) & 7) + 1;
806	822	#endif
807		while(x > 0x200)
808		{
809		x -= 0x200;
810		}
811	823
812		while(y > 0x200)
813		{
814		y -= 0x200;
815		}
	824	while(x >= 0x200) x -= 0x200;
	825	while(y >= 0x200) y -= 0x200;
816	826
817	827	if(supracan_vram[i+3] != 0)
818	828	{
819	829	int xsize = 1 << (supracan_vram[i+1] & 7);
	830	//int ysize = ((supracan_vram[i+0] & 0x0700) >> 9) + 1;
	831	//ysize += 8 * ((supracan_vram[i+0] & 0x1800) >> 11);
820	832	int ysize = ((supracan_vram[i+0] & 0x1e00) >> 9) + 1;
821		//int ysize = (((supracan_vram[i+0] & 0x0600) >> 9) + 1) * (1 << ((supracan_vram[i+0] & 0x1800) >> 11));
822		//if(supracan_vram[i+2] & 0x2000) ysize = xsize;
823		//int ysize = ((supracan_vram[i+2] & 0x1e00) >> 9)+1;
824	833
	834	// Blit background into working space for final scale
	835	bitmap_t *sprite_bitmap = auto_bitmap_alloc(machine, xsize*8, ysize*8, BITMAP_FORMAT_INDEXED16);
	836	for(int sy = 0; sy < ysize*8; sy++)
	837	{
	838	UINT16 *src = BITMAP_ADDR16(bitmap, y + sy, 0);
	839	UINT16 *dst = BITMAP_ADDR16(sprite_bitmap, sy, 0);
	840	for(int sx = 0; sx < xsize*8; sx++)
	841	{
	842	dst[sx] = src[x + sx];
	843	}
	844	}
	845
825	846	if(vflip)
826	847	{
827	848	for(int ytile = (ysize - 1); ytile >= 0; ytile--)
r9072	r9073
837	858	int palette = (data & 0xf000) >> 12;
838	859
839	860	#if !(DRAW_DEBUG_UNK_SPRITE)
840		draw_tile(machine, state->sprite_pri, bitmap, cliprect, tile, palette, xflip, yflip, x+xtile*8, y+ytile*8, priority, region, mask);
	861	draw_tile(machine, state->sprite_pri, /*bitmap*/sprite_bitmap, cliprect, tile, palette, xflip, yflip, ((xsize - 1) - xtile)*8, ((ysize - 1) - ytile)*8, priority, region, mask, x, y, 0x200, 0x200);
841	862	#else
842		tile = 0;
843		xflip = false;
844		yflip = false;
845		palette = 0;
846		for(int ypix = 0; ypix < 8; ypix++)
847		{
848		for(int xpix = 0; xpix < 8; xpix++)
849		{
850		if((y + ytile*8 + ypix) < 240 &&
851		(y + ytile*8 + ypix) >= 0 &&
852		(x + xtile*8 + xpix) < 320 &&
853		(x + xtile*8 + xpix) >= 0)
854		{
855		*BITMAP_ADDR16(bitmap, y + ytile*8 + ypix, x + xtile*8 + xpix) = supracan_vram[i+2] >> 9;
856		}
857		}
858		}
	863	DRAW_DEBUG_SPRITE_PRI()
859	864	#endif
860	865	}
861	866	}
r9072	r9073
870	875	int palette = (data & 0xf000) >> 12;
871	876
872	877	#if !(DRAW_DEBUG_UNK_SPRITE)
873		draw_tile(machine, state->sprite_pri, bitmap, cliprect, tile, palette, xflip, yflip, x+xtile*8, y+((ysize - 1) - ytile)*8, priority, region, mask);
	878	draw_tile(machine, state->sprite_pri, /*bitmap*/sprite_bitmap, cliprect, tile, palette, xflip, yflip, xtile*8, ((ysize - 1) - ytile)*8, priority, region, mask, x, y, 0x200, 0x200);
874	879	#else
875		tile = 0;
876		xflip = false;
877		yflip = false;
878		palette = 0;
879		for(int ypix = 0; ypix < 8; ypix++)
880		{
881		for(int xpix = 0; xpix < 8; xpix++)
882		{
883		if((y + ytile*8 + ypix) < 240 &&
884		(y + ytile*8 + ypix) >= 0 &&
885		(x + xtile*8 + xpix) < 320 &&
886		(x + xtile*8 + xpix) >= 0)
887		{
888		*BITMAP_ADDR16(bitmap, y + ytile*8 + ypix, x + xtile*8 + xpix) = supracan_vram[i+2] >> 9;
889		}
890		}
891		}
	880	DRAW_DEBUG_SPRITE_PRI()
892	881	#endif
893	882	}
894	883	}
r9072	r9073
909	898	int palette = (data & 0xf000) >> 12;
910	899
911	900	#if !(DRAW_DEBUG_UNK_SPRITE)
912		draw_tile(machine, state->sprite_pri, bitmap, cliprect, tile, palette, xflip, yflip, x+((xsize - 1) - xtile)*8, y+ytile*8, priority, region, mask);
	901	draw_tile(machine, state->sprite_pri, /*bitmap*/sprite_bitmap, cliprect, tile, palette, xflip, yflip, ((xsize - 1) - xtile)*8, ytile*8, priority, region, mask, x, y, 0x200, 0x200);
913	902	#else
914		tile = 0;
915		xflip = false;
916		yflip = false;
917		palette = 0;
918		for(int ypix = 0; ypix < 8; ypix++)
919		{
920		for(int xpix = 0; xpix < 8; xpix++)
921		{
922		if((y + ytile*8 + ypix) < 240 &&
923		(y + ytile*8 + ypix) >= 0 &&
924		(x + xtile*8 + xpix) < 320 &&
925		(x + xtile*8 + xpix) >= 0)
926		{
927		*BITMAP_ADDR16(bitmap, y + ytile*8 + ypix, x + xtile*8 + xpix) = supracan_vram[i+2] >> 9;
928		}
929		}
930		}
	903	DRAW_DEBUG_SPRITE_PRI()
931	904	#endif
932	905	}
933	906	}
r9072	r9073
942	915	int palette = (data & 0xf000) >> 12;
943	916
944	917	#if !(DRAW_DEBUG_UNK_SPRITE)
945		draw_tile(machine, state->sprite_pri, bitmap, cliprect, tile, palette, xflip, yflip, x + xtile * 8, y + ytile * 8, priority, region, mask);
	918	draw_tile(machine, state->sprite_pri, /*bitmap*/sprite_bitmap, cliprect, tile, palette, xflip, yflip, xtile*8, ytile*8, priority, region, mask, x, y, 0x200, 0x200);
946	919	#else
947		tile = 0;
948		xflip = false;
949		yflip = false;
950		palette = 0;
951		for(int ypix = 0; ypix < 8; ypix++)
952		{
953		for(int xpix = 0; xpix < 8; xpix++)
954		{
955		if((y + ytile*8 + ypix) < 240 &&
956		(y + ytile*8 + ypix) >= 0 &&
957		(x + xtile*8 + xpix) < 320 &&
958		(x + xtile*8 + xpix) >= 0)
959		{
960		*BITMAP_ADDR16(bitmap, y + ytile*8 + ypix, x + xtile*8 + xpix) = supracan_vram[i+2] >> 9;
961		}
962		}
963		}
	920	DRAW_DEBUG_SPRITE_PRI()
964	921	#endif
965	922	}
966	923	}
967	924	}
968	925	}
	926
	927	if(xscale == 0) continue;
	928	UINT32 delta = (1 << 17) / xscale;
	929	for(int sy = 0; sy < ysize*8; sy++)
	930	{
	931	UINT16 *src = BITMAP_ADDR16(sprite_bitmap, sy, 0);
	932	UINT16 *dst = BITMAP_ADDR16(bitmap, y + sy, 0);
	933	UINT32 dx = x << 16;
	934	for(int sx = 0; sx < xsize*8; sx++)
	935	{
	936	dst[dx >> 16] = src[sx];
	937	dx += delta;
	938	}
	939	}
969	940	}
970	941	}
971	942	}
r9072	r9073
978	949
979	950	for(int y = 0; y < 240; y++)
980	951	{
981		float x = ((float)supracan_vram[state->roz_unk_base0 + y] / 1024.0f) * 256.0f;
982		*BITMAP_ADDR16(bitmap, y, (int)x) = 1;
	952	float x = ((float)supracan_vram[(state->roz_unk_base0 >> 1) + y] / 1024.0f) * 256.0f;
	953	*BITMAP_ADDR16(bitmap, y, (int)x) = 0x3fff;
983	954
984		INT32 temp = supracan_vram[state->roz_unk_base1 + y*2] << 16;
985		temp |= supracan_vram[state->roz_unk_base1 + y*2 + 1];
986		x = ((float)temp / 65536.0f) * 128.0f;
987		temp = supracan_vram[state->roz_unk_base2 + y*2] << 16;
988		temp |= supracan_vram[state->roz_unk_base2 + y*2 + 1];
989		float y = ((float)temp / 65536.0f) * 128.0f;
990		if(x >= -160 && x < 160 && y >= -112 && y < 112)
	955	INT32 temp = supracan_vram[(state->roz_unk_base1 >> 1) + y*2] << 16;
	956	temp |= supracan_vram[(state->roz_unk_base1 >> 1) + y*2 + 1];
	957	x = ((float)temp / 131072.0f) * 128.0f;
	958	if(x >= -160 && x < 160)
991	959	{
992		*BITMAP_ADDR16(bitmap, (int)y + 112, (int)x + 160) = 2;
	960	*BITMAP_ADDR16(bitmap, y, (int)x + 160) = 0x7fff;
993	961	}
	962	temp = supracan_vram[(state->roz_unk_base2 >> 1) + y*2] << 16;
	963	temp |= supracan_vram[(state->roz_unk_base2 >> 1) + y*2 + 1];
	964	x = ((float)temp / 131072.0f) * 128.0f;
	965	if(x >= -160 && x < 160)
	966	{
	967	*BITMAP_ADDR16(bitmap, y, (int)x + 160) = 0x5fff;
	968	}
994	969	}
995	970	}
996	971	#endif
997	972
998	973	static VIDEO_UPDATE( supracan )
999	974	{
1000		// crash debug: printf("K"); fflush(stdout);
1001	975	supracan_state *state = (supracan_state *)screen->machine->driver_data<supracan_state>();
1002	976
1003	977	bitmap_fill(bitmap, cliprect, 0);
1004	978
1005	979	bitmap_fill(state->sprite_final_bitmap, cliprect, 0);
1006		memset(state->sprite_pri, 8, 1024*1024 * sizeof(UINT8));
	980	memset(state->sprite_pri, 9, 1024*1024 * sizeof(UINT8));
1007	981
1008	982	// VIDEO FLAGS                  ROZ MODE            TILEMAP FLAGS
1009	983	//
r9072	r9073
1013	987	//    7: Tilemap 0 enable       11-8: Dims          11-8: Dims
1014	988	//    6: Tilemap 1 enable       7-6: Unknown        7-6: Unknown
1015	989	//    5: Tilemap 2 enable?      5: Wrap             5: Wrap
1016		//    3: Sprite enable          4-2: Unknown        4-2: Unknown
	990	//    3: Sprite enable          4-2: Unknown        4-2: Mosaic
1017	991	//    2: ROZ enable             1-0: Bit Depth      1-0: Bit Depth
1018	992	//  1-0: Unknown
1019	993
r9072	r9073
1040	1014
1041	1015	#if !(DEBUG_PRIORITY)
1042	1016	/* Harmony 7/27: THIS CODE IS KNOWN TO BE COMPLETELY WRONG.  DO NOT USE IT AS-IS IN A STANDALONE EMULATOR. */
1043		int pri_order[3] = { 0, 0, 0 };
1044		bitmap_t *bitmaps[3] = { state->tilemap_final_bitmap[0], state->tilemap_final_bitmap[1], state->tilemap_final_bitmap[2] };
	1017	int pri_order[5] = { 0, 0, 0, 0, 0 };
	1018	bitmap_t *bitmaps[5] = { state->tilemap_final_bitmap[0], state->tilemap_final_bitmap[1], state->tilemap_final_bitmap[2], state->roz_final_bitmap, state->sprite_final_bitmap };
1045	1019
1046	1020	pri_order[0] = state->tilemap_final_pri[0][y*320 + x];
1047	1021	pri_order[1] = state->tilemap_final_pri[1][y*320 + x];
1048	1022	pri_order[2] = state->tilemap_final_pri[2][y*320 + x];
	1023	pri_order[3] = state->roz_final_pri[y*320 + x];
	1024	pri_order[4] = 0;//HACK state->sprite_pri[y*1024 + x];
1049	1025
1050		int current_priority = 8;
1051		for(int index = 0; index < 3; index++)
	1026	int current_priority = 9;
	1027	for(int index = 0; index < 5; index++)
1052	1028	{
1053	1029	UINT16 pixel = *BITMAP_ADDR16(bitmaps[index], y, x) & 0x7fff;
1054	1030	if(pixel)
1055	1031	{
1056		if(pri_order[index] < current_priority )
	1032	if(pri_order[index] < current_priority && pri_order[index] != 9)
1057	1033	{
1058	1034	*BITMAP_ADDR16(bitmap, y, x) = pixel;
1059	1035	current_priority = pri_order[index];
1060	1036	}
1061	1037	}
1062	1038	}
1063
1064		UINT16 pixel = *BITMAP_ADDR16(state->roz_final_bitmap, y, x) & 0x7fff;
1065		if(pixel)
1066		{
1067		*BITMAP_ADDR16(bitmap, y, x) = pixel;
1068		}
1069
1070		pixel = *BITMAP_ADDR16(state->sprite_final_bitmap, y, x) & 0x7fff;
1071		if(pixel)
1072		{
1073		*BITMAP_ADDR16(bitmap, y, x) = pixel;
1074		}
1075	1039	#else
1076	1040	switch(0)
1077	1041	{
r9072	r9073
1102	1066
1103	1067	static WRITE16_HANDLER( supracan_dma_w )
1104	1068	{
1105		// crash debug: printf("L"); fflush(stdout);
1106	1069	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1107	1070	acan_dma_regs_t *acan_dma_regs = &state->acan_dma_regs;
1108	1071	int ch = (offset < 0x10/2) ? 0 : 1;
r9072	r9073
1145	1108	{
1146	1109	//              if(data & 0x2000)
1147	1110	//                  acan_dma_regs->source-=2;
1148		//verboselog("maincpu", space->machine, 0, "supracan_dma_w: Kicking off a DMA from %08x to %08x, %d bytes (%04x)\n", acan_dma_regs->source[ch], acan_dma_regs->dest[ch], acan_dma_regs->count[ch] + 1, data);
	1111	verboselog("maincpu", space->machine, 0, "supracan_dma_w: Kicking off a DMA from %08x to %08x, %d bytes (%04x)\n", acan_dma_regs->source[ch], acan_dma_regs->dest[ch], acan_dma_regs->count[ch] + 1, data);
1149	1112
1150	1113	for(int i = 0; i <= acan_dma_regs->count[ch]; i++)
1151	1114	{
r9072	r9073
1204	1167
1205	1168	static READ8_HANDLER( supracan_6502_soundmem_r )
1206	1169	{
1207		// crash debug: printf("M"); fflush(stdout);
1208	1170	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1209	1171	UINT8 data = state->soundram[offset];
1210	1172
r9072	r9073
1264	1226
1265	1227	static WRITE8_HANDLER( supracan_6502_soundmem_w )
1266	1228	{
1267		// crash debug: printf("N"); fflush(stdout);
1268	1229	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1269	1230
1270	1231	switch(offset)
r9072	r9073
1437	1398
1438	1399	static WRITE16_HANDLER( supracan_68k_soundram_w )
1439	1400	{
1440		// crash debug: printf("P"); fflush(stdout);
1441	1401	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1442	1402
1443	1403	state->soundram[offset*2 + 1] = data & 0xff;
r9072	r9073
1462	1422
1463	1423	static READ16_HANDLER( supracan_68k_soundram_r )
1464	1424	{
1465		// crash debug: printf("Q"); fflush(stdout);
1466	1425	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1467	1426
1468	1427	UINT16 val = state->soundram[offset*2 + 0] << 8;
r9072	r9073
1490	1449
1491	1450	static READ16_HANDLER( supracan_sound_r )
1492	1451	{
1493		// crash debug: printf("R"); fflush(stdout);
1494	1452	//supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1495	1453	UINT16 data = 0;
1496	1454
r9072	r9073
1506	1464
1507	1465	static WRITE16_HANDLER( supracan_sound_w )
1508	1466	{
1509		// crash debug: printf("S"); fflush(stdout);
1510	1467	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1511	1468
1512	1469	switch ( offset )
1513	1470	{
	1471	case 0x000a/2:  /* Sound cpu IRQ request. */
	1472	cpu_set_input_line(space->machine->device("soundcpu"), 0, ASSERT_LINE);
	1473	break;
1514	1474	case 0x001c/2:   /* Sound cpu control. Bit 0 tied to sound cpu RESET line */
1515	1475	if(data & 0x01)
1516	1476	{
r9072	r9073
1519	1479	/* Reset and enable the sound cpu */
1520	1480	#if !(SOUNDCPU_BOOT_HACK)
1521	1481	cputag_set_input_line(space->machine, "soundcpu", INPUT_LINE_HALT, CLEAR_LINE);
1522		devtag_get_device(space->machine, "soundcpu")->reset();
	1482	space->machine->device("soundcpu")->reset();
1523	1483	#endif
1524	1484	}
1525	1485	state->m6502_reset = data & 0x01;
r9072	r9073
1540	1500
1541	1501	static READ16_HANDLER( supracan_video_r )
1542	1502	{
1543		// crash debug: printf("T"); fflush(stdout);
1544	1503	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1545	1504	UINT16 data = state->video_regs[offset];
1546	1505
r9072	r9073
1577	1536
1578	1537	static TIMER_CALLBACK( supracan_hbl_callback )
1579	1538	{
1580		// crash debug: printf("U"); fflush(stdout);
1581	1539	supracan_state *state = machine->driver_data<supracan_state>();
1582	1540
1583	1541	timer_adjust_oneshot(state->hbl_timer, attotime_never, 0);
r9072	r9073
1603	1561
1604	1562	static TIMER_CALLBACK( supracan_video_callback )
1605	1563	{
1606		// crash debug: printf("V"); fflush(stdout);
1607	1564	supracan_state *state = machine->driver_data<supracan_state>();
1608	1565	int vpos = machine->primary_screen->vpos();
1609	1566
r9072	r9073
1636	1593	bitmap_fill(state->tilemap_final_bitmap[0], NULL, 0);
1637	1594	bitmap_fill(state->tilemap_final_bitmap[1], NULL, 0);
1638	1595	bitmap_fill(state->tilemap_final_bitmap[2], NULL, 0);
1639		//memset(state->roz_pri, 8, 1024*1024 * sizeof(UINT8) );
1640		//memset(state->tilemap_pri[0], 8, 1024*1024 * sizeof(UINT8));
1641		//memset(state->tilemap_pri[1], 8, 1024*1024 * sizeof(UINT8));
1642		//memset(state->tilemap_pri[2], 8, 1024*1024 * sizeof(UINT8));
1643		//memset(state->tilemap_final_pri[0], 8, 320*240 * sizeof(UINT8));
1644		//memset(state->tilemap_final_pri[1], 8, 320*240 * sizeof(UINT8));
1645		//memset(state->tilemap_final_pri[2], 8, 320*240 * sizeof(UINT8));
	1596	memset(state->roz_pri, 9, 1024*1024 * sizeof(UINT8) );
	1597	memset(state->tilemap_pri[0], 9, 1024*1024 * sizeof(UINT8));
	1598	memset(state->tilemap_pri[1], 9, 1024*1024 * sizeof(UINT8));
	1599	memset(state->tilemap_pri[2], 9, 1024*1024 * sizeof(UINT8));
	1600	memset(state->tilemap_final_pri[0], 9, 320*240 * sizeof(UINT8));
	1601	memset(state->tilemap_final_pri[1], 9, 320*240 * sizeof(UINT8));
	1602	memset(state->tilemap_final_pri[2], 9, 320*240 * sizeof(UINT8));
1646	1603	if(state->video_flags & 4)
1647	1604	{
1648	1605	draw_roz(machine, &machine->primary_screen->visible_area());
r9072	r9073
1655	1612
1656	1613	if(state->video_flags & 0x40)
1657	1614	{
1658		draw_tilemap(machine, state->tilemap_bitmap[1], &machine->primary_screen->visible_area(), 1);
	1615	draw_tilemap(machine, state->tilemap_bitmap[1], &machine->primary_screen->visible_area(), 1);
1659	1616	}
1660	1617
1661	1618	if(state->video_flags & 0x20)
r9072	r9073
1696	1653
1697	1654	static WRITE16_HANDLER( supracan_video_w )
1698	1655	{
1699		// crash debug: printf("W"); fflush(stdout);
1700	1656	supracan_state *state = (supracan_state *)space->machine->driver_data<supracan_state>();
1701	1657	acan_sprdma_regs_t *acan_sprdma_regs = &state->acan_sprdma_regs;
1702	1658	int i;
r9072	r9073
1841	1797
1842	1798	/* ROZ */
1843	1799	case 0x180/2: state->roz_mode = data; verboselog("maincpu", space->machine, 3, "roz_mode = %04x\n", data); break;
1844		case 0x184/2: state->roz_scrollx = (data << 16) | (state->roz_scrollx & 0xffff); state->roz_changed |= 1; break;
1845		case 0x186/2: state->roz_scrollx = (data) | (state->roz_scrollx & 0xffff0000); state->roz_changed |= 1; break;
1846		case 0x188/2: state->roz_scrolly = (data << 16) | (state->roz_scrolly & 0xffff); state->roz_changed |= 2; break;
1847		case 0x18a/2: state->roz_scrolly = (data) | (state->roz_scrolly & 0xffff0000); state->roz_changed |= 2; break;
1848		case 0x18c/2: state->roz_coeffa = data; break;
1849		case 0x18e/2: state->roz_coeffb = data; break;
1850		case 0x190/2: state->roz_coeffc = data; break;
1851		case 0x192/2: state->roz_coeffd = data; break;
	1800	case 0x184/2: state->roz_scrollx = (data << 16) | (state->roz_scrollx & 0xffff); state->roz_changed |= 1; verboselog("maincpu", space->machine, 3, "roz_scrollx = %08x\n", state->roz_scrollx); break;
	1801	case 0x186/2: state->roz_scrollx = (data) | (state->roz_scrollx & 0xffff0000); state->roz_changed |= 1; verboselog("maincpu", space->machine, 3, "roz_scrollx = %08x\n", state->roz_scrollx); break;
	1802	case 0x188/2: state->roz_scrolly = (data << 16) | (state->roz_scrolly & 0xffff); state->roz_changed |= 2; verboselog("maincpu", space->machine, 3, "roz_scrolly = %08x\n", state->roz_scrolly); break;
	1803	case 0x18a/2: state->roz_scrolly = (data) | (state->roz_scrolly & 0xffff0000); state->roz_changed |= 2; verboselog("maincpu", space->machine, 3, "roz_scrolly = %08x\n", state->roz_scrolly); break;
	1804	case 0x18c/2: state->roz_coeffa = data; verboselog("maincpu", space->machine, 3, "roz_coeffa = %04x\n", data); break;
	1805	case 0x18e/2: state->roz_coeffb = data; verboselog("maincpu", space->machine, 3, "roz_coeffb = %04x\n", data); break;
	1806	case 0x190/2: state->roz_coeffc = data; verboselog("maincpu", space->machine, 3, "roz_coeffc = %04x\n", data); break;
	1807	case 0x192/2: state->roz_coeffd = data; verboselog("maincpu", space->machine, 3, "roz_coeffd = %04x\n", data); break;
1852	1808	case 0x194/2: state->roz_base_addr = (data) << 1; verboselog("maincpu", space->machine, 3, "roz_base_addr = %05x\n", data << 2); break;
1853	1809	case 0x196/2: state->roz_tile_bank = data; verboselog("maincpu", space->machine, 3, "roz_tile_bank = %04x\n", data); break; //tile bank
1854		case 0x198/2: state->roz_unk_base0 = data << 1; verboselog("maincpu", space->machine, 3, "roz_unk_base0 = %05x\n", data << 2); break;
1855		case 0x19a/2: state->roz_unk_base1 = data << 1; verboselog("maincpu", space->machine, 3, "roz_unk_base1 = %05x\n", data << 2); break;
1856		case 0x19e/2: state->roz_unk_base2 = data << 1; verboselog("maincpu", space->machine, 3, "roz_unk_base2 = %05x\n", data << 2); break;
	1810	case 0x198/2: state->roz_unk_base0 = data << 2; verboselog("maincpu", space->machine, 3, "roz_unk_base0 = %05x\n", data << 2); break;
	1811	case 0x19a/2: state->roz_unk_base1 = data << 2; verboselog("maincpu", space->machine, 3, "roz_unk_base1 = %05x\n", data << 2); break;
	1812	case 0x19e/2: state->roz_unk_base2 = data << 2; verboselog("maincpu", space->machine, 3, "roz_unk_base2 = %05x\n", data << 2); break;
1857	1813
1858		//case 0x1d0/2: state->bg_color = data & 0x00ff; verboselog("maincpu", space->machine, 3, "bg_color = %04x\n", data); break;
	1814	case 0x1d0/2: state->unk_1d0 = data; verboselog("maincpu", space->machine, 3, "unk_1d0 = %04x\n", data); break;
1859	1815
1860	1816	case 0x1f0/2: //FIXME: this register is mostly not understood
1861	1817	state->irq_mask = data;//(data & 8) ? 0 : 1;
r9072	r9073
1877	1833
1878	1834	static DEVICE_IMAGE_LOAD( supracan_cart )
1879	1835	{
1880		// crash debug: printf("X"); fflush(stdout);
1881	1836	UINT8 *cart = memory_region(image.device().machine, "cart");
1882	1837	UINT32 size;
1883	1838
r9072	r9073
1909	1864
1910	1865	static MACHINE_START( supracan )
1911	1866	{
1912		// crash debug: printf("Y"); fflush(stdout);
1913	1867	supracan_state *state = machine->driver_data<supracan_state>();
1914	1868
1915	1869	state->video_timer = timer_alloc( machine, supracan_video_callback, NULL );
r9072	r9073
1921	1875
1922	1876	static MACHINE_RESET( supracan )
1923	1877	{
1924		// crash debug: printf("Z"); fflush(stdout);
1925	1878	supracan_state *state = machine->driver_data<supracan_state>();
1926	1879
1927	1880	cputag_set_input_line(machine, "soundcpu", INPUT_LINE_HALT, ASSERT_LINE);
r9072	r9073
1988	1941	{
1989	1942	supracan_state *state = (supracan_state *)device->machine->driver_data<supracan_state>();
1990	1943
1991		cpu_set_input_line(device, 0, HOLD_LINE);
1992	1944	state->sound_irq_source_reg |= 0x80;
	1945
	1946	if(state->sound_irq_enable_reg & state->sound_irq_source_reg)
	1947	{
	1948	cpu_set_input_line(device->machine->device("soundcpu"), 0, ASSERT_LINE);
	1949	}
	1950	else
	1951	{
	1952	cpu_set_input_line(device->machine->device("soundcpu"), 0, CLEAR_LINE);
	1953	}
1993	1954	}
1994	1955
1995	1956	static MACHINE_CONFIG_START( supracan, supracan_state )

Previous

15994 Revisions

Next

---

© 1998-2018 The MESS Team