大掌门变态版最强阵容:按键精灵脚本问题

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 23:50:34
如何在以下脚本中输入“tyty”前循环输入1-1000的数字?变成输入“1tyty”,当脚本循环第二次的时候输入“2tyty”,依次类推,当脚本循环第1000次的时候输入“1000tyty”。调试成功即追加送分,送到不能送为止。脚本如下:

MoveTo 441 546
Delay 1719
LeftClick 1
MoveTo 443 546
KeyDown 84 1
Delay 93
KeyUp 84 1
Delay 47
KeyDown 89 1
Delay 141
KeyUp 89 1
Delay 47
KeyDown 84 1
Delay 140
KeyUp 84 1
Delay 16
KeyDown 89 1
Delay 78
KeyUp 89 1
说清楚了的啊,在按键精灵的脚本里使用。

用5.5版本测过<回答者:gzg_007 - 助理 二级 8-27 21:51>可用
解决方法很不错,因为是内置的程序,节省空间和编辑效率(相对于把所有按键代码全部列出,尤其是特别多的时候,比如100000循环而不是1000).
如果要输出纯笨工按键序列的话,给我发消息.程序已完成.(非精灵内置)

设置变量,循环+1,每次加输出自己的数字,然后输出tyty,这是主要思想,如果说了还不明白,1.是楼主没有这个头脑分析这个事情,2.是可能比较懒。

作弊软件,不喜欢,有问题也该

word="tyty"
VBS Dim n
VBS Dim m
m=1001
VBSCall RunApp("notepad")
Delay 2000
KeyDown 18 1
KeyPress 70 1
KeyUp 18 1
Delay 500
KeyPress 37 1
Delay 500
KeyPress 88 1
Rem start
Delay 1000
m=m-1
If m=0
EndScript
Else
n=n+1
out=n&word
SayExpression out
KeyPress 13 1
EndIf
Goto start

答案绝对正确:复制以下代码!达不到要求算我菜!(我把你录制的代码优化了下)
[General]
Description=aaa
BeginHotkey=116
BeginHotkeyMod=0
RunOnce=0
Enable=1
[Repeat]
Type=0
Number=1
[CallBack]
OnSetup=
[Comment]
Content====通用脚本===.
【功能说明】.
【使用说明】.
按F5.
【作者介绍】.
我是神迹(21g).
还有问题发我E-mail:shuoyizhi@163.com.
【制作日期】.
2006.8.29
[Script]
MoveTo 441 546
Delay 1719
LeftClick 1
MoveTo 443 546
KeyPress 84 1
Delay 47
KeyPress 89 1
Delay 47
KeyPress 84 1
Delay 16
KeyPress 89 1
VBS Dim a '定义变量
VBS Dim b '定义变量
VBS Dim c '定义变量
b=0
VBSCall a=InputBox("请输入循环的次数") '弹输入框请你确定输入的次数,次数由你选择决定即使是100000也可以哦)
VBSCall c=InputBox("请输入次数后附加的文字") '弹出要你输入的后缀(就是你的tyty,这里允许你变更了,可以任何其他文字)
Rem aa '标志
a=a-1 '变量a-1,以确定你将要输入一次
b=b+1 '变量b+1 就是你前面1-999变的+1(当然你可以仿照前面再弄个输入框把+1变成变量D,这样你可以任意增大活负数减小等差了)
KeyPress 13 1 '按回车(输入换行,当然你可以是其他的你的操作.就是输入一次以后的操作
SayExpression b '输入表达式b
SayExpression c '输入表达式b
If a>0 '判断输入是否到次数(输入N次后A=0)
Goto aa '如果不是回到上面(aa)接着输入下个
Else '否则
MessageBox 输入/循环完毕 '证明输入完了,弹出信息告诉你完毕
EndIf

我不知道你上面的又移动鼠标,又按下Y,T 做什么那!