如何将按键精灵的这2个脚本放在一个脚本里一起使用?

来源:百度知道 编辑:UC知道 时间:2024/06/28 00:12:46
我这有2个脚本,可怎么改都不能放到一起使用,好象是我修改的不对,麻烦大家帮我看下,因该怎么弄才能放到一起使用?

===================脚本一(一个抓坐标用的)=============
VBS dim x,y
VBSCall GetCursorPos(x,y)
VBSCall MessageBox("坐标为:"&x&","&y&"")
===================脚本二(一个拥护自定义变量)============
UserVar dx1=900 点击“↓”的x坐标:
UserVar dy1=566 点击“↓”的y坐标:
UserVar dx2=643 点钩的x坐标:
UserVar dy2=566 点钩的y坐标:
//无限交接任务
Rem 开始
MoveTo dx1,dy1
LeftClick 1
MoveTo dx2,dy2
LeftClick 1
Goto 开始
======================================
想实现效果:
当按下小键盘上的“.”键调用脚本1,抓取坐标
当按下小键盘上的“+”键调用脚本2,开始循环运做脚本
当按下小键盘上的“-”键停止脚本2的运做,且保持监视状态,确保下次按键有效

麻烦高手帮我弄下,我今天弄了一上午了真弄不出来了。。。
谢谢了
脚本不动啊。。。

郁闷了。。。

楼主这个你要看看你小盘键锁上了没,还有这脚本要先运行(默认F10运行)再才监测你的按键做出反应.还不行留下QQ或发信息给我,

楼不会是想把脚本一得到的坐标放到脚本二里运行吧?那样的话没必要用户定义的呀?请说清楚点

2楼的你说错错在哪? 你知道GetLastKey语句吗? 你那方法谁不会呀

1.如果不设置热键的话可以是可以 但有一缺点就是可能要按2次“-”脚本二才会停止 (因为是脚本2是监测上次按的键来停止调用的)
2.另外我帮你加上了延迟如果不需要的可以删掉.

UserVar dx1=900 点击“↓”的x坐标:
UserVar dy1=566 点击“↓”的y坐标:
UserVar dx2=643 点钩的x坐标:
UserVar dy2=566 点钩的y坐标:
Rem 主程序
WaitKey K
If K=110
Gosub 脚本一
ElseIf K=107
Gosub 脚本二
EndIf
Delay 200
Goto 主程序
Sub 脚本一
VBS dim x,y
Delay 10
VBSCall GetCursorPos(x,y)
Delay 10
VBSCall MessageBox("坐标为:"&x&","&y&"")
Return
Sub 脚本二
Rem 开始
MoveTo dx1,dy1
Delay 10
LeftClick 1
MoveTo dx2,dy2
Delay 10
LeftClick 1
Delay 100
GetLastKey key
If key=109
Goto 主程序
Else
Goto 开始
EndIf
Delay 100
Return