-
Notifications
You must be signed in to change notification settings - Fork 0
/
salve.ahk
31 lines (27 loc) · 839 Bytes
/
salve.ahk
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#NoEnv
#SingleInstance, force
#Persistent
IfNotExist, salves
FileCreateDir, salves
If (not InStr(FileExist("salves"), "D"))
{
MsgBox, Mano tem que ter uma pasta com nome salves e não tem então flw
ExitApp
}
FileInstall, salves\salve-01.wav, salves\salve-01.wav
FileInstall, salves\salve-02.wav, salves\salve-02.wav
FileInstall, salves\salve-03.wav, salves\salve-03.wav
FileInstall, salves\salve-04.wav, salves\salve-04.wav
FileInstall, salves\salve-05.wav, salves\salve-05.wav
FileInstall, salves\salve-06.wav, salves\salve-06.wav
FileInstall, salves\salve-07.wav, salves\salve-07.wav
FileInstall, salves\salve-08.wav, salves\salve-08.wav
~^s::
salves := []
Loop, salves/*.wav, F
{
salves.Push(A_LoopFilePath)
}
Random, n, 1, % salves.Length()
SoundPlay, % "salves/" . salves[n]
Return