HFS Play

;------------------------------------------------------------------------
; Panasonic 3DO
; FourDO v1.0.2.0 alpha
; by djvj
; 1.1
;
; Notes:
; Download xpath from http://www.autohotkey.net/~Titan/dl/xpath.zip" onclick="window.open(this.href);return false; and extract the xpath.ahk into your Hyperspin directory
; xpath is needed because AutoHotKey does not natively support reading/writing of XML files
; This emu only supports iso images
; If your bios file is called fz10_rom.bin, rename it to fz10.rom, it should be placed in the same dir as the emu exe.
; On first launch, FourDO will ask you to point it to the fz10.rom. After you do that, exit the emu and select a game in HS and it should work.
;------------------------------------------------------------------------

#Include xpath.ahk

Gui +AlwaysOnTop -Caption +ToolWindow
Gui, color, 0
Gui Show, x0 y0 h%A_ScreenHeight% w%A_ScreenWidth%

; Update settings file via script because the emu doesn't support CLI loading of games
settingsPath = %emuPath%FourDO.settings
newromPath = %romPath%%romName%%romExtension%
xpath_load(emuXML, settingsPath ) ; need to read the existing xml otherwise xpath deletes all existing nodes
xpath(emuXML, "/Settings/GameRomFile/text()", newromPath) ; update node with the rom
xpath_save(emuXML, settingsPath) ; write new XML

Run, %executable%, %emuPath%
WinWaitActive, 4DO
Sleep, 200 ; necessary otherwise we send F4 too fast
Send, {F4} ; fullscreen
Process, WaitClose, %executable%

ExitApp

CloseProcess:
WinClose, 4DO
return

;----------------------------------------------------------------------------
; Module Ahk 4DO
;
; by Davidlinch
; 1.0
;
;
;----------------------------------------------------------------------------

;Settings
loadingScreen=1
fullscreenWidth = 1920
fullscreenHeight = 1200
addsounds=0
nomousy=0

if(nomousy){
Run, D:\Frontend\nomousy\nomousy.exe /hide
}

if(loadingScreen){
Gui +AlwaysOnTop -Caption +ToolWindow
Gui, Color, Black
logoXPos := A_ScreenWidth/2 - 900 /2
Gui, Add, Picture,x%logoXPos% y120, %A_ScriptDir%\Media\Fade\%systemName%\_Default\Layer 2.png
loadXPos := A_ScreenWidth/2 - 500 /2
loadYPos := A_ScreenHeight - 120
Gui, Add, Picture,x%loadXPos% y%loadYPos%, %A_ScriptDir%\Media\Fade\%systemName%\_Default\Layer 3.png
Gui Show, x0 y0 h%A_ScreenHeight% w%A_ScreenWidth%
}

if(addsounds)
{
;sounds specify a directory of sounds for "romname"
soundplay, %A_ScriptDir%\Media\Sounds\%systemName%\%systemName%.mp3
Sleep, 2000
}


RunWait, %executable% -StartLoadFile "%romPath%%romName%%romExtension%" --StartFullScreen, %emuPath%, UseErrorLevel

ExitApp

CloseProcess:
Process, Close, %Executable%
;Process, Close, nomousy.exe
return