mirror of
https://github.com/RaySollium99/picodrive.git
synced 2025-09-05 07:17:45 -04:00
32x: packed pixel mode (works over 68k)
git-svn-id: file:///home/notaz/opt/svn/PicoDrive@773 be3aeb3a-fb24-0410-a615-afba39da0efa
This commit is contained in:
notaz
parent
be2c420828
commit
974fdb5bfd
15 changed files with 330 additions and 91 deletions
|
|
@ -1,4 +1,5 @@
|
|||
#include "../pico_int.h"
|
||||
#include "../sound/ym2612.h"
|
||||
|
||||
struct Pico32x Pico32x;
|
||||
|
||||
|
|
@ -9,23 +10,68 @@ void Pico32xStartup(void)
|
|||
PicoAHW |= PAHW_32X;
|
||||
PicoMemSetup32x();
|
||||
|
||||
// probably should only done on power
|
||||
// memset(&Pico32x, 0, sizeof(Pico32x));
|
||||
|
||||
if (!Pico.m.pal)
|
||||
Pico32x.vdp_regs[0] |= 0x8000;
|
||||
Pico32x.vdp_regs[0] |= P32XV_nPAL;
|
||||
|
||||
// prefill checksum
|
||||
Pico32x.regs[0x28/2] = *(unsigned short *)(Pico.rom + 0x18e);
|
||||
emu_32x_startup();
|
||||
}
|
||||
|
||||
void Pico32xInit(void)
|
||||
{
|
||||
// XXX: mv
|
||||
Pico32x.regs[0] = 0x0082;
|
||||
}
|
||||
|
||||
void PicoPower32x(void)
|
||||
{
|
||||
memset(&Pico32x, 0, sizeof(Pico32x));
|
||||
Pico32x.regs[0] = 0x0082; // SH2 reset?
|
||||
Pico32x.vdp_regs[0x0a/2] = P32XV_VBLK|P32XV_HBLK|P32XV_PEN;
|
||||
}
|
||||
|
||||
void PicoReset32x(void)
|
||||
{
|
||||
}
|
||||
|
||||
static void p32x_start_blank(void)
|
||||
{
|
||||
// enter vblank
|
||||
Pico32x.vdp_regs[0x0a/2] |= P32XV_VBLK|P32XV_PEN;
|
||||
|
||||
// swap waits until vblank
|
||||
if ((Pico32x.vdp_regs[0x0a/2] ^ Pico32x.pending_fb) & P32XV_FS) {
|
||||
Pico32x.vdp_regs[0x0a/2] &= ~P32XV_FS;
|
||||
Pico32x.vdp_regs[0x0a/2] |= Pico32x.pending_fb;
|
||||
Pico32xSwapDRAM(Pico32x.pending_fb ^ 1);
|
||||
}
|
||||
}
|
||||
|
||||
// FIXME..
|
||||
static __inline void SekRunM68k(int cyc)
|
||||
{
|
||||
int cyc_do;
|
||||
SekCycleAim+=cyc;
|
||||
if ((cyc_do=SekCycleAim-SekCycleCnt) <= 0) return;
|
||||
#if defined(EMU_CORE_DEBUG)
|
||||
// this means we do run-compare
|
||||
SekCycleCnt+=CM_compareRun(cyc_do, 0);
|
||||
#elif defined(EMU_C68K)
|
||||
PicoCpuCM68k.cycles=cyc_do;
|
||||
CycloneRun(&PicoCpuCM68k);
|
||||
SekCycleCnt+=cyc_do-PicoCpuCM68k.cycles;
|
||||
#elif defined(EMU_M68K)
|
||||
SekCycleCnt+=m68k_execute(cyc_do);
|
||||
#elif defined(EMU_F68K)
|
||||
SekCycleCnt+=fm68k_emulate(cyc_do+1, 0, 0);
|
||||
#endif
|
||||
}
|
||||
|
||||
#define PICO_32X
|
||||
#include "../pico_cmn.c"
|
||||
|
||||
void PicoFrame32x(void)
|
||||
{
|
||||
if ((Pico32x.vdp_regs[0] & 3 ) != 0) // no forced blanking
|
||||
Pico32x.vdp_regs[0x0a/2] &= ~(P32XV_VBLK|P32XV_PEN); // get out of vblank
|
||||
|
||||
PicoFrameStart();
|
||||
PicoFrameHints();
|
||||
}
|
||||
|
|
|
|||
58
pico/32x/draw.c
Normal file
58
pico/32x/draw.c
Normal file
|
|
@ -0,0 +1,58 @@
|
|||
#include "../pico_int.h"
|
||||
|
||||
static void convert_pal555(void)
|
||||
{
|
||||
unsigned int *ps = (void *)Pico32xMem->pal;
|
||||
unsigned int *pd = (void *)Pico32xMem->pal_native;
|
||||
unsigned int m1 = 0x001f001f;
|
||||
unsigned int m2 = 0x03e003e0;
|
||||
unsigned int m3 = 0xfc00fc00;
|
||||
int i;
|
||||
|
||||
// place prio to LS green bit
|
||||
for (i = 0x100/2; i > 0; i--, ps++, pd++) {
|
||||
unsigned int t = *ps;
|
||||
*pd = ((t & m1) << 11) | ((t & m2) << 1) | ((t & m3) >> 10);
|
||||
}
|
||||
|
||||
Pico32x.dirty_pal = 0;
|
||||
}
|
||||
|
||||
void FinalizeLine32xRGB555(int sh, int line)
|
||||
{
|
||||
unsigned short *pd = DrawLineDest;
|
||||
unsigned short *pal = Pico32xMem->pal_native;
|
||||
unsigned char *pb = HighCol + 8;
|
||||
unsigned short cram0;
|
||||
|
||||
// this is a bit hackish:
|
||||
// we swap cram color 0 with color that is used for background,
|
||||
// as bg is forced to 0 when we do 32X
|
||||
cram0 = Pico.cram[0];
|
||||
Pico.cram[0] = Pico.cram[Pico.video.reg[7] & 0x3f];
|
||||
|
||||
FinalizeLineRGB555(sh, line);
|
||||
Pico.cram[0] = cram0;
|
||||
|
||||
if ((Pico32x.vdp_regs[0] & 3) == 0)
|
||||
return; // blanking
|
||||
|
||||
if (Pico32x.dirty_pal)
|
||||
convert_pal555();
|
||||
|
||||
if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 1) {
|
||||
unsigned short *dram = (void *)Pico32xMem->dram[Pico32x.vdp_regs[0x0a/2] & P32XV_FS];
|
||||
unsigned short *ps = dram + dram[line];
|
||||
unsigned short t;
|
||||
int i;
|
||||
for (i = 320/2; i > 0; i--, ps++, pd += 2, pb += 2) {
|
||||
t = pal[*ps >> 8];
|
||||
if (pb[0] == 0 || (t & 0x20))
|
||||
pd[0] = t;
|
||||
t = pal[*ps & 0xff];
|
||||
if (pb[1] == 0 || (t & 0x20))
|
||||
pd[1] = t;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
|
@ -3,18 +3,33 @@
|
|||
|
||||
static const char str_mars[] = "MARS";
|
||||
|
||||
struct Pico32xMem {
|
||||
u8 sdram[0x40000];
|
||||
u8 dram[0x40000]; // AKA fb
|
||||
u8 m68k_rom[M68K_BANK_SIZE]; // 0x100
|
||||
};
|
||||
struct Pico32xMem *Pico32xMem;
|
||||
|
||||
static struct Pico32xMem *Pico32xMem;
|
||||
// SH2 faking
|
||||
static const u16 comm_fakevals[] = {
|
||||
0x4d5f, 0x4f4b, // M_OK
|
||||
0x535f, 0x4f4b, // S_OK
|
||||
0x0002, // Mortal Kombat
|
||||
0, // pad
|
||||
};
|
||||
|
||||
static u32 p32x_reg_read16(u32 a)
|
||||
{
|
||||
a &= 0x3e;
|
||||
|
||||
// SH2 faker
|
||||
if ((a & 0x30) == 0x20)
|
||||
{
|
||||
static int f = 0, csum_faked = 0;
|
||||
if (a == 0x28 && !csum_faked) {
|
||||
csum_faked = 1;
|
||||
return *(unsigned short *)(Pico.rom + 0x18e);
|
||||
}
|
||||
if (f >= sizeof(comm_fakevals) / sizeof(comm_fakevals[0]))
|
||||
f = 0;
|
||||
return comm_fakevals[f++];
|
||||
}
|
||||
|
||||
return Pico32x.regs[a / 2];
|
||||
}
|
||||
|
||||
|
|
@ -48,34 +63,37 @@ static u32 p32x_vdp_read16(u32 a)
|
|||
return Pico32x.vdp_regs[a / 2];
|
||||
}
|
||||
|
||||
static void p32x_vdp_write16(u32 a, u32 d)
|
||||
static void p32x_vdp_write8(u32 a, u32 d)
|
||||
{
|
||||
a &= 0x0e;
|
||||
u16 *r = Pico32x.vdp_regs;
|
||||
a &= 0x0f;
|
||||
|
||||
// TODO: verify what's writeable
|
||||
switch (a) {
|
||||
case 0x0a:
|
||||
Pico32x.pending_fb = d & 1;
|
||||
if (Pico.video.status & 8) {
|
||||
Pico32x.vdp_regs[0x0a/2] &= ~1;
|
||||
Pico32x.vdp_regs[0x0a/2] |= d & 1;
|
||||
case 0x01:
|
||||
if (((r[0] & 3) == 0) != ((d & 3) == 0)) { // forced blanking changed
|
||||
if (Pico.video.status & 8)
|
||||
r[0x0a/2] |= P32XV_VBLK;
|
||||
else
|
||||
r[0x0a/2] &= ~P32XV_VBLK;
|
||||
}
|
||||
r[0] = (r[0] & P32XV_nPAL) | (d & 0xff);
|
||||
break;
|
||||
case 0x0b:
|
||||
d &= 1;
|
||||
Pico32x.pending_fb = d;
|
||||
// if we are blanking and FS bit is changing
|
||||
if ((r[0x0a/2] & P32XV_VBLK) && ((r[0x0a/2] ^ d) & P32XV_FS)) {
|
||||
r[0x0a/2] ^= 1;
|
||||
Pico32xSwapDRAM(d ^ 1);
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
static void p32x_vdp_write8(u32 a, u32 d)
|
||||
static void p32x_vdp_write16(u32 a, u32 d)
|
||||
{
|
||||
a &= 0x0f;
|
||||
|
||||
switch (a) {
|
||||
case 0x0b:
|
||||
Pico32x.pending_fb = d & 1;
|
||||
if (Pico.video.status & 8) {
|
||||
Pico32x.vdp_regs[0x0a/2] &= ~1;
|
||||
Pico32x.vdp_regs[0x0a/2] |= d & 1;
|
||||
}
|
||||
break;
|
||||
}
|
||||
p32x_vdp_write8(a | 1, d);
|
||||
}
|
||||
|
||||
// default 32x handlers
|
||||
|
|
@ -87,11 +105,20 @@ u32 PicoRead8_32x(u32 a)
|
|||
goto out_16to8;
|
||||
}
|
||||
|
||||
if ((a & 0xfff0) == 0x5180 && (Pico32x.regs[0] & 1)) {
|
||||
if (!(Pico32x.regs[0] & 1))
|
||||
goto no_vdp;
|
||||
|
||||
if ((a & 0xfff0) == 0x5180) { // a15180
|
||||
d = p32x_vdp_read16(a);
|
||||
goto out_16to8;
|
||||
}
|
||||
|
||||
if ((a & 0xfe00) == 0x5200) { // a15200
|
||||
d = Pico32xMem->pal[(a & 0x1ff) / 2];
|
||||
goto out_16to8;
|
||||
}
|
||||
|
||||
no_vdp:
|
||||
if ((a & 0xfffc) == 0x30ec) { // a130ec
|
||||
d = str_mars[a & 3];
|
||||
goto out;
|
||||
|
|
@ -119,11 +146,20 @@ u32 PicoRead16_32x(u32 a)
|
|||
goto out;
|
||||
}
|
||||
|
||||
if ((a & 0xfff0) == 0x5180 && (Pico32x.regs[0] & 1)) { // a15180
|
||||
if (!(Pico32x.regs[0] & 1))
|
||||
goto no_vdp;
|
||||
|
||||
if ((a & 0xfff0) == 0x5180) { // a15180
|
||||
d = p32x_vdp_read16(a);
|
||||
goto out;
|
||||
}
|
||||
|
||||
if ((a & 0xfe00) == 0x5200) { // a15200
|
||||
d = Pico32xMem->pal[(a & 0x1ff) / 2];
|
||||
goto out;
|
||||
}
|
||||
|
||||
no_vdp:
|
||||
if ((a & 0xfffc) == 0x30ec) { // a130ec
|
||||
d = !(a & 2) ? ('M'<<8)|'A' : ('R'<<8)|'S';
|
||||
goto out;
|
||||
|
|
@ -147,11 +183,23 @@ void PicoWrite8_32x(u32 a, u32 d)
|
|||
return;
|
||||
}
|
||||
|
||||
if ((a & 0xfff0) == 0x5180 && (Pico32x.regs[0] & 1)) { // a15180
|
||||
if (!(Pico32x.regs[0] & 1))
|
||||
goto no_vdp;
|
||||
|
||||
if ((a & 0xfff0) == 0x5180) { // a15180
|
||||
p32x_vdp_write8(a, d);
|
||||
return;
|
||||
}
|
||||
|
||||
// TODO: verify
|
||||
if ((a & 0xfe00) == 0x5200) { // a15200
|
||||
elprintf(EL_32X|EL_ANOMALY, "m68k 32x PAL w8 [%06x] %02x @%06x", a, d & 0xff, SekPc);
|
||||
((u8 *)Pico32xMem->pal)[(a & 0x1ff) ^ 1] = d;
|
||||
Pico32x.dirty_pal = 1;
|
||||
return;
|
||||
}
|
||||
|
||||
no_vdp:
|
||||
elprintf(EL_UIO, "m68k unmapped w8 [%06x] %02x @%06x", a, d & 0xff, SekPc);
|
||||
}
|
||||
|
||||
|
|
@ -165,11 +213,21 @@ void PicoWrite16_32x(u32 a, u32 d)
|
|||
return;
|
||||
}
|
||||
|
||||
if ((a & 0xfff0) == 0x5180 && (Pico32x.regs[0] & 1)) { // a15180
|
||||
if (!(Pico32x.regs[0] & 1))
|
||||
goto no_vdp;
|
||||
|
||||
if ((a & 0xfff0) == 0x5180) { // a15180
|
||||
p32x_vdp_write16(a, d);
|
||||
return;
|
||||
}
|
||||
|
||||
if ((a & 0xfe00) == 0x5200) { // a15200
|
||||
Pico32xMem->pal[(a & 0x1ff) / 2] = d;
|
||||
Pico32x.dirty_pal = 1;
|
||||
return;
|
||||
}
|
||||
|
||||
no_vdp:
|
||||
elprintf(EL_UIO, "m68k unmapped w16 [%06x] %04x @%06x", a, d & 0xffff, SekPc);
|
||||
}
|
||||
|
||||
|
|
@ -194,6 +252,14 @@ static void PicoWrite16_hint(u32 a, u32 d)
|
|||
elprintf(EL_UIO, "m68k unmapped w16 [%06x] %04x @%06x", a, d & 0xffff, SekPc);
|
||||
}
|
||||
|
||||
void Pico32xSwapDRAM(int b)
|
||||
{
|
||||
cpu68k_map_set(m68k_read8_map, 0x840000, 0x85ffff, Pico32xMem->dram[b], 0);
|
||||
cpu68k_map_set(m68k_read16_map, 0x840000, 0x85ffff, Pico32xMem->dram[b], 0);
|
||||
cpu68k_map_set(m68k_write8_map, 0x840000, 0x85ffff, Pico32xMem->dram[b], 0);
|
||||
cpu68k_map_set(m68k_write16_map, 0x840000, 0x85ffff, Pico32xMem->dram[b], 0);
|
||||
}
|
||||
|
||||
#define HWSWAP(x) (((x) << 16) | ((x) >> 16))
|
||||
void PicoMemSetup32x(void)
|
||||
{
|
||||
|
|
@ -212,7 +278,7 @@ void PicoMemSetup32x(void)
|
|||
ps = (unsigned short *)Pico32xMem->m68k_rom;
|
||||
pl = (unsigned int *)Pico32xMem->m68k_rom;
|
||||
for (i = 1; i < 0xc0/4; i++)
|
||||
pl[i] = HWSWAP(0x880200 + i * 6);
|
||||
pl[i] = HWSWAP(0x880200 + (i - 1) * 6);
|
||||
|
||||
// fill with nops
|
||||
for (i = 0xc0/2; i < 0x100/2; i++)
|
||||
|
|
@ -223,7 +289,7 @@ void PicoMemSetup32x(void)
|
|||
ps[0xfe/2] = 0x60fe; // jump to self
|
||||
|
||||
// fill remaining mem with ROM
|
||||
memcpy(Pico32xMem->m68k_rom + 0x100, Pico.rom + 0x100, M68K_BANK_SIZE - 0x100);
|
||||
memcpy(Pico32xMem->m68k_rom + 0x100, Pico.rom + 0x100, sizeof(Pico32xMem->m68k_rom) - 0x100);
|
||||
|
||||
// cartridge area becomes unmapped
|
||||
// XXX: we take the easy way and don't unmap ROM,
|
||||
|
|
@ -231,10 +297,14 @@ void PicoMemSetup32x(void)
|
|||
// m68k_map_unmap(0x000000, 0x3fffff);
|
||||
|
||||
// MD ROM area
|
||||
cpu68k_map_set(m68k_read8_map, 0x000000, M68K_BANK_SIZE - 1, Pico32xMem->m68k_rom, 0);
|
||||
cpu68k_map_set(m68k_read16_map, 0x000000, M68K_BANK_SIZE - 1, Pico32xMem->m68k_rom, 0);
|
||||
cpu68k_map_set(m68k_write8_map, 0x000000, M68K_BANK_SIZE - 1, PicoWrite8_hint, 1); // TODO verify
|
||||
cpu68k_map_set(m68k_write16_map, 0x000000, M68K_BANK_SIZE - 1, PicoWrite16_hint, 1);
|
||||
rs = sizeof(Pico32xMem->m68k_rom);
|
||||
cpu68k_map_set(m68k_read8_map, 0x000000, rs - 1, Pico32xMem->m68k_rom, 0);
|
||||
cpu68k_map_set(m68k_read16_map, 0x000000, rs - 1, Pico32xMem->m68k_rom, 0);
|
||||
cpu68k_map_set(m68k_write8_map, 0x000000, rs - 1, PicoWrite8_hint, 1); // TODO verify
|
||||
cpu68k_map_set(m68k_write16_map, 0x000000, rs - 1, PicoWrite16_hint, 1);
|
||||
|
||||
// DRAM area
|
||||
Pico32xSwapDRAM(1);
|
||||
|
||||
// 32X ROM (unbanked, XXX: consider mirroring?)
|
||||
rs1 = rs = (Pico.romsize + M68K_BANK_MASK) & ~M68K_BANK_MASK;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue