// (c) Copyright 2006-2008 notaz, All rights reserved. // Free for non-commercial use. // For commercial use, separate licencing terms must be obtained. #include #include #include #include #include #include #include #include #include #include "../gp2x/emu.h" #include "../gp2x/usbjoy.h" #include "../gp2x/menu.h" #include "../common/arm_utils.h" #include "../common/fonts.h" #include "../common/emu.h" #include "../common/config.h" #include "../common/common.h" #include "asm_utils.h" #include #include #include #include //#define PFRAMES #define BENCHMARK //#define USE_320_SCREEN 1 #ifdef BENCHMARK #define OSD_FPS_X (800-200) #else #define OSD_FPS_X (800-120) #endif int engineState; int select_exits = 0; char romFileName[PATH_MAX]; static short __attribute__((aligned(4))) sndBuffer[2*44100/50]; static struct timeval noticeMsgTime = { 0, 0 }; // when started showing static int osd_fps_x; unsigned char *PicoDraw2FB = NULL; // temporary buffer for alt renderer int reset_timing = 0; #define PICO_PEN_ADJUST_X 4 #define PICO_PEN_ADJUST_Y 2 static int pico_pen_x = SCREEN_WIDTH/2, pico_pen_y = 240/2; static void emu_msg_cb(const char *msg); static void emu_msg_tray_open(void); void emu_noticeMsgUpdated(void) { gettimeofday(¬iceMsgTime, 0); } int emu_getMainDir(char *dst, int len) { extern char **g_argv; int j; strncpy(dst, g_argv[0], len); len -= 32; // reserve if (len < 0) len = 0; dst[len] = 0; for (j = strlen(dst); j > 0; j--) if (dst[j] == '/') { dst[j+1] = 0; break; } return j + 1; } void emu_Init(void) { // make temp buffer for alt renderer PicoDraw2FB = malloc((8+320)*(8+240+8)); if (!PicoDraw2FB) { printf("PicoDraw2FB == 0\n"); } // make dirs for saves, cfgs, etc. mkdir("mds", 0777); mkdir("srm", 0777); mkdir("brm", 0777); mkdir("cfg", 0777); PicoInit(); PicoMessage = emu_msg_cb; PicoMCDopenTray = emu_msg_tray_open; PicoMCDcloseTray = menu_loop_tray; } static void scaling_update(void) { PicoOpt &= ~0x4100; switch (currentConfig.scaling) { default: break; // off case 1: // hw hor case 2: PicoOpt |= 0x0100; break; // hw hor+vert case 3: PicoOpt |= 0x4000; break; // sw hor } } void emu_Deinit(void) { // save SRAM if((currentConfig.EmuOpt & 1) && SRam.changed) { emu_SaveLoadGame(0, 1); SRam.changed = 0; } if (!(currentConfig.EmuOpt & 0x20)) { config_writelrom(PicoConfigFile); #ifndef NO_SYNC sync(); #endif } free(PicoDraw2FB); PicoExit(); } void emu_prepareDefaultConfig(void) { memset(&defaultConfig, 0, sizeof(defaultConfig)); defaultConfig.EmuOpt = 0x8f | 0x00600; // | <- confirm_save, cd_leds defaultConfig.s_PicoOpt = 0x0f | POPT_EXT_FM|POPT_EN_MCD_PCM|POPT_EN_MCD_CDDA|POPT_EN_SVP_DRC; defaultConfig.s_PicoOpt |= POPT_ACC_SPRITES|POPT_EN_MCD_GFX; defaultConfig.s_PicoOpt &= ~POPT_EN_SVP_DRC; // crashes :( defaultConfig.EmuOpt &= ~8; // no save gzip defaultConfig.s_PsndRate = 44100; defaultConfig.s_PicoRegion = 0; defaultConfig.s_PicoAutoRgnOrder = 0x184; // US, EU, JP defaultConfig.s_PicoCDBuffers = 0; defaultConfig.Frameskip = 0; defaultConfig.CPUclock = 200; defaultConfig.volume = 50; defaultConfig.scaling = 0; defaultConfig.turbo_rate = 15; } static void textOut16(int x, int y, const char *text) { int i,l,len=strlen(text); unsigned int *screen = (unsigned int *)((unsigned short *)SCREEN_BUFFER + (x&~1) + y*SCREEN_WIDTH); for (i = 0; i < len; i++) { for (l=0;l<16;) { unsigned char fd = fontdata8x8[((text[i])*8)+l/2]; unsigned int *d = &screen[l*SCREEN_WIDTH/2]; if (fd&0x80) d[0]=0xffffffff; if (fd&0x40) d[1]=0xffffffff; if (fd&0x20) d[2]=0xffffffff; if (fd&0x10) d[3]=0xffffffff; if (fd&0x08) d[4]=0xffffffff; if (fd&0x04) d[5]=0xffffffff; if (fd&0x02) d[6]=0xffffffff; if (fd&0x01) d[7]=0xffffffff; l++; d = &screen[l*SCREEN_WIDTH/2]; if (fd&0x80) d[0]=0xffffffff; if (fd&0x40) d[1]=0xffffffff; if (fd&0x20) d[2]=0xffffffff; if (fd&0x10) d[3]=0xffffffff; if (fd&0x08) d[4]=0xffffffff; if (fd&0x04) d[5]=0xffffffff; if (fd&0x02) d[6]=0xffffffff; if (fd&0x01) d[7]=0xffffffff; l++; } screen += 8; } } void osd_text(int x, int y, const char *text) { int len = strlen(text)*8; if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { int *p, i, h; x &= ~3; // align x len = (len+3) >> 2; for (h = 0; h < 8; h++) { p = (int *) ((unsigned char *) gp2x_screen+x+SCREEN_WIDTH*(y+h)); for (i = len; i; i--, p++) *p = 0xe0e0e0e0; } emu_textOut8(x, y, text); } else { int *p, i, h; x &= ~1; // align x len++; for (h = 0; h < 16; h++) { p = (int *) ((unsigned short *) gp2x_screen+x+SCREEN_WIDTH*(y+h)); for (i = len; i; i--, p++) *p = 0;//(*p>>2)&0x39e7; } textOut16(x, y, text); } } static void draw_cd_leds(void) { // static int old_reg; // if (!((Pico_mcd->s68k_regs[0] ^ old_reg) & 3)) return; // no change // mmu hack problems? old_reg = Pico_mcd->s68k_regs[0]; if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { // 8-bit modes unsigned int col_g = (old_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0; unsigned int col_r = (old_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0; *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*2+ 4) = *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*3+ 4) = *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*4+ 4) = col_g; *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*2+12) = *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*3+12) = *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*4+12) = col_r; } else { // 16-bit modes unsigned int *p = (unsigned int *)((short *)gp2x_screen + SCREEN_WIDTH*2+4); unsigned int col_g = (old_reg & 2) ? 0x06000600 : 0; unsigned int col_r = (old_reg & 1) ? 0xc000c000 : 0; *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += SCREEN_WIDTH/2 - 12/2; *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += SCREEN_WIDTH/2 - 12/2; *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; } } static void draw_pico_ptr(void) { unsigned short *p = (unsigned short *)gp2x_screen; // only if pen enabled and for 16bit modes if (pico_inp_mode == 0 || (PicoOpt&0x10) || !(currentConfig.EmuOpt&0x80)) return; if (!(Pico.video.reg[12]&1) && !(PicoOpt&POPT_DIS_32C_BORDER)) p += 32; p += SCREEN_WIDTH * (pico_pen_y + PICO_PEN_ADJUST_Y); p += pico_pen_x + PICO_PEN_ADJUST_X; p[0] ^= 0xffff; p[319] ^= 0xffff; p[320] ^= 0xffff; p[321] ^= 0xffff; p[640] ^= 0xffff; } #ifdef USE_320_SCREEN static int EmuScanBegin16(unsigned int num) { if (!(Pico.video.reg[1]&8)) num += 8; DrawLineDest = (unsigned short *)gp2x_screen + num*800 + 800/2 - 320/2; //int w = (Pico.video.reg[12]&1) ? 320 : 256; //DrawLineDest = (unsigned short *)gp2x_screen + num*w; return 0; } #else // USE_320_SCREEN static int EmuScanEnd16(unsigned int num) { unsigned char *ps=HighCol+8; unsigned short *pd; unsigned short *pal=HighPal; int sh = Pico.video.reg[0xC]&8; int len, mask = 0xff; if (!(Pico.video.reg[1]&8)) num += 8; pd=(unsigned short *)gp2x_screen + num*800*2 + 800/2 - 320*2/2; if (Pico.m.dirtyPal) PicoDoHighPal555(sh); if (Pico.video.reg[12]&1) { len = 320; } else { pd += 32*2; len = 256; } if (!sh && (rendstatus & PDRAW_ACC_SPRITES)) mask=0x3f; // accurate sprites, upper bits are priority stuff #if 1 clut_line(pd, ps, pal, (mask<<16) | len); #else for (; len > 0; len--) { unsigned int p = pal[*ps++ & mask]; p |= p << 16; *(unsigned int *)pd = p; *(unsigned int *)(&pd[800]) = p; pd += 2; } #endif return 0; } #endif // USE_320_SCREEN static int EmuScanBegin8(unsigned int num) { if (!(Pico.video.reg[1]&8)) num += 8; DrawLineDest = (unsigned char *) gp2x_screen + SCREEN_WIDTH * num; return 0; } int localPal[0x100]; static void (*vidCpyM2)(void *dest, void *src) = NULL; static void blit(const char *fps, const char *notice) { int emu_opt = currentConfig.EmuOpt; if (PicoOpt&0x10) { // 8bit fast renderer if (Pico.m.dirtyPal) { Pico.m.dirtyPal = 0; vidConvCpyRGB32(localPal, Pico.cram, 0x40); // feed new palette to our device gp2x_video_setpalette(localPal, 0x40); } // a hack for VR if (PicoRead16Hook == PicoSVPRead16) memset32((int *)(PicoDraw2FB+328*8+328*223), 0xe0e0e0e0, 328); // do actual copy vidCpyM2((unsigned char *)gp2x_screen+SCREEN_WIDTH*8, PicoDraw2FB+328*8); } else if (!(emu_opt&0x80)) { // 8bit accurate renderer if (Pico.m.dirtyPal) { int pallen = 0x40; Pico.m.dirtyPal = 0; if (Pico.video.reg[0xC]&8) // shadow/hilight mode { vidConvCpyRGB32(localPal, Pico.cram, 0x40); vidConvCpyRGB32sh(localPal+0x40, Pico.cram, 0x40); vidConvCpyRGB32hi(localPal+0x80, Pico.cram, 0x40); memcpy32(localPal+0xc0, localPal+0x40, 0x40); pallen = 0x100; } else if (rendstatus & PDRAW_ACC_SPRITES) { vidConvCpyRGB32(localPal, Pico.cram, 0x40); memcpy32(localPal+0x40, localPal, 0x40); memcpy32(localPal+0x80, localPal, 0x40); memcpy32(localPal+0xc0, localPal, 0x40); pallen = 0x100; } else if (rendstatus & PDRAW_SONIC_MODE) { // mid-frame palette changes vidConvCpyRGB32(localPal, Pico.cram, 0x40); vidConvCpyRGB32(localPal+0x40, HighPal, 0x40); vidConvCpyRGB32(localPal+0x80, HighPal+0x40, 0x40); pallen = 0xc0; } else { vidConvCpyRGB32(localPal, Pico.cram, 0x40); } if (pallen > 0xc0) { localPal[0xc0] = 0x0000c000; localPal[0xd0] = 0x00c00000; localPal[0xe0] = 0x00000000; // reserved pixels for OSD localPal[0xf0] = 0x00ffffff; } gp2x_video_setpalette(localPal, pallen); } } if (notice || (emu_opt & 2)) { int h = SCREEN_HEIGHT-16; if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8)) h -= 16; if (notice) osd_text(4, h, notice); if (emu_opt & 2) osd_text(osd_fps_x, h, fps); } if ((emu_opt & 0x400) && (PicoAHW & PAHW_MCD)) draw_cd_leds(); if (PicoAHW & PAHW_PICO) draw_pico_ptr(); { //static int u=0; //memset((char *)gp2x_screen+800*471*2, (u++)>>1, 800*9*2); } //gp2x_video_wait_vsync(); gp2x_video_flip(); } // clears whole screen or just the notice area (in all buffers) static void clearArea(int full) { if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { // 8-bit renderers if (full) gp2x_memset_all_buffers(0, 0xe0, SCREEN_WIDTH*240); else gp2x_memset_all_buffers(SCREEN_WIDTH*232, 0xe0, SCREEN_WIDTH*8); } else { // 16bit accurate renderer if (full) gp2x_memset_all_buffers(0, 0, SCREEN_WIDTH*SCREEN_HEIGHT*2); else gp2x_memset_all_buffers(SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2, 0, SCREEN_WIDTH*16*2); } } static void vidResetMode(void) { if (PicoOpt&0x10) { gp2x_video_changemode(8); } else if (currentConfig.EmuOpt&0x80) { gp2x_video_changemode(16); #ifdef USE_320_SCREEN PicoDrawSetColorFormat(1); PicoScanBegin = EmuScanBegin16; #else PicoDrawSetColorFormat(-1); PicoScanEnd = EmuScanEnd16; #endif } else { gp2x_video_changemode(8); PicoDrawSetColorFormat(2); PicoScanBegin = EmuScanBegin8; } if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { // setup pal for 8-bit modes localPal[0xc0] = 0x0000c000; // MCD LEDs localPal[0xd0] = 0x00c00000; localPal[0xe0] = 0x00000000; // reserved pixels for OSD localPal[0xf0] = 0x00ffffff; gp2x_video_setpalette(localPal, 0x100); gp2x_memset_all_buffers(0, 0xe0, 320*240); gp2x_video_flip(); } Pico.m.dirtyPal = 1; // reset scaling if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8)) gp2x_video_RGB_setscaling(8, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 224); else gp2x_video_RGB_setscaling(0, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 240); } static void emu_msg_cb(const char *msg) { if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { // 8-bit renderers gp2x_memset_all_buffers(SCREEN_WIDTH*(SCREEN_HEIGHT-16), 0xe0, SCREEN_WIDTH*16); osd_text(4, SCREEN_HEIGHT-16, msg); gp2x_memcpy_all_buffers((char *)gp2x_screen+SCREEN_WIDTH*(SCREEN_HEIGHT-16), SCREEN_WIDTH*(SCREEN_HEIGHT-16), SCREEN_WIDTH*16); } else { // 16bit accurate renderer gp2x_memset_all_buffers(SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2, 0, SCREEN_WIDTH*16*2); osd_text(4, SCREEN_HEIGHT-16, msg); gp2x_memcpy_all_buffers((char *)gp2x_screen+SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2, SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2, SCREEN_WIDTH*16*2); } gettimeofday(¬iceMsgTime, 0); noticeMsgTime.tv_sec -= 2; /* assumption: emu_msg_cb gets called only when something slow is about to happen */ reset_timing = 1; } static void emu_state_cb(const char *str) { clearArea(0); blit("", str); } static void emu_msg_tray_open(void) { strcpy(noticeMsg, "CD tray opened"); gettimeofday(¬iceMsgTime, 0); } static void RunEventsPico(unsigned int events, unsigned int gp2x_keys) { int ret, px, py, lim_x; static int pdown_frames = 0; emu_RunEventsPico(events); if (pico_inp_mode == 0) return; // for F200 ret = gp2x_touchpad_read(&px, &py); if (ret >= 0) { if (ret > 35000) { if (pdown_frames++ > 5) PicoPad[0] |= 0x20; pico_pen_x = px; pico_pen_y = py; if (!(Pico.video.reg[12]&1)) { pico_pen_x -= 32; if (pico_pen_x < 0) pico_pen_x = 0; if (pico_pen_x > 248) pico_pen_x = 248; } if (pico_pen_y > 224) pico_pen_y = 224; } else pdown_frames = 0; //if (ret == 0) // PicoPicohw.pen_pos[0] = PicoPicohw.pen_pos[1] = 0x8000; } PicoPad[0] &= ~0x0f; // release UDLR if (gp2x_keys & GP2X_UP) pico_pen_y--; if (gp2x_keys & GP2X_DOWN) pico_pen_y++; if (gp2x_keys & GP2X_LEFT) pico_pen_x--; if (gp2x_keys & GP2X_RIGHT) pico_pen_x++; lim_x = (Pico.video.reg[12]&1) ? 319 : 255; if (pico_pen_y < 8) pico_pen_y = 8; if (pico_pen_y > 224-PICO_PEN_ADJUST_Y) pico_pen_y = 224-PICO_PEN_ADJUST_Y; if (pico_pen_x < 0) pico_pen_x = 0; if (pico_pen_x > lim_x-PICO_PEN_ADJUST_X) pico_pen_x = lim_x-PICO_PEN_ADJUST_X; PicoPicohw.pen_pos[0] = pico_pen_x; if (!(Pico.video.reg[12]&1)) PicoPicohw.pen_pos[0] += pico_pen_x/4; PicoPicohw.pen_pos[0] += 0x3c; PicoPicohw.pen_pos[1] = pico_inp_mode == 1 ? (0x2f8 + pico_pen_y) : (0x1fc + pico_pen_y); } static void update_volume(int has_changed, int is_up) { static int prev_frame = 0, wait_frames = 0; int vol = currentConfig.volume; if (has_changed) { if (vol < 5 && (PicoOpt&8) && prev_frame == Pico.m.frame_count - 1 && wait_frames < 12) wait_frames++; else { if (is_up) { if (vol < 99) vol++; } else { if (vol > 0) vol--; } wait_frames = 0; gp2x_sound_volume(vol, vol); currentConfig.volume = vol; } sprintf(noticeMsg, "VOL: %02i", vol); gettimeofday(¬iceMsgTime, 0); prev_frame = Pico.m.frame_count; } // set the right mixer func if (!(PicoOpt&8)) return; // just use defaults for mono if (vol >= 5) PsndMix_32_to_16l = mix_32_to_16l_stereo; else { mix_32_to_16l_level = 5 - vol; PsndMix_32_to_16l = mix_32_to_16l_stereo_lvl; } } static void RunEvents(unsigned int which) { if (which & 0x1800) // save or load (but not both) { int do_it = 1; if ( emu_checkSaveFile(state_slot) && (( (which & 0x1000) && (currentConfig.EmuOpt & 0x800)) || // load (!(which & 0x1000) && (currentConfig.EmuOpt & 0x200))) ) { // save unsigned long keys; blit("", (which & 0x1000) ? "LOAD STATE? (Y=yes, X=no)" : "OVERWRITE SAVE? (Y=yes, X=no)"); while ( !((keys = gp2x_joystick_read(1)) & (GP2X_X|GP2X_Y)) ) usleep(50*1024); if (keys & GP2X_X) do_it = 0; while ( gp2x_joystick_read(1) & (GP2X_X|GP2X_Y) ) // wait for release usleep(50*1024); clearArea(0); } if (do_it) { osd_text(4, SCREEN_HEIGHT-16, (which & 0x1000) ? "LOADING GAME" : "SAVING GAME"); PicoStateProgressCB = emu_state_cb; gp2x_memcpy_all_buffers(gp2x_screen, 0, SCREEN_WIDTH*SCREEN_HEIGHT*2); emu_SaveLoadGame((which & 0x1000) >> 12, 0); PicoStateProgressCB = NULL; } reset_timing = 1; } if (which & 0x0400) // switch renderer { if ( PicoOpt&0x10) { PicoOpt&=~0x10; currentConfig.EmuOpt |= 0x80; } else if (!(currentConfig.EmuOpt&0x80)) PicoOpt|= 0x10; else currentConfig.EmuOpt &= ~0x80; vidResetMode(); if (PicoOpt&0x10) { strcpy(noticeMsg, " 8bit fast renderer"); } else if (currentConfig.EmuOpt&0x80) { strcpy(noticeMsg, "16bit accurate renderer"); } else { strcpy(noticeMsg, " 8bit accurate renderer"); } gettimeofday(¬iceMsgTime, 0); } if (which & 0x0300) { if(which&0x0200) { state_slot -= 1; if(state_slot < 0) state_slot = 9; } else { state_slot += 1; if(state_slot > 9) state_slot = 0; } sprintf(noticeMsg, "SAVE SLOT %i [%s]", state_slot, emu_checkSaveFile(state_slot) ? "USED" : "FREE"); gettimeofday(¬iceMsgTime, 0); } if (which & 0x0080) { engineState = PGS_Menu; } } static void updateKeys(void) { unsigned int keys, keys2, allActions[2] = { 0, 0 }, events; static unsigned int prevEvents = 0; int joy, i; keys = gp2x_joystick_read(0); if (keys & GP2X_SELECT) { engineState = select_exits ? PGS_Quit : PGS_Menu; // wait until select is released, so menu would not resume game while (gp2x_joystick_read(1) & GP2X_SELECT) usleep(50*1000); } keys &= CONFIGURABLE_KEYS; keys2 = keys; for (i = 0; i < 32; i++) { if (keys2 & (1 << i)) { int pl, acts = currentConfig.KeyBinds[i]; if (!acts) continue; pl = (acts >> 16) & 1; if (kb_combo_keys & (1 << i)) { int u = i+1, acts_c = acts & kb_combo_acts; // let's try to find the other one if (acts_c) { for (; u < 32; u++) if ( (keys2 & (1 << u)) && (currentConfig.KeyBinds[u] & acts_c) ) { allActions[pl] |= acts_c & currentConfig.KeyBinds[u]; keys2 &= ~((1 << i) | (1 << u)); break; } } // add non-combo actions if combo ones were not found if (!acts_c || u == 32) allActions[pl] |= acts & ~kb_combo_acts; } else { allActions[pl] |= acts; } } } // add joy inputs if (num_of_joys > 0) { gp2x_usbjoy_update(); for (joy = 0; joy < num_of_joys; joy++) { int btns = gp2x_usbjoy_check2(joy); for (i = 0; i < 32; i++) { if (btns & (1 << i)) { int acts = currentConfig.JoyBinds[joy][i]; int pl = (acts >> 16) & 1; allActions[pl] |= acts; } } } } PicoPad[0] = allActions[0] & 0xfff; PicoPad[1] = allActions[1] & 0xfff; if (allActions[0] & 0x7000) emu_DoTurbo(&PicoPad[0], allActions[0]); if (allActions[1] & 0x7000) emu_DoTurbo(&PicoPad[1], allActions[1]); events = (allActions[0] | allActions[1]) >> 16; // volume is treated in special way and triggered every frame if (events & 0x6000) update_volume(1, events & 0x2000); if ((events ^ prevEvents) & 0x40) { emu_changeFastForward(events & 0x40); update_volume(0, 0); reset_timing = 1; } events &= ~prevEvents; if (PicoAHW == PAHW_PICO) RunEventsPico(events, keys); if (events) RunEvents(events); if (movie_data) emu_updateMovie(); prevEvents = (allActions[0] | allActions[1]) >> 16; } static void updateSound(int len) { if (PicoOpt&8) len<<=1; /* avoid writing audio when lagging behind to prevent audio lag */ if (PicoSkipFrame != 2) gp2x_sound_write(PsndOut, len<<1); } static void SkipFrame(int do_audio) { PicoSkipFrame=do_audio ? 1 : 2; PicoFrame(); PicoSkipFrame=0; } void emu_forcedFrame(int opts) { int po_old = PicoOpt; int eo_old = currentConfig.EmuOpt; PicoOpt &= ~0x10; PicoOpt |= opts|POPT_ACC_SPRITES; // acc_sprites currentConfig.EmuOpt |= 0x80; //vidResetMode(); #ifdef USE_320_SCREEN PicoDrawSetColorFormat(1); PicoScanBegin = EmuScanBegin16; #else PicoDrawSetColorFormat(-1); PicoScanEnd = EmuScanEnd16; #endif Pico.m.dirtyPal = 1; PicoFrameDrawOnly(); /* if (!(Pico.video.reg[12]&1)) { vidCpyM2 = vidCpyM2_32col; clearArea(1); } else vidCpyM2 = vidCpyM2_40col; vidCpyM2((unsigned char *)gp2x_screen+SCREEN_WIDTH*8, PicoDraw2FB+328*8); vidConvCpyRGB32(localPal, Pico.cram, 0x40); gp2x_video_setpalette(localPal, 0x40); */ PicoOpt = po_old; currentConfig.EmuOpt = eo_old; } static void simpleWait(int thissec, int lim_time) { struct timeval tval; spend_cycles(1024); gettimeofday(&tval, 0); if (thissec != tval.tv_sec) tval.tv_usec+=1000000; while (tval.tv_usec < lim_time) { spend_cycles(1024); gettimeofday(&tval, 0); if (thissec != tval.tv_sec) tval.tv_usec+=1000000; } } void emu_Loop(void) { static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0; char fpsbuff[24]; // fps count c string struct timeval tval; // timing int pframes_done, pframes_shown, pthissec; // "period" frames, used for sync int frames_done, frames_shown, thissec; // actual frames int oldmodes = 0, target_fps, target_frametime, lim_time, vsync_offset, i; char *notice = 0; printf("entered emu_Loop()\n"); fpsbuff[0] = 0; // make sure we are in correct mode vidResetMode(); scaling_update(); Pico.m.dirtyPal = 1; oldmodes = ((Pico.video.reg[12]&1)<<2) ^ 0xc; emu_findKeyBindCombos(); // pal/ntsc might have changed, reset related stuff target_fps = Pico.m.pal ? 50 : 60; target_frametime = 1000000/target_fps; reset_timing = 1; // prepare sound stuff if (currentConfig.EmuOpt & 4) { int snd_excess_add; if (PsndRate != PsndRate_old || (PicoOpt&0x20b) != (PicoOpt_old&0x20b) || Pico.m.pal != pal_old) PsndRerate(Pico.m.frame_count ? 1 : 0); snd_excess_add = ((PsndRate - PsndLen*target_fps)<<16) / target_fps; printf("starting audio: %i len: %i (ex: %04x) stereo: %i, pal: %i\n", PsndRate, PsndLen, snd_excess_add, (PicoOpt&8)>>3, Pico.m.pal); gp2x_start_sound(PsndRate, 16, (PicoOpt&8)>>3); gp2x_sound_volume(currentConfig.volume, currentConfig.volume); PicoWriteSound = updateSound; update_volume(0, 0); memset(sndBuffer, 0, sizeof(sndBuffer)); PsndOut = sndBuffer; PsndRate_old = PsndRate; PicoOpt_old = PicoOpt; pal_old = Pico.m.pal; } else { PsndOut = NULL; } // prepare CD buffer if (PicoAHW & PAHW_MCD) PicoCDBufferInit(); // calc vsync offset to sync timing code with vsync if (currentConfig.EmuOpt&0x2000) { gettimeofday(&tval, 0); gp2x_video_wait_vsync(); gettimeofday(&tval, 0); vsync_offset = tval.tv_usec; while (vsync_offset >= target_frametime) vsync_offset -= target_frametime; if (!vsync_offset) vsync_offset++; printf("vsync_offset: %i\n", vsync_offset); } else vsync_offset = 0; frames_done = frames_shown = thissec = pframes_done = pframes_shown = pthissec = 0; // loop while (engineState == PGS_Running) { int modes; gettimeofday(&tval, 0); if (reset_timing) { reset_timing = 0; pthissec = tval.tv_sec; pframes_shown = pframes_done = tval.tv_usec/target_frametime; } // show notice message? if (noticeMsgTime.tv_sec) { static int noticeMsgSum; if((tval.tv_sec*1000000+tval.tv_usec) - (noticeMsgTime.tv_sec*1000000+noticeMsgTime.tv_usec) > 2000000) { // > 2.0 sec noticeMsgTime.tv_sec = noticeMsgTime.tv_usec = 0; clearArea(0); notice = 0; } else { int sum = noticeMsg[0]+noticeMsg[1]+noticeMsg[2]; if (sum != noticeMsgSum) { clearArea(0); noticeMsgSum = sum; } notice = noticeMsg; } } // check for mode changes modes = ((Pico.video.reg[12]&1)<<2)|(Pico.video.reg[1]&8); if (modes != oldmodes) { int scalex = SCREEN_WIDTH; osd_fps_x = OSD_FPS_X; if (modes & 4) { vidCpyM2 = vidCpyM2_40col; } else { if (PicoOpt & 0x100) { vidCpyM2 = vidCpyM2_32col_nobord; scalex = 256; osd_fps_x = OSD_FPS_X - 64; } else { vidCpyM2 = vidCpyM2_32col; } } if (currentConfig.scaling == 2 && !(modes&8)) // want vertical scaling and game is not in 240 line mode gp2x_video_RGB_setscaling(8, scalex, 224); else gp2x_video_RGB_setscaling(0, scalex, 240); oldmodes = modes; clearArea(1); } // second changed? if (thissec != tval.tv_sec) { #ifdef BENCHMARK static int bench = 0, bench_fps = 0, bench_fps_s = 0, bfp = 0, bf[4]; if (++bench == 4) { bench = 0; bench_fps_s = bench_fps / 4; bf[bfp++ & 3] = bench_fps / 4; bench_fps = 0; } bench_fps += frames_shown; sprintf(fpsbuff, "%3i/%3i/%3i", frames_shown, bench_fps_s, (bf[0]+bf[1]+bf[2]+bf[3])>>2); printf("%s\n", fpsbuff); #else if (currentConfig.EmuOpt & 2) { sprintf(fpsbuff, "%3i/%3i", frames_shown, frames_done); if (fpsbuff[5] == 0) { fpsbuff[5] = fpsbuff[6] = ' '; fpsbuff[7] = 0; } } #endif frames_shown = frames_done = 0; thissec = tval.tv_sec; } #ifdef PFRAMES sprintf(fpsbuff, "%i", Pico.m.frame_count); #endif if (pthissec != tval.tv_sec) { if (PsndOut == 0 && currentConfig.Frameskip >= 0) { pframes_done = pframes_shown = 0; } else { // it is quite common for this implementation to leave 1 fame unfinished // when second changes, but we don't want buffer to starve. if(PsndOut && pframes_done < target_fps && pframes_done > target_fps-5) { updateKeys(); SkipFrame(1); pframes_done++; } pframes_done -= target_fps; if (pframes_done < 0) pframes_done = 0; pframes_shown -= target_fps; if (pframes_shown < 0) pframes_shown = 0; if (pframes_shown > pframes_done) pframes_shown = pframes_done; } pthissec = tval.tv_sec; } lim_time = (pframes_done+1) * target_frametime + vsync_offset; if (currentConfig.Frameskip >= 0) // frameskip enabled { for(i = 0; i < currentConfig.Frameskip; i++) { updateKeys(); SkipFrame(1); pframes_done++; frames_done++; if (PsndOut && !reset_timing) { // do framelimitting if sound is enabled gettimeofday(&tval, 0); if (pthissec != tval.tv_sec) tval.tv_usec+=1000000; if (tval.tv_usec < lim_time) { // we are too fast simpleWait(pthissec, lim_time); } } lim_time += target_frametime; } } else if (tval.tv_usec > lim_time) // auto frameskip { // no time left for this frame - skip if (tval.tv_usec - lim_time >= 300000) { /* something caused a slowdown for us (disk access? cache flush?) * try to recover by resetting timing... */ reset_timing = 1; continue; } updateKeys(); SkipFrame(tval.tv_usec < lim_time+target_frametime*2); pframes_done++; frames_done++; continue; } updateKeys(); PicoFrame(); // check time gettimeofday(&tval, 0); if (pthissec != tval.tv_sec) tval.tv_usec+=1000000; if (currentConfig.Frameskip < 0 && tval.tv_usec - lim_time >= 300000) // slowdown detection reset_timing = 1; /* else if (PsndOut != NULL || currentConfig.Frameskip < 0) { // sleep or vsync if we are still too fast // usleep sleeps for ~20ms minimum, so it is not a solution here if (!reset_timing && tval.tv_usec < lim_time) { // we are too fast if (vsync_offset) { if (lim_time - tval.tv_usec > target_frametime/2) simpleWait(pthissec, lim_time - target_frametime/4); gp2x_video_wait_vsync(); } else { simpleWait(pthissec, lim_time); } } } */ blit(fpsbuff, notice); pframes_done++; pframes_shown++; frames_done++; frames_shown++; } emu_changeFastForward(0); if (PicoAHW & PAHW_MCD) PicoCDBufferFree(); // save SRAM if((currentConfig.EmuOpt & 1) && SRam.changed) { emu_state_cb("Writing SRAM/BRAM.."); emu_SaveLoadGame(0, 1); SRam.changed = 0; } // if in 8bit mode, generate 16bit image for menu background if ((PicoOpt&0x10) || !(currentConfig.EmuOpt&0x80)) emu_forcedFrame(POPT_EN_SOFTSCALE); } void emu_ResetGame(void) { PicoReset(); reset_timing = 1; }