Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- MEmu := "AppleWin"
- MEmuV := "1.30.18.0"
- MURL := ["https://github.com/AppleWin"]
- MAuthor := ["Tancrede654"]
- MVersion := "2.2.1"
- MCRC := ""
- iCRC := ""
- MID := ""
- MSystem := ["Apple II"]
- ;----------------------------------------------------------------------------
- ; Notes:
- ; Quick & dirty module for AppleWin.
- ; The launch configuration is handled by AppleWin config & savestate files, leaving screen mode to the module.
- ;
- ; ROMs folder structure :
- ; ├─ /Apple II
- ; │ └─ /romName
- ; │ └─ romFile(s)
- ; │ └─ romName.aws.yaml
- ;
- ; Rom extention must be aws.yaml
- ; If configuration file named romName doesn't exist at romName launch, it will be automaticaly created.
- ;
- ;----------------------------------------------------------------------------
- StartModule()
- BezelGUI()
- FadeInStart()
- primaryExe := new Emulator(emuPath . "\" . executable)
- configFolder := moduleIni.Read("Settings", "configFolder","false")
- configExtension := moduleIni.Read("Settings", "configExtension",".awcf")
- screenMode := moduleIni.Read("Settings", "screenMode","false")
- emuWindow := new Window(new WindowTitle(,"APPLE2FRAME"))
- screenMode := If screenMode = "true" ? "-full-screen" : "-no-full-screen"
- primaryExe.Run("-conf """ . configFolder . "\" . romName . configExtension . """ -load-state """ . romPath . "\" . romName . romExtension . """ " . screenMode)
- FadeInExit()
- primaryExe.Process("WaitClose")
- 7zCleanUp()
- BezelExit()
- FadeOutExit()
- ExitModule()
- CloseProcess:
- FadeOutStart()
- emuWindow.Close()
- Return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement