Split palmstart.cpp into mutiple files

svn-id: r10375

3 files changed, 94 insertions, 3632 deletions

diff --git a/backends/PalmOS/Src/palmstart.cpp b/backends/PalmOS/Src/palmstart.cpp
deleted file mode 100644
index 8d3a021d88..0000000000
--- a/backends/PalmOS/Src/palmstart.cpp
+++ /dev/null
@@ -1,3602 +0,0 @@
-/* ScummVM - Scumm Interpreter
- * Copyright (C) 2001  Ludvig Strigeus
- * Copyright (C) 2001-2003 The ScummVM project
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
-
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
-
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
- *
- * $Header$
- *
- */
-
-#include <PalmOS.h>
-#include <PalmOSGlue.h>
-#include <SonyClie.h>
-
-#include "StarterRsc.h"
-#include "skin.h"
-#include "globals.h"
-#include "pa1lib.h"
-#include "scumm_globals.h"
-#include "extend.h"	// for disable state
-#include "stdio.h" // used in checkPath
-#include "engine.h" // scumm version strings
-
-#include "mathlib.h"
-#include "vibrate.h"
-
-/***********************************************************************
- *
- *	Internal Structures
- *
- ***********************************************************************/
-typedef struct {
-	Char nameP[32];
-	UInt16 cardNo;
-	LocalID dbID;
-} SkinInfoType;
-
-typedef struct {
-	UInt32	version;
-	UInt16	icnID;			// icon to display on the list
-	Boolean	selected;
-
-	Char 	nameP[50];		// game name to display in list
-	Char 	pathP[150];		// path to the game files
-	Char 	gameP[10];		// scumm name of the game
-	UInt16	gfxMode;
-
-	Boolean autoLoad;
-	UInt16 loadSlot;
-	Boolean autoRoom;
-	UInt16 roomNum;
-	Boolean amiga;
-	Boolean subtitles;
-	Boolean talkSpeed;
-	UInt16 talkValue;
-	UInt8 language;
-
-} GameInfoType;
-
-typedef	struct {
-
-	//skin params
-	SkinInfoType skin;	//	card where is located the skin
-	Boolean soundClick;	
-	//
-	Boolean vibrator;
-	Boolean autoOff;
-
-	UInt16 listPosition;
-
-	struct {
-		UInt16 volRefNum;
-		Boolean moveDB;
-		Boolean deleteDB;
-		Boolean confirmMoveDB;
-	} card;
-
-	Boolean debug;
-	UInt16 debugLevel;
-	Boolean saveConfig;
-	Boolean stdPalette;
-	Boolean autoReset;
-	Boolean demoMode;
-	Boolean fullscreen;
-
-	struct {
-		UInt16 speaker;
-		UInt16 headphone;
-		
-		UInt16 master;
-		UInt16 music;
-		UInt16 sfx;
-	} volume;
-	
-	struct {
-		// midi
-		Boolean multiMidi;
-		Boolean music;
-		UInt8 driver;
-		UInt8 tempo;
-		// CD audio
-		Boolean MP3;
-		Boolean setDefaultTrackLength;
-		UInt16 defaultTrackLength;
-		UInt16 firstTrack;
-		// sound FX
-		Boolean sfx;
-	} sound;
-
-} GlobalsPreferenceType, *GlobalsPreferencePtr;
-
-typedef struct {
-	UInt16 volRefNum;
-	Char nameP[expCardInfoStringMaxLen+1];
-
-} CardInfoType;
-
-/***********************************************************************
- *
- *	Global variables
- *
- ***********************************************************************/
-static GlobalsPreferencePtr gPrefs;
-static DmOpenRef _dbP = NULL;
-static UInt16 _lstIndex = 0;	// last index
-static UInt8 __editMode__;
-static UInt16 sknLastOn = skinButtonNone;
-static Boolean bStartScumm = false;
-
-GlobalsDataPtr gVars;
-
-// form list draw
-#define	ITEM_TYPE_UNKNOWN	'U'
-#define ITEM_TYPE_CARD		'C'
-#define ITEM_TYPE_SKIN		'S'
-
-#define frmRedrawUpdateMS		(frmRedrawUpdateCode+1)
-#define frmRedrawUpdateMSImport	(frmRedrawUpdateCode+2)
-
-static Char **itemsText = NULL;
-static void  *itemsList = NULL;
-static Char   itemsType = ITEM_TYPE_UNKNOWN;
-/***********************************************************************
- *
- *	Internal Constants
- *
- ***********************************************************************/
-#define appVersionNum			0x01
-#define appPrefID				0x00
-#define appPrefVersionNum		0x01
-
-// Define the minimum OS version we support (3.5 for now).
-#define kOurMinVersion	sysMakeROMVersion(3,5,0,sysROMStageRelease,0)
-#define kPalmOS10Version	sysMakeROMVersion(1,0,0,sysROMStageRelease,0)
-#define kOS5Version		sysMakeROMVersion(5,0,0,sysROMStageRelease,0)
-
-// edit game mode
-#define edtModeAdd			0
-#define edtModeEdit			1
-#define edtModeParams		2
-
-// skin 
-#define	sknInfoState		0
-#define	sknInfoPosX			1
-#define	sknInfoPosY			2
-
-#define	sknInfoMaxWOrH		3
-#define	sknInfoDrawMode		4
-#define	sknInfoKeepXOrY1	5
-#define	sknInfoKeepXOrY2	7
-
-#define sknInfoListWidth	sknInfoMaxWOrH
-#define sknInfoListHeight	sknInfoDrawMode
-#define sknInfoListSize		sknInfoListHeight
-#define sknInfoListItemSize	12
-
-#define	sknPosRsc			'sPos'
-#define	sknColorsRsc		'sCol'
-
-#define sknStateNormal		0
-#define sknStateSelected	10
-#define sknStateDisabled	20
-
-#define sknSelectedState(bmp)	(bmp + sknStateSelected)
-#define sknDisabledState(bmp)	(bmp + sknStateDisabled)
-/***********************************************************************
- *
- *	Internal Functions
- *
- ***********************************************************************/
-static void GBInitAll() {
-#ifndef DISABLE_SCUMM
-	CALL_INIT(IMuseDigital)
-	CALL_INIT(NewGui)
-	CALL_INIT(Akos)
-	CALL_INIT(Bundle)
-	CALL_INIT(Codec47)
-	CALL_INIT(Gfx)
-	CALL_INIT(Dialogs)
-	CALL_INIT(Charset)
-	CALL_INIT(Costume)
-#endif
-}
-
-static void GBReleaseAll() {
-#ifndef DISABLE_SCUMM
-	CALL_RELEASE(IMuseDigital)
-	CALL_RELEASE(NewGui)
-	CALL_RELEASE(Akos)
-	CALL_RELEASE(Bundle)
-	CALL_RELEASE(Codec47)
-	CALL_RELEASE(Gfx)
-	CALL_RELEASE(Dialogs)
-	CALL_RELEASE(Charset)
-	CALL_RELEASE(Costume)
-#endif
-}
-
-static void FrmReturnToMain(UInt16 updateCode = frmRedrawUpdateMS) {
-	// if there is a form loaded, prevent crash on OS5
-	if (FrmGetFirstForm()) {
-		FrmUpdateForm(MainForm, updateCode);
-		FrmReturnToForm(MainForm);
-	}
-}
-
-//TODO : use Boolean instead of void to check err
-static DmOpenRef GBOpenInternal(const Char *nameP) {
-	LocalID dbID = DmFindDatabase(0, nameP);
-	if (dbID) {
-		UInt32 dbType, dbCreator;
-		Err e = DmDatabaseInfo(0, dbID, 0, 0, 0, 0, 0, 0, 0, 0, 0, &dbType, &dbCreator);
-		
-		if (!e && dbType == 'GLBS' && dbCreator == appFileCreator)
-			return DmOpenDatabase(0, dbID, dmModeReadOnly);
-	}
-	return NULL;
-}
-
-static void GBOpen() {
-	gVars->globals[GBVARS_SCUMM] = GBOpenInternal("Scumm-Globals");
-	gVars->globals[GBVARS_SIMON] = GBOpenInternal("Simon-Globals");
-	gVars->globals[GBVARS_SKY] = GBOpenInternal("Sky-Globals");
-}
-
-static void GBClose() {
-	if (gVars->globals[GBVARS_SCUMM])
-		DmCloseDatabase(gVars->globals[GBVARS_SCUMM]);
-	if (gVars->globals[GBVARS_SIMON])
-		DmCloseDatabase(gVars->globals[GBVARS_SIMON]);
-	if (gVars->globals[GBVARS_SKY])
-		DmCloseDatabase(gVars->globals[GBVARS_SKY]);
-}
-
-void *GBGetRecord(UInt16 index, UInt16 id) {
-	if (gVars->globals[id]) {
-		MemHandle recordH = DmQueryRecord(gVars->globals[id], index);
-		if (recordH)
-			return MemHandleLock(recordH);
-	}
-	return NULL;
-}
-
-void GBReleaseRecord(UInt16 index, UInt16 id) {
-	if (gVars->globals[id]) {
-		MemHandle recordH = DmQueryRecord(gVars->globals[id], index);
-		if (recordH)
-			MemHandleUnlock(recordH);
-	}
-}
- /////////////////////////////////////////////////////////////////////////
-static DmOpenRef SknOpenSkin() {
-	return DmOpenDatabase(gPrefs->skin.cardNo, gPrefs->skin.dbID, dmModeReadOnly);
-}
-
-static void SknCloseSkin(DmOpenRef skinDBP) {
-	if (skinDBP)
-		DmCloseDatabase(skinDBP);
-}
-/*
-static void SknSetPalette() {
-
-	UInt16 palIndex;
-	ColorTableType *palTemp;
-	MemHandle palH;
-
-	DmOpenRef skinDBP = SknOpenSkin();
-
-	if (skinDBP) {
-		palIndex = DmFindResource (skinDBP, colorTableRsc, skinPalette, NULL);
-
-		if (palIndex != 0xFFFF) {
-			palH = DmGetResourceIndex(skinDBP, palIndex);
-			
-			if (palH) {
-				palTemp = (ColorTableType *)MemHandleLock(palH);
-				WinPalette(winPaletteSet, 0, 256, ColorTableEntries(palTemp));
-				MemPtrUnlock(palTemp);					
-				DmReleaseResource(palH);
-			}
-		}
-	}
-	
-	SknCloseSkin(skinDBP);
-
-}
-*/
-static void SknGetListColors(DmOpenRef skinDBP, DmResID resID, UInt8 *text, UInt8 *selected, UInt8 *background) {
-	UInt16 colIndex;
-	MemHandle colH;
-	UInt8 *colTemp;
-
-	// default
-	*text = UIColorGetTableEntryIndex (UIMenuForeground);
-	*selected = UIColorGetTableEntryIndex (UIMenuSelectedForeground);
-	*background = UIColorGetTableEntryIndex (UIMenuSelectedFill);
-
-	if (skinDBP) {
-		colIndex = DmFindResource (skinDBP, sknColorsRsc, resID, NULL);
-		
-		if (colIndex != (UInt16)-1) {
-			colH = DmGetResourceIndex(skinDBP, colIndex);
-			
-			if (colH) {
-				colTemp = (UInt8 *)MemHandleLock(colH);
-				
-				*text = colTemp[0];
-				*selected = colTemp[1];
-				*background = colTemp[2];
-
-				MemPtrUnlock(colTemp);					
-				DmReleaseResource(colH);
-			}
-		}
-	}
-}
-
-static void SknGetObjectBounds(DmOpenRef skinDBP, DmResID resID, RectangleType *rP) {
-
-	UInt16 bmpIndex, strIndex;
-	MemHandle hBmp, hStr;
-	BitmapType *bmpTemp;
-	UInt8 *strTemp;
-
-	RctSetRectangle(rP, 0, 0, 0, 0);
-	
-	if (skinDBP) {
-		bmpIndex = DmFindResource (skinDBP, bitmapRsc, resID, NULL);
-		
-		if (bmpIndex != (UInt16)-1) {						// if bmp exists
-			strIndex = DmFindResource (skinDBP, sknPosRsc, resID, NULL);
-			
-			if (strIndex != (UInt16)-1) {					// if params exist
-				hBmp = DmGetResourceIndex(skinDBP,bmpIndex);
-
-				if (hBmp) {
-					hStr = DmGetResourceIndex(skinDBP,strIndex);
-					
-					if (hStr) {
-					//	buttons : state|x|y|w/h slider|draw mode|x1/y1 keep|x2/y2 keep slider
-					//	list (160mode) : state|x|y|w|h|
-						bmpTemp = (BitmapType *)MemHandleLock(hBmp);
-						strTemp = (UInt8 *)MemHandleLock(hStr);
-						
-						BmpGlueGetDimensions(bmpTemp, &(rP->extent.x), &(rP->extent.y), 0);
-						rP->topLeft.x = strTemp[sknInfoPosX] * 2;
-						rP->topLeft.y = strTemp[sknInfoPosY] * 2;
-						
-						MemPtrUnlock(strTemp);					
-						DmReleaseResource(hStr);
-					}
-
-					MemPtrUnlock(bmpTemp);
-					DmReleaseResource(hBmp);
-				}
-			}
-		}
-	}
-}
-
-static UInt8 SknGetState(DmOpenRef skinDBP, DmResID resID) {
-
-	UInt16 index;
-	MemHandle hStr;
-	UInt8 *strTemp;
-	UInt8 oldState = sknStateDisabled;
-
-	if (skinDBP) {
-		index = DmFindResource (skinDBP, sknPosRsc, resID, NULL);
-		
-		if (index != (UInt16)-1) {
-			hStr = DmGetResourceIndex(skinDBP, index);
-			
-			if (hStr) {
-				strTemp = (UInt8 *)MemHandleLock(hStr);
-				oldState = strTemp[sknInfoState];				
-				MemPtrUnlock(strTemp);					
-				DmReleaseResource(hStr);				
-			}
-		}
-	}
-
-	return oldState;
-}
-
-static UInt8 SknSetState(DmOpenRef skinDBP, DmResID resID, UInt8 newState) {
-
-	UInt16 index;
-	MemHandle hStr;
-	UInt8 *strTemp;
-	UInt8 oldState = 0;
-
-	if (skinDBP) {
-		index = DmFindResource (skinDBP, sknPosRsc, resID, NULL);
-		
-		if (index != (UInt16)-1) {
-			hStr = DmGetResourceIndex(skinDBP, index);
-			
-			if (hStr) {
-				strTemp = (UInt8 *)MemHandleLock(hStr);
-				oldState = strTemp[sknInfoState];
-				
-				if (oldState != newState) {
-					DmWrite(strTemp, 0, &newState, 1);
-				}
-				
-				MemPtrUnlock(strTemp);					
-				DmReleaseResource(hStr);				
-			}
-		}
-	}
-
-	return oldState;
-}
-
-static void SknCopyBits(DmOpenRef skinDBP, DmResID bitmapID, const RectangleType *srcRect, Coord destX, Coord destY, Boolean standard) {
-	MemHandle hTemp;
-	BitmapPtr bmpTemp;
-	UInt16 index;
-	UInt8 *bmpData;
-//	Err e;
-
-	Coord cx, cy, cw, ch, bw, bh;
-	UInt8 *dst, *src;
-
-	if (skinDBP) {
-		// find the bitmap
-		index = DmFindResource (skinDBP, bitmapRsc, bitmapID, NULL);
-
-		if (index != (UInt16)-1) {
-			hTemp = DmGetResourceIndex(skinDBP,index);
-			
-			if (hTemp) {
-				bmpTemp = (BitmapType *)MemHandleLock(hTemp);
-				BmpGlueGetDimensions(bmpTemp, &bw, &bh, 0);
-
-				if (!srcRect)
-				{
-					cx = 0;
-					cy = 0;
-					cw = bw;
-					ch = bh;
-				}
-				else
-				{
-					cx = srcRect->topLeft.x;
-					cy = srcRect->topLeft.y;
-					cw = srcRect->extent.x;
-					ch = srcRect->extent.y;
-				}
-
-				if (ch) {
-					Coord picth = gVars->screenFullWidth;
-					dst = (UInt8 *)BmpGetBits(WinGetBitmap(WinGetDisplayWindow()));
-				
-					dst+= destX + destY * picth;
-					bmpData = (UInt8 *)BmpGetBits(bmpTemp);
-					src	= bmpData + cx + cy * bw;
-
-					do {
-						MemMove(dst, src, cw);
-						dst += picth;
-						src += bw;
-					} while (--ch);
-				}
-
-				MemPtrUnlock(bmpTemp);
-				DmReleaseResource(hTemp);
-			}
-		}
-	}
-}
-
-static void SknShowObject(DmOpenRef skinDBP, DmResID resID) {
-
-	RectangleType r;
-	UInt8 state = SknGetState(skinDBP, resID);
-	SknGetObjectBounds(skinDBP, resID, &r);
-	SknCopyBits(skinDBP, resID + state, NULL, r.topLeft.x, r.topLeft.y, 0);
-}
-
-static UInt16 SknCheckClick(DmOpenRef skinDBP, Coord mx, Coord my)
-{
-	UInt16 resID;
-	RectangleType r;
-
-	mx *= 2;
-	my *= 2;
-
-	if (skinDBP) {
-		for (resID = 1100; resID <= 7000; resID += 100) {
-			if (SknGetState(skinDBP, resID) != sknStateDisabled) {
-				SknGetObjectBounds(skinDBP, resID, &r);
-				if (RctPtInRectangle(mx, my, &r)) {
-					return resID;
-				}
-			}
-		}
-		
-	}
-	
-	return 0;
-}
-
-
-// Callback for ExgDBWrite to send data with Exchange Manager
-static Err WriteDBData(const void* dataP, UInt32* sizeP, void* userDataP)
-{
-	Err err;
-	*sizeP = ExgSend((ExgSocketPtr)userDataP, (void*)dataP, *sizeP, &err);
-	return err;
-}
-
-static Err SendDatabase (UInt16 cardNo, LocalID dbID, Char *nameP, Char *descriptionP)
-{
-	ExgSocketType exgSocket;
-	Err err;
-
-	// Create exgSocket structure
-	MemSet(&exgSocket, sizeof(exgSocket), 0);
-	exgSocket.description = descriptionP;
-	exgSocket.name = nameP;
-
-	// Start an exchange put operation
-	err = ExgPut(&exgSocket);
-	if (!err) {
-		err = ExgDBWrite(WriteDBData, &exgSocket, NULL, dbID, cardNo);
-		err = ExgDisconnect(&exgSocket, err);
-	}
-
-	return err;
-}
-
-static Err BeamMe() {
-
-	UInt16 cardNo;
-	LocalID dbID;
-	Err err;
-
-	err = SysCurAppDatabase(&cardNo, &dbID);
-	if (dbID)
-		err = SendDatabase(0, dbID, "ScummVM.prc", "\nPlay your favorite LucasArts games");
-	else
-		err = DmGetLastErr();
-	
-	return err;
-}
-
-/***********************************************************************
- *
- * FUNCTION:    RomVersionCompatible
- *
- * DESCRIPTION: This routine checks that a ROM version is meet your
- *              minimum requirement.
- *
- * PARAMETERS:  requiredVersion - minimum rom version required
- *                                (see sysFtrNumROMVersion in SystemMgr.h 
- *                                for format)
- *              launchFlags     - flags that indicate if the application 
- *                                UI is initialized.
- *
- * RETURNED:    error code or zero if rom is compatible
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static Err RomVersionCompatible(UInt32 requiredVersion, UInt16 launchFlags)
-{
-	UInt32 romVersion;
-
-	// See if we're on in minimum required version of the ROM or later.
-	FtrGet(sysFtrCreator, sysFtrNumROMVersion, &romVersion);
-	if (romVersion < requiredVersion)
-		{
-		if ((launchFlags & (sysAppLaunchFlagNewGlobals | sysAppLaunchFlagUIApp)) ==
-			(sysAppLaunchFlagNewGlobals | sysAppLaunchFlagUIApp))
-			{
-			FrmAlert (RomIncompatibleAlert);
-		
-			// Palm OS 1.0 will continuously relaunch this app unless we switch to 
-			// another safe one.
-			if (romVersion <= kPalmOS10Version)
-				{
-				AppLaunchWithCommand(sysFileCDefaultApp, sysAppLaunchCmdNormalLaunch, NULL);
-				}
-			}
-		return sysErrRomIncompatible;
-		}
-
-	return errNone;
-}
-
-
-/***********************************************************************
- *
- * FUNCTION:    GetObjectPtr
- *
- * DESCRIPTION: This routine returns a pointer to an object in the current
- *              form.
- *
- * PARAMETERS:  formId - id of the form to display
- *
- * RETURNED:    void *
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static void * GetObjectPtr(UInt16 objectID)
-{
-	FormPtr frmP;
-
-	frmP = FrmGetActiveForm();
-	return FrmGetObjectPtr(frmP, FrmGetObjectIndex(frmP, objectID));
-}
-
-static void FrmList(EventPtr eventP, UInt16 objectID)
-{
-	ListType *listP;
-	UInt16 listItem;
-
-	listP = (ListType *)GetObjectPtr(objectID);
-	listItem = LstPopupList(listP);
-	CtlSetLabel(eventP->data.ctlSelect.pControl, LstGetSelectionText(listP, LstGetSelection(listP)));
-}
-
-//#############################################################################
-//#############################################################################
-
-enum {
-	IcnNone = 255,
-	IcnInfo = 0,
-	IcnEdit = 1,
-	IcnDelt = 2,
-	IcnVibr = 3,
-	IcnAOff = 4,
-	IcnPlay = 5
-};
-
-enum {
-	ArwNone = 255,
-	ArwUp   = 0,
-	ArwFUp  = 1,
-	ArwFDwn = 2,
-	ArwDown = 3
-};
-
-//#############################################################################
-//#############################################################################
-static Err GamOpenDatabase() {
-	Err err = errNone;
-
-	_dbP = DmOpenDatabaseByTypeCreator( 'DATA', appFileCreator, dmModeReadWrite);
-
-	if (!_dbP) {
-		err = DmCreateDatabase(0, "ScummVM-Data", appFileCreator, 'DATA', false);
-		if (!err) {
-			_dbP = DmOpenDatabaseByTypeCreator( 'DATA', appFileCreator, dmModeReadWrite);
-			
-			if (!_dbP)
-				err = DmGetLastErr();
-		}
-	}
-
-	if (err)
-		FrmCustomAlert(FrmErrorAlert,"Cannot open/create games list DB !",0,0);
-	return err;
-}
-
-static void GamCloseDatabase(Boolean ignoreCardParams) {
-	if (_dbP) {
-		LocalID dbID;
-		UInt16 cardNo;
-		
-		DmOpenDatabaseInfo(_dbP, &dbID, 0, 0, &cardNo, 0);
-		DmCloseDatabase(_dbP);
-
-		if (!ignoreCardParams) {
-			if (gPrefs->card.moveDB && gPrefs->card.volRefNum != sysInvalidRefNum) {
-				VFSFileRename(gPrefs->card.volRefNum, "/Palm/Programs/ScummVM/listdata.pdb", "listdata-old.pdb");
-				Err e = VFSExportDatabaseToFile(gPrefs->card.volRefNum, "/Palm/Programs/ScummVM/listdata.pdb", cardNo, dbID);
-				if (!e) {
-					VFSFileDelete(gPrefs->card.volRefNum, "/Palm/Programs/ScummVM/listdata-old.pdb");
-					if (gPrefs->card.deleteDB)
-						DmDeleteDatabase(cardNo, dbID);
-				} else {
-					VFSFileRename(gPrefs->card.volRefNum, "/Palm/Programs/ScummVM/listdata-old.pdb", "listdata.pdb");
-				}
-			}
-		}
-	}
-	_dbP = NULL;
-}
-
-static Int16 GamCompare(GameInfoType *a, GameInfoType *b, SortRecordInfoPtr, SortRecordInfoPtr, MemHandle) {
-	return StrCompare(a->nameP, b->nameP);
-}
-static Err GamSortList() {
-	return DmQuickSort (_dbP, (DmComparF *)GamCompare, 0);
-}
-
-
-static UInt16 GamGetSelected()
-{
-	MemHandle record;
-	GameInfoType *game;
-	Boolean selected;
-	UInt16 index = DmNumRecords(_dbP)-1;
-	
-	while (index != (UInt16)-1) {
-		record = DmQueryRecord(_dbP, index);
-		game = (GameInfoType *)MemHandleLock(record);
-		selected = game->selected;
-		MemHandleUnlock(record);
-
-		if (selected)
-			return index;
-
-		index--;
-	}
-
-	return dmMaxRecordIndex;
-}
-static void GamUnselect() {
-	GameInfoType modGame;
-	GameInfoType *game;
-
-	MemHandle recordH;
-	UInt16 index;
-
-	index = GamGetSelected();
-	
-	if (index != dmMaxRecordIndex) {
-		recordH = DmGetRecord(_dbP, index);
-		game = (GameInfoType *)MemHandleLock(recordH);
-
-		MemMove(&modGame, game, sizeof(GameInfoType));	
-		modGame.selected = !modGame.selected;
-		DmWrite(game, 0, &modGame, sizeof(GameInfoType));
-
-		MemHandleUnlock(recordH);
-		DmReleaseRecord (_dbP, index, 0);
-	}
-}
-
-static void IcnRedrawTools(DmOpenRef skinDBP)
-{
-	if (GamGetSelected() == dmMaxRecordIndex) {
-		if (SknGetState(skinDBP, skinButtonGameDelete) == sknStateNormal) {
-			SknSetState(skinDBP, skinButtonGameDelete,sknStateDisabled);
-			SknShowObject(skinDBP, skinButtonGameDelete);
-		}
-		if (SknGetState(skinDBP, skinButtonGameEdit) == sknStateNormal) {
-			SknSetState(skinDBP, skinButtonGameEdit,sknStateDisabled);
-			SknShowObject(skinDBP, skinButtonGameEdit);
-		}
-
-	} else {
-		if (SknGetState(skinDBP, skinButtonGameDelete) == sknStateDisabled) {
-			SknSetState(skinDBP, skinButtonGameDelete,sknStateNormal);
-			SknShowObject(skinDBP, skinButtonGameDelete);
-		}
-		if (SknGetState(skinDBP, skinButtonGameEdit) == sknStateDisabled) {
-			SknSetState(skinDBP, skinButtonGameEdit,sknStateNormal);
-			SknShowObject(skinDBP, skinButtonGameEdit);
-		}
-	}
-}
-
-static void ArwRedrawSlider(DmOpenRef skinDBP, UInt16 index, UInt16 maxIndex, UInt16 perPage)
-{
-	if (maxIndex <= perPage) {
-		if (SknGetState(skinDBP,skinSliderUpArrow) != sknStateDisabled) {
-			SknSetState(skinDBP,skinSliderUpArrow,sknStateDisabled);
-			SknShowObject(skinDBP,skinSliderUpArrow);
-		}
-		if (SknGetState(skinDBP,skinSliderDownArrow) != sknStateDisabled) {
-			SknSetState(skinDBP,skinSliderDownArrow,sknStateDisabled);
-			SknShowObject(skinDBP,skinSliderDownArrow);
-		}
-
-	} else {
-		if (SknGetState(skinDBP,skinSliderUpArrow) == sknStateDisabled) {
-			SknSetState(skinDBP,skinSliderUpArrow,sknStateNormal);
-			SknShowObject(skinDBP,skinSliderUpArrow);
-		}
-		if (SknGetState(skinDBP,skinSliderDownArrow) == sknStateDisabled) {
-			SknSetState(skinDBP,skinSliderDownArrow,sknStateNormal);
-			SknShowObject(skinDBP,skinSliderDownArrow);
-		}
-	}
-}
-
-static void GamGetListBounds(RectangleType *rAreaP, RectangleType *rArea2xP) {
-	DmOpenRef skinDBP;
-	UInt16 strIndex;
-	MemHandle hStr;
-	UInt8 *strTemp;
-	UInt16 x,y,w,h;
-
-	skinDBP = DmOpenDatabase(gPrefs->skin.cardNo, gPrefs->skin.dbID, dmModeReadOnly);
-	if (skinDBP) {
-		strIndex = DmFindResource (skinDBP, sknPosRsc, skinList, NULL);
-		
-		if (strIndex != (UInt16)-1) {					// if params exist
-			hStr = DmGetResourceIndex(skinDBP,strIndex);
-			if (hStr) {
-				strTemp = (UInt8 *)MemHandleLock(hStr);
-
-				x = strTemp[sknInfoPosX];
-				y = strTemp[sknInfoPosY];
-				w = strTemp[sknInfoListWidth];
-				h = strTemp[sknInfoListSize] * sknInfoListItemSize;
-				
-				if (rAreaP)
-					RctSetRectangle(rAreaP ,x, y, w, h);
-				if (rArea2xP)
-					RctSetRectangle(rArea2xP, x+x, y+y, w+w, h+h);
-
-				MemHandleUnlock(hStr);
-				DmReleaseResource(hStr);
-				
-			}
-		}
-
-		DmCloseDatabase(skinDBP);
-	}
-}
-
-static void GamUpdateList() {
-	MemHandle record;
-	UInt16 index, maxIndex, maxView;
-	GameInfoType *game;
-	RectangleType rArea, rField, rCopy, rArea2x;
-	DmOpenRef skinDBP;
-
-	UInt8 txtColor, norColor, selColor, bkgColor;
-	UInt16 x,y;
-
-	WinScreenLock(winLockCopy);
-	GamGetListBounds(&rArea, &rArea2x);
-	skinDBP = SknOpenSkin();
-	// set default bg
-	WinSetForeColor(UIColorGetTableEntryIndex (UIFormFill));
-	WinDrawRectangle(&rArea,0);
-	// copy top bg
-	SknGetObjectBounds(skinDBP, skinBackgroundImageTop, &rField);
-	RctGetIntersection(&rArea2x, &rField, &rCopy);
-	x = rCopy.topLeft.x;
-	y = rCopy.topLeft.y;
-	rCopy.topLeft.x	-= rField.topLeft.x;
-	rCopy.topLeft.y	-= rField.topLeft.y;	
-	SknCopyBits(skinDBP, skinBackgroundImageTop, &rCopy, x, y, 0);
-	// copy bottom bg
-	SknGetObjectBounds(skinDBP, skinBackgroundImageBottom, &rField);
-	RctGetIntersection(&rArea2x, &rField, &rCopy);
-	x = rCopy.topLeft.x;
-	y = rCopy.topLeft.y;
-	rCopy.topLeft.x	-= rField.topLeft.x;
-	rCopy.topLeft.y	-= rField.topLeft.y;	
-	SknCopyBits(skinDBP, skinBackgroundImageBottom, &rCopy, x, y, 0);
-
-	FntSetFont(stdFont);
-
-	index = gPrefs->listPosition;
-	maxIndex = DmNumRecords(_dbP);
-	maxView = rArea.extent.y / sknInfoListItemSize;
-
-	if (index > 0 && (index+maxView) > maxIndex) {
-		index -= (index+maxView) - maxIndex;
-		 gPrefs->listPosition = index;
-	}	
-	ArwRedrawSlider(skinDBP, index, maxIndex, maxView);
-	IcnRedrawTools(skinDBP);
-	SknGetListColors(skinDBP, skinColors, &norColor, &selColor, &bkgColor);
-
-	SknCloseSkin(skinDBP);
-
-	while (index < (gPrefs->listPosition + maxView) && index < maxIndex) {
-		record = DmQueryRecord(_dbP, index);
-		game = (GameInfoType *)MemHandleLock(record);
-
-		// text box
-		RctSetRectangle(&rField, rArea.topLeft.x, (rArea.topLeft.y + sknInfoListItemSize * (index - gPrefs->listPosition)), rArea.extent.x, sknInfoListItemSize);
-		WinSetClip(&rField);
-
-		if (game->selected) {
-			WinSetDrawMode(winPaint);
-			WinSetForeColor(bkgColor);
-			WinDrawRectangle(&rField,0);
-			txtColor = selColor;
-		}
-		else
-			txtColor = norColor;
-
-		// clipping
-		rField.topLeft.x += 2;
-		rField.extent.x -= 4;
-		WinSetClip(&rField);
-		// draw text mask
-		WinSetTextColor(255);
-		WinSetDrawMode(winMask);
-		WinPaintChars(game->nameP, StrLen(game->nameP), rField.topLeft.x, rField.topLeft.y);
-		// draw text
-		if (txtColor) {
-			WinSetTextColor(txtColor);
-			WinSetDrawMode(winOverlay);
-			WinPaintChars(game->nameP, StrLen(game->nameP), rField.topLeft.x, rField.topLeft.y);
-		}
-		MemHandleUnlock(record);
-		index++;
-	}
-
-	RctSetRectangle(&rArea,0,0,160,160);
-	WinSetClip(&rArea);
-	WinScreenUnlock();
-}
-
-static void GamImportDatabase(Boolean updateList) {
-	if (gPrefs->card.volRefNum != sysInvalidRefNum && gPrefs->card.moveDB) {
-		FileRef file;
-		Err e;
-		
-		e = VFSFileOpen(gPrefs->card.volRefNum, "/Palm/Programs/ScummVM/listdata.pdb", vfsModeRead, &file);
-		if (!e) {
-			UInt16 oCardNo, nCardNo;
-			LocalID oDbID, nDbID;
-			UInt32 type = 'ODAT';	// change the type to avoid the old db to be loaded in case of crash
-
-			VFSFileClose(file);
-			if (gPrefs->card.confirmMoveDB)
-				if (FrmCustomAlert(FrmConfirmAlert, "Do you want to import games database from memory card ?", 0, 0) == FrmConfirmNo) {
-					// prevent to replace the file on memory card
-					gPrefs->card.moveDB = false;
-					return;
-				}
- 			
- 			// get current db info and rename it
- 			DmOpenDatabaseInfo(_dbP, &oDbID, 0, 0, &oCardNo, 0);
-			GamCloseDatabase(true);
-			DmSetDatabaseInfo(oCardNo, oDbID, "ScummVM-Data-old.pdb", 0, 0, 0, 0, 0, 0, 0, 0, &type, 0);
-	
-			e = VFSImportDatabaseFromFile(gPrefs->card.volRefNum, "/Palm/Programs/ScummVM/listdata.pdb", &nCardNo, &nDbID);
-			if (e) {
-				type = 'DATA';
-				FrmCustomAlert(FrmErrorAlert, "Failed to import games database from memory card.", 0, 0);
-				DmSetDatabaseInfo(oCardNo, oDbID, "ScummVM-Data.pdb", 0, 0, 0, 0, 0, 0, 0, 0, &type, 0);
-			} else {
-				// in OS5 the localID may change ... ? (cause Free Handle error)
-				oDbID = DmFindDatabase (oCardNo, "ScummVM-Data-old.pdb");
-				DmDeleteDatabase(oCardNo, oDbID);
-			}
-			GamOpenDatabase();
-			if (updateList)
-				GamUpdateList();
-		}
-	}
-}
-
-static Boolean ArwProcessAction(UInt16 button)
-{
-	Boolean handled = false;
-
-	switch (button) {
-		case skinSliderUpArrow:
-			if (gPrefs->listPosition > 0) {
-				gPrefs->listPosition--;
-				GamUpdateList();
-			}
-			handled = true;
-			break;
-
-		case skinSliderDownArrow:
-			RectangleType rArea;
-			UInt16 maxView;
-
-			GamGetListBounds(&rArea, 0);
-			maxView = rArea.extent.y / sknInfoListItemSize;
-
-			if (gPrefs->listPosition < DmNumRecords(_dbP)-maxView) {
-				gPrefs->listPosition++;
-				GamUpdateList();
-			}
-			handled = true;
-			break;
-	}
-
-	return handled;
-}
-
-static void GamSelect(Coord x, Coord y) {
-	RectangleType rArea;
-	UInt16 x1,y1,x2,y2;
-
-	GamGetListBounds(&rArea,0);
-	x1 = rArea.topLeft.x;
-	x2 = rArea.topLeft.x + rArea.extent.x - 1;
-	y1 = rArea.topLeft.y;
-	y2 = rArea.topLeft.y + rArea.extent.y - 1;
-
-	if (y >= y1 && y <= y2 && x >= x1 && x <= x2) {
-		UInt16 index;
-		MemHandle record;
-		GameInfoType *game;
-		UInt16 oldIndex;
-
-		index = (y - y1) / sknInfoListItemSize + gPrefs->listPosition;
-
-		if (index == _lstIndex)
-			return;
-
-		if (index < DmNumRecords(_dbP))
-		{
-			GameInfoType modGame;
-
-			oldIndex = GamGetSelected();
-			record = DmGetRecord(_dbP, index);
-			game = (GameInfoType *)MemHandleLock(record);
-
-			MemMove(&modGame, game, sizeof(GameInfoType));	
-			modGame.selected = !modGame.selected;
-			DmWrite(game, 0, &modGame, sizeof(GameInfoType));
-
-			MemHandleUnlock(record);
-			DmReleaseRecord (_dbP, index, 0);
-
-			if (oldIndex != index && oldIndex != dmMaxRecordIndex)	{
-				record = DmGetRecord(_dbP, oldIndex);
-				game = (GameInfoType *)MemHandleLock(record);
-
-				MemMove(&modGame, game, sizeof(GameInfoType));	
-				modGame.selected = false;
-				DmWrite(game, 0, &modGame, sizeof(GameInfoType));
-
-				MemHandleUnlock(record);
-				DmReleaseRecord (_dbP, oldIndex, 0);
-			}
-			
-			_lstIndex = index;
-			GamUpdateList();
-		}
-	}
-}
-
-static void EditGameFormDelete(Boolean direct) {
-	UInt16 index = GamGetSelected();
-
-	if (index == dmMaxRecordIndex) {
-		FrmCustomAlert(FrmWarnAlert, "Select an entry first.",0,0);
-		return;
-
-	} else if (FrmCustomAlert(FrmConfirmAlert, "Do you really want to delete this entry ?", 0, 0) == FrmConfirmYes) {
-		DmRemoveRecord(_dbP, index);
-		if (!direct)
-			FrmReturnToMain();
-		GamSortList();
-		GamUpdateList();
-	}
-}
-
-static void FldTrimText(FieldType * fldP) {
-	MemHandle tmpH;
-	Char *tmpP;
-
-	tmpH = FldGetTextHandle(fldP);
-	FldSetTextHandle(fldP, NULL);
-	tmpP = (Char *)MemHandleLock(tmpH);
-	TxtGlueStripSpaces(tmpP, true, true);
-	MemHandleUnlock(tmpH);
-	FldSetTextHandle(fldP, tmpH);
-}
-
-
-/***********************************************************************
- *
- * FUNCTION:    EditGameFormSave
- * FUNCTION:    EditGameFormInit
- * FUNCTION:    EditGameFormHandleEvent
- *
- * DESCRIPTION: 
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-
-static void EditGameFormSave(UInt16 index) {
-
-	FieldType *fld1P, *fld2P, *fld3P, *fld4P, *fld5P, *fld6P;	// need to change this with good names
-	ControlType *cck1P, *cck2P, *cck3P, *cck4P, *cck5P;	
-	ListType *list1P, *list2P;
-	FormPtr frmP;
-
-	MemHandle recordH;
-	GameInfoType *gameInfo, newGameInfo;
-//	UInt16 index;
-
-	list1P = (ListType *)GetObjectPtr(EditGameGfxListList);
-	list2P = (ListType *)GetObjectPtr(EditGameLanguageList);
-	fld1P = (FieldType *)GetObjectPtr(EditGameEntryNameField);
-	fld2P = (FieldType *)GetObjectPtr(EditGamePathField);
-	fld3P = (FieldType *)GetObjectPtr(EditGameGameField);
-	fld4P = (FieldType *)GetObjectPtr(EditGameLoadSlotField);
-	fld5P = (FieldType *)GetObjectPtr(EditGameStartRoomField);
-	fld6P = (FieldType *)GetObjectPtr(EditGameTalkSpeedField);
-	
-	cck1P = (ControlType *)GetObjectPtr(EditGameLoadSlotCheckbox);
-	cck2P = (ControlType *)GetObjectPtr(EditGameStartRoomCheckbox);
-	cck3P = (ControlType *)GetObjectPtr(EditGameAmigaCheckbox);
-	cck4P = (ControlType *)GetObjectPtr(EditGameSubtitlesCheckbox);
-	cck5P = (ControlType *)GetObjectPtr(EditGameTalkSpeedCheckbox);
-
-	frmP = FrmGetActiveForm();
-
-	FldTrimText(fld1P);
-	FldTrimText(fld2P);
-	FldTrimText(fld3P);
-
-	if (FldGetTextLength(fld1P) == 0) {
-		FrmCustomAlert(FrmWarnAlert,"You must specified an entry name.",0,0);
-		FrmSetFocus(frmP, FrmGetObjectIndex(frmP, EditGameEntryNameField));
-		return;
-	} else if (FldGetTextLength(fld2P) == 0) {
-		FrmCustomAlert(FrmWarnAlert,"You must specified a path.",0,0);
-		FrmSetFocus(frmP, FrmGetObjectIndex(frmP, EditGamePathField));
-		return;
-	} else if (FldGetTextLength(fld3P) == 0) {
-		FrmCustomAlert(FrmWarnAlert,"You must specified a game.",0,0);
-		FrmSetFocus(frmP, FrmGetObjectIndex(frmP, EditGameGameField));
-		return;
-	} else if (FldGetTextLength(fld5P) == 0 && CtlGetValue(cck2P) == 1) {
-		FrmCustomAlert(FrmWarnAlert,"You must specified a room number.",0,0);
-		FrmSetFocus(frmP, FrmGetObjectIndex(frmP, EditGameStartRoomField));
-		return;
-	} else if (FldGetTextLength(fld6P) == 0 && CtlGetValue(cck5P) == 1) {
-		FrmCustomAlert(FrmWarnAlert,"You must specified a talk speed.",0,0);
-		FrmSetFocus(frmP, FrmGetObjectIndex(frmP, EditGameTalkSpeedField));
-		return;
-	}
-
-	if (FldGetTextPtr(fld2P)[FldGetTextLength(fld2P)-1] != '/') {
-		FldGetTextPtr(fld2P)[FldGetTextLength(fld2P)+0] = '/';
-		FldGetTextPtr(fld2P)[FldGetTextLength(fld2P)+1] = 0;
-	}
-
-//	index = GamGetSelected();
-
-	if (index != dmMaxRecordIndex) {
-		recordH = DmGetRecord(_dbP, index);
-	} else {
-		index = dmMaxRecordIndex;
-		GamUnselect();
-		recordH = DmNewRecord(_dbP, &index, sizeof(GameInfoType));
-	}
-
-	gameInfo = (GameInfoType *)MemHandleLock(recordH);
-
-	StrCopy(newGameInfo.nameP, FldGetTextPtr(fld1P));
-	StrCopy(newGameInfo.pathP, FldGetTextPtr(fld2P));
-	StrCopy(newGameInfo.gameP, FldGetTextPtr(fld3P));
-	newGameInfo.gfxMode = LstGetSelection(list1P);
-	newGameInfo.language = LstGetSelection(list2P);
-	newGameInfo.selected = true;
-	newGameInfo.autoLoad = CtlGetValue(cck1P);
-	newGameInfo.loadSlot = StrAToI(FldGetTextPtr(fld4P));
-	newGameInfo.autoRoom = CtlGetValue(cck2P);
-	newGameInfo.roomNum = StrAToI(FldGetTextPtr(fld5P));
-	newGameInfo.amiga = CtlGetValue(cck3P);
-	newGameInfo.subtitles = !(CtlGetValue(cck4P));
-	newGameInfo.talkValue = StrAToI(FldGetTextPtr(fld6P));
-	newGameInfo.talkSpeed = CtlGetValue(cck5P);
-
-	DmWrite(gameInfo, 0, &newGameInfo, sizeof(GameInfoType));
-
-	MemHandleUnlock(recordH);
-	DmReleaseRecord (_dbP, index, 0);
-	GamSortList();
-	// update list position
-	{
-		RectangleType rArea;
-		UInt16 posIndex, maxIndex, maxView;
-		
-		// get the sorted index
-		index = GamGetSelected();
-		// if new item is out of the list bounds, change current list pos
-		GamGetListBounds(&rArea, NULL);
-		maxView = rArea.extent.y / sknInfoListItemSize;
-		posIndex = gPrefs->listPosition;
-		maxIndex = DmNumRecords(_dbP);
-		
-		if (index == 0 && posIndex > 0) {
-			gPrefs->listPosition = 0;
-		} else if ((maxView + posIndex) <= index) {
-			posIndex = index - (maxView - posIndex) + 1;
-			gPrefs->listPosition = posIndex;
-		}
-	}
-
-	FrmReturnToMain();
-	GamUpdateList();
-}
-
-static void EditGameFormInit(UInt16 index) {
-
-	FieldType *fld1P, *fld2P, *fld3P, *fld4P, *fld5P, *fld6P;
-	FormPtr frmP;
-	ListType *list1P, *list2P;
-
-	Char *nameP, *pathP, *gameP, *loadP, *roomP, *talkP;
-	MemHandle nameH, pathH, gameH, loadH, roomH, talkH;
-
-	MemHandle recordH = NULL;
-	GameInfoType *game;
-
-	list1P = (ListType *)GetObjectPtr(EditGameGfxListList);
-	list2P = (ListType *)GetObjectPtr(EditGameLanguageList);
-	fld1P = (FieldType *)GetObjectPtr(EditGameEntryNameField);
-	fld2P = (FieldType *)GetObjectPtr(EditGamePathField);
-	fld3P = (FieldType *)GetObjectPtr(EditGameGameField);
-	fld4P = (FieldType *)GetObjectPtr(EditGameLoadSlotField);
-	fld5P = (FieldType *)GetObjectPtr(EditGameStartRoomField);
-	fld6P = (FieldType *)GetObjectPtr(EditGameTalkSpeedField);
-
-	nameH = MemHandleNew(FldGetMaxChars(fld1P));
-	pathH = MemHandleNew(FldGetMaxChars(fld2P));
-	gameH = MemHandleNew(FldGetMaxChars(fld3P));
-	loadH = MemHandleNew(FldGetMaxChars(fld4P));
-	roomH = MemHandleNew(FldGetMaxChars(fld5P));
-	talkH = MemHandleNew(FldGetMaxChars(fld6P));
-
-	nameP = (Char *)MemHandleLock(nameH);
-	pathP = (Char *)MemHandleLock(pathH);
-	gameP = (Char *)MemHandleLock(gameH);
-	loadP = (Char *)MemHandleLock(loadH);
-	roomP = (Char *)MemHandleLock(roomH);
-	talkP = (Char *)MemHandleLock(talkH);
-
-//	index = GamGetSelected();
-
-	if (index != dmMaxRecordIndex) {
-		recordH = DmQueryRecord(_dbP, index);
-		game = (GameInfoType *)MemHandleLock(recordH);
-		StrCopy(nameP, game->nameP);
-		StrCopy(pathP, game->pathP);
-		StrCopy(gameP, game->gameP);
-
-		LstSetSelection(list1P, game->gfxMode);
-		LstSetSelection(list2P, game->language);
-		
-		StrIToA(loadP, game->loadSlot);
-		StrIToA(roomP, game->roomNum);
-		StrIToA(talkP, game->talkValue);
-
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameLoadSlotCheckbox), game->autoLoad);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameStartRoomCheckbox), game->autoRoom);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameAmigaCheckbox), game->amiga);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameSubtitlesCheckbox), !game->subtitles);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameTalkSpeedCheckbox), game->talkSpeed);
-		
-		MemHandleUnlock(recordH);
-		CtlSetUsable((ControlType *)GetObjectPtr(EditGameDeleteButton),true);
-	}
-	else {
-		MemSet(nameP,MemHandleSize(nameH),0);
-		MemSet(pathP,MemHandleSize(pathH),0);
-		MemSet(gameP,MemHandleSize(gameH),0);
-
-		StrIToA(loadP, 0);
-		StrIToA(roomP, 0);
-		StrIToA(talkP, 60);
-
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameLoadSlotCheckbox), 0);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameStartRoomCheckbox), 0);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameAmigaCheckbox), 0);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameSubtitlesCheckbox), 0);
-		CtlSetValue((ControlType *)GetObjectPtr(EditGameTalkSpeedCheckbox), 0);
-
-		LstSetSelection(list1P, 1);
-		LstSetSelection(list2P, 0);
-		CtlSetUsable((ControlType *)GetObjectPtr(EditGameDeleteButton),false);
-	}
-
-	MemHandleUnlock(nameH);
-	MemHandleUnlock(pathH);
-	MemHandleUnlock(gameH);
-	MemHandleUnlock(loadH);
-	MemHandleUnlock(roomH);
-	MemHandleUnlock(talkH);
-
-	FldSetTextHandle(fld1P, nameH);
-	FldSetTextHandle(fld2P, pathH);
-	FldSetTextHandle(fld3P, gameH);
-	FldSetTextHandle(fld4P, loadH);
-	FldSetTextHandle(fld5P, roomH);
-	FldSetTextHandle(fld6P, talkH);
-
-	CtlSetLabel((ControlType *)GetObjectPtr(EditGameGfxPopupPopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
-	CtlSetLabel((ControlType *)GetObjectPtr(EditGameLanguagePopTrigger), LstGetSelectionText(list2P, LstGetSelection(list2P)));
-
-	frmP = FrmGetActiveForm();
-	FrmDrawForm(frmP);
-}
-
-static Boolean EditGameFormHandleEvent(EventPtr eventP)
-{
-	Boolean handled = false;
-
-	switch (eventP->eType) {
-		case frmOpenEvent:
-			switch (__editMode__) {
-				case edtModeAdd:
-					EditGameFormInit(dmMaxRecordIndex);
-					break;
-				case edtModeEdit:
-				case edtModeParams:
-				default :
-					EditGameFormInit(GamGetSelected());
-					break;
-			}
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			switch (eventP->data.ctlSelect.controlID)
-			{
-				case EditGameOKButton:
-					switch (__editMode__) {
-						case edtModeAdd:
-							EditGameFormSave(dmMaxRecordIndex);
-							break;
-						case edtModeEdit:
-						case edtModeParams:
-						default :
-							EditGameFormSave(GamGetSelected());
-							break;
-					}
-					break;
-
-				case EditGameCancelButton:
-					FrmReturnToMain();
-					break;
-				
-				case EditGameDeleteButton:
-					EditGameFormDelete(false);
-					break;
-
-				case EditGameGfxPopupPopTrigger:
-					FrmList(eventP, EditGameGfxListList);
-					break;
-
-				case EditGameLanguagePopTrigger:
-					FrmList(eventP, EditGameLanguageList);
-					break;
-			}
-			handled = true;
-			break;
-
-		default:
-			break;
-	}
-	
-	return handled;
-}
-
-/***********************************************************************
- *
- * FUNCTION:    SystemInfoFormInit
- * FUNCTION:     SystemInfoFormHandleEvent
- *
- * DESCRIPTION: 
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static void GetMemory(UInt32* storageMemoryP, UInt32* dynamicMemoryP, UInt32 *storageFreeP, UInt32 *dynamicFreeP) {
-	UInt32		free, max;
-
-	Int16		i;
-	Int16		nCards;
-	UInt16		cardNo;
-	UInt16		heapID;
-
-	UInt32		storageMemory = 0;
-	UInt32		dynamicMemory = 0;
-	UInt32		storageFree = 0;
-	UInt32		dynamicFree = 0;
-
-	// Iterate through each card to support devices with multiple cards.
-	nCards = MemNumCards();		
-
-	for (cardNo = 0; cardNo < nCards; cardNo++) {
-		// Iterate through the RAM heaps on a card (excludes ROM).
-		for (i=0; i< MemNumRAMHeaps(cardNo); i++) {
-			// Obtain the ID of the heap.
-			heapID = MemHeapID(cardNo, i);
-			// Calculate the total memory and free memory of the heap.
-			MemHeapFreeBytes(heapID, &free, &max);
-			
-			// If the heap is dynamic, increment the dynamic memory total.
-			if (MemHeapDynamic(heapID)) {
-				dynamicMemory += MemHeapSize(heapID);
-				dynamicFree += free;
-
-			// The heap is nondynamic (storage ?).
-			} else {
-				storageMemory += MemHeapSize(heapID);
-				storageFree += free;
-			}
-		}
-	}
-	// Reduce the stats to KB.  Round the results.
-	dynamicMemory = dynamicMemory / 1024L;
-	storageMemory = storageMemory / 1024L;
-
-	dynamicFree = dynamicFree / 1024L;
-	storageFree = storageFree / 1024L;
-
-	if (dynamicMemoryP) *dynamicMemoryP = dynamicMemory;
-	if (storageMemoryP) *storageMemoryP = storageMemory;
-	if (dynamicFreeP) *dynamicFreeP = dynamicFree;
-	if (storageFreeP) *storageFreeP = storageFree;
-}
-
-static void SystemInfoFormInit() {
-	FormPtr frmP;
-	Coord x;
-	UInt32 dm, sm, df, sf;
-	Char num[10];
-
-	GetMemory(&sm, &dm, &sf, &df);
-	frmP = FrmGetActiveForm();
-	FrmDrawForm(frmP);
-
-	WinSetTextColor(255);
-	FntSetFont(stdFont);
-	
-	StrIToA(num, dm);
-	x = 149 - FntCharsWidth(num, StrLen(num));
-	WinDrawChars(num, StrLen(num), x, 30);
-
-	StrIToA(num, sm);
-	x = 149 - FntCharsWidth(num, StrLen(num));
-	WinDrawChars(num, StrLen(num), x, 42);
-
-	StrIToA(num, df);
-	x = 109 - FntCharsWidth(num, StrLen(num));
-	WinDrawChars(num, StrLen(num), x, 30);
-
-	StrIToA(num, sf);
-	x = 109 - FntCharsWidth(num, StrLen(num));
-	WinDrawChars(num, StrLen(num), x, 42);
-}
-
-static Boolean SystemInfoFormHandleEvent(EventPtr eventP) {
-	Boolean handled = false;
-
-	switch (eventP->eType) {
-		case frmOpenEvent:
-			SystemInfoFormInit();
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			// OK button only
-			FrmReturnToMain();
-			handled = true;
-			break;
-
-		default:
-			break;
-	}
-	
-	return handled;
-}
-/***********************************************************************
- *
- * FUNCTION:    VolumeFormSave
- * FUNCTION:    VolumeFormInit
- * FUNCTION:    VolumeFormHandleEvent
- *
- * DESCRIPTION: 
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-
-static void VolumeFormSave() {
-	SliderControlType *slid1P, *slid2P, *slid3P, *slid4P, *slid5P;
-	
-	slid1P = (SliderControlType *)GetObjectPtr(VolumeSpeakerSliderControl);
-	slid2P = (SliderControlType *)GetObjectPtr(VolumeHeadphoneSliderControl);
-
-	slid3P = (SliderControlType *)GetObjectPtr(VolumeMasterSliderControl);
-	slid4P = (SliderControlType *)GetObjectPtr(VolumeMusicSliderControl);
-	slid5P = (SliderControlType *)GetObjectPtr(VolumeSfxSliderControl);
-	
-	CtlGetSliderValues ((ControlType *)slid1P, 0, 0, 0, &gPrefs->volume.speaker) ;
-	CtlGetSliderValues ((ControlType *)slid2P, 0, 0, 0, &gPrefs->volume.headphone) ;
-
-	CtlGetSliderValues ((ControlType *)slid3P, 0, 0, 0, &gPrefs->volume.master);
-	CtlGetSliderValues ((ControlType *)slid4P, 0, 0, 0, &gPrefs->volume.music);
-	CtlGetSliderValues ((ControlType *)slid5P, 0, 0, 0, &gPrefs->volume.sfx);
-	
-	FrmReturnToMain();
-}
-
-static void VolumeFormInit() {
-	SliderControlType *slid1P, *slid2P, *slid3P, *slid4P, *slid5P;
-	FormPtr frmP;
-	UInt16 value;
-	
-	slid1P = (SliderControlType *)GetObjectPtr(VolumeSpeakerSliderControl);
-	slid2P = (SliderControlType *)GetObjectPtr(VolumeHeadphoneSliderControl);
-
-	slid3P = (SliderControlType *)GetObjectPtr(VolumeMasterSliderControl);
-	slid4P = (SliderControlType *)GetObjectPtr(VolumeMusicSliderControl);
-	slid5P = (SliderControlType *)GetObjectPtr(VolumeSfxSliderControl);
-
-	value = gPrefs->volume.speaker;
-	CtlSetSliderValues ((ControlType *)slid1P, 0, 0, 0, &value);
-	value = gPrefs->volume.headphone;
-	CtlSetSliderValues ((ControlType *)slid2P, 0, 0, 0, &value);
-
-	value = gPrefs->volume.master;
-	CtlSetSliderValues ((ControlType *)slid3P, 0, 0, 0, &value);
-	value = gPrefs->volume.music;
-	CtlSetSliderValues ((ControlType *)slid4P, 0, 0, 0, &value);
-	value = gPrefs->volume.sfx;
-	CtlSetSliderValues ((ControlType *)slid5P, 0, 0, 0, &value);
-
-	frmP = FrmGetActiveForm();
-	FrmDrawForm(frmP);
-}
-
-static Boolean VolumeFormHandleEvent(EventPtr eventP) {
-	Boolean handled = false;
-
-	switch (eventP->eType) {
-		case frmOpenEvent:
-			VolumeFormInit();
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			switch (eventP->data.ctlSelect.controlID)
-			{
-				case VolumeOKButton:
-					VolumeFormSave();
-					break;
-
-				case VolumeCancelButton:
-					FrmReturnToMain();
-					break;
-			}
-			handled = true;
-			break;
-
-		default:
-			break;
-	}
-	
-	return handled;
-}
-
-static void SoundFormSave() {
-	ControlType *cck1P, *cck2P, *cck3P, *cck4P;
-	ListType *list1P;
-	FieldType *fld1P, *fld2P, *fld3P;
-	UInt8 tempo;
-	UInt16 firstTrack;
-
-	cck1P = (ControlType *)GetObjectPtr(SoundMusicCheckbox);
-	cck2P = (ControlType *)GetObjectPtr(SoundMultiMidiCheckbox);
-	cck3P = (ControlType *)GetObjectPtr(SoundMP3Checkbox);
-	cck4P = (ControlType *)GetObjectPtr(SoundTrackLengthCheckbox);
-	list1P = (ListType *)GetObjectPtr(SoundDriverList);
-	fld1P = (FieldType *)GetObjectPtr(SoundTempoField);
-	fld2P = (FieldType *)GetObjectPtr(SoundLengthSecsField);
-	fld3P = (FieldType *)GetObjectPtr(SoundFirstTrackField);
-
-	tempo = StrAToI(FldGetTextPtr(fld1P));
-	if (tempo < 50 || tempo > 200) {
-		FrmCustomAlert(FrmErrorAlert, "Invalid tempo value (50...200)", 0, 0);
-		return;
-	}
-
-	firstTrack = StrAToI(FldGetTextPtr(fld3P));
-	if (firstTrack < 1 || firstTrack > 999) {
-		FrmCustomAlert(FrmErrorAlert, "Invalid track value (1...999)", 0, 0);
-		return;
-	}
-
-	gPrefs->sound.music = CtlGetValue(cck1P);
-	gPrefs->sound.multiMidi = CtlGetValue(cck2P);
-	gPrefs->sound.MP3 = CtlGetValue(cck3P);
-	gPrefs->sound.setDefaultTrackLength = CtlGetValue(cck4P);
-
-	gPrefs->sound.driver = LstGetSelection(list1P);
-	gPrefs->sound.tempo = tempo;
-	gPrefs->sound.defaultTrackLength = StrAToI(FldGetTextPtr(fld2P));
-	gPrefs->sound.firstTrack = firstTrack;
-	FrmReturnToMain();
-}
-
-static void SoundFormInit() {
-	ControlType *cck1P, *cck2P, *cck3P, *cck4P;
-	ListType *list1P;
-	FieldType *fld1P, *fld2P, *fld3P;
-	FormPtr frmP;
-	MemHandle tempoH, lengthH, firstTrackH;
-	Char *tempoP, *lengthP, *firstTrackP;
-
-	cck1P = (ControlType *)GetObjectPtr(SoundMusicCheckbox);
-	cck2P = (ControlType *)GetObjectPtr(SoundMultiMidiCheckbox);
-	cck3P = (ControlType *)GetObjectPtr(SoundMP3Checkbox);
-	cck4P = (ControlType *)GetObjectPtr(SoundTrackLengthCheckbox);
-	list1P = (ListType *)GetObjectPtr(SoundDriverList);
-	fld1P = (FieldType *)GetObjectPtr(SoundTempoField);
-	fld2P = (FieldType *)GetObjectPtr(SoundLengthSecsField);
-	fld3P = (FieldType *)GetObjectPtr(SoundFirstTrackField);
-
-	CtlSetValue(cck1P, gPrefs->sound.music);
-	CtlSetValue(cck2P, gPrefs->sound.multiMidi);
-	CtlSetValue(cck3P, gPrefs->sound.MP3);
-	CtlSetValue(cck4P, gPrefs->sound.setDefaultTrackLength);
-
-	LstSetSelection(list1P, gPrefs->sound.driver);
-	CtlSetLabel((ControlType *)GetObjectPtr(SoundDriverPopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
-
-	tempoH = MemHandleNew(FldGetMaxChars(fld1P));
-	tempoP = (Char *)MemHandleLock(tempoH);
-	StrIToA(tempoP, gPrefs->sound.tempo);
-	MemHandleUnlock(tempoH);
-	FldSetTextHandle(fld1P, tempoH);
-
-	lengthH = MemHandleNew(FldGetMaxChars(fld2P));
-	lengthP = (Char *)MemHandleLock(lengthH);
-	StrIToA(lengthP, gPrefs->sound.defaultTrackLength);
-	MemHandleUnlock(lengthH);
-	FldSetTextHandle(fld2P, lengthH);
-
-	firstTrackH = MemHandleNew(FldGetMaxChars(fld3P));
-	firstTrackP = (Char *)MemHandleLock(firstTrackH);
-	StrIToA(firstTrackP, gPrefs->sound.firstTrack);
-	MemHandleUnlock(firstTrackH);
-	FldSetTextHandle(fld3P, firstTrackH);
-
-	frmP = FrmGetActiveForm();
-	FrmDrawForm(frmP);
-}
-
-static Boolean SoundFormHandleEvent(EventPtr eventP) {
-	Boolean handled = false;
-
-	switch (eventP->eType) {
-		case frmOpenEvent:
-			SoundFormInit();
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			switch (eventP->data.ctlSelect.controlID)
-			{
-				case SoundOKButton:
-					SoundFormSave();
-					break;
-
-				case SoundCancelButton:
-					FrmReturnToMain();
-					break;
-
-				case SoundDriverPopTrigger:
-					FrmList(eventP, SoundDriverList);
-					break;
-			}
-			handled = true;
-			break;
-
-		default:
-			break;
-	}
-	
-	return handled;
-}
-/***********************************************************************
- *
- * FUNCTION:    MiscOptionsFormSave
- * FUNCTION:    MiscOptionsFormInit
- * FUNCTION:    MiscOptionsFormHandleEvent
- *
- * DESCRIPTION: Misc. Options form functions
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-
-static void MiscOptionsFormSave() {
-
-	FieldType *fld1P;
-	ControlType *cck1P, *cck2P, *cck3P, *cck4P, *cck5P, *cck6P, *cck7P, *cck8P;	
-	FormPtr frmP;
-
-	fld1P = (FieldType *)GetObjectPtr(MiscOptionsDebugLevelField);
-	
-	cck1P = (ControlType *)GetObjectPtr(MiscOptionsVibratorCheckbox);
-	cck2P = (ControlType *)GetObjectPtr(MiscOptionsNoAutoOffCheckbox);
-	cck3P = (ControlType *)GetObjectPtr(MiscOptionsStdPaletteCheckbox);
-	cck4P = (ControlType *)GetObjectPtr(MiscOptionsDebugCheckbox);
-	cck5P = (ControlType *)GetObjectPtr(MiscOptionsWriteIniCheckbox);
-	cck6P = (ControlType *)GetObjectPtr(MiscOptionsAutoResetCheckbox);
-	cck7P = (ControlType *)GetObjectPtr(MiscOptionsDemoCheckbox);
-	cck8P = (ControlType *)GetObjectPtr(MiscOptionsFullscreenCheckbox);
-
-	frmP = FrmGetActiveForm();
-
-	if (FldGetTextLength(fld1P) == 0 && CtlGetValue(cck4P) == 1) {
-		FrmCustomAlert(FrmWarnAlert,"You must specified a debug level.",0,0);
-		FrmSetFocus(frmP, FrmGetObjectIndex(frmP, MiscOptionsDebugLevelField));
-		return;
-	}
-
-	gPrefs->vibrator = CtlGetValue(cck1P);
-	gPrefs->autoOff = !CtlGetValue(cck2P);
-	gPrefs->stdPalette = CtlGetValue(cck3P);
-	gPrefs->debug = CtlGetValue(cck4P);
-	gPrefs->saveConfig = CtlGetValue(cck5P);
-	gPrefs->autoReset = CtlGetValue(cck6P);
-	gPrefs->demoMode = CtlGetValue(cck7P);
-	gPrefs->fullscreen = CtlGetValue(cck8P);
-
-	gPrefs->debugLevel = StrAToI(FldGetTextPtr(fld1P));
-	
-	FrmReturnToMain();
-}
-
-static void MiscOptionsFormInit() {
-
-	FieldType *fld1P;
-	FormPtr frmP;
-
-	Char *levelP;
-	MemHandle levelH;
-
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsVibratorCheckbox), gPrefs->vibrator);
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsNoAutoOffCheckbox), !gPrefs->autoOff);
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsStdPaletteCheckbox), gPrefs->stdPalette);
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsAutoResetCheckbox), gPrefs->autoReset);
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsDebugCheckbox), gPrefs->debug);
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsWriteIniCheckbox), gPrefs->saveConfig);
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsDemoCheckbox), gPrefs->demoMode);
-	CtlSetValue((ControlType *)GetObjectPtr(MiscOptionsFullscreenCheckbox), gPrefs->fullscreen);
-
-	fld1P = (FieldType *)GetObjectPtr(MiscOptionsDebugLevelField);
-
-	levelH = MemHandleNew(FldGetMaxChars(fld1P));
-	levelP = (Char *)MemHandleLock(levelH);
-	StrIToA(levelP, gPrefs->debugLevel);
-	MemHandleUnlock(levelH);
-
-	FldSetTextHandle(fld1P, levelH);
-	frmP = FrmGetActiveForm();
-	FrmDrawForm(frmP);
-}
-
-static Boolean MiscOptionsFormHandleEvent(EventPtr eventP) {
-	Boolean handled = false;
-
-	switch (eventP->eType) {
-		case frmOpenEvent:
-			MiscOptionsFormInit();
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			switch (eventP->data.ctlSelect.controlID)
-			{
-				case MiscOptionsOKButton:
-					MiscOptionsFormSave();
-					break;
-
-				case MiscOptionsCancelButton:
-					FrmReturnToMain();
-					break;
-			}
-			handled = true;
-			break;
-
-		default:
-			break;
-	}
-	
-	return handled;
-}
-///////////////////////////////////////////////////////////////////////
-static void CardSlotCreateDirs() {
-	if (gPrefs->card.volRefNum != sysInvalidRefNum) {
-		VFSDirCreate(gPrefs->card.volRefNum, "/PALM");
-		VFSDirCreate(gPrefs->card.volRefNum, "/PALM/Programs");
-		VFSDirCreate(gPrefs->card.volRefNum, "/PALM/Programs/ScummVM");
-		VFSDirCreate(gPrefs->card.volRefNum, "/PALM/Programs/ScummVM/Games");
-		VFSDirCreate(gPrefs->card.volRefNum, "/PALM/Programs/ScummVM/Saved");
-	}
-}
-
-static void CardSlotFromShowHideOptions() {
-	ControlType *cck1P;
-	FormPtr frmP = FrmGetActiveForm();
-
-	cck1P = (ControlType *)GetObjectPtr(CardSlotMoveCheckbox);
-
-	if (CtlGetValue(cck1P)) {
-		FrmShowObject(frmP, FrmGetObjectIndex (frmP, CardSlotDeleteCheckbox));
-		FrmShowObject(frmP, FrmGetObjectIndex (frmP, CardSlotConfirmCheckbox));
-	} else {
-		FrmHideObject(frmP, FrmGetObjectIndex (frmP, CardSlotDeleteCheckbox));
-		FrmHideObject(frmP, FrmGetObjectIndex (frmP, CardSlotConfirmCheckbox));
-	}
-}
-
-static UInt16 CardSlotFormInit(Boolean display, Boolean bDraw) {
-	Err err;
-	UInt16 volRefNum;
-	UInt32 volIterator = vfsIteratorStart;
-	UInt8 counter = 0;
-	UInt32 other = 1;
-
-	MemHandle cards = NULL;
-	CardInfoType *cardsInfo;
-
-	while (volIterator != vfsIteratorStop) {
-		err = VFSVolumeEnumerate(&volRefNum, &volIterator);
-
-		if (!err) {
-			Char labelP[expCardInfoStringMaxLen+1];
-			err = VFSVolumeGetLabel(volRefNum, labelP, expCardInfoStringMaxLen+1);
-
-			if (err || StrLen(labelP) == 0) {	// if no label try to retreive card type
-				VolumeInfoType volInfo;
-				err = VFSVolumeInfo(volRefNum, &volInfo);
-				
-				if (!err) {
-					ExpCardInfoType info;
-					err = ExpCardInfo(volInfo.slotRefNum, &info);
-					StrCopy(labelP, info.deviceClassStr);
-				}
-				
-				if (err)	// if err default name
-					StrPrintF(labelP,"Other Card %ld", other++);
-			}
-
-			if (!cards)
-				cards = MemHandleNew(sizeof(CardInfoType));
-			else
-				MemHandleResize(cards, MemHandleSize(cards) + sizeof(CardInfoType));
-				
-			cardsInfo = (CardInfoType *)MemHandleLock(cards);
-			cardsInfo[counter].volRefNum = volRefNum;
-			StrCopy(cardsInfo[counter].nameP, labelP);
-			MemHandleUnlock(cards);
-			counter++;
-		}
-	}
-
-	if (display) {
-		FormPtr frmP;
-		ListPtr listP;
-		ControlType *cck1P, *cck2P, *cck3P;
-		UInt16 index;
-		Int16 selected = -1;
-		
-		CardInfoType *cardsInfo;
-		MemHandle items = NULL;
-
-		listP = (ListType *)GetObjectPtr(CardSlotSlotList);
-		cck1P = (ControlType *)GetObjectPtr(CardSlotMoveCheckbox);
-		cck2P = (ControlType *)GetObjectPtr(CardSlotDeleteCheckbox);
-		cck3P = (ControlType *)GetObjectPtr(CardSlotConfirmCheckbox);
-
-		if (counter > 0) {
-			cardsInfo = (CardInfoType *)MemHandleLock(cards);
-
-			for (index = 0; index < counter; index++) {
-				if (!items)
-					items = MemHandleNew(sizeof(Char *));
-				else
-					MemHandleResize(items, MemHandleSize(items) + sizeof(Char *));
-
-				itemsText = (Char **)MemHandleLock(items);
-				itemsText[index] = cardsInfo[index].nameP;
-				MemHandleUnlock(items);
-				
-				if (cardsInfo[index].volRefNum == gPrefs->card.volRefNum)
-					selected = index;
-			}
-
-			itemsText = (Char **)MemHandleLock(items);
-			LstSetListChoices (listP, itemsText, counter);
-			LstSetSelection(listP, selected);
-			// save globals and set list
-			itemsText = (Char **)MemHandleLock(items);
-			itemsList = (void *)cardsInfo;
-			itemsType = ITEM_TYPE_CARD;
-
-		} else {
-			LstSetListChoices(listP, NULL, 0);
-			// save globals and set list
-			itemsText = NULL;
-			itemsList = NULL;
-			itemsType = ITEM_TYPE_CARD;
-		}
-
-		// bDraw = true -> draw whole from
-		// bDraw = false -> redraw list
-		if (bDraw) {
-			CtlSetValue(cck1P, gPrefs->card.moveDB);
-			CtlSetValue(cck2P, gPrefs->card.deleteDB);
-			CtlSetValue(cck3P, gPrefs->card.confirmMoveDB);
-			CardSlotFromShowHideOptions();
-			frmP = FrmGetActiveForm();
-			FrmDrawForm(frmP);
-
-		} else {
-			WinScreenLock(winLockCopy);
-			LstDrawList(listP);
-			WinScreenUnlock();
-		}
-	} else {	// if !display, we just want to retreive an avaliable card
-		if (counter > 0) {
-			UInt16 volRefNum;
-			cardsInfo = (CardInfoType *)MemHandleLock(cards);
-			volRefNum =  cardsInfo[0].volRefNum;	// return the first volref
-			MemHandleUnlock(cards);
-			MemHandleFree(cards);
-			return volRefNum;
-		}
-	}
-
-	return sysInvalidRefNum; // default
-}
-
-static void CardSlotFormExit(Boolean bSave) {
-	MemHandle cards;
-	MemHandle items;
-	CardInfoType *cardsInfo;
-	UInt16 updateCode = frmRedrawUpdateMS;
-
-	if (itemsText && itemsList) {
-		cardsInfo = (CardInfoType *)itemsList;
-		cards = MemPtrRecoverHandle(cardsInfo);
-		items = MemPtrRecoverHandle(itemsText);
-	
-		itemsText = NULL;
-		itemsList = NULL;
-	} else {
-		cards = NULL;
-		items = NULL;
-	}
-	itemsType = ITEM_TYPE_UNKNOWN;
-
-	if (bSave) {
-		ListType *listP;
-		ControlType *cck1P, *cck2P, *cck3P;
-		Int16 selected;
-
-		listP = (ListType *)GetObjectPtr(CardSlotSlotList);
-		cck1P = (ControlType *)GetObjectPtr(CardSlotMoveCheckbox);
-		cck2P = (ControlType *)GetObjectPtr(CardSlotDeleteCheckbox);
-		cck3P = (ControlType *)GetObjectPtr(CardSlotConfirmCheckbox);
-		selected = LstGetSelection(listP);
-
-		if (selected == -1) {
-			gPrefs->card.volRefNum = sysInvalidRefNum;
-		} else if (gPrefs->card.volRefNum != cardsInfo[selected].volRefNum) {
-			updateCode = frmRedrawUpdateMSImport;
-			gPrefs->card.volRefNum = cardsInfo[selected].volRefNum;
-		}
-
-		gPrefs->card.moveDB = CtlGetValue(cck1P);
-		gPrefs->card.deleteDB = CtlGetValue(cck2P);
-		gPrefs->card.confirmMoveDB = CtlGetValue(cck3P);
-		CardSlotCreateDirs();
-	}
-
-	FrmReturnToMain(updateCode);
-
-	if (items && cards) {
-		MemHandleUnlock(items);
-		MemHandleUnlock(cards);
-		MemHandleFree(items);
-		MemHandleFree(cards);
-	}
-}
-
-static void CardSlotFormUpdate() {
-	if (itemsType == ITEM_TYPE_CARD) {
-		if (itemsText && itemsList) {
-			MemHandle cards;
-			MemHandle items;
-			ListType *listP;
-
-			listP = (ListType *)GetObjectPtr(CardSlotSlotList);
-			cards = MemPtrRecoverHandle(itemsList);
-			items = MemPtrRecoverHandle(itemsText);
-
-			itemsText = NULL;
-			itemsList = NULL;
-			itemsType = ITEM_TYPE_UNKNOWN;
-
-			MemHandleUnlock(items);
-			MemHandleUnlock(cards);
-			MemHandleFree(items);
-			MemHandleFree(cards);
-		}
-		CardSlotFormInit(true, false);
-	}
-}
-
-static Boolean CardSlotFormHandleEvent(EventPtr eventP) {
-	Boolean handled = false;
-
-	switch (eventP->eType) {
-	
-		case frmOpenEvent:
-			CardSlotFormInit(true, true);
-			handled = true;
-			break;
-
-		case frmCloseEvent:
-			CardSlotFormExit(false);
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			switch (eventP->data.ctlSelect.controlID)
-			{
-				case CardSlotOkButton:
-					CardSlotFormExit(true);
-					break;
-
-				case CardSlotCancelButton:
-					CardSlotFormExit(false);
-					break;
-				
-				case CardSlotMoveCheckbox:
-					CardSlotFromShowHideOptions();
-					break;
-			}
-			handled = true;
-			break;
-
-		default:
-			break;
-	}
-	
-	return handled;
-}
-
-static UInt16 parseCards() {
-	UInt16 volRefNum = CardSlotFormInit(false, false);
-	CardSlotFormExit(false);
-	
-	return volRefNum;
-}
-
-//#############################################################################
-//#############################################################################
-// Skin manager
-//#############################################################################
-
-//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-
-static void SknApplySkin()
-{
-	DmOpenRef skinDBP;
-	RectangleType r;
-	FormPtr frmP = FrmGetActiveForm();
-
-	WinScreenLock(winLockErase);
-	//SknSetPalette();
-	FrmDrawForm(frmP);
-
-	if (gPrefs->card.volRefNum != sysInvalidRefNum)
-		FrmShowObject(frmP, FrmGetObjectIndex (frmP, MainMSBitMap));
-	else
-		FrmShowObject(frmP, FrmGetObjectIndex (frmP, MainMSNoneBitMap));
-
-	WinSetForeColor(255);
-	WinSetDrawMode(winPaint);
-	WinDrawLine (0, 14, 159, 14);
-	WinDrawLine (0, 13, 159, 13);
-
-	skinDBP = SknOpenSkin();
-	SknGetObjectBounds(skinDBP, skinBackgroundImageTop, &r);
-	SknCopyBits(skinDBP, skinBackgroundImageTop, 0, r.topLeft.x, r.topLeft.y, 0);
-	SknGetObjectBounds(skinDBP, skinBackgroundImageBottom, &r);
-	SknCopyBits(skinDBP, skinBackgroundImageBottom, 0, r.topLeft.x, r.topLeft.y, 0);
-
-	for (UInt16 resID = 1100; resID <= 7000; resID += 100) {
-		SknSetState(skinDBP, resID, sknStateNormal);
-		SknShowObject(skinDBP, resID);
-	}
-
-	SknCloseSkin(skinDBP);
-	WinScreenUnlock();
-	GamUpdateList();
-}
-
-//#############################################################################
-//#############################################################################
-
-/***********************************************************************
- *
- * FUNCTION:    MainFormInit
- *
- * DESCRIPTION: This routine initializes the MainForm form.
- *
- * PARAMETERS:  frm - pointer to the MainForm form.
- *
- * RETURNED:    nothing
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static void MainFormInit()
-{
-	SknApplySkin();
-}
-
-/***********************************************************************
- *
- * FUNCTION:    MainFormDoCommand
- *
- * DESCRIPTION: This routine performs the menu command specified.
- *
- * PARAMETERS:  command  - menu item id
- *
- * RETURNED:    nothing
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-
-
-static Int16 SkinsFormCompare(SkinInfoType *a, SkinInfoType *b, SortRecordInfoPtr, SortRecordInfoPtr, MemHandle) {
-	return StrCompare(a->nameP, b->nameP);
-}
-
-static void SkinsFormInit(Boolean bDraw) {
-	MemHandle skins = NULL;
-	SkinInfoType *skinsInfo;
-	UInt16 numSkins = 0;
-
-	FormPtr frmP;
-	ListType *listP;
-	MemHandle items = NULL;
-	ControlType *cck1P;
-	DmSearchStateType stateInfo;
-	UInt16 cardNo;
-	LocalID dbID;
-
-	Err errInfo;
-	Char nameP[32];
-
-	itemsText = NULL;
-	
-	// parse and save skins
-	Err err = DmGetNextDatabaseByTypeCreator(true, &stateInfo, 'skin', appFileCreator, false, &cardNo, &dbID);
-	while (!err && dbID) {
-		errInfo = DmDatabaseInfo (cardNo, dbID, nameP, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0);
-		if (!errInfo)
-		{
-			if (!skins)
-				skins = MemHandleNew(sizeof(SkinInfoType));
-			else
-				MemHandleResize(skins, MemHandleSize(skins) + sizeof(SkinInfoType));
-			
-			skinsInfo = (SkinInfoType *)MemHandleLock(skins);
-			StrCopy(skinsInfo[numSkins].nameP, nameP);
-			skinsInfo[numSkins].cardNo = cardNo;
-			skinsInfo[numSkins].dbID = dbID;
-			MemHandleUnlock(skins);
-			numSkins++;
-		}		
-		err = DmGetNextDatabaseByTypeCreator(false, &stateInfo, 'skin', appFileCreator, false, &cardNo, &dbID);
-	}
-
-	Int16 selected = -1;
-
-	cck1P = (ControlType *)GetObjectPtr(SkinsSoundClickCheckbox);
-	CtlSetValue(cck1P, gPrefs->soundClick);
-
-	listP = (ListType *)GetObjectPtr(SkinsSkinList);
-	skinsInfo = (SkinInfoType *)MemHandleLock(skins);
-	SysQSort(skinsInfo, numSkins, sizeof(SkinInfoType), (CmpFuncPtr)SkinsFormCompare, 0);
-
-	// create itemsText (TODO: create a custom draw function)
-	for (UInt16 index=0; index < numSkins; index++)
-	{
-		if (!items)
-			items = MemHandleNew(sizeof(Char *));
-		else
-			MemHandleResize(items, MemHandleSize(items) + sizeof(Char *));
-
-		itemsText = (Char **)MemHandleLock(items);
-		itemsText[index] = skinsInfo[index].nameP;
-		MemHandleUnlock(items);
-		
-		if (	gPrefs->skin.cardNo == skinsInfo[index].cardNo &&
-				gPrefs->skin.dbID == skinsInfo[index].dbID &&
-				StrCompare(gPrefs->skin.nameP, skinsInfo[index].nameP) == 0)
-			selected = index;
-	}
-	// save globals and set list
-	itemsText = (Char **)MemHandleLock(items);
-	itemsList = (void *)skinsInfo;
-	itemsType = ITEM_TYPE_SKIN;
-
-	LstSetListChoices (listP, itemsText, numSkins);
-	LstSetSelection(listP, selected);
-
-	// bDraw = true -> draw whole from
-	// bDraw = false -> redraw list
-	if (bDraw) {
-		frmP = FrmGetActiveForm();
-		FrmDrawForm(frmP);
-	} else {
-		WinScreenLock(winLockCopy);
-		LstDrawList(listP);
-		WinScreenUnlock();
-//		LstSetSelection(listP, 0);
-	}
-}
-
-static void SkinsFormExit(Boolean bSave) {
-	MemHandle skins;
-	MemHandle items;
-	SkinInfoType *skinsInfo;
-
-	ListType *listP;
-	Int16 selected;
-
-	listP = (ListType *)GetObjectPtr(SkinsSkinList);
-	selected = LstGetSelection(listP);
-	
-	if (bSave && selected == -1)	{	// may never occured...
-		FrmCustomAlert(FrmWarnAlert, "You didn't select a skin.", 0, 0);
-		return;
-	}
-
-	skinsInfo = (SkinInfoType *)itemsList;
-	skins = MemPtrRecoverHandle(skinsInfo);
-	items = MemPtrRecoverHandle(itemsText);
-	
-	itemsText = NULL;
-	itemsList = NULL;
-	itemsType = ITEM_TYPE_UNKNOWN;
-
-	if (bSave) {
-		ControlType *cck1P;
-
-		StrCopy(gPrefs->skin.nameP, skinsInfo[selected].nameP);
-		gPrefs->skin.cardNo = skinsInfo[selected].cardNo;
-		gPrefs->skin.dbID =  skinsInfo[selected].dbID;
-
-		cck1P = (ControlType *)GetObjectPtr(SkinsSoundClickCheckbox);
-		gPrefs->soundClick = CtlGetValue(cck1P);
-	}
-
-	FrmReturnToMain();
-
-	MemHandleUnlock(items);
-	MemHandleUnlock(skins);
-	MemHandleFree(items);
-	MemHandleFree(skins);
-
-	if (bSave)
-		SknApplySkin();
-}
-
-static void SkinsFormBeam() {
-	SkinInfoType *skinsInfo;
-
-	ListType *listP;
-	Int16 selected;
-	Err err;
-
-	listP = (ListType *)GetObjectPtr(SkinsSkinList);
-	selected = LstGetSelection(listP);
-
-	if (selected == -1)	{	// may never occured...
-		FrmCustomAlert(FrmWarnAlert, "You didn't select a skin.", 0, 0);
-		return;
-	}
-
-	skinsInfo = (SkinInfoType *)itemsList;
-	err = SendDatabase(0, skinsInfo[selected].dbID, "skin.pdb", "\nScummVM Skin");
-
-//	if (err)
-//		FrmCustomAlert(FrmErrorAlert, "Unable to beam this skin.",0,0);
-}
-
-static void SkinsFormDelete() {
-	MemHandle skins;
-	MemHandle items;
-	SkinInfoType *skinsInfo;
-
-	ListType *listP;
-	Int16 selected;
-
-	listP = (ListType *)GetObjectPtr(SkinsSkinList);
-	selected = LstGetSelection(listP);
-
-	if (selected == -1)	{	// may never occured...
-		FrmCustomAlert(FrmInfoAlert, "You didn't select a skin.", 0, 0);
-		return;
-	}
-
-	skinsInfo = (SkinInfoType *)itemsList;
-	skins = MemPtrRecoverHandle(skinsInfo);
-	items = MemPtrRecoverHandle(itemsText);
-
-	if (	gPrefs->skin.cardNo == skinsInfo[selected].cardNo &&
-			gPrefs->skin.dbID == skinsInfo[selected].dbID &&
-			StrCompare(gPrefs->skin.nameP, skinsInfo[selected].nameP) == 0) {
-			FrmCustomAlert(FrmInfoAlert, "You cannot delete the active skin.",0,0);
-			return;
-
-	} else {
-		Err err = DmDeleteDatabase(0, skinsInfo[selected].dbID);
-		if (!err) {
-
-			itemsText = NULL;
-			itemsList = NULL;
-			itemsType = ITEM_TYPE_UNKNOWN;
-
-			MemHandleUnlock(items);
-			MemHandleUnlock(skins);
-			MemHandleFree(items);
-			MemHandleFree(skins);
-
-			SkinsFormInit(false);
-		} else {
-			FrmCustomAlert(FrmErrorAlert, "Skin deletion failed.",0,0);
-		}
-	}
-
-}
-static Boolean SkinsFormHandleEvent(EventPtr eventP) {
-	Boolean handled = false;
-
-	switch (eventP->eType) {
-	
-		case frmOpenEvent:
-			SkinsFormInit(true);
-			handled = true;
-			break;
-
-		case frmCloseEvent:
-			SkinsFormExit(false);
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			switch (eventP->data.ctlSelect.controlID)
-			{
-				case SkinsOKButton:
-					SkinsFormExit(true);
-					break;
-
-				case SkinsCancelButton:
-					SkinsFormExit(false);
-					break;
-					
-				case SkinsBeamButton:
-					SkinsFormBeam();
-					break;
-				
-				case SkinsDeleteButton:
-					SkinsFormDelete();
-					break;
-			}
-			handled = true;
-			break;
-
-		default:
-			break;
-	}
-	
-	return handled;
-}
-
-
-static void MainFormAbout() {
-	FormPtr frmP;
-	FormLabelType *versionP;
-
-	frmP = FrmInitForm(AboutForm);
-	versionP = FrmNewLabel(&frmP, 1111, gScummVMVersion, 4, 142, stdFont);
-	FrmDoDialog (frmP);					// Display the About Box.
-	FrmDeleteForm (frmP);
-}
-
-static Boolean MainFormDoCommand(UInt16 command)
-{
-	Boolean handled = false;
-
-	switch (command) {
-		case MainGamesCard:
-			FrmPopupForm(CardSlotForm);
-			handled = true;
-			break;
-
-		case MainGamesMemory:
-			FrmPopupForm(SystemInfoForm);
-			handled = true;
-			break;
-
-		case MainGamesNewEdit:
-			__editMode__ = edtModeParams;
-			FrmPopupForm(EditGameForm);
-			handled = true;
-			break;
-
-		case MainGamesBeamScummVM:
-			BeamMe();
-			//if (BeamMe())
-				//FrmCustomAlert(FrmErrorAlert,"Unable to beam ScummVM for PalmOS.",0,0);
-			handled = true;
-			break;
-
-		case MainOptionsAbout:
- 			MainFormAbout();
- 			handled = true;
-			break;
-		
-		case MainOptionsVolumeControl:
-			FrmPopupForm(VolumeForm);
-			handled = true;
-			break;
-
-		case MainOptionsMusic:
-			FrmPopupForm(SoundForm);
-			handled = true;
-			break;
-		
-		case MainOptionsSkins:
-			FrmPopupForm(SkinsForm);
-			handled = true;
-			break;
-
-		case MainOptionsMisc:
-			FrmPopupForm(MiscOptionsForm);
-			handled = true;
-			break;
-		}
-
-	MenuEraseStatus(0);
-	return handled;
-}
-
-
-static void SavePrefs() {
-	if (gPrefs) {
-		PrefSetAppPreferences(appFileCreator, appPrefID, appPrefVersionNum, gPrefs, sizeof (GlobalsPreferenceType), true);
-		MemPtrFree(gPrefs);
-		gPrefs = NULL;
-	}
-}
-
-static Boolean CheckVibratorExists() {
-	UInt32 romVersion;
-	Err err;
-	Boolean exists = false;
-
-	err = FtrGet(sysFtrCreator, sysFtrNumROMVersion, &romVersion);
-	if (!err) {
-		if (romVersion >= sysMakeROMVersion(4,0,0,sysROMStageRelease,0)) {
-			Boolean active = false;
-			err = HwrVibrateAttributes(0, kHwrVibrateActive, &active);
-			exists = (!err) ? true : exists;
-		}
-	}
-
-	return exists;
-}
-
-static void AddArg(Char **argvP, const Char *argP, const Char *parmP, UInt8 *countArgP)
-{
-	if (argP)
-	{
-		UInt16 len2 = 0;
-		UInt16 len1 = StrLen(argP);
-
-		if (len1 > 0)
-		{	
-			if (parmP)
-				len2 = StrLen(parmP);
-
-			(*countArgP)++;
-			*argvP = (Char *)MemPtrNew(len1 + len2 + 1);
-			StrCopy(*argvP, argP);
-			
-			if (parmP)
-				StrCat(*argvP, parmP);
-		}
-	}
-}
-
-// need to move this on a .h file
-#define sonySysFileCSystem      'SsYs'  /* Sony overall System */
-#define sonySysFtrCreatorSystem     sonySysFileCSystem
-
-#define sonySysFtrNumSystemBase         10000
-#define sonySysFtrNumSystemAOutSndStateOnHandlerP   (sonySysFtrNumSystemBase + 4)
-#define sonySysFtrNumSystemAOutSndStateOffHandlerP  (sonySysFtrNumSystemBase + 5)
-
-typedef void (*sndStateOnType)(UInt8 /* kind */, UInt8 /* L volume 0-31 */, UInt8 /* R volume 0-31 */);
-typedef void (*sndStateOffType)(UInt8 /* kind */);
-
-/* kind */
-#define aOutSndKindSp       (0) /* Speaker volume */
-#define aOutSndKindHp       (2) /* HeadPhone volume */
-////////////////////////////////////////////////////////////
-#define MAX_ARG	25
-
-static Boolean checkPath(const Char *pathP) {
-	FileRef *tmpRef;
-
-	if (!(tmpRef = fopen(pathP, "r"))) {
-		return false;
-	} else {
-		fclose(tmpRef);
-		return true;
-	}
-}
-
-static void StartScummVM() {
-	Char *argvP[MAX_ARG];
-	UInt8 argc	= 0;
-	UInt8 count;
-
-	Boolean autoOff;
-	UInt16 autoOffDelay;
-	Boolean debug;
-	UInt16 musicDriver = sysInvalidRefNum; // for launch call
-
-	bStartScumm = false;	//
-	UInt16 index = GamGetSelected();
-
-	for(count = 0; count < MAX_ARG; count++)
-		argvP[count] = NULL;
-
-	if (index != dmMaxRecordIndex) {
-		Char pathP[256];
-		Char num[4];
-		MemHandle recordH;
-		GameInfoType *gameInfoP;
-
-		recordH = DmQueryRecord(_dbP,index);
-		gameInfoP = (GameInfoType *)MemHandleLock(recordH);
-
-		// build path
-		StrCopy(pathP,"/Palm/Programs/ScummVM/Games/");
-		if (gameInfoP->pathP[0] == '/')
-			StrCopy(pathP,gameInfoP->pathP);
-		else
-			StrCat(pathP,gameInfoP->pathP);
-		
-		// path exists ?
-		if (!checkPath(pathP)) {
-			MemHandleUnlock(recordH);
-			FrmCustomAlert(FrmErrorAlert,"The specified path was not found !",0,0);
-			return;
-		}
-
-		AddArg(&argvP[argc], "ScummVM", NULL, &argc);
-
-		// save scummvm.ini ?
-		if (gPrefs->saveConfig)
-			AddArg(&argvP[argc], "-w", NULL, &argc);
-
-		// path
-		AddArg(&argvP[argc], "-p", pathP, &argc);
-
-		// language
-		if (gameInfoP->language > 0) {
-			const Char *lang = "en\0de\0fr\0it\0p\0es\0jp\0z\0kr\0hb\0";
-			AddArg(&argvP[argc], "-q", (lang + (gameInfoP->language - 1) * 3), &argc);
-		}
-
-		// fullscreen ?
-		if (gPrefs->fullscreen) {
-			AddArg(&argvP[argc], "-f", NULL, &argc);
-		}
-
-		// gfx mode
-		switch (gameInfoP->gfxMode)
-		{
-			case 1:
-				AddArg(&argvP[argc], "-g", "flipping", &argc);
-				break;
-			case 2:
-				AddArg(&argvP[argc], "-g", "dbuffer", &argc);
-				break;
-			case 3:
-				AddArg(&argvP[argc], "-g", "wide", &argc);
-				break;
-			default:
-				AddArg(&argvP[argc], "-g", "normal", &argc);
-				break;
-		}
-
-		// load state
-		if (gameInfoP->autoLoad) {
-			StrIToA(num, gameInfoP->loadSlot);
-			AddArg(&argvP[argc], "-x", num, &argc);
-		}
-		// start in room
-		if (gameInfoP->autoRoom) {
-			StrIToA(num, gameInfoP->roomNum);
-			AddArg(&argvP[argc], "-b", num, &argc);
-		}
-		// amiga version
-		if (gameInfoP->amiga) {
-			AddArg(&argvP[argc], "-a", NULL, &argc);
-		}
-		// subtitles
-		if (!gameInfoP->subtitles) {
-			AddArg(&argvP[argc], "-n", NULL, &argc);
-		}
-		// talk speed
-		if (gameInfoP->talkSpeed) {
-			StrIToA(num, gameInfoP->talkValue);
-			AddArg(&argvP[argc], "-y", num, &argc);
-		}
-		// debug level
-		debug = gPrefs->debug;
-		if (gPrefs->debug) {
-			StrIToA(num, gPrefs->debugLevel);
-			AddArg(&argvP[argc], "-d", num, &argc);
-		}
-		// demo mode ?
-		if (gPrefs->demoMode)
-			AddArg(&argvP[argc], "--demo-mode", NULL, &argc);
-
-		// multi midi ?
-		if (gPrefs->sound.multiMidi)
-			AddArg(&argvP[argc], "--multi-midi", NULL, &argc);
-
-		// music driver
-		musicDriver = gPrefs->sound.music;
-		if (musicDriver) {
-			switch (gPrefs->sound.driver) {
-				case 0:	// NULL
-					AddArg(&argvP[argc], "-e", "null", &argc);
-					break;
-				case 1:	// yamaha Pa1
-					AddArg(&argvP[argc], "-e", "ypa1", &argc);
-					break;
-			}		
-		}
-		else	// NULL as default
-			AddArg(&argvP[argc], "-e", "null", &argc);
-
-		// music tempo
-		StrIToA(num, gPrefs->sound.tempo);
-		AddArg(&argvP[argc], "-t", num, &argc);
-
-		// volume control
-		StrIToA(num, gPrefs->volume.master);
-		AddArg(&argvP[argc], "-o", num, &argc);
-		StrIToA(num, gPrefs->volume.sfx);
-		AddArg(&argvP[argc], "-s", num, &argc);
-		StrIToA(num, gPrefs->volume.music);
-		AddArg(&argvP[argc], "-m", num, &argc);
-
-		// game name
-		AddArg(&argvP[argc], gameInfoP->gameP, NULL, &argc);
-
-		MemHandleUnlock(recordH);
-	}
-
-	GamCloseDatabase(false);
-	FrmCloseAllForms();
-
-	autoOff = gPrefs->autoOff;
-	if (!autoOff) {
-		autoOffDelay = SysSetAutoOffTime(0);
-		EvtResetAutoOffTimer();
-	}
-
-	// gVars values
-	//gVars->HRrefNum defined in checkHRmode on Clié OS4
-	//gVars->logFile defined bellow, must be defined only if debug option is checked
-	gVars->screenLocked = false;
-	gVars->volRefNum = gPrefs->card.volRefNum;
-	gVars->vibrator = gPrefs->vibrator;
-	gVars->stdPalette = gPrefs->stdPalette;
-	gVars->autoReset = gPrefs->autoReset;
-	gVars->music.MP3 = gPrefs->sound.MP3;
-	gVars->music.setDefaultTrackLength = gPrefs->sound.setDefaultTrackLength;
-	gVars->music.defaultTrackLength = gPrefs->sound.defaultTrackLength;
-	gVars->music.firstTrack = gPrefs->sound.firstTrack;
-
-	if (gVars->vibrator)
-	{
-		if (CheckVibratorExists()) {
-			UInt16 cycle	= (SysTicksPerSecond())/2;
-			UInt32 pattern	= 0xFF000000;
-			UInt16 delay	= 1;
-			UInt16 repeat	= 1;
-
-			HwrVibrateAttributes(1, kHwrVibrateRate, &cycle);
-			HwrVibrateAttributes(1, kHwrVibratePattern, &pattern);
-			HwrVibrateAttributes(1, kHwrVibrateDelay, &delay);
-			HwrVibrateAttributes(1, kHwrVibrateRepeatCount, &repeat);
-
-		} else {
-			gVars->vibrator = false;
-		}
-	}
-
-	if (debug) {
-		VFSFileDelete(gVars->volRefNum,"PALM/Programs/ScummVM/scumm.log");
-		VFSFileCreate(gVars->volRefNum,"PALM/Programs/ScummVM/scumm.log");
-		VFSFileOpen(gVars->volRefNum,"PALM/Programs/ScummVM/scumm.log",vfsModeWrite, &gVars->logFile);
-	}
-
-	void *sndStateOnFuncP = NULL,
-		 *sndStateOffFuncP = NULL;
-
-	if (musicDriver == 1 || musicDriver == sysInvalidRefNum) {
-
-		Pa1Lib_Open();
-
-		FtrGet(sonySysFtrCreatorSystem, sonySysFtrNumSystemAOutSndStateOnHandlerP, (UInt32*) &sndStateOnFuncP);
-		FtrGet(sonySysFtrCreatorSystem, sonySysFtrNumSystemAOutSndStateOffHandlerP, (UInt32*) &sndStateOffFuncP);
-
-		Pa1Lib_devHpVolume(gPrefs->volume.headphone, gPrefs->volume.headphone);
-		Pa1Lib_devSpVolume(gPrefs->volume.speaker);
-
-		if (sndStateOnFuncP && sndStateOffFuncP) {
-			((sndStateOnType)(sndStateOnFuncP))(aOutSndKindSp, gPrefs->volume.headphone, gPrefs->volume.headphone);
-			((sndStateOnType)(sndStateOnFuncP))(aOutSndKindHp, gPrefs->volume.speaker, gPrefs->volume.speaker);
-
-		}
-	}
-
-	SavePrefs();	// free globals pref memory
-	GBOpen();
-	GBInitAll();
-	main(argc, argvP);
-	GBReleaseAll();
-	GBClose();
-
-	if (musicDriver == 1 || musicDriver == sysInvalidRefNum) {
-		Pa1Lib_Close();
-
-		if (sndStateOnFuncP && sndStateOffFuncP) {
-			((sndStateOffType)(sndStateOffFuncP))(aOutSndKindSp);
-			((sndStateOffType)(sndStateOffFuncP))(aOutSndKindHp);
-		}
-	}
-
-	if (debug)
-		VFSFileClose(gVars->logFile);
-
-	for(count = 0; count < MAX_ARG; count++)
-		if (argvP[count])
-			MemPtrFree(argvP[count]);
-	
-	if (gVars->vibrator) {
-		Boolean active = false;
-		HwrVibrateAttributes(1, kHwrVibrateActive, &active);
-	}
-
-	if (!autoOff) {
-		SysSetAutoOffTime(autoOffDelay);SystemPreferencesChoice
-		EvtResetAutoOffTimer();
-	}
-}
-
-void PalmFatalError(const Char *err)
-{
-	WinPalette(winPaletteSetToDefault,0,0,0);
-
-	if (gVars->screenLocked)
-		WinScreenUnlock();
-
-//	MemExtCleanup();
-	WinEraseWindow();
-	FrmCustomAlert(FrmFatalErrorAlert, err, 0,0);
-	SysReset();
-}
-
-/***********************************************************************
- *
- * FUNCTION:    MainFormHandleEvent
- *
- * DESCRIPTION: This routine is the event handler for the 
- *              "MainForm" of this application.
- *
- * PARAMETERS:  eventP  - a pointer to an EventType structure
- *
- * RETURNED:    true if the event has handle and should not be passed
- *              to a higher level handler.
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-
-static Boolean penDownRepeat() {
-	Coord x,y;
-	Boolean penDown, handled = false;
-	EvtGetPen(&x, &y, &penDown);
-
-	if (penDown && sknLastOn) {
-		RectangleType r;
-		DmOpenRef skinDBP;
-	
-		skinDBP = SknOpenSkin();
-		SknGetObjectBounds(skinDBP, sknLastOn, &r);
-
-		if (RctPtInRectangle(x*2, y*2, &r)) {
-			if (SknGetState(skinDBP, sknLastOn) != sknStateSelected) {
-				SknSetState(skinDBP, sknLastOn, sknStateSelected);
-				SknShowObject(skinDBP, sknLastOn);
-			}
-			
-			switch (sknLastOn) {
-				case skinSliderUpArrow:
-				case skinSliderDownArrow:
-					handled = ArwProcessAction(sknLastOn);
-					break;
-			}
-			
-		} else {
-			if (SknGetState(skinDBP, sknLastOn) != sknStateNormal) {
-				SknSetState(skinDBP, sknLastOn, sknStateNormal);
-				SknShowObject(skinDBP, sknLastOn);
-			}
-		}
-
-		SknCloseSkin(skinDBP);
-	}
-	
-	return handled;
-}
-
-
-static Boolean MainFormHandleEvent(EventPtr eventP)
-{
-	Boolean handled = false;
-	FormPtr frmP;
-	Coord x,y;
-	DmOpenRef skinDBP;
-	
-	switch (eventP->eType) {
-		case frmUpdateEvent:
-		frmP = FrmGetFormPtr(MainForm);
-			if (gPrefs->card.volRefNum != sysInvalidRefNum)
-				FrmShowObject(frmP, FrmGetObjectIndex (frmP, MainMSBitMap));
-			else
-				FrmShowObject(frmP, FrmGetObjectIndex (frmP, MainMSNoneBitMap));
-			if (eventP->data.frmUpdate.updateCode == frmRedrawUpdateMSImport)
-				GamImportDatabase(true);
-			handled = true;
-			break;
-
-		case menuEvent:
-			handled = MainFormDoCommand(eventP->data.menu.itemID);
-			break;
-
-		case frmOpenEvent:
-			MainFormInit();
-			handled = true;
-			break;
-
-		case ctlSelectEvent:
-			switch (eventP->data.ctlSelect.controlID)
-			{
-				case MainCardsButton:
-					//gPrefs->card.volRefNum = parseCards(true);
-					FrmPopupForm(CardSlotForm);
-					break;
-			
-				case MainAboutButton:
-					MainFormAbout();
-					break;
-				
-//				case MainListTypeSelTrigger:
-//					FrmList(eventP, MainListTypeList);
-//					break;
-			}
-			handled = true;
-			break;
-
-		case penUpEvent:
-			x = eventP->screenX;
-			y = eventP->screenY;
-
-			_lstIndex = dmMaxRecordIndex;
-			
-			if (sknLastOn != skinButtonNone) {
-				RectangleType r;
-				skinDBP = SknOpenSkin();
-				SknGetObjectBounds(skinDBP, sknLastOn, &r);
-				SknSetState(skinDBP, sknLastOn, sknStateNormal);
-				SknShowObject(skinDBP, sknLastOn);
-				SknCloseSkin(skinDBP);
-				
-				if (RctPtInRectangle(x*2, y*2, &r)) {
-					switch (sknLastOn) {
-						case skinButtonGameAdd:
-							__editMode__ = edtModeAdd;
-							FrmPopupForm(EditGameForm);
-							handled = true;
-							break;
-
-						case skinButtonGameEdit:
-						case skinButtonGameParams:
-							__editMode__ = edtModeParams;
-							FrmPopupForm(EditGameForm);
-							handled = true;
-							break;
-
-						case skinButtonGameStart:
-							if (gPrefs->card.volRefNum == sysInvalidRefNum)
-								FrmCustomAlert(FrmWarnAlert,"Please select/insert a memory card.", 0, 0);
-							else
-								bStartScumm = true;
-							handled = true;
-							break;
-
-						case skinButtonGameDelete:
-							EditGameFormDelete(true);
-							break;
-					}
-				}
-				sknLastOn = skinButtonNone;
-			}
-			break;
-
-		case penDownEvent:
-		case penMoveEvent:
-			if (sknLastOn == skinButtonNone) {
-				x = eventP->screenX;
-				y = eventP->screenY;
-				skinDBP = SknOpenSkin();
-
-				switch (sknLastOn = SknCheckClick(skinDBP, x,y)) {
-					case skinButtonNone:
-						break;
-					case skinSliderUpArrow:
-					case skinSliderDownArrow:
-					case skinButtonGameAdd:
-					case skinButtonGameEdit:
-					case skinButtonGameParams:
-					case skinButtonGameStart:
-					case skinButtonGameDelete:
-						SknSetState(skinDBP, sknLastOn, sknStateSelected);
-						SknShowObject(skinDBP, sknLastOn);				
-						if (gPrefs->soundClick)
-							SndPlaySystemSound(sndClick);
-						handled = true;
-						break;
-					default:
-						FrmCustomAlert(FrmWarnAlert,"Unknown button !",0,0);
-				}
-				SknCloseSkin(skinDBP);
-				GamSelect(x, y);
-			}
-			break;
-		
-		default:
-			handled = penDownRepeat();
-	}
-
-	return handled;
-}
-
-/***********************************************************************
- *
- * FUNCTION:    AppHandleEvent
- *
- * DESCRIPTION: This routine loads form resources and set the event
- *              handler for the form loaded.
- *
- * PARAMETERS:  event  - a pointer to an EventType structure
- *
- * RETURNED:    true if the event has handle and should not be passed
- *              to a higher level handler.
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static Boolean AppHandleEvent(EventPtr eventP)
-{
-	UInt16 formId;
-	FormPtr frmP;
-
-	if (eventP->eType == frmLoadEvent)
-		{
-		// Load the form resource.
-		formId = eventP->data.frmLoad.formID;
-		frmP = FrmInitForm(formId);
-		FrmSetActiveForm(frmP);
-
-		// Set the event handler for the form.  The handler of the currently
-		// active form is called by FrmHandleEvent each time is receives an
-		// event.
-		switch (formId)
-			{
-			case MainForm:
-				FrmSetEventHandler(frmP, MainFormHandleEvent);
-				break;
-
-			case SkinsForm:
-				FrmSetEventHandler(frmP, SkinsFormHandleEvent);
-				break;
-
-			case EditGameForm:
-				FrmSetEventHandler(frmP, EditGameFormHandleEvent);
-				break;
-
-			case MiscOptionsForm:
-				FrmSetEventHandler(frmP, MiscOptionsFormHandleEvent);
-				break;
-
-			case VolumeForm:
-				FrmSetEventHandler(frmP, VolumeFormHandleEvent);
-				break;
-			
-			case SoundForm:
-				FrmSetEventHandler(frmP, SoundFormHandleEvent);
-				break;
-
-			case SystemInfoForm:
-				FrmSetEventHandler(frmP, SystemInfoFormHandleEvent);
-				break;
-
-			case CardSlotForm:
-				FrmSetEventHandler(frmP,CardSlotFormHandleEvent);
-				break;
-
-			default:
-//				ErrFatalDisplay("Invalid Form Load Event");
-				break;
-
-			}
-		return true;
-		}
-	
-	return false;
-}
-
-
-/***********************************************************************
- *
- * FUNCTION:    AppEventLoop
- *
- * DESCRIPTION: This routine is the event loop for the application.  
- *
- * PARAMETERS:  nothing
- *
- * RETURNED:    nothing
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static void AppEventLoop(void)
-{
-	UInt16 error;
-	EventType event;
-
-	do {
-		EvtGetEvent(&event, evtNoWait);
-
-		if(bStartScumm)
-			StartScummVM();
-
-		if (! SysHandleEvent(&event))
-			if (! MenuHandleEvent(0, &event, &error))
-				if (! AppHandleEvent(&event))
-					FrmDispatchEvent(&event);
-
-	} while (event.eType != appStopEvent);
-}
-
-
-/***********************************************************************
- *
- * FUNCTION:     AppStart
- *
- * DESCRIPTION:  Get the current application's preferences.
- *
- * PARAMETERS:   nothing
- *
- * RETURNED:     Err value 0 if nothing went wrong
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static Err AppStartCheckHRmode()
-{
-	SonySysFtrSysInfoP sonySysFtrSysInfoP;
-	UInt32 version;
-	Err error = errNone;
-
-	// test if sonyHR is present
-	if (!(error = FtrGet(sonySysFtrCreator, sonySysFtrNumSysInfoP, (UInt32*)&sonySysFtrSysInfoP)))
-	{
-		if (sonySysFtrSysInfoP->libr & sonySysFtrSysInfoLibrHR) {		/* HR available */
-
-			if ((error = SysLibFind(sonySysLibNameHR, &gVars->HRrefNum))) {
-				if (error == sysErrLibNotFound)							/* couldn't find lib */
-					error = SysLibLoad( 'libr', sonySysFileCHRLib, &gVars->HRrefNum );
-			}
-
-			if (!error )
-			{	/* Now we can use HR lib. Executes Open library. */
-				error = HROpen(gVars->HRrefNum);
-			}
-		}
-	}
-	// if not Hi-Density ?
-	if (error && !(error = FtrGet(sysFtrCreator, sysFtrNumWinVersion, &version)))
-	{
-		gVars->HRrefNum = sysInvalidRefNum;	// Not sony HR
-		if (version<4)
-			error = 1;
-	}
-
-	if (!error) { /* Not error processing */
-		UInt32 width, height, depth;
-		Boolean color;
-
-		width = hrWidth;
-		height= hrHeight;
-		depth = 8;
-		color = true;
-
-		if (gVars->HRrefNum != sysInvalidRefNum)
-			error = HRWinScreenMode ( gVars->HRrefNum, winScreenModeSet, &width, &height, &depth, &color );
-		else
-			error = WinScreenMode ( winScreenModeSet, &width, &height, &depth, &color );
-
-		/* high-resolution mode entered from here if no error */
-		if (error != errNone)
-			FrmCustomAlert(FrmErrorAlert,"Your device doesn't seems to support 256 colors mode.",0,0);
-	}
-	else
-		FrmCustomAlert(FrmErrorAlert,"This device doesn't seems to support\nHi-Res mode.",0,0);
-
-	return error;
-}
-
-static void AppStopHRMode() {
-	if (gVars->HRrefNum != sysInvalidRefNum) {
-			HRClose(gVars->HRrefNum);
-			//SysLibRemove(gVars->HRrefNum);	// never call this !!
-	}
-}
-
-static Err AppStartCheckNotify() {
-	UInt32 romVersion;
-	Err err;
-
-	err = FtrGet(sysFtrCreator, sysFtrNumNotifyMgrVersion, &romVersion); 
-	if (!err) {
-		UInt16 cardNo;
-		LocalID dbID;
-
-		err = SysCurAppDatabase(&cardNo, &dbID);
-		if (!err) {
-			SysNotifyRegister(cardNo, dbID, sysNotifyVolumeMountedEvent, NULL, sysNotifyNormalPriority, NULL);
-			SysNotifyRegister(cardNo, dbID, sysNotifyVolumeUnmountedEvent, NULL, sysNotifyNormalPriority, NULL);
-			SysNotifyRegister(cardNo, dbID, sonySysNotifyMsaEnforceOpenEvent, NULL, sysNotifyNormalPriority, NULL);
-		}
-	}
-
-	return err;
-}
-
-static Err AppStartLoadSkin() {
-	Err err = errNone;
-
-	// if skin defined, check if the db still exists
-	if (gPrefs->skin.dbID) {
-		UInt32 type, creator;
-
-		// remember to check version for next revision of the skin
-		err = DmDatabaseInfo (gPrefs->skin.cardNo, gPrefs->skin.dbID, gPrefs->skin.nameP, 0, 0, 0, 0, 0, 0, 0,0, &type, &creator);
-		if (!err)
-			if (type != 'skin' || creator != appFileCreator)
-				err = dmErrInvalidParam;
-
-		if (err)
-			MemSet(&(gPrefs->skin),sizeof(SkinInfoType),0);
-	}
-
-	// No skin ? try to get the first one
-	if (!gPrefs->skin.dbID) {
-		DmSearchStateType stateInfo;
-
-		err = DmGetNextDatabaseByTypeCreator(true, &stateInfo, 'skin', appFileCreator, false, &gPrefs->skin.cardNo, &gPrefs->skin.dbID);
-		if (!err)
-			err = DmDatabaseInfo (gPrefs->skin.cardNo, gPrefs->skin.dbID, gPrefs->skin.nameP, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0);
-	}
-
-	if (err)
-		FrmCustomAlert(FrmErrorAlert,"No skin found.\nPlease install a skin and restart ScummVM.",0,0);
-	
-	return err;
-}
-
-static Err AppStartCheckMathLib()
-{
-	Err error = errNone;
-
-	if ((error = SysLibFind(MathLibName, &MathLibRef)))
-		if (error == sysErrLibNotFound)									// couldn't find lib
-			error = SysLibLoad( LibType, MathLibCreator, &MathLibRef);
-
-	if (!error) {// Now we can use lib. Executes Open library.
-		error = MathLibOpen(MathLibRef, MathLibVersion);
-		if (error)
-			FrmCustomAlert(FrmErrorAlert,"Can't open MathLib !",0,0);
-
-	} else {
-		FrmCustomAlert(FrmErrorAlert,"Can't find MathLib.\nPlease install it first.",0,0);
-	}
-
-	return error;
-}
-
-static void AppStopMathLib() {
-	UInt16 useCount;
-
-	if (MathLibRef != sysInvalidRefNum) {
-		MathLibClose(MathLibRef, &useCount);
-		
-		if (!useCount)
-			SysLibRemove(MathLibRef);
-	}
-}
-
-static Err AppStartCheckScreenSize() {
-	SonySysFtrSysInfoP sonySysFtrSysInfoP;
-	Err error = errNone;
-
-//	WinGetDisplayExtent(&gVars->screenWidth, &gVars->screenHeight);
-	
-//	gVars->screenWidth <<= 1;
-//	gVars->screenHeight <<= 1;
-	gVars->screenWidth = 320;
-	gVars->screenHeight = 320;
-
-	gVars->screenFullWidth = gVars->screenWidth;
-	gVars->screenFullHeight = gVars->screenHeight;
-
-	if (!(error = FtrGet(sonySysFtrCreator, sonySysFtrNumSysInfoP, (UInt32*)&sonySysFtrSysInfoP))) {
-		if (sonySysFtrSysInfoP->libr & sonySysFtrSysInfoLibrSilk) {
-
-			if ((error = SysLibFind(sonySysLibNameSilk, &gVars->slkRefNum)))
-				if (error == sysErrLibNotFound)	
-					error = SysLibLoad( sonySysFileTSilkLib, sonySysFileCSilkLib, &gVars->slkRefNum);
-
-			if (!error) {
-				error = FtrGet(sonySysFtrCreator, sonySysFtrNumVskVersion, &gVars->slkVersion);
-				// Get screen size
-				if (error) {
-					// v1 = NR
-				 	error = SilkLibOpen(gVars->slkRefNum);
-					if(!error) {
-						gVars->slkVersion = vskVersionNum1;
-						SilkLibEnableResize(gVars->slkRefNum);
-						SilkLibResizeDispWin(gVars->slkRefNum, silkResizeMax);
-						HRWinGetWindowExtent(gVars->HRrefNum, &gVars->screenFullWidth, &gVars->screenFullHeight);
-						SilkLibResizeDispWin(gVars->slkRefNum, silkResizeNormal);
-						SilkLibDisableResize(gVars->slkRefNum);
-					}
-				} else {
-					// v2 = NX/NZ
-					// v3 = UX
-				 	error = VskOpen(gVars->slkRefNum);
-					if(!error) {
-						VskSetState(gVars->slkRefNum, vskStateEnable, (gVars->slkVersion == vskVersionNum2 ? vskResizeVertically : vskResizeHorizontally));
-						VskSetState(gVars->slkRefNum, vskStateResize, vskResizeNone);
-						HRWinGetWindowExtent(gVars->HRrefNum, &gVars->screenFullWidth, &gVars->screenFullHeight);
-						VskSetState(gVars->slkRefNum, vskStateResize, vskResizeMax);
-						VskSetState(gVars->slkRefNum, vskStateEnable, vskResizeDisable);
-					}
-				}
-			}
-		}
-	}
-
-	if (error)
-		gVars->slkRefNum = sysInvalidRefNum;
-	
-	return error;
-}
-
-static void AppStopSilk() {
-	if (gVars->slkRefNum != sysInvalidRefNum)
-		SilkLibClose(gVars->slkRefNum);
-}
-
-static Err AppStart(void) {
-	UInt16 dataSize, checkSize = 0;
-	Err error;
-
-	// allocate global variables space
-	dataSize = sizeof(GlobalsDataType);
-	gVars = (GlobalsDataType *)MemPtrNew(dataSize);
-	MemSet(gVars, dataSize, 0);
-	
-	gVars->indicator.on	= 255;
-	gVars->indicator.off = 0;
-	gVars->HRrefNum = sysInvalidRefNum;
-	gVars->volRefNum = sysInvalidRefNum;
-	gVars->slkRefNum = sysInvalidRefNum;
-
-	// allocate prefs space
-	dataSize = sizeof(GlobalsPreferenceType);
-	gPrefs	= (GlobalsPreferenceType *)MemPtrNew(dataSize);
-	MemSet(gPrefs, dataSize, 0);
-
-	// Read the saved preferences / saved-state information.
-	if (PrefGetAppPreferences(appFileCreator, appPrefID, NULL, &checkSize, true) == noPreferenceFound || checkSize != dataSize) {
-		UInt32 romVersion;
-		// reset all elements
-		MemSet(gPrefs, dataSize, 0);
-
-		gPrefs->card.volRefNum = sysInvalidRefNum;
-
-		gPrefs->autoOff = true;
-		gPrefs->vibrator = CheckVibratorExists();
-		gPrefs->debug = false;
-
-		FtrGet(sysFtrCreator, sysFtrNumROMVersion, &romVersion);
-		gPrefs->stdPalette = (romVersion >= kOS5Version);
-		
-		gPrefs->volume.speaker = 16;
-		gPrefs->volume.headphone = 16;
-		
-		gPrefs->volume.master = 192;
-		gPrefs->volume.music = 192;
-		gPrefs->volume.sfx = 192;
-		
-		gPrefs->sound.tempo = 100;
-		gPrefs->sound.defaultTrackLength = 10;
-		gPrefs->sound.firstTrack = 1;
-		
-	} else {
-		PrefGetAppPreferences(appFileCreator, appPrefID, gPrefs, &dataSize, true);
-	}
-
-	error = AppStartCheckMathLib();
-	if (error) return (error);
-
-	error = AppStartCheckHRmode();
-	if (error) return (error);
-	
-	error = AppStartLoadSkin();
-	if (error) return (error);
-
-	if (gPrefs->card.volRefNum != sysInvalidRefNum) {	// if volref previously defined, check if it's a valid one
-		VolumeInfoType volInfo;
-		Err err = VFSVolumeInfo(gPrefs->card.volRefNum, &volInfo);
-		if (err)
-			gPrefs->card.volRefNum = sysInvalidRefNum;
-	}
-	else
-		gPrefs->card.volRefNum = parseCards(); //parseCards(0);	// get first volref
-
-	error = GamOpenDatabase();
-	if (error) return (error);
-	GamImportDatabase(false);
-
-	AppStartCheckNotify(); // not fatal error if not avalaible
-	AppStartCheckScreenSize();
-
-	return error;
-}
-
-/***********************************************************************
- *
- * FUNCTION:    AppStop
- *
- * DESCRIPTION: Save the current state of the application.
- *
- * PARAMETERS:  nothing
- *
- * RETURNED:    nothing
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static Err AppStopCheckNotify()
-{
-	UInt32 romVersion;
-	Err err;
-	
-	err = FtrGet(sysFtrCreator, sysFtrNumNotifyMgrVersion, &romVersion); 
-	if (!err) {
-		UInt16 cardNo;
-		LocalID dbID;
-
-		err = SysCurAppDatabase(&cardNo, &dbID);
-		if (!err) {
-			SysNotifyUnregister(cardNo, dbID, sysNotifyVolumeUnmountedEvent, sysNotifyNormalPriority);
-			SysNotifyUnregister(cardNo, dbID, sysNotifyVolumeMountedEvent, sysNotifyNormalPriority);
-			// sonySysNotifyMsaEnforceOpenEvent
-		}
-	}
-	
-	return err;
-}
-
-static void AppStop(void) {
-	// Close all the open forms.
-	FrmCloseAllForms();
-	WinEraseWindow();
-	WinPalette(winPaletteSetToDefault, 0, 256, NULL);
-
-	// Close and move Game list database
-	GamCloseDatabase(false);
-
-	// Write the saved preferences / saved-state information.  This data 
-	// will saved during a HotSync backup.
-	SavePrefs();
-
-	// stop all
-	AppStopSilk();
-	AppStopCheckNotify();
-	AppStopMathLib();
-	AppStopHRMode();
-
-	// reset if needed
-	if (gVars) {
-		Boolean autoReset = gVars->autoReset;
-		MemPtrFree(gVars);
-		if (autoReset)
-			SysReset();
-	}
-}
-
-
-/***********************************************************************
- *
- * FUNCTION:    ScummVMPalmMain
- *
- * DESCRIPTION: This is the main entry point for the application.
- *
- * PARAMETERS:  cmd - word value specifying the launch code. 
- *              cmdPB - pointer to a structure that is associated with the launch code. 
- *              launchFlags -  word value providing extra information about the launch.
- *
- * RETURNED:    Result of launch
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-static void AppLaunchCmdNotify(UInt16 LaunchFlags, SysNotifyParamType * pData)
-{
-	switch (pData->notifyType)
-	{
-		case sysNotifyVolumeMountedEvent:
-			pData->handled = true;	// don't switch
-
-			if (gPrefs) {	// gPrefs exists ? so we are in the palm selector
-				CardSlotFormUpdate(); // redraw card list if needed
-
-				if (gPrefs->card.volRefNum == sysInvalidRefNum) {
-					VFSAnyMountParamType *notifyDetailsP = (VFSAnyMountParamType *)pData->notifyDetailsP;
-					gPrefs->card.volRefNum = notifyDetailsP->volRefNum;
-
-					if (FrmGetFormPtr(MainForm) == FrmGetActiveForm())
-						if (gPrefs->card.volRefNum != sysInvalidRefNum) {
-							CardSlotCreateDirs();
-							FrmUpdateForm(MainForm, frmRedrawUpdateMSImport);
-						}
-				}
-			}
-			break;
-		
-		case sysNotifyVolumeUnmountedEvent:
-			if (gPrefs) {
-				CardSlotFormUpdate();
-
-				if (gPrefs->card.volRefNum == (UInt16)pData->notifyDetailsP) {
-					gPrefs->card.volRefNum = sysInvalidRefNum;
-
-					if (FrmGetFormPtr(MainForm) == FrmGetActiveForm())
-						FrmUpdateForm(MainForm, frmRedrawUpdateMS);
-				}
-			}
-			break;
-		
-		case sonySysNotifyMsaEnforceOpenEvent:
-			// what am i supposed to do here ???
-			break;
-	}
-}
-
-static UInt32 ScummVMPalmMain(UInt16 cmd, MemPtr cmdPBP, UInt16 launchFlags)
-{
-	Err error;
-
-	error = RomVersionCompatible (kOurMinVersion, launchFlags);
-	if (error) return (error);
-
-	switch (cmd)
-		{
-		case sysAppLaunchCmdNotify:
-			AppLaunchCmdNotify(launchFlags, (SysNotifyParamType *) cmdPBP);
-			break;
-
-		case sysAppLaunchCmdNormalLaunch:
-			error = AppStart();
-			if (error) 
-				goto end;
-				
-			FrmGotoForm(MainForm);
-			AppEventLoop();
-end:
-			AppStop();
-			break;
-
-		default:
-			break;
-
-		}
-
-	return error;
-}
-/***********************************************************************
- *
- * FUNCTION:    PilotMain
- *
- * DESCRIPTION: This is the main entry point for the application.
- *
- * PARAMETERS:  cmd - word value specifying the launch code. 
- *              cmdPB - pointer to a structure that is associated with the launch code. 
- *              launchFlags -  word value providing extra information about the launch.
- * RETURNED:    Result of launch
- *
- * REVISION HISTORY:
- *
- *
- ***********************************************************************/
-
-UInt32 PilotMain( UInt16 cmd, MemPtr cmdPBP, UInt16 launchFlags)
-{
-	return ScummVMPalmMain(cmd, cmdPBP, launchFlags);
-}
\ No newline at end of file
diff --git a/backends/PalmOS/Src/scumm_globals.h b/backends/PalmOS/Src/scumm_globals.h
index 3dd5f08715..e19eea6077 100644
--- a/backends/PalmOS/Src/scumm_globals.h
+++ b/backends/PalmOS/Src/scumm_globals.h
@@ -19,28 +19,46 @@
  * $Header$
  *
  */
- 
-#define GBVARS_DIGSTATEMUSICMAP_INDEX		0
-#define GBVARS_DIGSTATEMUSICTABLE_INDEX		1
-#define GBVARS_COMISTATEMUSICTABLE_INDEX	2
-#define GBVARS_COMISEQMUSICTABLE_INDEX		3
-#define GBVARS_DIGSEQMUSICTABLE_INDEX		4
-#define GBVARS_FTSTATEMUSICTABLE_INDEX		5
-#define GBVARS_FTSEQMUSICTABLE_INDEX		6
-#define GBVARS_GUIFONT_INDEX				7
-#define GBVARS_DEFAULTSCALETABLE_INDEX 		8
-#define GBVARS_IMCTABLE_INDEX				9
-#define GBVARS_CODEC47TABLE_INDEX			10
-#define GBVARS_TRANSITIONEFFECTS_INDEX		11
-#define GBVARS_STRINGMAPTABLEV7_INDEX		12
-#define GBVARS_STRINGMAPTABLEV6_INDEX		13
-#define GBVARS_STRINGMAPTABLEV5_INDEX		14
-#define GBVARS_GERMANCHARSETDATAV2_INDEX	15
-#define GBVARS_FRENCHCHARSETDATAV2_INDEX	16
-#define GBVARS_ENGLISHCHARSETDATAV2_INDEX	17
-#define GBVARS_ITALIANCHARSETDATAV2_INDEX	18
-#define GBVARS_SPANISHCHARSETDATAV2_INDEX	19
-#define GBVARS_COSTSCALETABLE_INDEX			20
+
+#ifndef __SCUMM_GLOBALS_H__
+#define __SCUMM_GLOBALS_H__
+
+enum {
+	GBVARS_DIGSTATEMUSICMAP_INDEX = 0,
+	GBVARS_DIGSTATEMUSICTABLE_INDEX,
+	GBVARS_COMISTATEMUSICTABLE_INDEX,
+	GBVARS_COMISEQMUSICTABLE_INDEX,
+	GBVARS_DIGSEQMUSICTABLE_INDEX,
+	GBVARS_FTSTATEMUSICTABLE_INDEX,
+	GBVARS_FTSEQMUSICTABLE_INDEX,
+	GBVARS_GUIFONT_INDEX,
+	GBVARS_DEFAULTSCALETABLE_INDEX,
+	GBVARS_IMCTABLE_INDEX,
+	GBVARS_CODEC47TABLE_INDEX,
+	GBVARS_TRANSITIONEFFECTS_INDEX,
+	GBVARS_STRINGMAPTABLEV7_INDEX,
+	GBVARS_STRINGMAPTABLEV6_INDEX,
+	GBVARS_STRINGMAPTABLEV5_INDEX,
+	GBVARS_GERMANCHARSETDATAV2_INDEX,
+	GBVARS_FRENCHCHARSETDATAV2_INDEX,
+	GBVARS_ENGLISHCHARSETDATAV2_INDEX,
+	GBVARS_ITALIANCHARSETDATAV2_INDEX,
+	GBVARS_SPANISHCHARSETDATAV2_INDEX,
+	GBVARS_COSTSCALETABLE_INDEX,
+	GBVARS_NOTELENGTHS_INDEX,
+	GBVARS_HULLOFFSETS_INDEX,
+	GBVARS_HULLS_INDEX,
+	GBVARS_FREQMODLENGTHS_INDEX,
+	GBVARS_FREQMODOFFSETS_INDEX,
+	GBVARS_FREQMODTABLE_INDEX,
+	GBVARS_SPKFREQTABLE_INDEX,
+	GBVARS_PCJRFREQTABLE_INDEX
+};
+
+void *GlbGetRecord(UInt16 index, UInt16 id);
+void GlbReleaseRecord(UInt16 index, UInt16 id);
+void GlbOpen();
+void GlbClose();
 
 #define GBVARS_SCUMM	0
 #define GBVARS_SIMON	1
@@ -54,11 +72,8 @@
 #define CALL_INIT(x) initGlobals_##x();
 #define CALL_RELEASE(x)	releaseGlobals_##x();
 
-#define _GSETPTR(var,index,format,id)	var = (format *)GBGetRecord(index,id);
-#define _GRELEASEPTR(index,id)			GBReleaseRecord(index,id);
-
-void *GBGetRecord(UInt16 index, UInt16 id);
-void GBReleaseRecord(UInt16 index, UInt16 id);
+#define _GSETPTR(var,index,format,id)	var = (format *)GlbGetRecord(index,id);
+#define _GRELEASEPTR(index,id)			GlbReleaseRecord(index,id);
 
 #define PROTO_GLOBALS(x)		void CALL_INIT(x);\
 								void CALL_RELEASE(x);
@@ -72,5 +87,8 @@ PROTO_GLOBALS(Gfx)
 PROTO_GLOBALS(Dialogs)
 PROTO_GLOBALS(Charset)
 PROTO_GLOBALS(Costume)
+PROTO_GLOBALS(PlayerV2)
+
+#undef PROTO_GLOBALS
 
-#undef PROTO_GLOBALS
\ No newline at end of file
+#endif
\ No newline at end of file
diff --git a/backends/PalmOS/Src/skin.h b/backends/PalmOS/Src/skin.h
index e6ff5e62ee..56a8378e3a 100644
--- a/backends/PalmOS/Src/skin.h
+++ b/backends/PalmOS/Src/skin.h
@@ -19,10 +19,38 @@
  * $Header$
  *
  */
+#ifndef __SKIN_H__
+#define __SKIN_H__
 
+// skin 
+#define	sknInfoState		0
+#define	sknInfoPosX			1
+#define	sknInfoPosY			2
+
+#define	sknInfoMaxWOrH		3
+#define	sknInfoDrawMode		4
+#define	sknInfoKeepXOrY1	5
+#define	sknInfoKeepXOrY2	7
+
+#define sknInfoListWidth	sknInfoMaxWOrH
+#define sknInfoListHeight	sknInfoDrawMode
+#define sknInfoListSize		sknInfoListHeight
+#define sknInfoListItemSize	12
+
+#define	sknPosRsc			'sPos'
+#define	sknColorsRsc		'sCol'
+
+#define sknStateNormal		0
+#define sknStateSelected	10
+#define sknStateDisabled	20
+
+#define sknSelectedState(bmp)	(bmp + sknStateSelected)
+#define sknDisabledState(bmp)	(bmp + sknStateDisabled)
+
+// skin elements
 #define skinList					500
 #define	skinColors	600
-//#define skinPalette					510
+#define skinPalette					610
 #define skinButtonNone				0
 
 #define skinSliderUpArrow			2000
@@ -74,4 +102,22 @@
 
 #define skinButtonPlayNormal		7000
 #define skinButtonPlayOver			7010
-#define skinButtonPlayDisabled		7040
\ No newline at end of file
+#define skinButtonPlayDisabled		7040
+
+// protos
+void SknApplySkin();
+void SknGetObjectBounds(DmOpenRef skinDBP, DmResID resID, RectangleType *rP);
+DmOpenRef SknOpenSkin();
+void SknCloseSkin(DmOpenRef skinDBP);
+UInt8 SknSetState(DmOpenRef skinDBP, DmResID resID, UInt8 newState);
+void SknShowObject(DmOpenRef skinDBP, DmResID resID);
+UInt8 SknGetState(DmOpenRef skinDBP, DmResID resID);
+void SknUpdateList();
+void SknGetListBounds(RectangleType *rAreaP, RectangleType *rArea2xP);
+UInt16 SknCheckClick(DmOpenRef skinDBP, Coord mx, Coord my);
+void SknSelect(Coord x, Coord y);
+Boolean SknProcessArrowAction(UInt16 button);
+
+extern UInt16 lastIndex;
+
+#endif
\ No newline at end of file