当前位置:首页 » 网页前端 » 自己做辅助脚本设置激活时间
扩展阅读
webinf下怎么引入js 2023-08-31 21:54:13
堡垒机怎么打开web 2023-08-31 21:54:11

自己做辅助脚本设置激活时间

发布时间: 2022-04-01 05:32:10

1. vba脚本如何设置使用时间限制

如果为限定在特殊时间范围内使用,可以的
' *******例1: 在每天8~17点之间可以运行,其他时间不允许
if Hour(Time) >= 8 and Hour(Time) <= 16 then
' 你的程序代码
end if
' *******例2: 在每月前5天之可以运行,其他时间不允许
if day(date) <= 5 then
' 你的程序代码
end if

2. 编辑按键精灵脚本如何设置时间

按键精灵目前没有设定在某个时刻执行脚本的功能.但您可以通过自己制作脚本来实现这个功能.具体方法有很多,我举1个例子 1. 在脚本最开始用判断时间的方法来判断是否到了执行脚本的时间,如果到了时间,就执行后继的语句,如果不到时间,就继续判断时间.脚本如下:[General] Description=Test BeginHotkey=121 BeginHotkeyMod=0 RunOnce=0 Enable=1 [Repeat] Type=0 Number=1 [Comment] Content=[Script] //RunTime是希望执行脚本的时间,比如晚上0:0:15.TimeNow是系统当前时间. Dim RunTime,TimeNow,ShowStr RunTime=CDate("16:18:00") ShowStr = "您当前设置为" + CStr(RunTime) + "开始运行脚本" VBSCall Call MessageBox(ShowStr) //开始判断时间 Rem CheckTime TimeNow = CDate(CStr(Hour(Now))+":"+CStr(Minute(Now))+":"+CStr(Second(Now))) MyVer = DateDiff("s",TimeNow,RunTime) If MyVer<60 Goto Main Else Delay 50000 Goto CheckTime EndIf //时间到了,开始执行正式的脚本内容 Rem Main VBSCall Call MessageBox("时间到了,开始执行脚本!"个脚本能不能不弹出对话框,就可以自动运行下一步的脚本

3. 按键精灵怎么设置定时启动一个脚本,我想设置触发脚本的时间是每个工作日的周一到周五早上8:00启动脚本

早上8:00自动执行的脚本如下:
rem start
nowtime=time
if hour(nowtime)=8 and minute(nowtime)=0 then
//填写你定时执行的脚本语句
end if
for 30
delay 1000
next
goto start

4. 我有个游戏的脚本辅助,有什么办法可以解除他的时间限制么或者次数限制拜托了,亲#~~

几乎没那可能,除非你直接破解脚本,取出代码在自己修改条件还差不多

5. 手机按键精灵编写了一个脚本,想让这个脚本在每天8点自动运行。 请问哪位大神给指导一下

先来说一下,你想要的效果其实不是脚本每天8点自动运行,而是脚本一直是运行的,只是每天8点开始做有效的运行工作,其他时间点一直处于“待命状态”。

如果你认同我上面所说的内容,那么就继续往下看吧。

解决这个问题有两种方法:

第一种:先计算你脚本有效的运行时间,比如1个小时,那么剩下的“待命状态”的时间就是23个小时,换句话说就是你的脚本执行完一次以后,要等待23个小时,在按键精灵里等待时间的命令就是delay,不过要换算,因为它的单位毫秒,你要把23小时等于多少毫秒算出来,建议用计算器算一下。

这种方法有一个缺点,就是你必须要在8点执行首次操作,它是24小时完成一个运行周期,并不会真的在8点执行,而是每天在某一个固定的时间执行,这个时间点取决于你首次运行的开始时间。

第二种方法:

原理是获取当前系统时间,然后判断获取的时间是不是8点,如果是8点就开始执行有效脚本,如果不是8点,那么重新获取系统时间,再次判断,这个过程重复进行,直到8点为止。

缺点是脚本比较累一直在做判断,优点是能够精准判断。

代码如下:

Do

Dim t

t = Now()

TracePrint t

Dim r

r = UTF8.Right(t, 13)

TracePrint r

Dim l

l = UTF8.Left(r, 5)

TracePrint l

If l = "08:00" Then

TracePrint "调试成功,用你的脚本替换本行"

Exit Do

Elseif l = "08:01" Then

TracePrint "调试成功,用你的脚本替换本行"

Exit Do

Else

TracePrint "调试失败"

End If

Delay 60000

Loop

稍微解释一下,

  1. 为了看着方便,变量我没有合并,

  2. 由于7个“星期”的英文所写长度不一样,所以导致日期的长度也是不一样的,那么在获取8点的方法上,我选择了从后往前找的办法。

  3. 在判断的时候为了防止脚本由于卡顿错过了8点而无法有效运行,所以追加了一个判断,就是在8点01分也是可以执行脚本。当然这是在8点没有开始脚本,如果开始了,就不会在继续判断8点01分了。

  4. 如果有啥问题可以追问,或者关注我的公众号:3分钟学堂。

这个代码我在自己电脑上做了测试,附上一个我运行的截图:

6. 软件破解。我有个按键精灵的脚本,但是他有个试用激活码,时间是15分钟每天试用3次。怎么破解每天的试

不可能的。自己写一个脚本或者找免费的。话说网上各种游戏的开源脚本很多的,自己改改就好了。

7. 给按键小精灵设置试用时间的脚本的 超过这个时间就停止

您好,哪位网友技术明显不够,可以使用延时命令,采用多线程,代码如下:
BeginThread 试用
Sub 试用
Delay 60000 * 30 //这里的30是指30分钟的意思,根据需要自己修改
ExitScript
End Sub
这个比较适合新手,把这个代码“BeginThread 试用”放到脚本需要开始计时试用时间的位置即可!如果帮到你请及时采纳,很高兴为您解答!

8. 按键精灵9如何制作自己的注册码 比如7天或者30天求源码 谢谢

额,几百行代码10分....
2个方法,
一种是注册小精灵会员,使用商业版可以添加这个功能....
另外一种比较麻烦,密钥生成你也要自己学会修改线程独特的密钥
这个加到脚本的前面后在制作成小精灵
Delay 1000
UserVar zc=48002764235672752817473257963 "请输入注册码"
mama=Plugin.GetSysInfo.GetHDDSerialNumber
VBS ma=Abs(mama)
VBS en=ma-585*56-4856156+52891680:cr=ma-585+58648489*8+en-415+415345*6
VBS ce=ma-859*46+6558*682+25826125+867954358:nl=ne*5+65954984-95457
VBS ct=en&"注"&ce&"册"&cr&"码"&nl
//注册码等于上面算出的结果则表达方式成立
If zc=ct
Goto 启动脚本
Else
ma=ma+4546446486
MessageBox "注册码错误,你的序列号是:"& ma &"。请将序列号发给卖你脚本的人,获取注册码。"
//表达方式不成立,结束脚本
ma="注册码错误,你的序列号是:"& ma &"。请将序列号发给卖你脚本的人,获取注册码。"
//下面是读出时间
Dim Y,Mon,D,W,h,m,s,SJ
Y=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)
h=Hour(time):m=Minute(time):s=Second(time)
SJ=Y&"年"&Mon&"月"&D&"号 "&"星期"&W&" "&h&"点"&m&"分"&s&"秒"
//上面是读出时间
Set objShell = CreateObject("WScript.Shell")
x = objShell.SpecialFolders.Item("desktop")
//↑取得桌面路径
set fso=CreateObject("Scripting.FileSystemObject")
const forwriting=2
const forreading=1
set myfile=fso.createtextfile(x&"\你的序列号.txt")
//↑写一个TXT到桌面
/////////////////////////////////主内容/////////////////////////////////
myfile.writeline(ma)
/////////////////////////////////主内容/////////////////////////////////
myfile.writeline(" ")
myfile.writeline("记录时间:"&SJ)
myfile.writeline(" ")
myfile.writeline(" ")
myfile.writeline("感谢您使用由《00一一一 ,按键用户 》制作的脚本,祝愿您使用愉快!!!")
myfile.writeline(" ")
myfile.writeline(" 健康游戏公告")
myfile.writeline(" ")
myfile.writeline(" 抵制不良游戏,拒绝盗版游戏。")
myfile.writeline(" 注意自我保护,谨防受骗上当。")
myfile.writeline(" 适度游戏益脑,沉迷游戏伤身。")
myfile.writeline(" 合理安排时间,享受健康生活。")
//↑这两行就是你写进TXT的内容
myfile.Close
Lleft=instr(1,awoke,"(")
Rright=instr(1,awoke,")")
EndScript
EndIf
EndScript
Rem 启动脚本
MessageBox "测试成功!!!"
这个留给自己,谁都不要给.用于给用你脚本的人来获得注册码的
Delay 1000
UserVar ma="jq4m" 请输入对方的序列号
ma=ma-4546446486
VBS en=ma-585*56-4856156+52891680:cr=ma-585+58648489*8+en-415+415345*6
VBS ce=ma-859*46+6558*682+25826125+867954358:nl=ne*5+65954984-95457
VBS ct=en&"注"&ce&"册"&cr&"码"&nl
//下面是读出时间
Dim Y,Mon,D,W,h,m,s,SJ
Y=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)
h=Hour(time):m=Minute(time):s=Second(time)
SJ=Y&"年"&Mon&"月"&D&"号 "&"星期"&W&" "&h&"点"&m&"分"&s&"秒"
//上面是读出时间
Set objShell = CreateObject("WScript.Shell")
x = objShell.SpecialFolders.Item("desktop")
//↑取得桌面路径
set fso=CreateObject("Scripting.FileSystemObject")
const forwriting=2
const forreading=1
set myfile=fso.createtextfile(x&"\对方的序列号.txt")
//↑写一个TXT到桌面
/////////////////////////////////主内容/////////////////////////////////
myfile.writeline("对方的序列号是:"&ma)
KeyPress 13,1
myfile.writeline("对方的注册码是:"&ct)
/////////////////////////////////主内容/////////////////////////////////
myfile.writeline(" ")
myfile.writeline("记录时间:"&SJ)
myfile.writeline(" ")
myfile.writeline(" ")
myfile.writeline("感谢您使用由《00一一一 ,按键用户 》制作的脚本,祝愿您使用愉快!!!")
myfile.writeline(" ")
myfile.writeline(" 健康游戏公告")
myfile.writeline(" ")
myfile.writeline(" 抵制不良游戏,拒绝盗版游戏。")
myfile.writeline(" 注意自我保护,谨防受骗上当。")
myfile.writeline(" 适度游戏益脑,沉迷游戏伤身。")
myfile.writeline(" 合理安排时间,享受健康生活。")
//↑这两行就是你写进TXT的内容
myfile.Close
Lleft=instr(1,awoke,"(")
Rright=instr(1,awoke,")")

Postscript:至于时间限制和脚本密码类似,也就是在脚本输入正确的注册码后,记录下当前的网络时间(返回值 = Lib.网络.获取网络时间()),然后通过特定的密钥加密后保存起来,在脚本运行的过程中,每分钟或小时或脚本启动时前者通过多线程后者直接添加代码获得当前网络时间与脚本第一次注册成功时间做差计算,从而限制7天或你想要的天数.....脚本内可能会有小错误,如果你会写脚本,我想这点小的语法错误不会阻碍你的脚步....我就不改了

9. 按键精灵制作一个挂机的脚本,自己是小白,研究了很久还是搞不好,哎!求教大神们麻烦给我修改完善一下

我也是小白,但是作为一个小白,我觉得你应该知道如下须知:

  1. leftclick 3这样不可取,还是3个Leftclick 1比较好

  2. 所有操作类延迟先定在400毫秒以上,后期看能优化的地方再减少时间做优化,长时间延迟有助于脚本稳定

  3. 找色要善用后面的参数,0和1不多说,2是模糊查找,如果你的颜色有变动可以用2(也就是说找不到可能颜色有细微差别)

  4. 善用断点和注释这一点非常重要!

  5. 善用断点和注释这一点非常重要!

  6. 善用断点和注释这一点非常重要!

  7. 断点:点左边的灰色竖条,会有一个蓝框,程序执行到这个地方就停止了,有助于排查问题

  8. 注释:有助于排查问题.模块化处理问题,自行分为第一阶段第二阶段,然后一个一个的排查

10. 按键精灵制作的脚本强制更新后功能都被阉割了,很想用旧版本的辅助,修改系统时间后竟然可以使用而且不强

既然可以强制更新 说明是有网络验证的,应该是没办法了

其实你的意思也不太清楚
是你买了别人辅助想用旧版的吗?脚本这东西既然出售了 有些东西可能发现有漏洞了 肯定是会强制用户更新的

还有不明白的欢迎追问,如果满意请采纳我哦亲

-----------2015-08-03 09:44:53 5