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

我想要一个只在游戏窗口生效的脚本。以下是我现在用的脚本
[General]
SyntaxVersion=2
BeginHotkey=49
BeginHotkeyMod=2
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=50
StopHotkeyMod=2
RunOnce=0
EnableWindow=
MacroID=c4a5a3d6-b74a-4a85-99b5-05fdc51f5560
Description=自动喊话
Enable=1
AutoRun=0
[Repeat]
Type=1
Number=1
[SetupUI]
Type=2
QUI=
[Relative]
SetupOCXFile=
[Comment]
[Script]
RunApp "D:\大话西游\game.ico"
KeyPress "Up", 1
KeyPress "Enter", 1
KeyPress "Up", 2
KeyPress "Enter", 1
Delay 20000

第1个回答  2022-02-11
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
第2个回答  2012-10-10
自动喊话不是这么写的吧...
1.没有无限循环
2.前面一长串是什么东西
3.RunApp "D:\大话西游\game.ico" 什么意思着实没有看懂
延时最好别Delay 20000这么写 用循环

推荐你看看按键精灵自带的那个喊话列子 有注释的 稍加修改就能用了本回答被网友采纳
第3个回答  2012-10-10
那需要改后台语句,写法差不多,就是把前台的句子全改成后台的,前面再加个找后台窗口的语句就行了
相似回答