snesgt module

MEmu = SNESGT
MEmuV = v0.230 beta 7
MURL = http://gigo.retrogames.com/|http://gigo.retrogames.com/bbs/c-board.cgi?cmd=one;no=2205
MAuthor = djvj,bleasby
MVersion = 1.0.1
MCRC =
iCRC =
mId = 635986877402729496
MSystem = "Super Nintendo Entertainment System"
;----------------------------------------------------------------------------
; Notes:
; You can find the beta 7 edition here: http://gigo.retrogames.com/bbs/c-board.cgi?cmd=one;no=2205
;----------------------------------------------------------------------------
StartModule()
BezelGUI()
FadeInStart()

primaryExe := new Emulator(emuPath . "\" . executable)						; instantiate emulator executable object

; curTitleMode := A_TitleMatchMode
; SetTitleMatchMode, RegEx
; emuPrimaryWindow := new Window(new WindowTitle("i)SNESGT"))	; instantiate primary emulator window object

; emuPrimaryWindow := new Window(new WindowTitle("SNESGT","ATL:00501720"))	; instantiate primary emulator window object
emuPrimaryWindow := new Window(new WindowTitle("i)SNESGT","i)ATL:"))	; instantiate primary emulator window object
; emuPrimaryWindow := new Window(new WindowTitle("SNESGT"))	; instantiate primary emulator window object
; MsgBox % A_TitleMatchMode
; SetTitleMatchMode % curTitleMode

Fullscreen := moduleIni.Read("Settings", "Fullscreen","true","",1)
bezelTopOffset := IniReadCheck(settingsFile, "Settings", "Bezel_Top_Offset","50",,1)
bezelBottomOffset := IniReadCheck(settingsFile, "Settings", "Bezel_Bottom_Offset","8",,1)
bezelRightOffset := IniReadCheck(settingsFile, "Settings", "Bezel_Right_Offset", "8",,1)
bezelLeftOffset := IniReadCheck(settingsFile, "Settings", "Bezel_Left_Offset", "8",,1)

hideEmuObj := Object(emuPrimaryWindow,1)
7z(romPath, romName, romExtension, sevenZExtractPath)

BezelStart()
HideAppStart(hideEmuObj,hideEmu)

primaryExe.Run(" """ . romPath . "\" . romName . romExtension . """")

curTitleMode := A_TitleMatchMode
SetTitleMatchMode, RegEx
emuPrimaryWindow.Wait()
emuPrimaryWindow.WaitActive()
SetTitleMatchMode % curTitleMode

If (fullscreen = "true")
	emuPrimaryWindow.MenuSelectItem("Options","Display","Switch Screen Mode")

BezelDraw()
HideAppEnd(hideEmuObj,hideEmu)
FadeInExit()
primaryExe.Process("WaitClose")
7zCleanUp()
BezelExit()
FadeOutExit()
ExitModule()


HaltEmu:
	disableSuspendEmu := true
RestoreEmu:
	If (fullscreen = "true") {
		curTitleMode := A_TitleMatchMode
		SetTitleMatchMode, RegEx
		emuPrimaryWindow.MenuSelectItem("Options","Display","Switch Screen Mode")
		SetTitleMatchMode % curTitleMode
	}
Return

CloseProcess:
	FadeOutStart()
	curTitleMode := A_TitleMatchMode
	SetTitleMatchMode, RegEx
	emuPrimaryWindow.Close()
	SetTitleMatchMode % curTitleMode
Return

BezelLabel:
	disableHideTitleBar := "true"
	disableHideToggleMenu := "true"
	disableHideBorder := "true"
Return