Code: Select all
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
#Warn ; Recommended for catching common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
SetWorkingDir ..\ ; Makes the root folder \files
Settings()
return
Settings()
{
static SoundHint
Static makeImage =
Gui, 10:font, s30
Gui, 10:add, picture, x20 w50 h-1 gCheckSound vTestSound, elements\RadioNO.png
Gui, 10:add, text, x+12 vSoundHint, Sound
Gui, 10:show, center AutoSize, Current Settings
Return
CheckSound:
makeImage := !makeImage
if makeImage
GuiControl,10:, TestSound, elements\RadioYES.png
else
GuiControl,10:, TestSound, elements\RadioNO.png
soundbeep
return
}
10GuiClose:
10Guiescape:
exitapp