Advertisement
Guest User

Untitled

a guest
Dec 30th, 2024
17
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.57 KB | None | 0 0
  1. MEmu := "AppleWin"
  2. MEmuV := "1.30.18.0"
  3. MURL := ["https://github.com/AppleWin"]
  4. MAuthor := ["Tancrede654"]
  5. MVersion := "2.2.1"
  6. MCRC := ""
  7. iCRC := ""
  8. MID := ""
  9. MSystem := ["Apple II"]
  10. ;----------------------------------------------------------------------------
  11. ; Notes:
  12. ; Quick & dirty module for AppleWin.
  13. ; The launch configuration is handled by AppleWin config & savestate files, leaving screen mode to the module.
  14. ;
  15. ; ROMs folder structure :
  16. ; ├─ /Apple II
  17. ; │ └─ /romName
  18. ; │ └─ romFile(s)
  19. ; │ └─ romName.aws.yaml
  20. ;
  21. ; Rom extention must be aws.yaml
  22. ; If configuration file named romName doesn't exist at romName launch, it will be automaticaly created.
  23. ;
  24. ;----------------------------------------------------------------------------
  25. StartModule()
  26. BezelGUI()
  27. FadeInStart()
  28.  
  29. primaryExe := new Emulator(emuPath . "\" . executable)
  30.  
  31. configFolder := moduleIni.Read("Settings", "configFolder","false")
  32. configExtension := moduleIni.Read("Settings", "configExtension",".awcf")
  33. screenMode := moduleIni.Read("Settings", "screenMode","false")
  34.  
  35. emuWindow := new Window(new WindowTitle(,"APPLE2FRAME"))
  36.  
  37. screenMode := If screenMode = "true" ? "-full-screen" : "-no-full-screen"
  38.  
  39. primaryExe.Run("-conf """ . configFolder . "\" . romName . configExtension . """ -load-state """ . romPath . "\" . romName . romExtension . """ " . screenMode)
  40.  
  41. FadeInExit()
  42. primaryExe.Process("WaitClose")
  43.  
  44. 7zCleanUp()
  45. BezelExit()
  46. FadeOutExit()
  47. ExitModule()
  48.  
  49. CloseProcess:
  50. FadeOutStart()
  51. emuWindow.Close()
  52. Return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement