Code: Select all
MyGui := Gui()
MyGui.Show
MyGui.BackColor := "EEAA99"
WinSetTransColor("EEAA99", MyGui)
MyGui.Opt("-Caption +AlwaysOnTop")
MyGui.Move(446, 782, 900, 900)
Skill := []
SkillProgress := []
; create progress bars
Loop 10 {
ProgressBar := MyGui.AddProgress("w60 h5 cFFFFFF Background000001 vTempVar", 100)
Skill.Push(ProgressBar)
Skill[A_Index].Name := A_Index
Skill[A_Index].Move(0 + 65 * (A_Index - 1), 5)
SkillProgress.Push(MyGui["" A_Index])
}
; updates progress bars
SkillUsed(x) {
SkillProgress[x].Value := 0
Loop {
if SkillProgress[x].Value > 100
break
SkillProgress[x].Value += 1
Sleep 100
}
}
; skills
e:: {
SkillUsed(1)
}
r:: {
SkillUsed(2)
}