static inline void state_handling(int save,int load) {
if (save) {
//if (conf.sound) SDL_LockAudio();
save_state(conf.game, save - 1);
//if (conf.sound) SDL_UnlockAudio();
reset_frame_skip();
}
if (load) {
//if (conf.sound) SDL_LockAudio();
load_state(conf.game, load - 1);
//if (conf.sound) SDL_UnlockAudio();
reset_frame_skip();
}
pending_load_state = pending_save_state = 0;
}
static inline void state_handling(save,load) {
#if 0 /* NOSTATE */
if (save) {
if (conf.sound) SDL_LockAudio();
save_state(conf.game,save-1);
if (conf.sound) SDL_UnlockAudio();
reset_frame_skip();
}
if (load) {
if (conf.sound) SDL_LockAudio();
load_state(conf.game,load-1);
if (conf.sound) SDL_UnlockAudio();
reset_frame_skip();
}
pending_load_state=pending_save_state=0;
#endif
}
SDL_bool main_gngeo_gui(void) {
if (desktop==NULL)
init_gngeo_gui();
if (conf.sound) SDL_PauseAudio(1);
/* disable interpolation */
interpolation=SDL_FALSE;
//SDL_ShowCursor(1);
gui_main_loop(desktop/*,conf.res_x,conf.res_y*/);
//SDL_ShowCursor(0);
/* reinit interpolation */
interpolation=CF_BOOL(cf_get_item_by_name("interpolation"));
if (conf.sound) SDL_PauseAudio(0);
reset_frame_skip();
// printf("Quitemu=%d\n",quit_emu);
return quit_emu;
}
int frame_skip(int init)
{
static int f2skip;
static uclock_t sec = 0;
static uclock_t rfd;
static uclock_t target;
static int nbFrame = 0;
static unsigned int nbFrame_moy = 0;
static int nbFrame_min = 1000;
static int nbFrame_max = 0;
static int skpFrm = 0;
static int count = 0;
static int moy=60;
if (init_frame_skip) {
init_frame_skip = 0;
target = get_ticks();
bench = (CF_BOOL(cf_get_item_by_name("bench")) ? 1/*get_ticks()*/ : 0);
nbFrame = 0;
//f2skip=0;
//skpFrm=0;
sec = 0;
return 0;
}
target += F;
if (f2skip > 0 ) {
f2skip--;
skpFrm++;
return 1;
} else
skpFrm = 0;
// printf("%d %d\n",conf.autoframeskip,conf.show_fps);
rfd = get_ticks();
if (gTurboMode) {
target=get_ticks();
f2skip=MAX_FRAMESKIP;
} else {
if (conf.autoframeskip) {
if (rfd < target && f2skip == 0) {
while (get_ticks() < target) {
#ifndef WIN32
if (conf.sleep_idle) {
usleep(5);
}
#endif
}
} else {
f2skip = (rfd - target) / (double) F;
if (f2skip > MAX_FRAMESKIP) {
f2skip = MAX_FRAMESKIP;
reset_frame_skip();
}
// printf("Skip %d frame(s) %lu %lu\n",f2skip,target,rfd);
}
}
}
nbFrame++;
nbFrame_moy++;
if (conf.show_fps) {
if (get_ticks() - sec >= TICKS_PER_SEC) {
//printf("%d\n",nbFrame);
if (bench) {
if (nbFrame_min>nbFrame) nbFrame_min=nbFrame;
if (nbFrame_max<nbFrame) nbFrame_max=nbFrame;
count++;
moy=nbFrame_moy/(float)count;
if (count==30) count=0;
sprintf(fps_str, "%d %d %d %d\n", nbFrame-1,nbFrame_min-1,nbFrame_max-1,moy-1);
} else {
sprintf(fps_str, "%2d", nbFrame-1);
}
nbFrame = 0;
sec = get_ticks();
}
}
return 0;
}
void text_input(const char *message,int x,int y,char *string,int size)
{
int sx;
int a;
int s=0;
int i;
int pos=0;
static SDL_Surface *save=NULL;
SDL_Rect clear_rect={16,227,320,16};
if (!save)
save=SDL_CreateRGBSurface(SDL_SWSURFACE,320,16,16, 0xF800, 0x7E0,0x1F, 0);
if (conf.sound) pause_audio(1);
memset(string,0,size+1);
SDL_FillRect(buffer,&clear_rect,0);
// SDL_BlitSurface(buffer,&clear_rect,save,NULL);
SDL_textout(buffer,x,y,message);
sx=x+strlen(message)* font_w;
SDL_EnableUNICODE(1);
while((a=SDL_getchar())!=-1) {
if (a==LEFT && pos>0) pos--;
if (a==RIGHT && pos<s) pos++;
if (a==BACKSPACE && pos>0) {
for(i=pos-1;i<s;i++)
string[i]=string[i+1];
s--;
pos--;
}
if (a==DEL && pos<s) {
for(i=pos;i<s;i++)
string[i]=string[i+1];
s--;
}
if (a>32 && s<size ) {
for(i=s;i>pos;i--)
string[i]=string[i-1];
string[pos]=(char)a;
s++;
pos++;
}
SDL_FillRect(buffer,&clear_rect,0);
//SDL_BlitSurface(save,NULL,buffer,&clear_rect);
SDL_textout(buffer,x,y,message);
SDL_textout(buffer,sx,y,string);
/* cursor */
((Uint16*)buffer->pixels)[352*(16+222)+sx+pos* font_w-1]=0;
for(i=sx+pos* font_w;i<sx+pos* font_w+ font_w;i++) {
((Uint16*)buffer->pixels)[352*(16+222)+i]=0xFFFF;
((Uint16*)buffer->pixels)[352*(16+221)+i]=0;
((Uint16*)buffer->pixels)[352*(16+223)+i]=0;
}
((Uint16*)buffer->pixels)[352*(16+222)+sx+pos* font_w+font_w]=0;
screen_update();
}
SDL_EnableUNICODE(0);
if (conf.sound) pause_audio(0);
reset_frame_skip();
}
int main(int argc, char *argv[])
{
char *rom_name;
#ifdef __AMIGA__
BPTR file_lock = GetProgramDir();
SetProgramDir(file_lock);
#endif
signal(SIGSEGV, catch_me);
#ifdef WII
// SDL_Init(SDL_INIT_VIDEO | SDL_INIT_JOYSTICK | SDL_INIT_NOPARACHUTE);
fatInitDefault();
#endif
cf_init(); /* must be the first thing to do */
cf_init_cmd_line();
cf_open_file(NULL); /* Open Default configuration file */
rom_name=cf_parse_cmd_line(argc,argv);
/* print effect/blitter list if asked by user */
if (!strcmp(CF_STR(cf_get_item_by_name("effect")),"help")) {
print_effect_list();
exit(0);
}
if (!strcmp(CF_STR(cf_get_item_by_name("blitter")),"help")) {
print_blitter_list();
exit(0);
}
init_sdl();
/* GP2X stuff */
#ifdef GP2X
gp2x_init();
#endif
if (gn_init_skin()!=SDL_TRUE) {
printf("Can't load skin...\n");
exit(1);
}
reset_frame_skip();
if (conf.debug) conf.sound=0;
/* Launch the specified game, or the rom browser if no game was specified*/
if (!rom_name) {
// rom_browser_menu();
run_menu();
printf("GAME %s\n",conf.game);
if (conf.game==NULL) return 0;
} else {
if (init_game(rom_name)!=SDL_TRUE) {
printf("Can't init %s...\n",rom_name);
exit(1);
}
}
/* If asked, do a .gno dump and exit*/
if (CF_BOOL(cf_get_item_by_name("dump"))) {
char dump[8+4+1];
sprintf(dump,"%s.gno",rom_name);
dr_save_gno(&memory.rom,dump);
close_game();
return 0;
}
if (conf.debug)
debug_loop();
else
main_loop();
close_game();
return 0;
}
void main_loop(void)
{
int neo_emu_done = 0;
int m68k_overclk=CF_VAL(cf_get_item_by_name("68kclock"));
int z80_overclk=CF_VAL(cf_get_item_by_name("z80clock"));
int nb_frames=0;
Uint32 cpu_68k_timeslice = (m68k_overclk==0?200000:200000+(m68k_overclk*200000/100.0));
Uint32 cpu_68k_timeslice_scanline = cpu_68k_timeslice/262.0;
Uint32 cpu_z80_timeslice = (z80_overclk==0?73333:73333+(z80_overclk*73333/100.0));
Uint32 tm_cycle=0;
Uint32 cpu_z80_timeslice_interlace = cpu_z80_timeslice / (float) nb_interlace;
char ksym_code[5];
Uint16 scancode, i, a;
char input_buf[20];
Uint8 show_keysym=0;
int invert_joy=CF_BOOL(cf_get_item_by_name("invertjoy"));
int x, y;
for (x = 0; x < 2; x++) {
for (y = 0; y < BUTTON_MAX; y++) {
joy_button[x][y] = 0;
}
}
reset_frame_skip();
my_timer();
/*
printf("\tCpuspeed: %d\n",cpu_68k_timeslice);
printf("\t%s\n",&memory.cpu[0x100]);
printf("\tNGH = %04x\n",READ_WORD(&memory.cpu[0x108]));
printf("\tSSN = %04x\n",READ_WORD(&memory.cpu[0x114]));
*/
int loop_count = 0;
while (!neo_emu_done) {
if (conf.test_switch == 1) conf.test_switch = 0;
neo_emu_done = read_input(joy_button, 0);
// update the internal representation of keyslot
update_p1_key();
update_p2_key();
update_start();
update_coin();
if (slow_motion) usleep(100);
if (conf.sound) {
/* run z80 */
for (i = 0; i < nb_interlace; i++) {
cpu_z80_run(cpu_z80_timeslice_interlace);
my_timer();
}
}
if (!conf.debug) {
/* run m68k */
if (conf.raster) {
for (i = 0; i < 261; i++) {
tm_cycle=cpu_68k_run(cpu_68k_timeslice_scanline-tm_cycle);
if (update_scanline()) {
cpu_68k_interrupt(2);
}
}
tm_cycle=cpu_68k_run(cpu_68k_timeslice_scanline-tm_cycle);
state_handling(pending_save_state,pending_load_state);
update_screen();
cpu_68k_interrupt(1);
} else {
tm_cycle=cpu_68k_run(cpu_68k_timeslice-tm_cycle);
a = neo_interrupt();
/* state handling (we save/load before interrupt) */
state_handling(pending_save_state,pending_load_state);
if (a) cpu_68k_interrupt(a);
}
ogc_update_stream();
} else {
/* we are in debug mode -> we are just here for event handling */
neo_emu_done=1;
}
}
ogc_close_audio();
}
void main_loop(void)
{
int neo_emu_done = 0;
int overclk=CF_VAL(cf_get_item_by_name("overclock"));
Uint32 cpu_68k_timeslice = (overclk==0?200000:200000+(overclk*200000/100.0));
Uint32 cpu_68k_timeslice_scanline = cpu_68k_timeslice/262.0;
// Uint32 cpu_z80_timeslice = 100000;
Uint32 cpu_z80_timeslice = 73333;
Uint32 tm_cycle=0;
/* Uint32 cpu_z80_timeslice=66666; // is it 4Mhz or 6Mhz ???? 4 seems to work fine....
UPDATE: it's clear now that it's 6Mhz -> kof96 presentation */
Uint32 cpu_z80_timeslice_interlace = cpu_z80_timeslice / (float) nb_interlace;
char ksym_code[5];
SDL_Event event;
Uint16 scancode, i, a;
char input_buf[20];
Uint8 show_keysym=0;
CONF_ITEM* item = cf_get_item_by_name("invertjoy");
int invert_joy = 0;
if (item)
invert_joy=CF_BOOL(item);
reset_frame_skip();
my_timer();
//printf("Cpuspeed: %d\n",cpu_68k_timeslice);
/*
printf("%s\n",&memory.cpu[0x100]);
printf("NGH = %04x\n",READ_WORD(&memory.cpu[0x108]));
printf("SSN = %04x\n",READ_WORD(&memory.cpu[0x114]));
*/
while (!neo_emu_done) {
if (conf.test_switch == 1)
conf.test_switch = 0;
while (SDL_PollEvent(&event)) {
switch (event.type) {
case SDL_JOYAXISMOTION:
joy_axe[event.jaxis.which][event.jaxis.axis] = event.jaxis.value;
if (show_keysym) {
sprintf(ksym_code, "%d", event.jaxis.axis);
draw_message(ksym_code);
}
break;
case SDL_JOYHATMOTION:
switch (event.jhat.value) {
case SDL_HAT_CENTERED:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = 0;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = 0;
break;
case SDL_HAT_UP:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = -32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = 0;
break;
case SDL_HAT_DOWN:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = 32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = 0;
break;
case SDL_HAT_LEFT:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = -32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = 0;
break;
case SDL_HAT_RIGHT:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = 32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = 0;
break;
case SDL_HAT_RIGHTUP:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = 32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = -32767;
break;
case SDL_HAT_RIGHTDOWN:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = 32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = 32767;
break;
case SDL_HAT_LEFTUP:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = -32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = -32767;
break;
case SDL_HAT_LEFTDOWN:
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which]] = -32767;
joy_axe[event.jhat.which][(event.jhat.hat * 2) + joy_numaxes[event.jhat.which] + 1] = 32767;
break;
}
if (show_keysym) {
sprintf(ksym_code, "%d", event.jhat.hat);
draw_message(ksym_code);
}
break;
case SDL_JOYBUTTONDOWN:
joy_button[event.jbutton.which][event.jbutton.button] = 1;
if (show_keysym) {
sprintf(ksym_code, "%d", event.jbutton.button);
draw_message(ksym_code);
}
break;
case SDL_JOYBUTTONUP:
joy_button[event.jbutton.which][event.jbutton.button] = 0;
break;
case SDL_KEYUP:
if (player)
{
switch(event.key.keysym.sym)
{
case 273:
key[264] = 0;
break;
case 275:
key[274] = 0;
break;
case 274:
key[261] = 0;
break;
case 276:
key[260] = 0;
break;
case 122:
key[108] = 0;
break;
case 120:
key[59] = 0;
break;
case 97:
key[111] = 0;
break;
case 115:
key[112] = 0;
break;
case 49:
key[50] = 0;
break;
case 51:
key[52] = 0;
break;
default:
key[event.key.keysym.sym] = 0;
break;
}
}
else
key[event.key.keysym.sym] = 0;
break;
case SDL_KEYDOWN:
scancode = event.key.keysym.sym;
if (show_keysym) {
sprintf(ksym_code, "%d", scancode);
draw_message(ksym_code);
}
if (player)
{
switch(scancode)
{
case 273:
key[264] = 1;
break;
case 275:
key[274] = 1;
break;
case 274:
key[261] = 1;
break;
case 276:
key[260] = 1;
break;
case 122:
key[108] = 1;
break;
case 120:
key[59] = 1;
break;
case 97:
key[111] = 1;
break;
case 115:
key[112] = 1;
break;
case 49:
key[50] = 1;
break;
case 51:
key[52] = 1;
break;
default:
key[scancode] = 1;
break;
}
}
else
key[scancode] = 1;
switch (scancode) {
case SDLK_ESCAPE:
neo_emu_done = 1;
#ifdef __QNXNTO__
shutdown = 1;
#endif
break; // ESC
/*
case SDLK_TAB:
main_gngeo_gui();
break;
*/
case SDLK_F1:
draw_message("Reset");
//neogeo_init();
cpu_68k_reset();
break;
case SDLK_F2:
take_screenshot();
draw_message("Screenshot saved");
break;
case SDLK_F3:
draw_message("Test Switch ON");
conf.test_switch = 1;
break;
case SDLK_F5:
show_fps ^= SDL_TRUE;
break;
case SDLK_F4:
show_keysym = 1 - show_keysym;
if (show_keysym)
draw_message("Show keysym code : ON");
else
draw_message("Show keysym code : OFF");
break;
case SDLK_F6:
slow_motion = 1 - slow_motion;
if (slow_motion)
draw_message("SlowMotion : ON");
else {
draw_message("SlowMotion : OFF");
reset_frame_skip();
}
break;
case SDLK_F7:
//screen_set_effect("scanline");
if (conf.debug) {
dbg_step = 1;
}
break;
case SDLK_F8:
{
int val;
char *endptr;
text_input("Save to slot [0-999]? ",16,227,input_buf,3);
val=strtol(input_buf,&endptr,10);
if (input_buf != endptr) {
pending_save_state=val+1;
}
}
break;
case SDLK_F9:
{
int val;
char *endptr;
text_input("Load from slot [0-999]? ",16,227,input_buf,3);
val=strtol(input_buf,&endptr,10);
if (input_buf != endptr) {
pending_load_state=val+1;
}
}
break;
case SDLK_F10:
autoframeskip ^= SDL_TRUE;
if (autoframeskip) {
reset_frame_skip();
draw_message("AutoFrameSkip : ON");
} else
draw_message("AutoFrameSkip : OFF");
break;
case SDLK_F11:
sleep_idle ^= SDL_TRUE;
if (sleep_idle)
draw_message("Sleep idle : ON");
else
draw_message("Sleep idle : OFF");
break;
case SDLK_F12:
screen_fullscreen();
break;
#ifdef __QNXNTO__
case SDLK_F13:
neo_emu_done = 1;
break;
case SDLK_F14:
if (player)
{
key[52] = 0;
key[50] = 0;
key[112] = 0;
key[111] = 0;
key[59] = 0;
key[108] = 0;
key[260] = 0;
key[261] = 0;
key[274] = 0;
key[264] = 0;
}
player = !player;
break;
#endif
}
break;
case SDL_VIDEORESIZE:
conf.res_x=event.resize.w;
conf.res_y=event.resize.h;
screen_resize(event.resize.w, event.resize.h);
break;
case SDL_ACTIVEEVENT:
if (event.active.state & SDL_APPINPUTFOCUS)
{
if (!event.active.gain)
{
int J;
SDL_PauseAudio(1);
while (1)
{
usleep(10000);
if (SDL_PollEvent(&event))
{
if (event.type == SDL_ACTIVEEVENT)
{
if (event.active.state & SDL_APPINPUTFOCUS)
{
if (event.active.gain)
break;
}
}
else if (event.type == SDL_QUIT)
{
neo_emu_done = 1;
break;
}
}
}
SDL_PauseAudio(0);
reset_frame_skip();
}
}
break;
case SDL_USEREVENT:
reset_frame_skip();
break;
case SDL_QUIT:
neo_emu_done = 1;
#ifdef __QNXNTO__
shutdown = 1;
#endif
break;
default:
break;
}
}
/* update the internal representation of keyslot */
update_p1_key();
update_p2_key();
update_start();
update_coin();
if (slow_motion)
SDL_Delay(100);
if (conf.sound) {
PROFILER_START(PROF_Z80);
for (i = 0; i < nb_interlace; i++) {
cpu_z80_run(cpu_z80_timeslice_interlace);
my_timer();
}
PROFILER_STOP(PROF_Z80);
} /*
else
my_timer();*/
if (!conf.debug) {
if (conf.raster) {
for (i = 0; i < 261; i++) {
tm_cycle=cpu_68k_run(cpu_68k_timeslice_scanline-tm_cycle);
if (update_scanline())
cpu_68k_interrupt(2);
}
tm_cycle=cpu_68k_run(cpu_68k_timeslice_scanline-tm_cycle);
state_handling(pending_save_state,pending_load_state);
update_screen();
cpu_68k_interrupt(1);
} else {
PROFILER_START(PROF_68K);
tm_cycle=cpu_68k_run(cpu_68k_timeslice-tm_cycle);
PROFILER_STOP(PROF_68K);
a = neo_interrupt();
/* state handling (we save/load before interrupt) */
state_handling(pending_save_state,pending_load_state);
if (a) {
cpu_68k_interrupt(a);
}
}
} else {
/* we arre in debug mode -> we are just here for event handling */
neo_emu_done=1;
}
#ifdef ENABLE_PROFILER
profiler_show_stat();
#endif
PROFILER_START(PROF_ALL);
}
}