快速喊话脚本

① 求大神给做一个按键精灵的游戏自动喊话的后台脚本。现在的自动喊话，一切换窗口就在当前窗口生效了。

huoquchuangkou
jiange
nr = inputbox("请输入喊话内容")
Rem han
hanhua(kg)
Goto han

Sub jiange
Rem kgg
kg = InputBox("请输入喊话间隔")
kg2 = kg
If kg2 * 0 = 0 Then
Else
MessageBox "请输入数字，1000为1秒"
Goto kgg
End If
End Sub
Sub huoquchuangkou
Rem go
aa = 0
MsgBox("3秒内鼠标悬停到要喊话的游戏界面")
Delay 3000
Hwnd = Plugin.Window.MousePoint()
sval = MsgBox("鼠标放到游戏里了么？", 3, "获取游戏窗口")
If sval=7 Then
Goto go
ElseIf sval = 2 Then
MsgBox "取消成功"
EndScript
Else
End If
End Sub
Sub hanhua(a)
If aa = 1 Then
nr2 = nr & "!"
aa = 2
ElseIf aa = 2 Then
nr2 = nr & "!!"
aa = 0
Else
nr2 = nr
aa = 1
End If
Plugin.Bkgnd.KeyPress Hwnd, 13
Delay 200
SayString nr2
Delay 200
Plugin.Bkgnd.KeyPress Hwnd, 13
Delay a
End sub

② 想制作一个传奇私服的后台自动喊话脚本。 制作了一个脚本在别的程序上可以 在传奇上回车不能正常

没有循环，尝试加上循环语句就OK了，你的代码只是执行一次当然不能持续执行。。