Outils pour utilisateurs

Outils du site


tutos:software:systemes:abc80luxor
La version la plus récente de ce document est une ébauche.DiffCette version est dépassée. Une version approuvée plus récente existe.DiffCette version (2017/01/09 18:14) est en ébauche.
Approuvés: 0/1

Ceci est une ancienne révision du document !


Ajout du système ABC80 LUXOR

Auteur : micaelo14

ABC80 Luxor

Pour ce système nous utiliserons ce module :

MEmu = ABCWin Version 2.0 Beta Copyright 2006 Erik Isaksson
MEmuV =
MURL =
MAuthor = craiganderson
MVersion =
MCRC =
iCRC =
MID =
MSystem = "abc80"
;----------------------------------------------------------------------------
; Notes:
;
;----------------------------------------------------------------------------

StartModule()
BezelGUI()
FadeInStart()

settingsFile := modulePath . "\" . moduleName . ".ini"
Fullscreen := IniReadCheck(settingsFile, "Settings", "Fullscreen","true",,1)
BezelStart("fixResMode")

SetCapsLockState, On

Run(executable, emuPath)

WinWait("ahk_class ABCWIN")
WinWaitActive("ahk_class ABCWIN")

Sleep, 100

WinMenuSelectItem, ahk_class ABCWIN, , Setup, Configuration...

WinWait("Configuration ahk_class #32770")
WinWaitActive("Configuration ahk_class #32770")

; loads selected game into drive 0
Loop {
ControlGetText, edit1Text, Edit1, ahk_class #32770
If ( edit1Text = romPath . "\" . romName . romExtension )
Break
Sleep, 100
ControlSetText, Edit1, %romPath%\%romName%%romExtension%, ahk_class #32770
}
Sleep, 250
ControlSend, Button1, {Enter}, ahk_class #32770

WinWait("ahk_class ABCWIN")
WinWaitActive("ahk_class ABCWIN")

; centers emulator window
WinGetPos,,, Width, Height, aahk_class ABCWIN
WinMove, aahk_class ABCWIN,, (A_ScreenWidth/2)-(Width/2), (A_ScreenHeight/2)-(Height/2)

; types "RUN" and then types the name of the rom/dsk file
Sleep, 3000
SetKeyDelay, 50, 50
Send, {R down}{R up}{U down}{U up}{N down}{N up}
Sleep, 100
Send, {Space down}{Space up}
Sleep, 100
Loop, parse, romName
{
Send, {%A_LoopField% Down}
Sleep, 50
Send, {%A_LoopField% Up}
}

; hits the ENTER button
Sleep, 100
Send, {Enter down}{Enter up}

If Fullscreen = true
{
Sleep, 100
SetKeyDelay, 50, 50
Send {Alt down}{Enter down}{Alt up}{Enter Up}
}

BezelDraw()
FadeInExit()

Process("WaitClose", executable)
7zCleanUp()
BezelExit()
FadeOutExit()
ExitModule()

CloseProcess:
SetCapsLockState, Off
FadeOutStart()
WinClose("ahk_class ABCWIN")
Process, Close, ABC80.exe
WinShow, ahk_class Shell_TrayWnd
Return

Comme ceci pour RL :

tutos/software/systemes/abc80luxor.1483982064.txt.gz · Dernière modification: 2017/01/09 18:14 de himura95