Project

General

Profile

« Previous | Next » 

Revision 251

Added by markw almost 11 years ago

Better cartridge support for 5200

View differences:

firmware/5200/joystick.c
kbcode = 0x0;
}
*atari_consol = 4;
*atari_potgo = 0xff;
wait_us(1000000/50);
unsigned char pot0 = *atari_pot0;
unsigned char pot1 = *atari_pot1;
status->y_ = (0x8==(kbcode&0x18)) -((unsigned int)(0x18==(kbcode&0x18)));
status->x_ = (0x2==(kbcode&0x6)) -((unsigned int)(0x6==(kbcode&0x6)));
// Not sure why, but reading these is not working here - what am I doing wrong?
/*if (pot0>170) status->x_ =1;
if (pot0<60) status->x_ =-1;
if (pot1>170) status->y_ =1;
if (pot1<60) status->y_ =-1;*/
//status->fire_ = !(1&*atari_trig0);
status->fire_ = kbcode==0x14;
firmware/5200/mainmenu.c
void mainmenu()
{
memset8(SRAM_BASE+0x4000, 0, 32768);
memset32(SDRAM_BASE+0x4000, 0, 32768/4);
if (SimpleFile_OK == dir_init((void *)DIR_INIT_MEM, DIR_INIT_MEMSIZE))
{
struct SimpleDirEntry * entries = dir_entries(ROM_DIR);
if (SimpleFile_OK == file_open_name_in_dir(entries, "5200.rom", files[5]))
{
loadosrom();
}
loadrom_indir(entries,"acid5200.rom",0x8000,0x004000); // XXX - just for 5200 test... remove later
}
else
{
......
return "16K";
}
void load_cartridge(int type)
{
switch(type)
{
case 4: //32k
loadromfile(files[4],0x8000,0x004000);
break;
case 6: // 16k two chip
{
unsigned char * src = (unsigned char *)(0x4000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x6000 + SDRAM_BASE);
unsigned char * src2 = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest2 = (unsigned char *)(0xa000+ SDRAM_BASE);
int i = 0;
//*atari_colbk = 0x68;
//wait_us(5000000);
loadromfile(files[4],0x2000,0x004000);
loadromfile(files[4],0x2000,0x008000);
for (i=0; i!=0x2000; ++i)
{
dest1[i] = src[i];
dest2[i] = src2[i];
}
}
break;
case 16: // 16k one chip
{
loadromfile(files[4],0x4000,0x008000);
unsigned char * src = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x4000 + SDRAM_BASE);
int i = 0;
for (i=0; i!=0x4000; ++i)
{
dest1[i] = src[i];
}
}
break;
case 19: // 8k
{
//*atari_colbk = 0x58;
//wait_us(4000000);
loadromfile(files[4],0x2000,0x004000);
unsigned char * src = (unsigned char *)(0x4000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x6000 + SDRAM_BASE);
unsigned char * dest2 = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest3 = (unsigned char *)(0xa000 + SDRAM_BASE);
int i = 0;
for (i=0; i!=0x2000; ++i)
{
dest1[i] = src[i];
dest2[i] = src[i];
dest3[i] = src[i];
}
}
break;
case 20: // 4k
{
//*atari_colbk = 0x58;
//wait_us(4000000);
loadromfile(files[4],0x1000,0x004000);
unsigned char * src = (unsigned char *)(0x4000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x5000 + SDRAM_BASE);
unsigned char * dest2 = (unsigned char *)(0x6000 + SDRAM_BASE);
unsigned char * dest3 = (unsigned char *)(0x7000 + SDRAM_BASE);
unsigned char * dest4 = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest5 = (unsigned char *)(0x9000 + SDRAM_BASE);
unsigned char * dest6 = (unsigned char *)(0xa000 + SDRAM_BASE);
unsigned char * dest7 = (unsigned char *)(0xb000 + SDRAM_BASE);
int i = 0;
for (i=0; i!=0x1000; ++i)
{
dest1[i] = src[i];
dest2[i] = src[i];
dest3[i] = src[i];
dest4[i] = src[i];
dest5[i] = src[i];
dest6[i] = src[i];
dest7[i] = src[i];
}
}
break;
default:
{
clearscreen();
debug_pos = 0;
debug_adjust = 0;
printf("Unknown type of cartridge!");
wait_us(3000000);
}
break;
}
}
int filter_5200(struct SimpleDirEntry * entry)
{
if (dir_is_subdir(entry)) return 1;
char const * f = dir_filename(entry);
int res = (compare_ext(f,"A52") || compare_ext(f,"CAR") || compare_ext(f,"BIN"));
//printf("filter_disks:%s:%d\n",f,res);
return res;
}
void select_cartridge()
{
filter = filter_5200; // .a52, .car and .bin
file_selector(files[4]);
// work out the type
char const * name = file_name(files[4]);
int type = -1;
if (compare_ext(name,"CAR"))
{
char header[16];
int read = 0;
file_read(files[4],&header,16,&read);
type = header[7];
}
else
{
int size = file_size(files[4]);
if (size == 32768) type = 4;
if (size == 16384) // uff!
{
struct joystick_status joy;
joy.x_ = joy.y_ = joy.fire_ = 0;
clearscreen();
debug_pos = 0;
debug_adjust = 0;
printf("16k cart type");
debug_pos = 80;
printf("Left for one chip");
debug_pos = 120;
printf("Right for two chip");
while(type <0)
{
joystick_wait(&joy,WAIT_QUIET);
joystick_wait(&joy,WAIT_EITHER);
if (joy.x_<0) type = 16;
if (joy.x_>0) type = 6;
}
}
if (size == 8192) type = 19;
if (size == 4096) type = 20;
}
load_cartridge(type);
}
int settings()
{
struct joystick_status joy;
......
debug_pos = 200;
debug_adjust = row==3 ? 128 : 0;
printf("Cartridge 32k");
printf("Cart:%s", file_name(files[4]) ? file_name(files[4]) : "NONE");
debug_pos = 240;
debug_adjust = row==4 ? 128 : 0;
printf("Cartridge 16k one chip");
printf("Exit");
debug_pos = 280;
debug_adjust = row==5 ? 128 : 0;
printf("Cartridge 16k two chip");
/*
while (1)
{
*atari_consol = 4;
*atari_potgo = 0xff;
wait_us(1000000/25);
unsigned char pot0 = *atari_pot0;
unsigned char pot1 = *atari_pot1;
debug_pos = 320;
debug_adjust = row==6 ? 128 : 0;
printf("Cartridge 8k");
printf(" ");
debug_pos = 320;
printf("pot0:%d pot1:%d",pot0,pot1);
}*/
debug_pos = 360;
debug_adjust = row==7 ? 128 : 0;
printf("Cartridge 4k");
debug_pos = 400;
debug_adjust = row==8 ? 128 : 0;
printf("Exit");
// Slow it down a bit
wait_us(100000);
......
row+=joy.y_;
if (row<0) row = 0;
if (row>8) row = 8;
if (row>4) row = 4;
switch (row)
{
case 0:
......
}
break;
case 3:
case 4:
case 5:
case 6:
case 7:
{
if (joy.fire_)
{
fil_type = fil_type_bin;
filter = filter_specified;
file_selector(files[4]);
//loadrom_indir(entries,"acid5200.rom",0x8000,(void *)0x004000); // XXX - just for 5200 test... do not commit!
if (row == 3)
{
loadromfile(files[4],0x8000,0x004000);
}
else if (row == 4)
{
//*atari_colbk = 0x58;
//wait_us(4000000);
loadromfile(files[4],0x4000,0x008000);
unsigned char * src = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x4000 + SDRAM_BASE);
int i = 0;
for (i=0; i!=0x4000; ++i)
{
dest1[i] = src[i];
}
}
else if (row == 5)
{
unsigned char * src = (unsigned char *)(0x4000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x6000 + SDRAM_BASE);
unsigned char * src2 = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest2 = (unsigned char *)(0xa000+ SDRAM_BASE);
int i = 0;
//*atari_colbk = 0x68;
//wait_us(5000000);
loadromfile(files[4],0x2000,0x004000);
loadromfile(files[4],0x2000,0x008000);
for (i=0; i!=0x2000; ++i)
{
dest1[i] = src[i];
dest2[i] = src2[i];
}
}
else if (row == 6)
{
//*atari_colbk = 0x58;
//wait_us(4000000);
loadromfile(files[4],0x2000,0x004000);
unsigned char * src = (unsigned char *)(0x4000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x6000 + SDRAM_BASE);
unsigned char * dest2 = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest3 = (unsigned char *)(0xa000 + SDRAM_BASE);
int i = 0;
for (i=0; i!=0x2000; ++i)
{
dest1[i] = src[i];
dest2[i] = src[i];
dest3[i] = src[i];
}
}
else if (row == 7)
{
//*atari_colbk = 0x58;
//wait_us(4000000);
loadromfile(files[4],0x1000,0x004000);
unsigned char * src = (unsigned char *)(0x4000 + SDRAM_BASE);
unsigned char * dest1 = (unsigned char *)(0x5000 + SDRAM_BASE);
unsigned char * dest2 = (unsigned char *)(0x6000 + SDRAM_BASE);
unsigned char * dest3 = (unsigned char *)(0x7000 + SDRAM_BASE);
unsigned char * dest4 = (unsigned char *)(0x8000 + SDRAM_BASE);
unsigned char * dest5 = (unsigned char *)(0x9000 + SDRAM_BASE);
unsigned char * dest6 = (unsigned char *)(0xa000 + SDRAM_BASE);
unsigned char * dest7 = (unsigned char *)(0xb000 + SDRAM_BASE);
int i = 0;
for (i=0; i!=0x1000; ++i)
{
dest1[i] = src[i];
dest2[i] = src[i];
dest3[i] = src[i];
dest4[i] = src[i];
dest5[i] = src[i];
dest6[i] = src[i];
dest7[i] = src[i];
}
}
select_cartridge();
return 1;
}
}
break;
case 8:
case 4:
if (joy.fire_)
{
done = 1;
......
else
set_pause_6502(0);
}
else if (get_hotkey_fileselect())
{
set_pause_6502(1);
freeze();
select_cartridge();
restore();
reboot(1);
}
}
firmware/regs.h
#define atari_colpf3 ((unsigned char volatile *)(0xc019 + atari_regbase))
#define atari_colpf0 ((unsigned char volatile *)(0xc016 + atari_regbase))
#define atari_prior ((unsigned char volatile *)(0xc01b + atari_regbase))
#define atari_consol ((unsigned char volatile *)(0xc01f + atari_regbase))
#define atari_skctl ((unsigned char volatile *)(0xe80f + atari_regbase))
#define atari_kbcode ((unsigned char volatile *)(0xe809 + atari_regbase))
#define atari_random ((unsigned char volatile *)(0xe80a + atari_regbase))
#define atari_pot0 ((unsigned char volatile *)(0xe800 + atari_regbase))
#define atari_pot1 ((unsigned char volatile *)(0xe801 + atari_regbase))
#define atari_potgo ((unsigned char volatile *)(0xe80b + atari_regbase))
#else

Also available in: Unified diff