giz menu works
[libpicofe.git] / gp2x / emu.c
index 1c81c87..adb10a3 100644 (file)
@@ -1,4 +1,4 @@
-// (c) Copyright 2006 notaz, All rights reserved.\r
+// (c) Copyright 2006-2007 notaz, All rights reserved.\r
 // Free for non-commercial use.\r
 \r
 // For commercial use, separate licencing terms must be obtained.\r
@@ -6,6 +6,8 @@
 #include <stdio.h>\r
 #include <stdlib.h>\r
 #include <sys/time.h>\r
+#include <sys/stat.h>\r
+#include <sys/types.h>\r
 #include <linux/limits.h>\r
 #include <ctype.h>\r
 #include <unistd.h>\r
 #include "gp2x.h"\r
 #include "usbjoy.h"\r
 #include "menu.h"\r
-#include "asmutils.h"\r
+#include "../common/arm_utils.h"\r
+#include "../common/fonts.h"\r
 #include "cpuctrl.h"\r
 \r
-#include "Pico/PicoInt.h"\r
-#include "zlib/zlib.h"\r
+#include <Pico/PicoInt.h>\r
+#include <Pico/Patch.h>\r
+#include <zlib/zlib.h>\r
 \r
 \r
 #ifdef BENCHMARK\r
 #define OSD_FPS_X 260\r
 #endif\r
 \r
-// PicoPad[] format: SACB RLDU\r
-char *actionNames[] = {\r
-       "UP", "DOWN", "LEFT", "RIGHT", "B", "C", "A", "START",\r
-       0, 0, 0, 0, 0, 0, 0, 0, // Z, Y, X, MODE (enabled only when needed), ?, ?, ?, ?\r
-       0, 0, 0, 0, 0, 0, 0, "ENTER MENU", // player2_flag, ?, ?, ?, ?, ?, ?, menu\r
-       "NEXT SAVE SLOT", "PREV SAVE SLOT", "SWITCH RENDERER", "SAVE STATE",\r
-       "LOAD STATE", "VOLUME UP", "VOLUME DOWN", "DONE"\r
-};\r
 \r
 int engineState;\r
 int select_exits = 0;\r
@@ -51,29 +47,17 @@ extern int crashed_940;
 static short sndBuffer[2*44100/50];\r
 static char noticeMsg[64];                                     // notice msg to draw\r
 static struct timeval noticeMsgTime = { 0, 0 };        // when started showing\r
-static int reset_timing, osd_fps_x;\r
+static int osd_fps_x;\r
 static int combo_keys = 0, combo_acts = 0;     // keys and actions which need button combos\r
 static int gp2x_old_gamma = 100;\r
 static unsigned char *movie_data = NULL;\r
 static int movie_size = 0;\r
-unsigned char *framebuff = 0;  // temporary buffer for alt renderer\r
+unsigned char *PicoDraw2FB = NULL;  // temporary buffer for alt renderer\r
 int state_slot = 0;\r
+int reset_timing = 0;\r
+int config_slot = 0, config_slot_current = 0;\r
 \r
-/*\r
-// tmp\r
-static FILE *logf = NULL;\r
-\r
-void pprintf(char *texto, ...)\r
-{\r
-       va_list args;\r
 \r
-       va_start(args,texto);\r
-       vfprintf(logf,texto,args);\r
-       va_end(args);\r
-       fflush(logf);\r
-       sync();\r
-}\r
-*/\r
 // utilities\r
 static void strlwr(char* string)\r
 {\r
@@ -166,31 +150,31 @@ int find_bios(int region, char **bios_file)
 \r
 /* checks if romFileName points to valid MegaCD image\r
  * if so, checks for suitable BIOS */\r
-static int cd_check(char *ext, char **bios_file)\r
+int emu_cd_check(char **bios_file)\r
 {\r
        unsigned char buf[32];\r
-       FILE *cd_f;\r
+       pm_file *cd_f;\r
        int type = 0, region = 4; // 1: Japan, 4: US, 8: Europe\r
 \r
-       cd_f = fopen(romFileName, "rb");\r
+       cd_f = pm_open(romFileName);\r
        if (!cd_f) return 0; // let the upper level handle this\r
 \r
-       if (fread(buf, 1, 32, cd_f) != 32) {\r
-               fclose(cd_f);\r
+       if (pm_read(buf, 32, cd_f) != 32) {\r
+               pm_close(cd_f);\r
                return 0;\r
        }\r
 \r
        if (!strncasecmp("SEGADISCSYSTEM", (char *)buf+0x00, 14)) type = 1;       // Sega CD (ISO)\r
        if (!strncasecmp("SEGADISCSYSTEM", (char *)buf+0x10, 14)) type = 2;       // Sega CD (BIN)\r
        if (type == 0) {\r
-               fclose(cd_f);\r
+               pm_close(cd_f);\r
                return 0;\r
        }\r
 \r
-       /* it seems we have a CD image here. Try to detect region and load a suitable BIOS now.. */\r
-       fseek(cd_f, (type == 1) ? 0x100+0x10B : 0x110+0x10B, SEEK_SET);\r
-       fread(buf, 1, 1, cd_f);\r
-       fclose(cd_f);\r
+       /* it seems we have a CD image here. Try to detect region now.. */\r
+       pm_seek(cd_f, (type == 1) ? 0x100+0x10B : 0x110+0x10B, SEEK_SET);\r
+       pm_read(buf, 1, cd_f);\r
+       pm_close(cd_f);\r
 \r
        if (buf[0] == 0x64) region = 8; // EU\r
        if (buf[0] == 0xa1) region = 1; // JAP\r
@@ -203,7 +187,9 @@ static int cd_check(char *ext, char **bios_file)
                printf("overrided region to %s\n", region != 4 ? (region == 8 ? "EU" : "JAP") : "USA");\r
        }\r
 \r
-       if(find_bios(region, bios_file))\r
+       if (bios_file == NULL) return type;\r
+\r
+       if (find_bios(region, bios_file))\r
                 return type;   // CD and BIOS detected\r
 \r
        return -1;              // CD detected but load failed\r
@@ -214,7 +200,7 @@ int emu_ReloadRom(void)
        unsigned int rom_size = 0;\r
        char *used_rom_name = romFileName;\r
        char ext[5];\r
-       FILE *rom;\r
+       pm_file *rom;\r
        int ret, cd_state;\r
 \r
        printf("emu_ReloadRom(%s)\n", romFileName);\r
@@ -227,6 +213,8 @@ int emu_ReloadRom(void)
                return 0;\r
        }\r
 \r
+       PicoPatchUnload();\r
+\r
        // check for movie file\r
        if(movie_data) {\r
                free(movie_data);\r
@@ -267,9 +255,22 @@ int emu_ReloadRom(void)
                }\r
                get_ext(romFileName, ext);\r
        }\r
+       else if (!strcmp(ext, ".pat")) {\r
+               int dummy;\r
+               PicoPatchLoad(romFileName);\r
+               dummy = try_rfn_cut() || try_rfn_cut();\r
+               if (!dummy) {\r
+                       sprintf(menuErrorMsg, "Could't find a ROM to patch.");\r
+                       return 0;\r
+               }\r
+               get_ext(romFileName, ext);\r
+       }\r
+\r
+       if ((PicoMCD & 1) && Pico_mcd != NULL)\r
+               Stop_CD();\r
 \r
        // check for MegaCD image\r
-       cd_state = cd_check(ext, &used_rom_name);\r
+       cd_state = emu_cd_check(&used_rom_name);\r
        if (cd_state > 0) {\r
                PicoMCD |= 1;\r
                get_ext(used_rom_name, ext);\r
@@ -277,45 +278,37 @@ int emu_ReloadRom(void)
                // bios_help() ?\r
                return 0;\r
        } else {\r
-               if (PicoMCD & 1) PicoExitMCD();\r
+               if (PicoMCD & 1) Stop_CD();\r
                PicoMCD &= ~1;\r
        }\r
 \r
-       rom = fopen(used_rom_name, "rb");\r
+       rom = pm_open(used_rom_name);\r
        if(!rom) {\r
                sprintf(menuErrorMsg, "Failed to open rom.");\r
                return 0;\r
        }\r
 \r
+       menu_romload_prepare(used_rom_name);\r
+\r
        if(rom_data) {\r
                free(rom_data);\r
                rom_data = 0;\r
                rom_size = 0;\r
        }\r
 \r
-       // zipfile support\r
-       if(!strcasecmp(ext, ".zip")) {\r
-               fclose(rom);\r
-               ret = CartLoadZip(used_rom_name, &rom_data, &rom_size);\r
-               if(ret) {\r
-                       if (ret == 4) strcpy(menuErrorMsg, "No ROMs found in zip.");\r
-                       else sprintf(menuErrorMsg, "Unzip failed with code %i", ret);\r
-                       printf("%s\n", menuErrorMsg);\r
-                       return 0;\r
-               }\r
-       } else {\r
-               if( (ret = PicoCartLoad(rom, &rom_data, &rom_size)) ) {\r
-                       sprintf(menuErrorMsg, "PicoCartLoad() failed.");\r
-                       printf("%s\n", menuErrorMsg);\r
-                       fclose(rom);\r
-                       return 0;\r
-               }\r
-               fclose(rom);\r
+       if( (ret = PicoCartLoad(rom, &rom_data, &rom_size)) ) {\r
+               sprintf(menuErrorMsg, "PicoCartLoad() failed.");\r
+               printf("%s\n", menuErrorMsg);\r
+               pm_close(rom);\r
+               menu_romload_end();\r
+               return 0;\r
        }\r
+       pm_close(rom);\r
+       menu_romload_end();\r
 \r
        // detect wrong files (Pico crashes on very small files), also see if ROM EP is good\r
        if(rom_size <= 0x200 || strncmp((char *)rom_data, "Pico", 4) == 0 ||\r
-         ((*(unsigned short *)(rom_data+4)<<16)|(*(unsigned short *)(rom_data+6))) >= (int)rom_size) {\r
+         ((*(unsigned char *)(rom_data+4)<<16)|(*(unsigned short *)(rom_data+6))) >= (int)rom_size) {\r
                if (rom_data) free(rom_data);\r
                rom_data = 0;\r
                sprintf(menuErrorMsg, "Not a ROM selected.");\r
@@ -323,9 +316,9 @@ int emu_ReloadRom(void)
        }\r
 \r
        // load config for this ROM (do this before insert to get correct region)\r
-       ret = emu_ReadConfig(1);\r
+       ret = emu_ReadConfig(1, 1);\r
        if (!ret)\r
-               emu_ReadConfig(0);\r
+               emu_ReadConfig(0, 1);\r
 \r
        printf("PicoCartInsert(%p, %d);\n", rom_data, rom_size);\r
        if(PicoCartInsert(rom_data, rom_size)) {\r
@@ -349,6 +342,11 @@ int emu_ReloadRom(void)
        strncpy(currentConfig.lastRomFile, romFileName, sizeof(currentConfig.lastRomFile)-1);\r
        currentConfig.lastRomFile[sizeof(currentConfig.lastRomFile)-1] = 0;\r
 \r
+       if (PicoPatches) {\r
+               PicoPatchPrepare();\r
+               PicoPatchApply();\r
+       }\r
+\r
        // additional movie stuff\r
        if(movie_data) {\r
                if(movie_data[0x14] == '6')\r
@@ -385,31 +383,47 @@ int emu_ReloadRom(void)
 }\r
 \r
 \r
+static void emu_msg_cb(const char *msg);\r
+static void emu_msg_tray_open(void);\r
+\r
 void emu_Init(void)\r
 {\r
        // make temp buffer for alt renderer\r
-       framebuff = malloc((8+320)*(8+240+8));\r
-       if (!framebuff)\r
+       PicoDraw2FB = malloc((8+320)*(8+240+8));\r
+       if (!PicoDraw2FB)\r
        {\r
-               printf("framebuff == 0\n");\r
+               printf("PicoDraw2FB == 0\n");\r
        }\r
 \r
-       PicoInit();\r
+       // make dirs for saves, cfgs, etc.\r
+       mkdir("mds", 0777);\r
+       mkdir("srm", 0777);\r
+       mkdir("brm", 0777);\r
+       mkdir("cfg", 0777);\r
 \r
-//     logf = fopen("log.txt", "w");\r
+       PicoInit();\r
+       PicoMessage = emu_msg_cb;\r
+       PicoMCDopenTray = emu_msg_tray_open;\r
+       PicoMCDcloseTray = menu_loop_tray;\r
 }\r
 \r
 \r
-static void romfname_ext(char *dst, char *ext)\r
+static void romfname_ext(char *dst, const char *prefix, const char *ext)\r
 {\r
        char *p;\r
+       int prefix_len = 0;\r
 \r
        // make save filename\r
        for (p = romFileName+strlen(romFileName)-1; p >= romFileName && *p != '/'; p--); p++;\r
-       strncpy(dst, p, 511);\r
+       *dst = 0;\r
+       if (prefix) {\r
+               strcpy(dst, prefix);\r
+               prefix_len = strlen(prefix);\r
+       }\r
+       strncpy(dst + prefix_len, p, 511-prefix_len);\r
        dst[511-8] = 0;\r
-       if(dst[strlen(dst)-4] == '.') dst[strlen(dst)-4] = 0;\r
-       strcat(dst, ext);\r
+       if (dst[strlen(dst)-4] == '.') dst[strlen(dst)-4] = 0;\r
+       if (ext) strcat(dst, ext);\r
 }\r
 \r
 \r
@@ -443,43 +457,73 @@ static void find_combos(void)
 }\r
 \r
 \r
-int emu_ReadConfig(int game)\r
+void scaling_update(void)\r
+{\r
+       PicoOpt &= ~0x4100;\r
+       switch (currentConfig.scaling) {\r
+               default: break; // off\r
+               case 1:  // hw hor\r
+               case 2:  PicoOpt |=  0x0100; break; // hw hor+vert\r
+               case 3:  PicoOpt |=  0x4000; break; // sw hor\r
+       }\r
+}\r
+\r
+\r
+int emu_ReadConfig(int game, int no_defaults)\r
 {\r
        FILE *f;\r
-       char cfg[512];\r
+       char cfg[512], extbuf[16];\r
        int bread = 0;\r
 \r
        if (!game)\r
        {\r
-               // set default config\r
-               memset(&currentConfig, 0, sizeof(currentConfig));\r
-               currentConfig.lastRomFile[0] = 0;\r
-               currentConfig.EmuOpt  = 0x1f | 0x400; // | cd_leds\r
-               currentConfig.PicoOpt = 0x0f | 0xe00; // | use_940 | cd_pcm | cd_cdda\r
-               currentConfig.PsndRate = 22050; // 44100;\r
-               currentConfig.PicoRegion = 0; // auto\r
-               currentConfig.PicoAutoRgnOrder = 0x184; // US, EU, JP\r
-               currentConfig.Frameskip = -1; // auto\r
-               currentConfig.CPUclock = 200;\r
-               currentConfig.volume = 50;\r
-               currentConfig.KeyBinds[ 0] = 1<<0; // SACB RLDU\r
-               currentConfig.KeyBinds[ 4] = 1<<1;\r
-               currentConfig.KeyBinds[ 2] = 1<<2;\r
-               currentConfig.KeyBinds[ 6] = 1<<3;\r
-               currentConfig.KeyBinds[14] = 1<<4;\r
-               currentConfig.KeyBinds[13] = 1<<5;\r
-               currentConfig.KeyBinds[12] = 1<<6;\r
-               currentConfig.KeyBinds[ 8] = 1<<7;\r
-               currentConfig.KeyBinds[15] = 1<<26; // switch rend\r
-               currentConfig.KeyBinds[10] = 1<<27; // save state\r
-               currentConfig.KeyBinds[11] = 1<<28; // load state\r
-               currentConfig.KeyBinds[23] = 1<<29; // vol up\r
-               currentConfig.KeyBinds[22] = 1<<30; // vol down\r
-               currentConfig.gamma = 100;\r
+               if (!no_defaults)\r
+               {\r
+                       // set default config\r
+                       memset(&currentConfig, 0, sizeof(currentConfig));\r
+                       currentConfig.lastRomFile[0] = 0;\r
+                       currentConfig.EmuOpt  = 0x1f | 0x600; // | confirm_save, cd_leds\r
+                       currentConfig.PicoOpt = 0x0f | 0xe00; // | use_940, cd_pcm, cd_cdda\r
+                       currentConfig.PsndRate = 22050; // 44100;\r
+                       currentConfig.PicoRegion = 0; // auto\r
+                       currentConfig.PicoAutoRgnOrder = 0x184; // US, EU, JP\r
+                       currentConfig.Frameskip = -1; // auto\r
+                       currentConfig.CPUclock = 200;\r
+                       currentConfig.volume = 50;\r
+                       currentConfig.KeyBinds[ 0] = 1<<0; // SACB RLDU\r
+                       currentConfig.KeyBinds[ 4] = 1<<1;\r
+                       currentConfig.KeyBinds[ 2] = 1<<2;\r
+                       currentConfig.KeyBinds[ 6] = 1<<3;\r
+                       currentConfig.KeyBinds[14] = 1<<4;\r
+                       currentConfig.KeyBinds[13] = 1<<5;\r
+                       currentConfig.KeyBinds[12] = 1<<6;\r
+                       currentConfig.KeyBinds[ 8] = 1<<7;\r
+                       currentConfig.KeyBinds[15] = 1<<26; // switch rend\r
+                       currentConfig.KeyBinds[10] = 1<<27; // save state\r
+                       currentConfig.KeyBinds[11] = 1<<28; // load state\r
+                       currentConfig.KeyBinds[23] = 1<<29; // vol up\r
+                       currentConfig.KeyBinds[22] = 1<<30; // vol down\r
+                       currentConfig.gamma = 100;\r
+                       currentConfig.PicoCDBuffers = 64;\r
+                       currentConfig.scaling = 0;\r
+               }\r
                strncpy(cfg, PicoConfigFile, 511);\r
+               if (config_slot != 0)\r
+               {\r
+                       char *p = strrchr(cfg, '.');\r
+                       if (p == NULL) p = cfg + strlen(cfg);\r
+                       sprintf(extbuf, ".%i.pbcfg", config_slot);\r
+                       strncpy(p, extbuf, 511 - (p - cfg));\r
+               }\r
                cfg[511] = 0;\r
        } else {\r
-               romfname_ext(cfg, ".pbcfg");\r
+               if (config_slot != 0)\r
+                    sprintf(extbuf, ".%i.pbcfg", config_slot);\r
+               else strcpy(extbuf, ".pbcfg");\r
+               romfname_ext(cfg, "cfg/", extbuf);\r
+               f = fopen(cfg, "rb");\r
+               if (!f) romfname_ext(cfg, NULL, ".pbcfg");\r
+               else fclose(f);\r
        }\r
 \r
        printf("emu_ReadConfig: %s ", cfg);\r
@@ -488,41 +532,51 @@ int emu_ReadConfig(int game)
                bread = fread(&currentConfig, 1, sizeof(currentConfig), f);\r
                fclose(f);\r
        }\r
-       printf((bread == sizeof(currentConfig)) ? "(ok)\n" : "(failed)\n");\r
+       printf(bread > 0 ? "(ok)\n" : "(failed)\n");\r
 \r
        PicoOpt = currentConfig.PicoOpt;\r
        PsndRate = currentConfig.PsndRate;\r
        PicoRegionOverride = currentConfig.PicoRegion;\r
        PicoAutoRgnOrder = currentConfig.PicoAutoRgnOrder;\r
-       if (PicoOpt & 0x20) {\r
-               actionNames[ 8] = "Z"; actionNames[ 9] = "Y";\r
-               actionNames[10] = "X"; actionNames[11] = "MODE";\r
-       }\r
+       PicoCDBuffers = currentConfig.PicoCDBuffers;\r
+       scaling_update();\r
        // some sanity checks\r
-       if (currentConfig.CPUclock < 1 || currentConfig.CPUclock > 4096) currentConfig.CPUclock = 200;\r
+       if (currentConfig.CPUclock < 10 || currentConfig.CPUclock > 4096) currentConfig.CPUclock = 200;\r
        if (currentConfig.gamma < 10 || currentConfig.gamma > 300) currentConfig.gamma = 100;\r
+       if (currentConfig.volume < 0 || currentConfig.volume > 99) currentConfig.volume = 50;\r
        // if volume keys are unbound, bind them to volume control\r
        if (!currentConfig.KeyBinds[23] && !currentConfig.KeyBinds[22]) {\r
                currentConfig.KeyBinds[23] = 1<<29; // vol up\r
                currentConfig.KeyBinds[22] = 1<<30; // vol down\r
        }\r
 \r
-       return (bread == sizeof(currentConfig));\r
+       if (bread > 0) config_slot_current = config_slot;\r
+       return (bread > 0); // == sizeof(currentConfig));\r
 }\r
 \r
 \r
 int emu_WriteConfig(int game)\r
 {\r
        FILE *f;\r
-       char cfg[512];\r
+       char cfg[512], extbuf[16];\r
        int bwrite = 0;\r
 \r
        if (!game)\r
        {\r
                strncpy(cfg, PicoConfigFile, 511);\r
+               if (config_slot != 0)\r
+               {\r
+                       char *p = strrchr(cfg, '.');\r
+                       if (p == NULL) p = cfg + strlen(cfg);\r
+                       sprintf(extbuf, ".%i.pbcfg", config_slot);\r
+                       strncpy(p, extbuf, 511 - (p - cfg));\r
+               }\r
                cfg[511] = 0;\r
        } else {\r
-               romfname_ext(cfg, ".pbcfg");\r
+               if (config_slot != 0)\r
+                    sprintf(extbuf, ".%i.pbcfg", config_slot);\r
+               else strcpy(extbuf, ".pbcfg");\r
+               romfname_ext(cfg, "cfg/", extbuf);\r
        }\r
 \r
        printf("emu_WriteConfig: %s ", cfg);\r
@@ -532,13 +586,17 @@ int emu_WriteConfig(int game)
                currentConfig.PsndRate = PsndRate;\r
                currentConfig.PicoRegion = PicoRegionOverride;\r
                currentConfig.PicoAutoRgnOrder = PicoAutoRgnOrder;\r
+               currentConfig.PicoCDBuffers = PicoCDBuffers;\r
                bwrite = fwrite(&currentConfig, 1, sizeof(currentConfig), f);\r
                fflush(f);\r
                fclose(f);\r
+#ifndef NO_SYNC\r
                sync();\r
+#endif\r
        }\r
        printf((bwrite == sizeof(currentConfig)) ? "(ok)\n" : "(failed)\n");\r
 \r
+       if (bwrite == sizeof(currentConfig)) config_slot_current = config_slot;\r
        return (bwrite == sizeof(currentConfig));\r
 }\r
 \r
@@ -551,16 +609,77 @@ void emu_Deinit(void)
                SRam.changed = 0;\r
        }\r
 \r
-       if (!(currentConfig.EmuOpt & 0x20))\r
-               emu_WriteConfig(0);\r
-       free(framebuff);\r
+       if (!(currentConfig.EmuOpt & 0x20)) {\r
+               FILE *f = fopen(PicoConfigFile, "r+b");\r
+               if (!f) emu_WriteConfig(0);\r
+               else {\r
+                       // if we already have config, reload it, except last ROM\r
+                       fseek(f, sizeof(currentConfig.lastRomFile), SEEK_SET);\r
+                       fread(&currentConfig.EmuOpt, 1, sizeof(currentConfig) - sizeof(currentConfig.lastRomFile), f);\r
+                       fseek(f, 0, SEEK_SET);\r
+                       fwrite(&currentConfig, 1, sizeof(currentConfig), f);\r
+                       fflush(f);\r
+                       fclose(f);\r
+#ifndef NO_SYNC\r
+                       sync();\r
+#endif\r
+               }\r
+       }\r
+\r
+       free(PicoDraw2FB);\r
 \r
        PicoExit();\r
-//     fclose(logf);\r
 \r
        // restore gamma\r
        if (gp2x_old_gamma != 100)\r
-               set_gamma(100);\r
+               set_gamma(100, 0);\r
+}\r
+\r
+static void text_out8_builtin(int x, int y, const char *text)\r
+{\r
+       int i,l,len=strlen(text);\r
+       unsigned char *screen = (unsigned char *)gp2x_screen + x + y*320;\r
+\r
+       /* always using built-in font */\r
+       for (i = 0; i < len; i++)\r
+       {\r
+               for (l=0;l<8;l++)\r
+               {\r
+                       unsigned char fd = fontdata8x8[((text[i])*8)+l];\r
+                       if (fd&0x80) screen[l*320+0]=0xf0;\r
+                       if (fd&0x40) screen[l*320+1]=0xf0;\r
+                       if (fd&0x20) screen[l*320+2]=0xf0;\r
+                       if (fd&0x10) screen[l*320+3]=0xf0;\r
+                       if (fd&0x08) screen[l*320+4]=0xf0;\r
+                       if (fd&0x04) screen[l*320+5]=0xf0;\r
+                       if (fd&0x02) screen[l*320+6]=0xf0;\r
+                       if (fd&0x01) screen[l*320+7]=0xf0;\r
+               }\r
+               screen += 8;\r
+       }\r
+}\r
+\r
+static void text_out16_builtin(int x, int y, const char *text)\r
+{\r
+       int i,l,len=strlen(text);\r
+       unsigned short *screen = (unsigned short *)gp2x_screen + x + y*320;\r
+\r
+       for (i = 0; i < len; i++)\r
+       {\r
+               for (l=0;l<8;l++)\r
+               {\r
+                       unsigned char fd = fontdata8x8[((text[i])*8)+l];\r
+                       if(fd&0x80) screen[l*320+0]=0xffff;\r
+                       if(fd&0x40) screen[l*320+1]=0xffff;\r
+                       if(fd&0x20) screen[l*320+2]=0xffff;\r
+                       if(fd&0x10) screen[l*320+3]=0xffff;\r
+                       if(fd&0x08) screen[l*320+4]=0xffff;\r
+                       if(fd&0x04) screen[l*320+5]=0xffff;\r
+                       if(fd&0x02) screen[l*320+6]=0xffff;\r
+                       if(fd&0x01) screen[l*320+7]=0xffff;\r
+               }\r
+               screen += 8;\r
+       }\r
 }\r
 \r
 \r
@@ -576,7 +695,7 @@ void osd_text(int x, int y, const char *text)
                        p = (int *) ((unsigned char *) gp2x_screen+x+320*(y+h));\r
                        for (i = len; i; i--, p++) *p = 0xe0e0e0e0;\r
                }\r
-               gp2x_text_out8_2(x, y, text, 0xf0);\r
+               text_out8_builtin(x, y, text);\r
        } else {\r
                int *p, i, h;\r
                x &= ~1; // align x\r
@@ -585,7 +704,7 @@ void osd_text(int x, int y, const char *text)
                        p = (int *) ((unsigned short *) gp2x_screen+x+320*(y+h));\r
                        for (i = len; i; i--, p++) *p = (*p>>2)&0x39e7;\r
                }\r
-               gp2x_text_out15(x, y, text);\r
+               text_out16_builtin(x, y, text);\r
        }\r
 }\r
 \r
@@ -649,7 +768,7 @@ static void blit(const char *fps, const char *notice)
                        // feed new palette to our device\r
                        gp2x_video_setpalette(localPal, 0x40);\r
                }\r
-               vidCpyM2((unsigned char *)gp2x_screen+320*8, framebuff+328*8);\r
+               vidCpyM2((unsigned char *)gp2x_screen+320*8, PicoDraw2FB+328*8);\r
        } else if (!(emu_opt&0x80)) {\r
                // 8bit accurate renderer\r
                if (Pico.m.dirtyPal) {\r
@@ -676,9 +795,13 @@ static void blit(const char *fps, const char *notice)
                }\r
        }\r
 \r
-       if (notice) osd_text(4, 232, notice);\r
-       if (emu_opt & 2)\r
-               osd_text(osd_fps_x, 232, fps);\r
+       if (notice || (emu_opt & 2)) {\r
+               int h = 232;\r
+               if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8)) h -= 8;\r
+               if (notice) osd_text(4, h, notice);\r
+               if (emu_opt & 2)\r
+                       osd_text(osd_fps_x, h, fps);\r
+       }\r
        if ((emu_opt & 0x400) && (PicoMCD & 1))\r
                cd_leds();\r
 \r
@@ -719,7 +842,7 @@ static void vidResetMode(void)
        if (PicoOpt&0x10) {\r
                gp2x_video_changemode(8);\r
        } else if (currentConfig.EmuOpt&0x80) {\r
-               gp2x_video_changemode(15);\r
+               gp2x_video_changemode(16);\r
                PicoDrawSetColorFormat(1);\r
                PicoScan = EmuScan16;\r
                PicoScan(0, 0);\r
@@ -741,27 +864,30 @@ static void vidResetMode(void)
        }\r
        Pico.m.dirtyPal = 1;\r
        // reset scaling\r
-       gp2x_video_RGB_setscaling((PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 240);\r
+       if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8))\r
+            gp2x_video_RGB_setscaling(8, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 224);\r
+       else gp2x_video_RGB_setscaling(0, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 240);\r
 }\r
 \r
 \r
-static int check_save_file(void)\r
+static void emu_msg_cb(const char *msg)\r
 {\r
-       char saveFname[512];\r
-       char ext[16];\r
-       FILE *f;\r
-\r
-       ext[0] = 0;\r
-       if(state_slot > 0 && state_slot < 10) sprintf(ext, ".%i", state_slot);\r
-       strcat(ext, ".mds");\r
-       if(currentConfig.EmuOpt & 8) strcat(ext, ".gz");\r
-\r
-       romfname_ext(saveFname, ext);\r
-       if ((f = fopen(saveFname, "rb"))) {\r
-               fclose(f);\r
-               return 1;\r
+       if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {\r
+               // 8-bit renderers\r
+               gp2x_memset_all_buffers(320*232, 0xe0, 320*8);\r
+               osd_text(4, 232, msg);\r
+               gp2x_memcpy_all_buffers((char *)gp2x_screen+320*232, 320*232, 320*8);\r
+       } else {\r
+               // 16bit accurate renderer\r
+               gp2x_memset_all_buffers(320*232*2, 0, 320*8*2);\r
+               osd_text(4, 232, msg);\r
+               gp2x_memcpy_all_buffers((char *)gp2x_screen+320*232*2, 320*232*2, 320*8*2);\r
        }\r
-       return 0;\r
+       gettimeofday(&noticeMsgTime, 0);\r
+       noticeMsgTime.tv_sec -= 2;\r
+\r
+       /* assumption: emu_msg_cb gets called only when something slow is about to happen */\r
+       reset_timing = 1;\r
 }\r
 \r
 static void emu_state_cb(const char *str)\r
@@ -770,13 +896,21 @@ static void emu_state_cb(const char *str)
        blit("", str);\r
 }\r
 \r
+static void emu_msg_tray_open(void)\r
+{\r
+       strcpy(noticeMsg, "CD tray opened");\r
+       gettimeofday(&noticeMsgTime, 0);\r
+}\r
+\r
 static void RunEvents(unsigned int which)\r
 {\r
        if(which & 0x1800) { // save or load (but not both)\r
                int do_it = 1;\r
-               if (!(which & 0x1000) && (currentConfig.EmuOpt & 0x200) && check_save_file()) {\r
+               if ( emu_check_save_file(state_slot) &&\r
+                               (( (which & 0x1000) && (currentConfig.EmuOpt & 0x800)) ||   // load\r
+                                (!(which & 0x1000) && (currentConfig.EmuOpt & 0x200))) ) { // save\r
                        unsigned long keys;\r
-                       blit("", "OVERWRITE SAVE? (Y=yes, X=no)");\r
+                       blit("", (which & 0x1000) ? "LOAD STATE? (Y=yes, X=no)" : "OVERWRITE SAVE? (Y=yes, X=no)");\r
                        while( !((keys = gp2x_joystick_read(1)) & (GP2X_X|GP2X_Y)) )\r
                                usleep(50*1024);\r
                        if (keys & GP2X_X) do_it = 0;\r
@@ -817,7 +951,7 @@ static void RunEvents(unsigned int which)
                        state_slot += 1;\r
                        if(state_slot > 9) state_slot = 0;\r
                }\r
-               sprintf(noticeMsg, "SAVE SLOT %i [%s]", state_slot, check_save_file() ? "USED" : "FREE");\r
+               sprintf(noticeMsg, "SAVE SLOT %i [%s]", state_slot, emu_check_save_file(state_slot) ? "USED" : "FREE");\r
                gettimeofday(&noticeMsgTime, 0);\r
        }\r
        if(which & 0x0080) {\r
@@ -920,7 +1054,7 @@ static void updateKeys(void)
        if(events & 0x6000) {\r
                int vol = currentConfig.volume;\r
                if (events & 0x2000) {\r
-                       if (vol < 90) vol++;\r
+                       if (vol < 99) vol++;\r
                } else {\r
                        if (vol >  0) vol--;\r
                }\r
@@ -942,28 +1076,50 @@ static void updateSound(int len)
 {\r
        if (PicoOpt&8) len<<=1;\r
 \r
-       gp2x_sound_write(PsndOut, len<<1);\r
+       /* avoid writing audio when lagging behind to prevent audio lag */\r
+       if (PicoSkipFrame != 2)\r
+               gp2x_sound_write(PsndOut, len<<1);\r
 }\r
 \r
 \r
-static void SkipFrame(int do_sound)\r
+static void SkipFrame(int do_audio)\r
 {\r
-       void *sndbuff_tmp = 0;\r
-       if (PsndOut && !do_sound) {\r
-               sndbuff_tmp = PsndOut;\r
-               PsndOut = 0;\r
-       }\r
-\r
-       PicoSkipFrame=1;\r
+       PicoSkipFrame=do_audio ? 1 : 2;\r
        PicoFrame();\r
        PicoSkipFrame=0;\r
-\r
-       if (sndbuff_tmp && !do_sound) {\r
-               PsndOut = sndbuff_tmp;\r
-       }\r
 }\r
 \r
 \r
+void emu_forced_frame(void)\r
+{\r
+       int po_old = PicoOpt;\r
+       int eo_old = currentConfig.EmuOpt;\r
+\r
+       PicoOpt &= ~0x0010;\r
+       PicoOpt |=  0x4080; // soft_scale | acc_sprites\r
+       currentConfig.EmuOpt |= 0x80;\r
+\r
+       //vidResetMode();\r
+       PicoDrawSetColorFormat(1);\r
+       PicoScan = EmuScan16;\r
+       PicoScan(0, 0);\r
+       Pico.m.dirtyPal = 1;\r
+       PicoFrameDrawOnly();\r
+\r
+/*\r
+       if (!(Pico.video.reg[12]&1)) {\r
+               vidCpyM2 = vidCpyM2_32col;\r
+               clearArea(1);\r
+       } else  vidCpyM2 = vidCpyM2_40col;\r
+\r
+       vidCpyM2((unsigned char *)gp2x_screen+320*8, PicoDraw2FB+328*8);\r
+       vidConvCpyRGB32(localPal, Pico.cram, 0x40);\r
+       gp2x_video_setpalette(localPal, 0x40);\r
+*/\r
+       PicoOpt = po_old;\r
+       currentConfig.EmuOpt = eo_old;\r
+}\r
+\r
 static void simpleWait(int thissec, int lim_time)\r
 {\r
        struct timeval tval;\r
@@ -984,11 +1140,11 @@ static void simpleWait(int thissec, int lim_time)
 void emu_Loop(void)\r
 {\r
        static int gp2x_old_clock = 200;\r
-       static int PsndRate_old = 0, PicoOpt_old = 0, PsndLen_real = 0, pal_old = 0;\r
+       static int PsndRate_old = 0, PicoOpt_old = 0, EmuOpt_old = 0, PsndLen_real = 0, pal_old = 0;\r
        char fpsbuff[24]; // fps count c string\r
        struct timeval tval; // timing\r
        int thissec = 0, frames_done = 0, frames_shown = 0, oldmodes = 0;\r
-       int target_fps, target_frametime, lim_time, i;\r
+       int target_fps, target_frametime, lim_time, vsync_offset, i;\r
        char *notice = 0;\r
 \r
        printf("entered emu_Loop()\n");\r
@@ -1000,12 +1156,19 @@ void emu_Loop(void)
                printf(" done\n");\r
        }\r
 \r
-       if (gp2x_old_gamma != currentConfig.gamma) {\r
-               set_gamma(currentConfig.gamma);\r
+       if (gp2x_old_gamma != currentConfig.gamma || (EmuOpt_old&0x1000) != (currentConfig.EmuOpt&0x1000)) {\r
+               set_gamma(currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000));\r
                gp2x_old_gamma = currentConfig.gamma;\r
-               printf("updated gamma to %i\n", currentConfig.gamma);\r
+               printf("updated gamma to %i, A_SN's curve: %i\n", currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000));\r
+       }\r
+\r
+       if ((EmuOpt_old&0x2000) != (currentConfig.EmuOpt&0x2000)) {\r
+               if (currentConfig.EmuOpt&0x2000)\r
+                    set_LCD_custom_rate(Pico.m.pal ? LCDR_100 : LCDR_120);\r
+               else unset_LCD_custom_rate();\r
        }\r
 \r
+       EmuOpt_old = currentConfig.EmuOpt;\r
        fpsbuff[0] = 0;\r
 \r
        // make sure we are in correct mode\r
@@ -1046,6 +1209,22 @@ void emu_Loop(void)
                PsndOut = 0;\r
        }\r
 \r
+       // prepare CD buffer\r
+       if (PicoMCD & 1) PicoCDBufferInit();\r
+\r
+       // calc vsync offset to sync timing code with vsync\r
+       if (currentConfig.EmuOpt&0x2000) {\r
+               gettimeofday(&tval, 0);\r
+               gp2x_video_wait_vsync();\r
+               gettimeofday(&tval, 0);\r
+               vsync_offset = tval.tv_usec;\r
+               while (vsync_offset >= target_frametime)\r
+                       vsync_offset -= target_frametime;\r
+               if (!vsync_offset) vsync_offset++;\r
+               printf("vsync_offset: %i\n", vsync_offset);\r
+       } else\r
+               vsync_offset = 0;\r
+\r
        // loop?\r
        while (engineState == PGS_Running)\r
        {\r
@@ -1088,7 +1267,9 @@ void emu_Loop(void)
                                        vidCpyM2 = vidCpyM2_32col;\r
                                }\r
                        }\r
-                       gp2x_video_RGB_setscaling(scalex, 240);\r
+                       if (currentConfig.scaling == 2 && !(modes&8)) // want vertical scaling and game is not in 240 line mode\r
+                            gp2x_video_RGB_setscaling(8, scalex, 224);\r
+                       else gp2x_video_RGB_setscaling(0, scalex, 240);\r
                        oldmodes = modes;\r
                        clearArea(1);\r
                }\r
@@ -1127,7 +1308,7 @@ void emu_Loop(void)
                        }\r
                }\r
 \r
-               lim_time = (frames_done+1) * target_frametime;\r
+               lim_time = (frames_done+1) * target_frametime + vsync_offset;\r
                if(currentConfig.Frameskip >= 0) { // frameskip enabled\r
                        for(i = 0; i < currentConfig.Frameskip; i++) {\r
                                updateKeys();\r
@@ -1143,8 +1324,14 @@ void emu_Loop(void)
                        }\r
                } else if(tval.tv_usec > lim_time) { // auto frameskip\r
                        // no time left for this frame - skip\r
+                       if (tval.tv_usec - lim_time >= 0x300000) {\r
+                               /* something caused a slowdown for us (disk access? cache flush?)\r
+                                * try to recover by resetting timing... */\r
+                               reset_timing = 1;\r
+                               continue;\r
+                       }\r
                        updateKeys();\r
-                       SkipFrame(tval.tv_usec < lim_time+target_frametime); frames_done++;\r
+                       SkipFrame(tval.tv_usec < lim_time+target_frametime*2); frames_done++;\r
                        continue;\r
                }\r
 \r
@@ -1211,18 +1398,24 @@ if (Pico.m.frame_count == 31563) {
 \r
                // check time\r
                gettimeofday(&tval, 0);\r
-               if(thissec != tval.tv_sec) tval.tv_usec+=1000000;\r
+               if (thissec != tval.tv_sec) tval.tv_usec+=1000000;\r
 \r
-               // sleep if we are still too fast\r
-               if(PsndOut != 0 || currentConfig.Frameskip < 0)\r
+               if (currentConfig.Frameskip < 0 && tval.tv_usec - lim_time >= 0x300000) // slowdown detection\r
+                       reset_timing = 1;\r
+               else if (PsndOut != NULL || currentConfig.Frameskip < 0)\r
                {\r
+                       // sleep or vsync if we are still too fast\r
                        // usleep sleeps for ~20ms minimum, so it is not a solution here\r
-                       gettimeofday(&tval, 0);\r
-                       if(thissec != tval.tv_sec) tval.tv_usec+=1000000;\r
                        if(tval.tv_usec < lim_time)\r
                        {\r
                                // we are too fast\r
-                               simpleWait(thissec, lim_time);\r
+                               if (vsync_offset) {\r
+                                       if (lim_time - tval.tv_usec > target_frametime/2)\r
+                                               simpleWait(thissec, lim_time - target_frametime/4);\r
+                                       gp2x_video_wait_vsync();\r
+                               } else {\r
+                                       simpleWait(thissec, lim_time);\r
+                               }\r
                        }\r
                }\r
 \r
@@ -1231,26 +1424,19 @@ if (Pico.m.frame_count == 31563) {
                frames_done++; frames_shown++;\r
        }\r
 \r
+\r
+       if (PicoMCD & 1) PicoCDBufferFree();\r
+\r
        // save SRAM\r
        if((currentConfig.EmuOpt & 1) && SRam.changed) {\r
-               osd_text(4, 232, "Writing SRAM/BRAM..");\r
+               emu_state_cb("Writing SRAM/BRAM..");\r
                emu_SaveLoadGame(0, 1);\r
                SRam.changed = 0;\r
        }\r
 \r
-       // if in 16bit mode, generate 8it image for menu background\r
-       if (!(PicoOpt&0x10) && (currentConfig.EmuOpt&0x80)) {\r
-               PicoOpt |= 0x10;\r
-               if (!(Pico.video.reg[12]&1)) clearArea(1);\r
-               PicoFrameFull();\r
-               vidCpyM2((unsigned char *)gp2x_screen+320*8, framebuff+328*8);\r
-               vidConvCpyRGB32(localPal, Pico.cram, 0x40);\r
-               gp2x_video_setpalette(localPal, 0x40);\r
-               PicoOpt &= ~0x10;\r
-       }\r
-\r
-       // for menu bg\r
-       gp2x_memcpy_all_buffers(gp2x_screen, 0, 320*240*2);\r
+       // if in 8bit mode, generate 16bit image for menu background\r
+       if ((PicoOpt&0x10) || !(currentConfig.EmuOpt&0x80))\r
+               emu_forced_frame();\r
 }\r
 \r
 \r
@@ -1272,18 +1458,97 @@ size_t gzWrite2(void *p, size_t _size, size_t _n, void *file)
        return gzwrite(file, p, _n);\r
 }\r
 \r
+static int try_ropen_file(const char *fname)\r
+{\r
+       FILE *f;\r
+\r
+       f = fopen(fname, "rb");\r
+       if (f) {\r
+               fclose(f);\r
+               return 1;\r
+       }\r
+       return 0;\r
+}\r
+\r
+char *emu_GetSaveFName(int load, int is_sram, int slot)\r
+{\r
+       static char saveFname[512];\r
+       char ext[16];\r
+\r
+       if (is_sram)\r
+       {\r
+               romfname_ext(saveFname, (PicoMCD&1) ? "brm/" : "srm/", (PicoMCD&1) ? ".brm" : ".srm");\r
+               if (load) {\r
+                       if (try_ropen_file(saveFname)) return saveFname;\r
+                       // try in current dir..\r
+                       romfname_ext(saveFname, NULL, (PicoMCD&1) ? ".brm" : ".srm");\r
+                       if (try_ropen_file(saveFname)) return saveFname;\r
+                       return NULL; // give up\r
+               }\r
+       }\r
+       else\r
+       {\r
+               ext[0] = 0;\r
+               if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot);\r
+               strcat(ext, (currentConfig.EmuOpt & 8) ? ".mds.gz" : ".mds");\r
+\r
+               romfname_ext(saveFname, "mds/", ext);\r
+               if (load) {\r
+                       if (try_ropen_file(saveFname)) return saveFname;\r
+                       romfname_ext(saveFname, NULL, ext);\r
+                       if (try_ropen_file(saveFname)) return saveFname;\r
+                       if (currentConfig.EmuOpt & 8) {\r
+                               ext[0] = 0;\r
+                               if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot);\r
+                               strcat(ext, ".mds");\r
+\r
+                               romfname_ext(saveFname, "mds/", ext);\r
+                               if (try_ropen_file(saveFname)) return saveFname;\r
+                               romfname_ext(saveFname, NULL, ext);\r
+                               if (try_ropen_file(saveFname)) return saveFname;\r
+                       }\r
+                       return NULL;\r
+               }\r
+       }\r
+\r
+       return saveFname;\r
+}\r
+\r
+int emu_check_save_file(int slot)\r
+{\r
+       return emu_GetSaveFName(1, 0, slot) ? 1 : 0;\r
+}\r
+\r
+void emu_set_save_cbs(int gz)\r
+{\r
+       if (gz) {\r
+               areaRead  = gzRead2;\r
+               areaWrite = gzWrite2;\r
+               areaEof   = (areaeof *) gzeof;\r
+               areaSeek  = (areaseek *) gzseek;\r
+               areaClose = (areaclose *) gzclose;\r
+       } else {\r
+               areaRead  = (arearw *) fread;\r
+               areaWrite = (arearw *) fwrite;\r
+               areaEof   = (areaeof *) feof;\r
+               areaSeek  = (areaseek *) fseek;\r
+               areaClose = (areaclose *) fclose;\r
+       }\r
+}\r
 \r
 int emu_SaveLoadGame(int load, int sram)\r
 {\r
        int ret = 0;\r
-       char saveFname[512];\r
+       char *saveFname;\r
 \r
        // make save filename\r
-       romfname_ext(saveFname, "");\r
-       if(sram) strcat(saveFname, (PicoMCD&1) ? ".brm" : ".srm");\r
-       else {\r
-               if(state_slot > 0 && state_slot < 10) sprintf(saveFname, "%s.%i", saveFname, state_slot);\r
-               strcat(saveFname, ".mds");\r
+       saveFname = emu_GetSaveFName(load, sram, state_slot);\r
+       if (saveFname == NULL) {\r
+               if (!sram) {\r
+                       strcpy(noticeMsg, load ? "LOAD FAILED (missing file)" : "SAVE FAILED  ");\r
+                       gettimeofday(&noticeMsgTime, 0);\r
+               }\r
+               return -1;\r
        }\r
 \r
        printf("saveLoad (%i, %i): %s\n", load, sram, saveFname);\r
@@ -1292,33 +1557,48 @@ int emu_SaveLoadGame(int load, int sram)
                FILE *sramFile;\r
                int sram_size;\r
                unsigned char *sram_data;\r
+               int truncate = 1;\r
                if (PicoMCD&1) {\r
-                       sram_size = 0x2000;\r
-                       sram_data = Pico_mcd->bram;\r
+                       if (PicoOpt&0x8000) { // MCD RAM cart?\r
+                               sram_size = 0x12000;\r
+                               sram_data = SRam.data;\r
+                               if (sram_data)\r
+                                       memcpy32((int *)sram_data, (int *)Pico_mcd->bram, 0x2000/4);\r
+                       } else {\r
+                               sram_size = 0x2000;\r
+                               sram_data = Pico_mcd->bram;\r
+                               truncate  = 0; // the .brm may contain RAM cart data after normal brm\r
+                       }\r
                } else {\r
                        sram_size = SRam.end-SRam.start+1;\r
                        if(SRam.reg_back & 4) sram_size=0x2000;\r
                        sram_data = SRam.data;\r
                }\r
-               if(!sram_data) return 0; // SRam forcefully disabled for this game\r
+               if (!sram_data) return 0; // SRam forcefully disabled for this game\r
 \r
-               if(load) {\r
+               if (load) {\r
                        sramFile = fopen(saveFname, "rb");\r
                        if(!sramFile) return -1;\r
                        fread(sram_data, 1, sram_size, sramFile);\r
                        fclose(sramFile);\r
+                       if ((PicoMCD&1) && (PicoOpt&0x8000))\r
+                               memcpy32((int *)Pico_mcd->bram, (int *)sram_data, 0x2000/4);\r
                } else {\r
                        // sram save needs some special processing\r
                        // see if we have anything to save\r
-                       for(; sram_size > 0; sram_size--)\r
-                               if(sram_data[sram_size-1]) break;\r
+                       for (; sram_size > 0; sram_size--)\r
+                               if (sram_data[sram_size-1]) break;\r
 \r
-                       if(sram_size) {\r
-                               sramFile = fopen(saveFname, "wb");\r
+                       if (sram_size) {\r
+                               sramFile = fopen(saveFname, truncate ? "wb" : "r+b");\r
+                               if (!sramFile) sramFile = fopen(saveFname, "wb"); // retry\r
+                               if (!sramFile) return -1;\r
                                ret = fwrite(sram_data, 1, sram_size, sramFile);\r
                                ret = (ret != sram_size) ? -1 : 0;\r
                                fclose(sramFile);\r
+#ifndef NO_SYNC\r
                                sync();\r
+#endif\r
                        }\r
                }\r
                return ret;\r
@@ -1326,34 +1606,26 @@ int emu_SaveLoadGame(int load, int sram)
        else\r
        {\r
                void *PmovFile = NULL;\r
-               // try gzip first\r
-               if(currentConfig.EmuOpt & 8) {\r
-                       strcat(saveFname, ".gz");\r
+               if (strcmp(saveFname + strlen(saveFname) - 3, ".gz") == 0) {\r
                        if( (PmovFile = gzopen(saveFname, load ? "rb" : "wb")) ) {\r
-                               areaRead  = gzRead2;\r
-                               areaWrite = gzWrite2;\r
-                               areaEof   = (areaeof *) gzeof;\r
-                               areaSeek  = (areaseek *) gzseek;\r
+                               emu_set_save_cbs(1);\r
                                if(!load) gzsetparams(PmovFile, 9, Z_DEFAULT_STRATEGY);\r
-                       } else\r
-                               saveFname[strlen(saveFname)-3] = 0;\r
+                       }\r
                }\r
-               if(!PmovFile) { // gzip failed or was disabled\r
+               else\r
+               {\r
                        if( (PmovFile = fopen(saveFname, load ? "rb" : "wb")) ) {\r
-                               areaRead  = (arearw *) fread;\r
-                               areaWrite = (arearw *) fwrite;\r
-                               areaEof   = (areaeof *) feof;\r
-                               areaSeek  = (areaseek *) fseek;\r
+                               emu_set_save_cbs(0);\r
                        }\r
                }\r
                if(PmovFile) {\r
                        ret = PmovState(load ? 6 : 5, PmovFile);\r
-                       if(areaRead == gzRead2)\r
-                                gzclose(PmovFile);\r
-                       else fclose ((FILE *) PmovFile);\r
+                       areaClose(PmovFile);\r
                        PmovFile = 0;\r
-                       if (!load) sync();\r
-                       else Pico.m.dirtyPal=1;\r
+                       if (load) Pico.m.dirtyPal=1;\r
+#ifndef NO_SYNC\r
+                       else sync();\r
+#endif\r
                }\r
                else    ret = -1;\r
                if (!ret)\r