Code: Select all
^NumPad1::
$pause := 0
Loop,
{
Clipboard = I'm leveling up!!
sleep 450
send ^v
sleep 500
send {Enter}
Clipboard =
if ($pause)
{
return
}
}
End:: $pause := 1
Code: Select all
^NumPad1::
$pause := 0
Loop,
{
Clipboard = I'm leveling up!!
sleep 450
send ^v
sleep 500
send {Enter}
Clipboard =
if ($pause)
{
return
}
}
End:: $pause := 1
Code: Select all
#NoEnv
#SingleInstance, Force
Phrases := []
Phrases.Push({weight: 7, str: "Would you like a free sample?"})
Phrases.Push({weight: 5, str: "Random Number Generator"})
Phrases.Push({weight: 3, str: "To be or not to be?"})
Loop
MsgBox, % PickOne(Phrases).str
Esc:: ExitApp
;-------------------------------------------------------------------------------
PickOne(List) { ; every item in List has weight property
;-------------------------------------------------------------------------------
Loop, % List.Length()
TotalWeight += List[A_Index].weight
Random, r, 0.0, TotalWeight
While (r > 0)
r -= List[i := A_Index].weight
Return, List[i]
}
Code: Select all
Loop, % List.Length()
TotalWeight += List[A_Index].weight
Random, r, 0.0, TotalWeight
While (r > 0)
r -= List[i := A_Index].weight
Return, List[i]
}
Users browsing this forum: No registered users and 32 guests