#IfWinActive, alt:V Multiplayer
#SingleInstance, Force
#Persistent
#UseHook
#NoEnv
version := 0.9
IniRead, nVoiceRangeUp, %A_ScriptDir%\settings.ini, Settings, VRU
IniRead, nVoiceRangeDn, %A_ScriptDir%\settings.ini, Settings, VRD
Hotkey, %nVoiceRangeUp%, VoiceRangeUpKey, UseErrorLevel
Hotkey, %nVoiceRangeDn%, VoiceRangeDnKey, UseErrorLevel
ToolTip, Downloading rgnbackground.png ... Bitte warten!
IfNotExist rgnbackground.png
URLDownloadToFile,https://abload.de/img/rgnbackgroundhnjnv.png, rgnbackground.png
ToolTip
Gui, Show, x400 y400 h125 w375, RGN:V TKL Voicerange
Gui, Font, S7 CDefault Bold, Verdana
Gui, Add, Text, x310 y110 BackgroundTrans, Version: %version%
Gui, Add, Text, x5 y110 BackgroundTrans, © Ananasbaum
Gui, Font, S10 CDefault Bold, Verdana
Gui, Add, Text, x15 y30 BackgroundTrans, VoiceRange +
Gui, Add, Text, x15 y60 BackgroundTrans, VoiceRange -
Gui, Add, Hotkey, x130 y30 w80 h20 vHotkeyVRU, %nVoiceRangeUp%
Gui, Add, Hotkey, x130 y60 w80 h20 vHotkeyVRD, %nVoiceRangeDn%
Gui, Add, Button, gVoiceRangeSave x230 y40 h30, Speichern
Gui, Add, Picture, x0 y0, rgnbackground.png
return
VoiceRangeSave:
Gui, Submit, NoHide
IniWrite, %HotkeyVRU%, %A_ScriptDir%\settings.ini, Settings, VRU
IniWrite, %HotkeyVRD%, %A_ScriptDir%\settings.ini, Settings, VRD
reload
return
GuiClose:
ExitApp
VoiceRangeUpKey:
Send {NumpadAdd}
return
VoiceRangeDnKey:
Send {NumpadSub}
return