MEmu = MAME MEmuV = v0.163 MURL = http://www.mame.net/ MAuthor = djvj,faahrev,brolly,Tomkun MVersion = 2.2.2 MCRC = 99BD11E0 iCRC = BCD207F4 mId = 635746812784197028 MSystem = "AAE","Aamber Pegasus","Acorn Electron","Amstrad GX4000","APF Imagination Machine","Apple IIGS","Applied Technology MicroBee","Atari 8-bit","Atari 2600","Atari 5200","Atari 7800","Atari Classics","Atari Jaguar","Atari Lynx","Bally Astrocade","Bandai Super Vision 8000","Bandai WonderSwan","Bandai WonderSwan Color","Capcom","Capcom Classics","Capcom Play System","Capcom Play System II","Capcom Play System III","Casio PV-1000","Casio PV-2000","Cave","Coleco ADAM","ColecoVision","Creatronic Mega Duck","Data East Classics","Emerson Arcadia 2001","Entex Adventure Vision","Epoch Game Pocket Computer","Epoch Super Cassette Vision","Exidy Sorcerer","Fairchild Channel F","Funtech Super Acan","GamePark 32","GCE Vectrex","Hartung Game Master","HBMAME","Interton VC 4000","Irem Classics","JungleTac Sport Vii","Konami Classics","LaserDisc","Magnavox Odyssey 2","MAME","Matra & Hachette Alice","Mattel Aquarius","Mattel Intellivision","MGT Sam Coupe","Midway Classics","Namco Classics","Namco System 22","NEC PC Engine","NEC PC Engine-CD","NEC SuperGrafx","NEC TurboGrafx-16","NEC TurboGrafx-CD","Nintendo 64","Nintendo Arcade Systems","Nintendo Classics","Nintendo Entertainment System","Nintendo Famicom","Nintendo Famicom Disk System","Nintendo Game Boy","Nintendo Game Boy Advance","Nintendo Game Boy Color","Nintendo Pokemon Mini","Nintendo Satellaview","Nintendo Super Famicom","Nintendo Super Game Boy","Nintendo Virtual Boy","Othello Multivision","PacMAME","Philips CD-i","RCA Studio II","Sega 32X","Sega CD","Sega Classics","Sega Game Gear","Sega Genesis","Sega Master System","Sega Mega Drive","Sega Model 1","Sega SG-1000","Sega ST-V","Sinclair ZX81","SNK Classics","SNK Neo Geo","SNK Neo Geo AES","SNK Neo Geo AES","SNK Neo Geo CD","SNK Neo Geo MVS","SNK Neo Geo Pocket","SNK Neo Geo Pocket Color","Sony PlayStation","Sony PocketStation","Sord M5","Super Nintendo Entertainment System","Taito Classics","Tandy TRS-80 Color Computer","Texas Instruments TI 99-4A","Tiger Game.com","Tomy Tutor","VTech CreatiVision","Watara Supervision","Williams Classics" ;---------------------------------------------------------------------------- ; Notes: ; This module now includes everything from the legacy MAME and MESS modules, but combined to match the merge of the 2 emulators that occured on version 0.162. ; ; Exit fade will only work correctly if you don't have Esc, the default MAME exit key, as your exit key. If you use Esc, turn off the ExitScreen ; This module will set your rom paths on the fly via CLI, but you must make sure the RLUI module setting for this module "MAME_BIOS_Path" is correctly set. It defaults to your roms subfolder where MAME.exe is found. ; This module assumes you have bios zip in your MAME "roms" directory, which might be different than your actual roms directory, for each system you need this module for. All tested systems listed below ; If MAME has a problem reading the bios zips, try archving them with "no compression" ; This site can help a ton with details for the various systems supported: http://www.progettoemma.net/mess/index.html ; You may get a black screen or MAME may close w/o notice if you do not have a bios rom for your system when one is needed. ; If you use bezel, it is recommended to set the module bezel mode to normal, and go to your MAME.ini file, on your emulator folder, and choose these options: artwork_crop 1, use_backdrops 1, use_overlays 1, use_bezels 0 ; ; Command Line Options - http://easyemu.mameworld.info/mameguide/mameguide-options.html ; High Scores DO NOT SAVE when cheats are enabled! ; HLSL Documentation: http://mamedev.org/source/docs/hlsl.txt.html ; If you use MAME for AAE, create a vector.ini in mame's ini subfolder and paste these HLSL settings in there: http://www.mameworld.info/ubbthreads/showflat.php?Cat=&Number=309968&page=&view=&sb=5&o=&vc=1 ; ; Following systems require a BIOS zip with their roms inside, placed in the "MAME\Roms\" directory: ; Aamber Pegasus - pegasus ; Acorn Electron - electron ; Amstrad GX4000 - gx4000 ; APF Imagination Machine - apfimag (tape games), apfm1000 (cart games) ; Apple IIGS - apple2gs ; Atari 8-bit - a800 ; Atari 2600 - a2600 ; Atari 5200 - a5200 ; Atari 7800 - a7800 ; Atari Jaguar - jaguar ; Atari Lynx - lynx ; Bally Astrocade - astrocde ; Bandai Super Vision 8000 - sv8000 ; Bandai WonderSwan - wswan ; Bandai WonderSwan Color - wscolor ; Casio PV-1000 - pv1000 ; Casio PV-2000 - pv2000 ; Coleco ADAM - adam, adam_ddp, adam_fdc, adam_kb, adam_prn, adam_spi ; ColecoVision - coleco ; Creatronic Mega Duck - megaduck ; Emerson Arcadia 2001 - arcadia ; Entex Adventure Vision - advision ; Epoch Game Pocket Computer - gamepock ; Epoch Super Cassette Vision - scv ; Exidy Sorcerer - sorcerer ; Fairchild Channel F - channelf ; Funtech Super ACan - supracan ; GamePark 32 - gp32 ; GCE Vectrex - vextrex ; Hartung Game Master - gmaster ; Interton VC 4000 - vc4000 ; JungleTac Sport Vii - vii ; Magnavox Odyssey 2 - odyssey2 ; Matra & Hachette Alice - alice32 ; Mattel Aquarius - aquarius ; Mattel Intellivision - intv ("exec.bin" [8,192 bytes] & "grom.bin" [2,048 bytes]) ; Applied Technology MicroBee - mbeeic ; MGT Sam Coupe - samcoupe ; NEC PC Engine - pce ; NEC PC Engine-CD - pce ; NEC SuperGrafx - sgx ; NEC TurboGrafx-16 - tg16 ; NEC TurboGrafx-CD - "Super CD-ROM2 System V3.01 (U).pce" [262,144 bytes] (placed in the roms subfolder in the emuPath) ; Nintendo 64 - n64 ; Nintendo Entertainment System - nes ; Nintendo Famicom - famicom ; Nintendo Famicom Disk System - fds ; Nintendo Game Boy - gameboy ; Nintendo Game Boy Advance - gba ; Nintendo Game Boy Color - gbcolor ; Nintendo Pokemon Mini - pokemini ; Nintendo Satellaview - snes ; Nintendo Super Famicom - snes ; Nintendo Super Game Boy - supergb ; Nintendo Virtual Boy - vboy ; Othello Multivision - omv1000 ; Philips CD-i - the cdimono1 ; RCA Studio II - studio2 ; Sega 32X - 32x ; Sega CD - segacd, megacd, megacd2j (megacd2j seems to be more compatible over megacdj) ; Sega Game Gear - gamegear ; Sega Genesis - genesis ; Sega Master System - sms ; Sega Mega Drive - megadriv ; Sega SG-1000 - sg1000 ; Sinclair ZX81 - zx81 ; SNK Neo Geo AES - aes ; SNK Neo Geo CD - neocd ; SNK Neo Geo Pocket - ngp ; SNK Neo Geo Pocket Color - ngpc ; Sony PlayStation - psa, pse, psj, psu ; Sony PocketStation - pockstat ; Sord M5 - m5 ; Super Nintendo Entertainment System - snes ; Tandy TRS-80 Color Computer - coco3 ; Texas Instruments TI 99-4A - ti99_4a ; Tiger Game.com - gamecom ; Tomy Tutor - tutor ; VTech CreatiVision - crvision ; Watara Supervision - svision ; ; Custom Configuration Files: ; If you want to use custom configuration files (.cfg files) for some games you will need to store them inside your MAME cfg folder using the following structure: ; cfg\mame_system_name\database_rom_name\mame_system_name.cfg ; An example of a game that requires specific settings is ICBM Attack for the Bally Astrocade, in this case special cfg file should be: ; cfg\astrocde\I.C.B.M. Attack (USA) (Unl)\astrocde.cfg ; ; Ini Files: ; Module will set most settings through command line which will override any settings you might have on your MAME ini files. Everything else will be read from ; those. MAME supports a hierarchical ini file structure and will load settings from several ini files following a specific order: ;- mame.ini ;- .ini (i.e. if MAME was renamed mame060.exe, MAME parses mame060.ini here) ;- debug.ini (if the debugger is enabled) ;- .ini (for clones only, may be called recursively) ;- .ini ;- vertical.ini (for games with vertical monitor orientation) ;- horizont.ini (for games with horizontal monitor orientation) ;- vector.ini (for vector games only) ;- .ini (based on the source filename of the driver) ; ; The settings in the later ini's override those in the earlier ini's. ; ; It's highly recommended that you set skipchecks to 'Rom Only" for MAME otherwise RocketLauncher won't be able to launch several games due ; to the way MAME roms are packaged. This will be even more noticeable for those using merged sets. ; ; Bally Astrocade: ; ICBM requires a soft reset (even on the real hardware) to launch. You can read about it here: http://www.ballyalley.com/ballyalley/articles/Playing_ICBM_Attack_Using_MESS.pdf ; Other games might require this as well, you can enable this in the module's settings so the machine is reset automatically on launch, otherwise you need to press F3 to start the game. ; Also ICBM Attack uses different controls then the rest of the games. Make sure you follow the procedure explained above under "Custom Configuration Files" to create such file. ; ; GCE Vectrex: ; Requires a vectrex.lay and a png overlay for each game. These all need to be placed in the MAME\artwork\vectrex folder. ; You can download all these pngs and the lay file in my ftp folder. You need to use the HyperList XML to match the pngs. ; ; Magnavox Odyssey 2: ; Euro games should use the videopac bios instead of the odyssey2 one or you'll get some timing issues. ; Use the systemName ini file in the folder with this module for this, example: ; [Moto-Crash (France)] ; Bios=videopac ; ; Texas Instruments TI 99/4A: ; This system requires full keyboard emulation to work properly ; Split cart dumps are not supported since MESS .145 so you'll have to convert them to RPK format or use an earlier version of MESS (and a different module) ; You can check how to convert split cart dumps to RPK here: ; http://www.ninerpedia.org/index.php/MESS_multicart_system ; For floppy games make sure you have a RPK dump of an extended basic rom on your roms folder. It should be named "extended_basic.rpk" ; Bezels: ; Module settings control whether RocketLauncher or MAME bezels are shown ; In the bezel normal mode only RocketLauncher Bezels will be show and the MAME use_bezels option will be forced disbaled ; In the bezel layout mode, RocketLauncher Bezels will be drawn only when you do not have a layout file on your MAME folders for the current game ; ; ServoStik: ; The module will automatically control any connected ServoStiks found on the system. ; It does this by reading the xml info from MAME. If that XML info has directional info at 4 or less, 4-way mode will be enabled. All others get 8-way mode. ; ; Per game controller types: ; MAME allows you to change the controller type for each game by using slot devices. Slot devices are highly customizable and vary greatly from system to ; system so to avoid adding a huge complexity to the module this must be done through the Parameters settings. ; Slot devices are stored in the MAME ini file you are using, so the best way to find the command line you need to use is to start your game set the slot devices ; through the MAME UI (Press tab while in MAME) exit and then open the MAME ini file and search for a section named SLOT DEVICES. ; This is an example for Atari 2600 for a game using wheel controllers on both joy ports: ; # ; # SLOT DEVICES ; # ; joyport1 wheel ; joyport2 wheel ; The suggested method is to set the desired controllers you want to use by default in the Module Global Settings, in this case under the Atari 2600 tab you would ; set Parameters=-joyport1 joy -joyport2 joy ; And then for specific games do the same under Module Specific Settings for that system, if a game requires the wheel controller you'd set ; Parameters=-joyport1 wheel -joyport2 wheel ; ; Another option is to set the default values in the MAME ini file and make sure you also set writeconfig to 0. ; Swapping slot devices wipes out SYSTEM custom configs on the unplugged controllers, so to avoid any customised controls getting erased everytime you change slot devices, ; ensure you set your controls in the main MAME config file (MAME.ini), not the system one (ex. Atari 2600.ini). ;---------------------------------------------------------------------------- StartModule() BezelGUI() ; This object controls how the module reacts to different systems. MAME can play a lot of systems, but needs to know what system you want to run, so this module has to adapt. mTypeVar= ( LTrim Aamber Pegasus|pegasus Acorn Electron|electron Amstrad GX4000|gx4000 APF Imagination Machine|apfimag Apple IIGS|apple2gs Atari 8-bit|a800 Atari 2600|a2600 Atari 5200|a5200 Atari 7800|a7800 Atari Jaguar|jaguar Atari Lynx|lynx Bally Astrocade|astrocde Bandai Super Vision 8000|sv8000 Bandai WonderSwan|wswan Bandai WonderSwan Color|wscolor Casio PV-1000|pv1000 Casio PV-2000|pv2000 Coleco ADAM|adam ColecoVision|coleco Creatronic Mega Duck|megaduck Emerson Arcadia 2001|arcadia Entex Adventure Vision|advision Epoch Game Pocket Computer|gamepock Epoch Super Cassette Vision|scv Exidy Sorcerer|sorcerer Fairchild Channel F|channelf Funtech Super Acan|supracan GamePark 32|gp32 GCE Vectrex|vectrex Hartung Game Master|gmaster Interton VC 4000|vc4000 JungleTac Sport Vii|vii Magnavox Odyssey 2|odyssey2 Matra & Hachette Alice|alice32 Mattel Aquarius|aquarius Mattel Intellivision|intv MGT Sam Coupe|samcoupe Applied Technology MicroBee|mbeeic NEC PC Engine|pce NEC PC Engine-CD|pce NEC SuperGrafx|sgx NEC TurboGrafx-16|tg16 NEC TurboGrafx-CD|tg16 Nintendo 64|n64 Nintendo Entertainment System|nes Nintendo Famicom|famicom Nintendo Famicom Disk System|fds Nintendo Game Boy|gameboy Nintendo Game Boy Advance|gba Nintendo Game Boy Color|gbcolor Nintendo Pokemon Mini|pokemini Nintendo Satellaview|snes Nintendo Super Famicom|snes Nintendo Super Game Boy|supergb Nintendo Virtual Boy|vboy Othello Multivision|omv1000 Philips CD-i|cdimono1 RCA Studio II|studio2 Sega 32X|32x Sega CD|segacd Sega Game Gear|gamegear Sega Genesis|genesis Sega Master System|sms Sega Mega Drive|megadriv Sega SG-1000|sg1000 Sinclair ZX81|zx81 SNK Neo Geo AES|aes SNK Neo Geo CD|neocdz SNK Neo Geo Pocket|ngp SNK Neo Geo Pocket Color|ngpc Sony PlayStation|psx Sony PocketStation|pockstat Sord M5|m5 Super Nintendo Entertainment System|snes Tandy TRS-80 Color Computer|coco3 Texas Instruments TI 99-4A|ti99_4a Tiger Game.com|gamecom Tomy Tutor|tutor VTech CreatiVision|crvision Watara Supervision|svision ) mType := Object() Loop, Parse, mTypeVar, `n, `r { obj := {} Loop, Parse, A_LoopField, | If A_Index = 1 obj.System := A_LoopField Else ; 2 obj.mameID := A_LoopField mType.Insert(obj["System"], obj) } Log("Module - Finished building the " . MEmu . " object",4) ; For easier use throughout the module mameSystem := mType[systemName].System mameID := mType[systemName].mameID If !mameSystem { Log("Module - """ . systemName . """ is not a known console or computer system. Defaulting to MAME's Arcade mode for the remainder of this " . MEmu . " module.",2) mameSystem := systemName mameID := "MAME" } settingsFile := modulePath . "\" . moduleName . ".ini" Fullscreen := IniReadCheck(settingsFile, "Settings", "Fullscreen","true",,1) ; Set fullscreen mode legacyMode := IniReadCheck(settingsFile, "Settings|" . systemName . "|" . romName, "LegacyMode","false",,1) mameBiosPath := IniReadCheck(settingsFile, "Settings", "MAME_BIOS_Path", emuPath . "\roms",,1) Videomode := IniReadCheck(settingsFile, "Settings", "Videomode","d3d",,1) ; Choices are gdi,ddraw,d3d. If left blank, MAME uses d3d by default pauseMethod := IniReadCheck(settingsFile, "Settings", "PauseMethod",1,,1) ; set the pause method that works better on your machine (preferred methods 1 and 2) 1 = Win7 and Win8 OK - Problems with Win XP, 2 = preferred method for WinXP - Problems in Win7, 3 and 4 = same as 1 and 2, 5 = only use If you have a direct input version of mame, 6 = suspend mame process method, it could crash mame in some computers bilinearFilter := IniReadCheck(settingsFile, "Settings|" . mameSystem, "BilinearFilter","false",,1) hlsl := IniReadCheck(settingsFile, "Settings|" . mameSystem . "|" . romName, "HLSL","false",,1) glsl := IniReadCheck(settingsFile, "Settings|" . mameSystem . "|" . romName, "GLSL","false",,1) bezelMode := IniReadCheck(settingsFile, "Settings|" . systemName . "|" . romName, "BezelMode","layout",,1) ; "layout" or "normal" verticalRotationMode := IniReadCheck(settingsFile, "Settings|" . mameSystem . "|" . romName, "VerticalRotationMode","none",,1) cheatMode := IniReadCheck(settingsFile, "Settings", "CheatMode","false",,1) cheatModeKey := IniReadCheck(settingsFile, "Settings", "CheatModeKey",A_Space,,1) ; user defined key to be held down before launching a mame rom. UseSoftwareList := IniReadCheck(settingsFile, mameSystem, "UseSoftwareList","false",,1) sysStaticParams := IniReadCheck(settingsFile, mameSystem, "StaticParameters", A_Space,,1) sysParams := IniReadCheck(settingsFile, mameSystem, "Parameters", A_Space,,1) romParams := IniReadCheck(settingsFile, romName, "Parameters", sysParams,,1) mameRomName := IniReadCheck(settingsFile, romName, "MameRomName", A_Space,,1) autosave := IniReadCheck(settingsFile, systemName . "|" . romName, "Autosave", "false",,1) volume := IniReadCheck(settingsFile, "Settings|" . systemName . "|" . romName, "Volume",,,1) Artwork_Crop := IniReadCheck(settingsFile, mameSystem . "|" . romName, "Artwork_Crop", "true",,1) Use_Bezels := IniReadCheck(settingsFile, mameSystem . "|" . romName, "Use_Bezels", "false",,1) Use_Overlays := IniReadCheck(settingsFile, mameSystem . "|" . romName, "Use_Overlays", "true",,1) Use_Backdrops := IniReadCheck(settingsFile, mameSystem . "|" . romName, "Use_Backdrops", "true",,1) Use_Cpanels := IniReadCheck(settingsFile, mameSystem . "|" . romName, "Use_Cpanels", "false",,1) Use_Marquees := IniReadCheck(settingsFile, mameSystem . "|" . romName, "Use_Marquees", "false",,1) inipath := IniReadCheck(settingsFile, mameSystem, "IniPath", "",,1) mameBiosPath := GetFullName(mameBiosPath) ; Update Link setting ; linkType := "Slave" ; set to desired link mode ; nvramObj := Object() ; initialize object to store the nvram options ; nvramObj["Name"] := romName ; nvramObj["Link","Position"] := "24" ; nvramObj["Link","None"] := "00" ; nvramObj["Link","Master"] := "01" ; nvramObj["Link","Slave"] := "02" ; nvramObj["Link","Live"] := "03" ; nvramFile := emuPath . "\nvram2\" . romName . "\nvram" ; If FileExist(nvramFile) { ; linkBin := BinRead(nvramFile,nvramData,1,nvramObj.Link["Position"]) ; read current link mode as binary ; Bin2Hex(linkHex,nvramData,linkBin) ; convert current link mode to hex ; If (linkHex != nvramObj.Link[linkType]) { ; Log("Module - Setting nvram to " . linkType . " for " . romName,4) ; Hex2Bin(binData,nvramObj.Link[linkType]),BinWrite(nvramFile,binData,1,nvramObj.Link["Position"]) ; } Else ; Log("Module - " . romName . " already set to " . linkType,4) ; } enableLinkPlay := IniReadCheck(settingsFile, "Link/Network|" . romName, "Enable_Link_Play", "false",,1) networkSession := If (enableLinkPlay != "false") { Log("Module - Link/Network Multi-Player is an available option for " . romName,4) getWANIP := IniReadCheck(settingsFile, "Link/Network", "Get_WAN_IP","false",,1) myIP := If getWANIP = "true" ? GetPublicIP() : "127.0.0.1" ; use local ip by default if user does not want to get the WAN IP as MAME needs this for linked games networkPlayers := enableLinkPlay ; Max amount of networkable players localLink := 1 ; Tell Multiplayer menu to enable menu option for local linking splitScreen2PlayersMode := IniReadCheck(settingsFile, "Link/Network|" . romName, "SplitScreen_2_Players","Vertical",,1) ;horizontal or vertical splitScreen3PlayersMode := IniReadCheck(settingsFile, "Link/Network|" . romName, "SplitScreen_3_Players","P1top",,1) ; For Player1 screen to be on left: P1left. For Player1 screen to be on top: P1top. For Player1 screen to be on bottom: P1bottom. For Player1 screen to be on right: P1right. ; localHost := IniReadCheck(settingsFile, "Link/Network", "Local_Host","0.0.0.0",,1) ; localhost is always 0.0.0.0 so no need to change localPort := IniReadCheck(settingsFile, "Link/Network", "Local_Port","15111",,1) ; remoteHost := IniReadCheck(settingsFile, "Link/Network", "Remote_Host","127.0.0.1",,1) ; remotePort := IniReadCheck(settingsFile, "Link/Network", "Remote_Port","15111",,1) defaultServerIP := IniReadCheck(settingsFile, "Link/Network", "Default_Server_IP", myIP,,1) defaultServerPort := IniReadCheck(settingsFile, "Link/Network", "Default_Server_Port","15111",,1) lastIP := IniReadCheck(settingsFile, "Link/Network", "Last_IP", defaultServerIP,,1) ; also known as the Remote IP in mame. Does not need to be on the ISD lastPort := IniReadCheck(settingsFile, "Link/Network", "Last_Port", defaultServerPort,,1) ; also known as the Remote Port in mame. Does not need to be on the ISD MultiplayerMenu(lastIP, lastPort, networkType, networkPlayers,,,,,,localLink) ;MultiPlayer Menu Result ; If !(networkType) ; MsgBox, % "Single Player Game" ; Else If (networkType="localLink") ; MsgBox, % "Local Link selected with the number of players equal to: " . networkPlayers ; Else If (networkType="server") ; MsgBox, % "WAN IP Address=" . networkIP . " | LAN IP Address=" . localIP[1,2] . " | Port=" . networkPort . " | networkPlayers=" . networkPlayers . " | networkRequiresSetup=" . networkRequiresSetup ; Else If (networkType="client") ; MsgBox, % "NetworkIP=" . networkIP . " | Port Number=" . networkPort . " | networkRequiresSetup=" . networkRequiresSetup If networkSession { Log("Module - Using a Network for " . romName,4) multiPlayerObj := Object() ; initialize object to store the multiplayer options If (networkType="localLink") { Log("Module - Setting remote host to 127.0.0.1 to support local link mode as it is running on this PC.") If networkPlayers > 1 { Log("Module - Local link mode was selected and " . networkPlayers . " sessions will be launched.") linkEnabledGame := 1 ; remoteIsLocal := 1 ; this will determine if the module needs to handle multiple copies of mame or not fullscreen := "false" ; must turn off fullscreen if running multiple MAMEs on the same machine Loop % networkPlayers { player := A_Index multiPlayerObj[A_Index,"Number"] := player multiPlayerObj[A_Index,"CfgDir"] := " -cfg_directory cfg" . (If A_Index = 1 ? "" : A_Index) multiPlayerObj[A_Index,"NvramDir"] := " -nvram_directory nvram" . (If A_Index = 1 ? "" : A_Index) If (A_Index = 1) { ; Player 1 multiPlayerObj[A_Index,"LocalHost"] := " -comm_localhost 0.0.0.0" multiPlayerObj[A_Index,"LocalPort"] := " -comm_localport " . localPort } Else { ; Players 2+ multiPlayerObj[A_Index,"RemoteHost"] := " -comm_remotehost 127.0.0.1" multiPlayerObj[A_Index,"RemotePort"] := " -comm_remoteport " . localPort } ; msgbox % "Player: " . multiPlayerObj[A_Index]["Number"] . "`nLocalHost: " . multiPlayerObj[A_Index]["LocalHost"] . "`nLocalPort: " . multiPlayerObj[A_Index]["LocalPort"] . "`nRemoteHost: " . multiPlayerObj[A_Index]["RemoteHost"] . "`nRemotePort: " . multiPlayerObj[A_Index]["RemotePort"] . "`nCfgDir: " . multiPlayerObj[A_Index]["CfgDir"] . "`nNvramDir: " . multiPlayerObj[A_Index]["NvramDir"] } } Else Log("Module - Local link mode was selected but user only chose 1 player. Launch will be a normal session.") } Else If (networkType = "client") { Log("Module - Remote host is running on another PC, module will use remote link mode.") IniWrite, %lastIP%, %settingsFile%, Link/Network, Last_IP ; Save last used IP and Port for quicker launching next time IniWrite, %lastPort%, %settingsFile%, Link/Network, Last_Port linkType := "Slave" multiPlayerObj[A_Index,"Number"] := 1 multiPlayerObj[A_Index,"CfgDir"] := " -cfg_directory cfg" multiPlayerObj[A_Index,"NvramDir"] := " -nvram_directory nvram" multiPlayerObj[A_Index,"LocalPort"] := " -comm_localport " . localPort multiPlayerObj[A_Index,"RemoteHost"] := " -comm_remotehost " . lastIP multiPlayerObj[A_Index,"RemotePort"] := " -comm_remoteport " . lastPort } Else { ; server linkType := "Master" multiPlayerObj[A_Index,"Number"] := 1 multiPlayerObj[A_Index,"CfgDir"] := " -cfg_directory cfg" multiPlayerObj[A_Index,"NvramDir"] := " -nvram_directory nvram" multiPlayerObj[A_Index,"LocalHost"] := " -comm_localhost 0.0.0.0" multiPlayerObj[A_Index,"LocalPort"] := " -comm_localport " . localPort IniWrite, %lastPort%, %settingsFile%, Link/Network, Last_Port } Log("Module - Starting a network session using the IP """ . networkIP . """ and PORT """ . networkPort . """",4) } Else { Log("Module - User chose Single Player mode for this session",4) } } FadeInStart() ;Read settings from system name ini file sysSettingsFile := modulePath . "\" . mameSystem . ".ini" IfExist, %sysSettingsFile% { romParams := IniReadCheck(sysSettingsFile, romName, "Parameters", romParams,,1) hlsl := IniReadCheck(sysSettingsFile, romName, "HLSL",hlsl,,1) glsl := IniReadCheck(sysSettingsFile, romName, "GLSL",glsl,,1) Artwork_Crop := IniReadCheck(sysSettingsFile, romName, "Artwork_Crop", Artwork_Crop,,1) Use_Bezels := IniReadCheck(sysSettingsFile, romName, "Use_Bezels", Use_Bezels,,1) Use_Overlays := IniReadCheck(sysSettingsFile, romName, "Use_Overlays", Use_Overlays,,1) Use_Backdrops := IniReadCheck(sysSettingsFile, romName, "Use_Backdrops", Use_Backdrops,,1) Use_Cpanels := IniReadCheck(sysSettingsFile, romName, "Use_Cpanels", Use_Cpanels,,1) Use_Marquees := IniReadCheck(sysSettingsFile, romName, "Use_Marquees", Use_Marquees,,1) } artworkCrop := If (Artwork_Crop = "true") ? " -artwork_crop" : " -noartwork_crop" useBezels := If (Use_Bezels = "true") ? " -use_bezels" : " -nouse_bezels" useOverlays := If (Use_Overlays = "true") ? " -use_overlays" : " -nouse_overlays" useBackdrops := If (Use_Backdrops = "true") ? " -use_backdrops" : " -nouse_backdrops" useCpanels := If (Use_Cpanels = "true") ? " -use_cpanels" : " -nouse_cpanels" useMarquees := If (Use_Marquees = "true") ? " -use_marquees" : " -nouse_marquees" ; Get MAME version from executable, this is needed since some CLI switches are not available in older MAME versions exeAtrib := FileGetVersionInfo_AW( EmuPath . "\" . executable, "FileVersion|ProductVersion", "|" ) Loop, Parse, exeAtrib, |%A_Tab%, %A_Space% A_Index & 1 ? ( _ := A_LoopField ) : ( %_% := A_LoopField ) If (ProductVersion) StringRight, MAMEVersion, ProductVersion, StrLen(ProductVersion) - 2 Log("Module - Detected MAME Product Version from '" . EmuPath . "\" . executable . "' is " . MAMEVersion) If inipath inipath := AbsoluteFromRelative(EmuPath, inipath) If (verticalRotationMode = "none") verticalRotationMode := "" hideEmuObj := Object(dialogOpen . " ahk_class ConsoleWindowClass",0,"ahk_class MAMEDebugWindow",0,"ahk_class MAMEOutput",0,"ahk_class MAME",1) ;Hide_Emu will hide these windows. 0 = will never unhide, 1 = will unhide later ; Process mame's ListXML for certain features If (bezelEnabled = "true" || servoStikEnabled = "auto" || verticalRotationMode) { ListXMLObject := Object() ListXMLObject := ListXMLInfo(romName) If (bezelEnabled = "true") { If (networkPlayers > 1) { useBezels := " -nouse_bezels" ; force disabling MAME built-in bezels BezelStart(networkPlayers) } Else { If (bezelMode = "layout"){ BezelStart("layout",ListXMLObject["Parent"].Value,ListXMLObject["Angle"].Value,romName) } Else { ;bezel mode = normal useBezels := " -nouse_bezels" ; force disabling MAME built-in bezels BezelStart(,,ListXMLObject["Angle"].Value) } } } If (servoStikEnabled = "auto") { ServoStik(If ListXMLObject["Ways"].Value <= 4 ? 4 : 8) ; If "ways" in the xml is set to 4 or less, the servo will go into 4-way mode, else 8-way mode will be enabled } If (verticalRotationMode && ListXMLObject["Angle"].Value) { If (verticalRotationMode = "original") verticalRotationMode := " -norotate" Else If (verticalRotationMode = "right") verticalRotationMode := " -ror" Else If (verticalRotationMode = "left") verticalRotationMode := " -rol" Else verticalRotationMode := "" } Else verticalRotationMode := "" } 7z(romPath, romName, romExtension, 7zExtractPath) winstate := If (Fullscreen = "true") ? "Hide UseErrorLevel" : "UseErrorLevel" fullscreen := If (Fullscreen = "true") ? " -nowindow" : " -window" If (Videomode = "opengl") { hlsl := " -nohlsl_enable" If (MAMEVersion > 159) glsl := If glsl = "true" ? " -gl_glsl" : (If glsl = "ini" ? "" : " -nogl_glsl") Else glsl := "" } Else { hlsl := If hlsl = "true" ? " -hlsl_enable" : (If hlsl = "ini" ? "" : " -nohlsl_enable") If (MAMEVersion > 159) glsl := If Videomode = "ini" ? "" : " -nogl_glsl" Else glsl := "" If (Videomode = "ini") Videomode := "" } videomode := If (Videomode != "" ) ? " -video " . videomode : "" param1 := " -cart """ . romPath . "\" . romName . romExtension . """" ; default param1 used for launching most systems. autosave := If autosave = "true" ? " -autosave" : "" volume := If volume != "" ? " -volume " . volume : "" inipath := If inipath != "" ? " -inipath """ . inipath . """" : "" If romExtension = .txt ; This can be applied to all systems param1:= If mameID = apfimag ; APF Imagination Machine If romExtension != .tap mameID = apfm1000 ; cart games for APF Imagination Machine require a different bios to be loaded If UseSoftwareList != true { ; Now that we know the system we are loading, determine if we use an ini assocated with that system for custom game configs a user might need. Then load the configs associated to that game. If mameID in ti99_4a,aes,apple2gs,electron,mbeeic,odyssey2,astrocde ; these systems will use an ini to store game specific settings { mameSysINI := CheckFileMAME(modulePath . "\" . mameSystem . ".ini") ; create the ini if it does not exist If mameID = ti99_4a ; Texas Instruments TI 99-4A { mainCart := IniReadCheck(mameSysINI, romName, "Main_Cart",A_Space,,1) basicCart := IniReadCheck(mameSysINI, romName, "Basic_Cart","extended_basic.rpk",,1) ; user can specify a rom specific cart instead of the default basic one expansionLocation := IniReadCheck(mameSysINI, romName, "Expansion_Location","extended_basic.rpk",,1) ; Now set the parameters to send to MAME If romExtension = .dsk ; Expansion Disk ; If using the mainCart , send expansionLocation to MAME. This will require DirectInput to be enabled on the MAME build! Else we are loading a Disk game param1 := " -gromport multi -cart1", param2:=" """ . romPath . "\" . (If mainCart ? (mainCart):(basicCart)) . """", param3:=" -peb:slot2 32kmem -peb:slot3 speech -peb:slot6 tirs232 -peb:slot8 hfdc", param4:=" -flop1", param5:=" """ . romPath . "\" . romName . romExtension . """" Else If romExtension = .rpk ; Cart Game (RPK Format) param1 := " -gromport single -cart1", param2:=" """ . romPath . "\" . romName . romExtension . """", param3:=" -peb:slot3 speech" ;-cart will also work here param6 := " -ui_active" ;Enable partial keyboard mode at startup } Else If mameID = aes ; SNK Neo Geo AES { biosRegion := IniReadCheck(mameSysINI, romName, "BIOS_Region","asia",,1) param1 := " -bios " . biosRegion ; can also be japan, but the asian one has english menus for most games param2 := " -cart " . romName }Else if mameID = apple2gs ; Apple IIGS { externalOS := IniReadCheck(mameSysINI, romName, "External_OS","false",,1) 2gsSystemFile := "System6.2mg" ;For games without OS included, always force this name and error out if not found multipartTable := CreateRomTable(multipartTable) If externalOS = true { CheckFile(romPath . "\" . 2gsSystemFile) param1 := " -flop3", param2:=" """ . romPath . "\" . 2gsSystemFile . """", param3:=" -flop4", param4:=" """ . romPath . "\" . romName . romExtension . """" }Else{ param1 := " -flop3", param2:=" """ . romPath . "\" . romName . romExtension . """" If (multipartTable.MaxIndex() > 1) param3:=" -flop4", param4 := " """ . multipartTable[2,1] . """" } param5 := " -ui_active" ;Enable partial keyboard mode at startup }Else If mameID = electron ; Acorn Electron { AutoBootDelay := IniReadCheck(mameSysINI, "Settings", "AutoBootDelay","2",,1) ; Read delay from config. AutoBootDelay := " -autoboot_delay " . AutoBootDelay If romExtension = .bin mediaDeviceType := "cart" Else ; any other format mediaDeviceType := "cass" param1 := " -" . mediaDeviceType . " """ . romPath . "\" . romName . romExtension . """ -autoboot_command ""chain""""""""""""\n""" . AutoBootDelay . "" }Else If mameID = mbeeic ; Applied Technology MicroBee { microbeeModel := IniReadCheck(mameSysINI, romName, "MicroBee_Model","mbeeic",,1) If microbeeModel not in mbee,mbeeic,mbeepc,mbeepc85,mbee56 ScriptError("This is not a known MicroBee model value: " . microbeeModel) Else If (microbeeModel != "mbeeic") mameID := microbeeModel If romExtension in .mwb,.com,.bee mediaDeviceType := "quik1" Else If romExtension in .wav,.tap mediaDeviceType := "cass" Else If romExtension in .rom mediaDeviceType := "cart" Else If romExtension in .dsk mediaDeviceType := "flop1" Else ; .bin format mediaDeviceType := "quik2" param1 := " -" . mediaDeviceType . " """ . romPath . "\" . romName . romExtension . """" }Else if mameID = odyssey2 ; Magnavox Odyssey 2 { param2 := " -ui_active" ;Enable partial keyboard mode at startup }Else if mameID = astrocde ; Bally Astrocade { BlueRAMBasicRom := IniReadCheck(mameSysINI, "Settings", "BlueRAMBasicRom","Blue RAM Basic v1.1 (USA).bin",,1) ; Blue RAM Basic rom RequiresReset := IniReadCheck(mameSysINI, romname, "RequiresReset","false",,1) ; Check if game requires a reset BlueRAMBasicRomPath := romPath . "\" . BlueRAMBasicRom If (romExtension = .script) { ;Will require blue ram basic If !FileExist(BlueRAMBasicRomPath) { ;Blue RAM Basic games might be in their own sub-folders since they have several files, so let's try to find the Blue RAM cart in the parent folder as well SplitPath,romPath,,romBasePath BlueRAMBasicRomPath := CheckFile(romBasePath . "\" . BlueRAMBasicRom, "Couldn't find " . BlueRAMBasicRom . " on any of these paths:" . romBasePath . "|" . romPath) } scriptFile := romPath . "\" . romName . romExtension param1 := " -cart """ . BlueRAMBasicRomPath . """" ;Replace rompath variable in script FileRead, scriptData, %scriptFile% StringReplace, scriptData, scriptData, {romPath}, %romPath%, all ;Create cmd file to send to MESS FileDelete, %romPath% . "\" . %romName% . ".cmd" FileAppend, %scriptData%, %romPath%\%romName%.cmd param2 := " -exp blue_ram_16k -debug -debugscript """ . romPath . "\" . romName . ".cmd""" closeDebugWindow := "true" } } ;Use a different bios if needed (This must be done after the above if conditions since the mameID will change) iniBios := IniReadCheck(mameSysINI, romName, "Bios",mameID,,1) ; for all games, we use the default bios. Some games might require different bios like Odyssey2's Jopac games use the videopac bios instead, which should be defined in the ini If (iniBios != "") mameID := iniBios ; need to change the bios name for some games } ; These systems don't use an ini, but do require parameters to be changed from the default method of launching MAME If (mameID = "neocdz" || mameID = "cdimono1" || mameID = "segacd" || mameID = "psx" || (mameID = "tg16" && mameSystem = "NEC TurboGrafx-CD") || (mameID = "pce" && mameSystem = "NEC PC Engine-CD")) ; SNK Neo Geo CD, Philips CD-i, Sega CD, Sony PlayStation, NEC PC Engine-CD or NEC TurboGrafx-CD { If romExtension not in .chd,.cue ScriptError("MAME only supports " . mameSystem . " games in chd and cue format. It does not support:`n" . romExtension) If (mameSystem = "NEC TurboGrafx-CD") { ; NEC TurboGrafx-CD needs an additional bios mounted as a cart to run ; tgcdBios := CheckFile(emuPath . "\roms\CD-ROM System V2.01 (U).pce") ; older bios that doesn't seem to work with many games tgcdBios := CheckFile(emuPath . "\roms\Super CD-ROM2 System V3.01 (U).pce") param2 := " -cart " . """" . tgcdBios . """" } Else If (mameSystem = "NEC PC Engine-CD") { ; NEC PC Engine-CD needs an additional bios mounted as a cart to run pcecdBios := CheckFile(emuPath . "\roms\Super CD-ROM2 System V3.0 (J).pce") param2 := " -cart " . """" . pcecdBios . """" } Else If (mameID = "psx") { ; Sony PlayStation mameID = psu ; changing mameID sent to MAME to use the USA bios ; SelectMemCard() ; future function to swap around memcards ; Usage: mc1 "J:\MAME\software\psu\card1.mc" } If (mameSystem = "Sega CD") { ; If InStr(romName,"(Jap") ; Mega CD Japanese v2 mameID = megacd2j Else If InStr(romName,"(Euro") ; Mega CD European (PAL) mameID = megacd } param1 := " -cdrm """ . romPath . "\" . romName . romExtension . """" }Else If mameID = gamecom ; Tiger Game.com { If romExtension != .txt param1 := " -cart1 """ . romPath . "\" . romName . romExtension . """" }Else If mameID = genesis ; Sega Genesis { If (InStr(romName, "(Europe") || InStr(romName, "(PAL")) ; if rom is from europe, tell MAME to boot a Mega Drive instead mameID = megadriv }Else If mameID = megadriv ; Sega Mega Drive { If (InStr(romName, "(USA") || InStr(romName, "(NTSC")) ; if rom is from America, tell MAME to boot a Genesis instead mameID = genesis }Else If mameID = vii ; JungleTac Sport Vii { If romName = Built-In Games (China) ; Has some built-in games, gotta launch just BIOS for it. param1:= }Else If mameID = alice32 ; Matra & Hachette Alice { If romExtension != .txt param1 := " -cass1 """ . romPath . "\" . romName . romExtension . """" }Else If mameID = pockstat ; Sony PocketStation { If romExtension != .gme param1 := " -cart1 """ . romPath . "\" . romName . romExtension . """" }Else If mameID = coco3 ; Tandy TRS-80 Color Computer { If romExtension != .txt param1 := " -cart """ . romPath . "\" . romName . romExtension . """" }Else If mameID = zx81 ; Sinclair ZX81 { If romExtension != .txt param1 := " -cass1 """ . romPath . "\" . romName . romExtension . """" }Else If mameID = sorcerer ; Exidy Sorcerer { If romExtension = .snp ; Snapshot file param1 := " -dump """ . romPath . "\" . romName . romExtension . """" Else If romExtension = .bin param1 := " -quik """ . romPath . "\" . romName . romExtension . """" }Else If (mameID = "a800" || mameID = "fds" || mameID = "samcoupe") ; Atari 8-bit, Nintendo Famicom Disk System, and MGT Sam Coupe { If romExtension != .txt param1 := " -flop1 """ . romPath . "\" . romName . romExtension . """" }Else If mameID = vectrex ; GCE Vectrex { If romName = Mine Storm (World) ; MAME dumps an error if you try to launch Mine Storm using a rom instead of just booting vectrex w/o a game in it (Mine Storm is built into vectrex) param1:= }Else If mameID = apfm1000 ; APF Imagination Machine/APF M1000 { If romName = Rocket Patrol (USA) ; Rocket Patrol is built into the APF M1000 ROM. param1:= }Else If mameID = adam ; Coleco ADAM param1 := (If romExtension = ".ddp" ? " -cass1" : " -floppydisk") . " """ . romPath . "\" . romName . romExtension . """" ; Decide if disk or ddp game Else If mameID = pegasus ; Aamber Pegasus { If romExtension != .txt param1 := " -cart1 """ . romPath . "\" . romName . romExtension . """" } Else If mameID = gp32 ; GamePark 32 { If romExtension != .txt param1 := " -memc """ . romPath . "\" . romName . romExtension . """" } }Else{ ; Use Software List hashname := mameID param1 := " " . romName ; param1 used for launching from software lists If mameID = aes ; SNK Neo Geo AES { hashname := "neogeo" biosRegion := IniReadCheck(mameSysINI, romName, "BIOS_Region","asia",,1) param2 := " -bios " . biosRegion ; can also be japan, but the asian one has english menus for most games } CheckFile(emuPath . "\hash\" . hashname . ".xml","Could not find a software list for the system " . mameID) ;Check if software list for selected system exists } If mameID = vectrex ; GCE Vectrex param2 := " -view " . (If (FileExist(emuPath . "\artwork\Vectrex\" . romName . ".png"))?("""" . romName . """"):"standard") ; need overlays extracted in the artwork\vectres folder. PNGs must match romName sysStaticParams := If sysStaticParams != "" ? A_Space . sysStaticParams : "" ; tacking on a space in case user forgot to add one romParams := If romParams != "" ? A_Space . romParams : "" ; tacking on a space in case user forgot to add one StringReplace,mameRomPaths,romPathFromIni,|,`"`;`",1 ; replace all instances of | to ; in the Rom_Path from RL's Emulators.ini so MAME knows where to find your roms mameRomPaths := " -rompath """ . (If mameRomName ? romPath : mameRomPaths) . (If mameBiosPath ? ";" . mameBiosPath : "") . """" ; If using an alt rom, only supply mame with the path to that rom so it doesn't try to use the original rom. If a bios path was supplied, add it into the rom paths sent to MAME If InStr(romParams,"-rompath") ScriptError("""-rompath"" is defined as a parameter for " . romName . ". The MAME module fills this automatically so please remove this from Params in the module's settings.") If InStr(sysStaticParams,"-rompath") ScriptError("""-rompath"" is defined as a parameter for " . mameSystem . ". The MAME module fills this automatically so please remove this from Params in the module's settings.") ; use a custom rom name, not the one from the db If mameRomName { FileMove, %romPath%\%romName%%romExtension%, %romPath%\%mameRomName%%romExtension% ; rename rom to match what mame needs originalRomName := romName ; store romName from database so we know what to rename it back to later romName := mameRomName If ErrorLevel ScriptError("There was a problem renaming " . romName . " to " . mameRomName . " in " . romPath . ". Please check you have write permission to this folder/file and you don't already have a file named """ . mameRomName . """ in your rom folder.",8) Else ; if rename was successful, set var so we know to move it back later fileRenamed = 1 } ; use a custom cfg file if it exists and append it to param1 IfExist, % emuPath . "\cfg\" . mameID . "\" . dbName param1 := " -cfg_directory " . """" . emuPath . "\cfg\" . mameID . "\" . dbName . """" . param1 If bilinearFilter = true bilinearEnabled := " -filter" Else bilinearEnabled := " -nofilter" If cheatMode = true { If (!FileExist(emuPath . "\cheat.zip") && !FileExist(emuPath . "\cheat.7z")) ScriptError("You have cheats enabled for " . MEmu . " but could not locate a ""cheat.zip"" or ""cheat.7z"" in " . emuPath) Else Log("Module - Cheat file found in " . emuPath,4) If cheatModeKey ; if user wants to use a key to enable CheatMode cheatEnabled := If XHotkeyAllKeysPressed(cheatModeKey) ? " -cheat" : "" ; only enables cheatMode when key is held down on launch Else ; no cheat mode key defined cheatEnabled := " -cheat" } If (RequiresReset = "true") { ; Generate a lua script to send a system soft reset ScriptFileName := GenerateSoftResetScript() bootscript := " -script """ . ScriptFileName . """ -autoboot_delay 1" } HideEmuStart() If legacyMode = true { Log("Module - Running MAME in legacy Mode") errLvl := Run("""" . executable . """ " . (If mameID = "MAME" ? romName : mameID . param1 . param2 . param3 . param4 . param5 . param6) . fullscreen . cheatEnabled . volume . mameRomPaths . sysStaticParams . romParams, emuPath, winstate) } Else { Log("Module - Running MAME in non-legacy mode") If (networkPlayers = 1 || !linkEnabledGame) { errLvl := Run("""" . executable . """ " . (If mameID = "MAME" ? romName : mameID . param1 . param2 . param3 . param4 . param5 . param6) . mameRomPaths . sysStaticParams . romParams . fullscreen . hlsl . glsl . cheatEnabled . volume . inipath . verticalRotationMode . videomode . artworkCrop . useBezels . useOverlays . useBackdrops . useCpanels . useMarquees . autosave . bootscript . bilinearEnabled . " -skip_gameinfo", emuPath, winstate) } Else { ; multiplayer game run ;screen positions screenPosMode := If (networkPlayers = 2) ? splitScreen2PlayersMode : If (networkPlayers = 2) ? splitScreen3PlayersMode : "" screenPos := SplitScreenPos(networkPlayers,screenPosMode) globalInputs := " -global_inputs" ; tell mame to accept inputs when its window is not focused Loop, %networkPlayers% { ;;Run Line for each of the multiplayer MAME instances using the nvramPath and cfgPath variables to the extra mames errLvl := Run("""" . executable . """ " . (If mameID = "MAME" ? romName : mameID . param1 . param2 . param3 . param4 . param5 . param6) . mameRomPaths . multiPlayerObj[A_Index]["CfgDir"] . multiPlayerObj[A_Index]["NvramDir"] . globalInputs . multiPlayerObj[A_Index]["LocalHost"] . multiPlayerObj[A_Index]["LocalPort"] . multiPlayerObj[A_Index]["RemoteHost"] . multiPlayerObj[A_Index]["RemotePort"] . sysStaticParams . romParams . fullscreen . hlsl . glsl . cheatEnabled . volume . inipath . verticalRotationMode . videomode . artworkCrop . useBezels . useOverlays . useBackdrops . useCpanels . useMarquees . autosave . bootscript . bilinearEnabled . " -skip_gameinfo", emuPath, winstate, Screen%A_Index%PID) WinWait("ahk_pid " . Screen%A_Index%PID) } ignoreWindows := "MAMEOutput" ; ignore the mame debug window Loop, %networkPlayers% { WinGet, Screen%A_Index%ID, ID, % "ahk_pid " . Screen%A_Index%PID,, %ignoreWindows% WinSet, Style, -0xC00000, % "ahk_id " . Screen%A_Index%ID,, %ignoreWindows% ToggleMenu(Screen%A_Index%ID) WinSet, Style, -0xC40000, % "ahk_id " . Screen%A_Index%ID,, %ignoreWindows% MoveWindow("ahk_id " . Screen%A_Index%ID, screenPos[A_Index].X, screenPos[A_Index].Y, screenPos[A_Index].W, screenPos[A_Index].H,,ignoreWindows) Sleep, 50 } } } If errLvl { If (errLvl = 1) Error = Failed Validity Else If(errLvl = 2) Error = Missing Files Else If(errLvl = 3) Error = Fatal Error Else If(errLvl = 4) Error = Device Error Else If(errLvl = 5) Error = Game Does Not Exist Else If(errLvl = 6) Error = Invalid Config Else If errLvl in 7,8,9 Error = Identification Error Else Error = MAME Error Log("MAME Error - " . Error,3) } WinWait("ahk_class MAME") WinWaitActive("ahk_class MAME") ;Close the debugger window if exists If (closeDebugWindow = "true") { WinWait("ahk_class MAMEDebugWindow",,2) WinClose("ahk_class MAMEDebugWindow") } BezelDraw() HideEmuEnd() If (networkPlayers = 1 || !linkEnabledGame) { WinShow, ahk_class MAME ; Show the emulator } Else { Loop %networkPlayers% WinShow, % "ahk_id " . Screen%a_index%ID ; Show the emulator WinActivate, ahk_id %Screen1ID% ; activate first player window so that first player can use keyboard instead of last player } FadeInExit() Process("WaitClose", executable) 7zCleanUp() BezelExit() If fileRenamed { ; rename file back to alternate name for next launch FileMove, %romPath%\%romName%%romExtension%, %romPath%\%originalRomName%%romExtension% If ErrorLevel ; if rename was successful, set var so we know to move it back later ScriptError("There was a problem renaming " . romName . " back to " . originalRomName) } FadeOutExit() ExitModule() ; This will simply create a new blank ini if one does not exist CheckFileMAME(file){ IfNotExist, %file% FileAppend,, %file% Return file } ListXMLInfo(rom){ ; returns MAME info about parent rom, orientation angle, resolution Global emuFullPath, emuPath ListXMLObject := Object() listXMLVarLog := RunWait, % comspec . " /c " . """" . emuFullPath . """" . " -listxml " . rom . " > tempBezel.txt", %emuPath%, Hide Fileread, ListxmlContents, %emuPath%\tempBezel.txt RegExMatch(ListxmlContents, "s) ListXMLObject["Width"].Value) { ListXMLObject["Angle"].Value := true Log("Module - This game's height is greater than its width, forcing vertical mode",5) } FileDelete, %emuPath%\tempBezel.txt Return ListXMLObject } GenerateSoftResetScript(){ ; Generates a lua script to send a soft reset to MAME Global emuPath ScriptFileName := emuPath . "\soft_reset.lua" FileDelete, %ScriptFileName% FileAppend, ( local function reset_machine() if resetcounter == nil then manager:machine():soft_reset(); resetcounter = 1; end end if resetcounter == nil then emu.wait(1); reset_machine(); end ), %ScriptFileName% Return, ScriptFileName } BezelLabel: WinSet, Transparent, 0, ahk_class ConsoleWindowClass Return HaltEmu: If pauseMethod = 1 { disableSuspendEmu = true disableRestoreEmu = true PostMessage,0x211, 1, , , ahk_class MAME } Else If pauseMethod = 2 { disableSuspendEmu = true PostMessage,0x211, 1, , , ahk_class MAME } Else If pauseMethod = 3 { disableSuspendEmu = true disableRestoreEmu = true PostMessage,% 0x0400+6, 1, , , ahk_class MAME } Else If pauseMethod = 4 { disableSuspendEmu = true PostMessage,% 0x0400+6, 1, , , ahk_class MAME } Else If pauseMethod = 5 { disableSuspendEmu = true Send, {P down} Sleep, 1000 Send, {P up} } Return RestoreEmu: If pauseMethod = 1 { PostMessage,0x212, 1, , , ahk_class MAME WinActivate, ahk_class MAME } Else If pauseMethod = 2 { PostMessage,0x212, 1, , , ahk_class MAME WinActivate, ahk_class MAME } Else If pauseMethod = 3 { PostMessage,% 0x0400+6, 0, , , ahk_class MAME WinActivate, ahk_class MAME } Else If pauseMethod = 4 { PostMessage,% 0x0400+6, 0, , , ahk_class MAME WinActivate, ahk_class MAME } Else If pauseMethod = 5 { disableSuspendEmu = true Send, {P down} Sleep, 1000 Send, {P up} WinActivate, ahk_class MAME } Else If pauseMethod = 6 WinActivate, ahk_class MAME Return CloseProcess: FadeOutStart() If (networkPlayers > 1) { Loop % networkPlayers { WinClose("ahk_id " . Screen%A_Index%ID) WinWaitClose("ahk_id " . Screen%A_Index%ID) } } Else WinClose("ahk_class MAME") Return