HFS Play

Code : Tout sélectionner

----------------------------------------------------------------------------
; TurboGrafx 16 (aka PC Engine)
; Magic Engine 1.1.3
; by djvj
; 1.1
;
; Notes:
; Download and extract nomousy to the folder with this module from http://www.autohotkey.com/forum/viewtopic.php?t=2197 (it makes the cursor transparent, so clicks will still register)
; This is used to prevent the mouse cursor from appearing in the middle of your screen when you run Magic Engine
; xPadder/joy2key don't work, the emu reads raw inputs. If you use gamepads, make sure you set your keys in Config->Gamepad
; Set your desired Video settings below.
;----------------------------------------------------------------------------
Windowed = y				; y=Simulated Fullscreen mode, n=Normal Fullscreen mode - Simulated Fullscreen mode is preferred, it still looks fullscreen
WideScreenMode = n	; y=enable, n=disable
DesktopMode = y			; y=enable, n=disable - This is basically what sets fullscreen mode. Set to n to show emu in a small window
FullscreenStretch = y		; y=enable, n=disable - This stretches the game screen while keeping the aspect ratio
HighResMode = y			; y=enable, n=disable
Filter = 1						; 1=bilinear filtering , 0=disable
TripleBuffer = y				; y=enable, n=disable (DirectX only)
Zoom = 2						; 4=zoom max , 0=no zoom, use any value between 0 and 4
scanlines = 0				; 0=none, 40=black, use any value in between 0 and 40
vSync = 1						; 0=disable, 1=enable, 2=vsync + timer (special vsync for windowed mode)
vDriver = 1						; 0=DirectX, 1=OpenGL
xRes = 1280
yRes = 1024
bitDepth = 32
CDDriveLetter = I:			; Drive letter of your Daemon Tools Virtual drive used for CD-based systems only. Letter should be followed by a colon :
DisplayRes = n				; Display screen resolution for troubleshooting
UseNoMousy = true		; Use NoMousy tool to hide the mouse. If false, will move mouse off the screen instead
;----------------------------------------------------------------------------

MEINI := CheckFile(emuPath . "PCE.INI")

FadeInStart()

; Now let's update all our keys if they differ in the ini
iniLookup =
( ltrim c
	video, windowed, %Windowed%
	video, wide, %WideScreenMode%
	video, desktop, %DesktopMode%
	video, fullscreen, %FullscreenStretch%
	video, high_res, %HighResMode%
	video, filter, %Filter%
	video, triple_buffer, %TripleBuffer%
	video, Zoom, %Zoom%
	video, scanlines, %scanlines%
	video, vsync, %vSync%
	video, driver, %vDriver%
	video, screen_width, %xRes%
	video, screen_height, %yRes%
	video, screen_depth, %bitDepth%
	cdrom, drive_letter, %CDDriveLetter%
	misc, screen_resolution, %DisplayRes%
)
Loop, Parse, iniLookup, `n
{
	StringSplit, split, A_LoopField, `,, %A_Space%%A_Tab%
	IniRead, tempVar, %MEINI%, %split1%, %split2%
	If ( tempVar != split3 )
		IniWrite, % split3, %MEINI%, %split1%, %split2%
}

7z(romPath, romName, romExtension, 7zExtractDir)

Run, %executable% "%romPath%%romName%%romExtension%", %emuPath%

WinWait, MagicEngine ahk_class MagicEngineWindowClass
WinWaitActive, MagicEngine ahk_class MagicEngineWindowClass

If ( UseNoMousy = "true" )
	Run, %A_Scriptdir%\Modules\%systemName%\nomousy.exe /hide ;hide cursor
Else
	MouseMove %A_ScreenWidth%,%A_ScreenHeight%

FadeInExit()

Process, WaitClose, %executable%

If ( UseNoMousy = "true" )
	Run, %A_Scriptdir%\Modules\%systemName%\nomousy.exe ;unhide cursor

7zCleanUp()

FadeOutExit()

WinActivate, Hyperspin

ExitApp

CloseProcess:
	FadeOutStart()
	WinClose, MagicEngine ahk_class MagicEngineWindowClass
Return

Esc::Return ; this prevents the quick flash of Hyperspin when exiting with fade on. You can still exit with Esc.