求帮忙写个按键精灵三个按键后台运行 时间随机延迟的代码

DimEnv Hwnd
Hwnd = Plugin.Window.MousePoint()
BeginThread z
BeginThread x
BeginThread c
Sub z
Do
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 90)

Loop
End Sub
Sub x
Do
Randomize
随机数=Int((5- 1 + 1) * Rnd + 1)
TracePrint 随机数
Delay 随机数 * 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 88)
Loop
End Sub
Sub c
Randomize
随机数=Int((3- 1 + 1) * Rnd + 1)
TracePrint 随机数
Delay 随机数 * 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 67)
End Sub