求教如何计算脚本运行的时间 _ [新]综合讨论 - 按键精灵论坛
腾讯微博：
软件版本：2014.03软件大小：55.1M更新时间：
软件版本：3.0.3(免root)软件大小：36.2M更新时间：
软件版本：1.2软件大小：37.4M更新时间：
查看: 9409|回复: 21
鹰眼勋章鹰眼注册用户专属勋章学有所成学有所成勋章，新手步入按键学堂的第一枚勋章论坛GG按键论坛男性用户勋章兔年勋章（360天）兔年纪念勋章(360天)龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者4级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送
按键的功能实在太强大，功能实在是太多了，学无止境，我一直在努力。
现在想求教个问题，那就是如何计算一个脚本的运行时间呢，比如我设定个时间为10分钟，当脚本运行了10分钟后就自动停止。读取系统时间进行对比这个我会，我现在想学的就是除了这个的方法。
在线等待各位大大们的指点。
学有所成学有所成勋章，新手步入按键学堂的第一枚勋章发帖高手鼓励积极回复，但注意不要灌水哦按键元老资深按键用户的尊贵荣誉勋章
和楼主一样我也只知道这个方法t1=nowt2=datediff("s",t1,now)
鹰眼勋章鹰眼注册用户专属勋章学有所成学有所成勋章，新手步入按键学堂的第一枚勋章论坛GG按键论坛男性用户勋章兔年勋章（360天）兔年纪念勋章(360天)龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者4级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送
恩，我就知道运行时间和当前时间对比，应该会有别的方法吧？可惜我想破脑袋还是没想出来，望知道的大大们指点下
黄瓜勋章（永久）体验商业小精灵活动的奖励按键会员（月）按键会员绑定账号后自动赠送按键精灵开发者2级可通过提升认证等级来升级勋章：
我不会哦！我是菜鸟。我想的办法！！！1。写另一个脚本，内容是10分钟后点F12。 2个脚本同时运行，启动（F10）和终止热键（F12）都一样。然后，10分钟后，那个脚本就会点F12，然后2个脚本就都终止了。2。脚本里面不能设置点F12吗？我想的，设置成你说的，系统时间对比，当发现对比时间=10分钟的时候，A=系统当前时间-系统过去时间，如果A=10，则点F12。
这个脚本的终止热键是F12，然后脚本终止。这是我想的2种方法。不能这样吗？不知道能否实现。
学有所成学有所成勋章，新手步入按键学堂的第一枚勋章发帖高手鼓励积极回复，但注意不要灌水哦按键元老资深按键用户的尊贵荣誉勋章
呵呵，有意思
鹰眼勋章鹰眼注册用户专属勋章学有所成学有所成勋章，新手步入按键学堂的第一枚勋章论坛GG按键论坛男性用户勋章兔年勋章（360天）兔年纪念勋章(360天)龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者4级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送
我不会哦！我是菜鸟。我想的办法！！！1。写另一个脚本，内容是10分钟后点F12。 2个脚本同时运行，启动（ ...心凉の死 发表于
15:59 谢谢提供思路，你说的这种方法当然是可行的啦，但不知道有没有什么更简单的方法。
本帖最后由 ningxuely 于
18:02 编辑 sTime = Plugin.Sys.GetTime()这个是得到系统时间差代码（就是启动了多长时间）下面代码是我写的定时模板Dim mins = Plugin.Sys.GetTime()//计算分钟数取整fz=int(s/1000/60)rem as2 = Plugin.Sys.GetTime()//计算分钟数取整fz2=int(s2/1000/60)//后面是计算运行脚本时间差为“1”可以自定If fz2-fz>=1 Then//如果大于等于1min跳转结束 Goto sElse//不到1min继续Goto aEnd IfRem smin=fz2-fzMsgbox "您的任务执行了" & min & "分钟停止执行"
发帖高手鼓励积极回复，但注意不要灌水哦按键会员（月）按键会员绑定账号后自动赠送兔年勋章（360天）兔年纪念勋章(360天)
If jishi<600 then
jishi=jishi+1
Delay 1000
MsgBox "600秒了"
复制代码最简单了`可行不？
学有所成学有所成勋章，新手步入按键学堂的第一枚勋章发帖高手鼓励积极回复，但注意不要灌水哦按键元老资深按键用户的尊贵荣誉勋章
最简单了`可行不？永遠的神 发表于
18:34 看了这篇帖子，我也想到一个近似的方法。Dim t
Delay 1000:t=t+1
Delay 2000:t=t+2
Delay 3000:t=t+3
Delay 4000:t=t+4
MessageBox "一共"&t&"秒"
复制代码够笨的吧，呵呵
按键会员（月）按键会员绑定账号后自动赠送
t1=nowDelay 10//适当延时Rem AIf DateDiff("s",t1,now)>T //T是需要的时间，单位是秒运行的脚本EndScriptElse 运行脚本
Goto AEndIf
按键会员（月）按键会员绑定账号后自动赠送
运行的脚本去掉...
按键精灵开发者6级（新浪V认证）通过新浪微博加V后自动发放，并替换普通的认证6级勋章。 微博达人（90天）完成新浪微博加V的奖励，结合活动不定期开放申请。学有所成学有所成勋章，新手步入按键学堂的第一枚勋章兔年勋章（360天）兔年纪念勋章(360天)龙年勋章（360天）龙年纪念勋章（360天）
这些也还是取系统时间 最后进行对比的啊楼主可以试试取网络时间按键8.0代码如下：t=获取网络时间()
Delay 1000
msgbox datediff("s",t,获取网络时间())
Function 获取网络时间() //该函数取自按键精灵8.0 "我的命令库"
Dim SvrName(14),xPost,HttpAdd,NowTime,StartTime
StartTime=Now
SvrName(1) = "time-nw.nist.gov"
SvrName(2) = "time-a.nist.gov"
SvrName(3) = "time-b.nist.gov"
SvrName(4) = "time-a.timefreq.bldrdoc.gov"
SvrName(5) = "time-b.timefreq.bldrdoc.gov"
SvrName(6) = "time-c.timefreq.bldrdoc.gov"
SvrName(7) = "utcnist.colorado.edu"
SvrName(8) = "time.nist.gov"
SvrName(9) = ""
SvrName(10) = "nist1."
SvrName(11) = "nist1."
SvrName(12) = "nist1."
SvrName(13) = "nist1.aol-"
SvrName(14) = "nist1.aol-"
Set xPost=createObject("Microsoft.XMLHTTP")
Do While NowTime=""
For i=1 to 14
NowTime=""
HttpAdd="Http://" & SvrName(i) & ":13"
xPost.Open "Put", HttpAdd, False
xPost.Send
If xPost.readyState=4 Then
NowTime=mid(xPost.responsetext, 8, 17)
If NowTime
脚本作者商业小精灵作者绑定账号后自动赠送学有所成学有所成勋章，新手步入按键学堂的第一枚勋章
我想学的是,小精灵被打开后,在限制的时间内自动关闭,并不是启动脚本后所运行的时间,是精灵被打开的那一刻开始计算,,楼主这个你会吗
鹰眼勋章鹰眼注册用户专属勋章学有所成学有所成勋章，新手步入按键学堂的第一枚勋章论坛GG按键论坛男性用户勋章兔年勋章（360天）兔年纪念勋章(360天)龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者4级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送
这些也还是取系统时间 最后进行对比的啊楼主可以试试取网络时间按键8.0代码如下：longnk 发表于
嗯，不错，用网络时间进行对比的话，可行性应该会高点，哈哈，谢谢提供宝贵意见和学习代码
鹰眼勋章鹰眼注册用户专属勋章学有所成学有所成勋章，新手步入按键学堂的第一枚勋章论坛GG按键论坛男性用户勋章兔年勋章（360天）兔年纪念勋章(360天)龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者4级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送
我想学的是,小精灵被打开后,在限制的时间内自动关闭,并不是启动脚本后所运行的时间,是精灵被打开的那一刻开 ...vaetaozia 发表于
从小精灵打开就开始计时的话，然后时间到要自动关闭的话，这个估计不好弄呢，我还没想过这个问题。呵呵，小弟也是菜鸟来的，帮不了你呢。
we似曾相识
管理人员按键论坛的管理团队专属勋章按键元老资深按键用户的尊贵荣誉勋章学有所成学有所成勋章，新手步入按键学堂的第一枚勋章论坛GG按键论坛男性用户勋章活动狂人论坛活动狂人按键明星按键明星勋章马年勋章（360天） 马年纪念勋章（360天）兔年勋章（360天）兔年纪念勋章(360天)十周年勋章（360天）十周年纪念勋章龙年勋章（360天）龙年纪念勋章（360天）骨灰级按键用户3年以上的按键论坛用户黄金之翼黄金之翼勋章天使勋章天使一样的用户黄瓜勋章（永久）体验商业小精灵活动的奖励
结束进程不就可以啦。写个批处理蛤
学有所成学有所成勋章，新手步入按键学堂的第一枚勋章龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者5级可通过提升认证等级来升级勋章：
获取脚本启动时候的时间，然后多久再获取一次，再进行对比，
t1=timerem 计时开始//$$$$$$$$$在这里加入自己要运行的脚本主体$$$$$$$$$$$ t2=timett=datediff("s",t1,t2)t=cint(tt)If t>10
MessageBox "脚本运行时间已到！"
goto 结束 EndIf Goto 计时开始Rem 结束EndScript以上这段就很简单实现计时啊，何必还要舍易取繁呢？？？
QUI设计大师QUI设计大师学有所成学有所成勋章，新手步入按键学堂的第一枚勋章按键会员（季）按键会员绑定账号后自动赠送兔年勋章（360天）兔年纪念勋章(360天)
不错不错，还可以做成子程序去检查是否已经过时间
团队村三爷
学有所成学有所成勋章，新手步入按键学堂的第一枚勋章龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者4级可通过提升认证等级来升级勋章：
好像两个脚本不可以同时运行吧。。查看: 23200|回复: 233
【】最新版爱消除刷高分脚本，二三百万分随便玩
阅读权限60
主题帖子积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
在线时间103 小时
本帖最后由 小小叶 于
22:10 编辑
只要你有手机或者电脑，不管你什么分辨率，加QQ群，一定实现爱消除全自动挂机！
优酷搜索：天天爱消除最新版挂机升级脚本
安卓手机使用教程：
电脑使用脚本的教程：
作者：小小叶QQ:
刷高分，升级和刷金币，每天700盘，不多，十多万金币而已，目前为止最高效的挂机脚本，所有界面秒过！-----------------------------------------------------------
<font color="#15年11月17号更新：
增加对最新版爱消除1.0.26版本的支持
-----------------------------------------------------------
增加对最新版爱消除1.0.25版本的支持
-----------------------------------------------------------
增加对最新版爱消除1.0.22版本的支持
-----------------------------------------------------------
增加对最新版爱消除1.0.18版本的支持。
-----------------------------------------------------------
更新了2处小bug。
更强的反封号机制。
-----------------------------------------------------------
支持爱消除最新的1.17版本及之前的版本。
目前支持的分辨率有：
<font color="#ff0；480*800；480*854；540*960；720*80；；；；
-----------------------------------------------------------
支持1.17最新版的爱消除，道具页面启动脚本
增加对分辨率的支持。
-----------------------------------------------------------
增加对魅族4的支持。
-----------------------------------------------------------
增加对魅族3的支持。
目前支持的分辨率有：
支持安卓，分辨率: 480*800; 480*854; 540*960; 720*80; ; ; 其他分辨率可联系我定制，免费！
-----------------------------------------------------------
支持安卓，分辨率: 480*800; 480*854; 720*80; ; 其他分辨率可联系我定制
凡是安卓手机 ，都可以运行这个脚本进行挂机并且不封号的！如果你没法运行说明方法不对，加我QQ我会给你解决的！
注意事项: 脚本执行过程中不能帮玩！否则必封号！因为每个手机反应时间有差别，建议拿小号进行测试
1. 下载，更新到最新版
2.下载这个脚本，放在手机文件夹中
3. 脚本精灵主界面右上角文件夹按钮，点一下打开脚本
4.道具界面点三角执行脚本
脚本执行超时---脚本精灵没有取得root权限或者分辨率不匹配
执行后卡在排行榜界面没有反应---脚本精灵没有设置兼容模式
致所有爱消除玩家：
我仍然记得，在2013年的冬天，几个朋友开始玩爱消除的时候，我略带嘲讽地说这种低级三消游戏至于你们这么起劲地天天低头玩么，后来的情况你们应该能猜到，我也像大部分人一样，每天打开游戏，给所有人送个心，然后等着10分钟满了一个心玩一局，每天都玩一百多局，那个时候，宠物和对战才刚刚出来，假面狮王是最好的宠物，老婆随手一抽，抽到了假面狮王，跟我炫耀了好多天，而我只能看着我的小火龙干瞪眼。那段时间，最开心的事情应该就是我两拿着iPad一人一半屏幕去49 PK，水平正好是每局160多万，现在想想，真是太巧了，怪不得不压分基本每局都赢。再后来，接触了叉叉助手，去脚本精灵的论坛下载了西内大神的挂机脚本，看着游戏能自己玩，新奇不已，于是把老妈的三星抢了过来天天挂机，持续了大半年，到了2014年的年底，游戏更新了，西内的脚本不能用了，一切的转折从这里开始。
2015年1月，我开始上网找其他可用的脚本，遇到了很多人，大部分一看就是骗钱的，剩下来的卖脚本的人，一个比一个牛逼，感觉就是你不但要出钱，还得求着他教你怎么用。觉得憋屈，我就琢磨着自己写脚本自己挂机，顺便卖一卖，初衷很简单，赚1000块钱买一个好点的乒乓球拍就收工，结果被老婆笑话了好久，说你以为每个人都会愿意像你一样拿着手机放在那里挂着，有什么意思呢，挂机把游戏的乐趣都挂没了。尽管遭遇了泼冷水，但是为了我的挂机，也为了球拍，我还是上网开始学习lua的编程，由于在学校的一些基础，1月底就搞定了最初的1.15还是1.16挂机脚本，跟第一个杭州的客户“风清扬”测试了N天，想来也真是有趣，这兄弟天天给我打电话说脚本有哪些问题，那段时间上班空，于是改了再发，发了再改，这个qq群，应该就是在那段时间建立的，当时没人会用脚本精灵，很多人都是我一步一步教会的，特别是2015年的春节，在小橘子同学的带领下，大家都互相邀请好友，每天的消息都好几千，用小赞赞的话，就是这群里的消息，24小时不停的，大半夜都有人在讨论和问问题，在视频教程发布之前，大家充分发挥了互帮互助的精神，教会了越来越多的人，特别是丸子和涛哥，教的最认真，教的不认真的，就像橘子：聊天找我，买脚本找群主，到后来就发展成，开网店找我，买脚本找群主。。。
社会在不断地变化，这半年群里也发生了很多的改变，从1月到7月，安卓的挂机脚本支持了越来越多的分辨率，苹果的挂机脚本也是从无到有，支持了全系列的设备，卡心也从一开始的送10000心，到小鸽子，到现在的小崽子，唯一不变的就是变化，游戏不停地更新也验证了这个道理。我的个人生活也在这半年发生了很多变化，4月份儿子的降临，给家里带来了很多的欢乐，事情当然也一下子多了很多，工作也从5月份开始换了一个岗位，职业生涯迎来了最重要的转折，为期2年，所以在群里待久的人会很明显地发现，4月份之前，我从早到晚都会在群里发言，4月份之后，我基本只有每天晚上8点，工作和儿子的事情忙完之后我才会出现，对于每天白天问了很多问题，我晚上才能回复的兄弟说声抱歉，服务不周的地方多多谅解。
在内部群全员禁言之时，我曾经说过，无论多忙，我都会把挂机脚本更新下去的，以后也是，凡是游戏更新后脚本不能用，我肯定会尽快发布能用的挂机脚本，希望大家不要着急，脚本客户发展到今天的规模，已经远远超出了我当时的预期，更新脚本让大家安全挂机已经成为了一种责任。而这个游戏的核心是PK和冒险，所以以后的空余时间我应该都会放在服务PK脚本的客户身上，增加更多的功能，帮助大家去赢更多的钻石。由于个人精力有限，安卓的PK以后仅支持480*800（电脑）和（主流手机），苹果PK支持4，4S，5,5S和Retina iPad，不像之前的PK脚本支持全系列分辨率的原因是新出的单色激光道具，更新起来太费时间。
几年前的晚上，我还能抱着西瓜，看个美剧，抑或是跟朋友打个牌，看个电影，上网看个新闻，玩玩卡丁车，三国杀，等等等等，而如今，每天帮儿子洗完澡，哄睡后，我就会坐在电脑前，挨个儿回复消息，解决各种各样的问题，然后开始更新PK脚本，日复一日。窗外，夜色朦胧，苏州刚刚结束了接近一个月的梅雨季，正式入伏，据说是史上最长的一个三伏天，儿子的第一个夏天就要经受考验，是好事。闲暇之余，我也曾经思考过脚本收费和免费的问题，诚然，我的生活并不需要脚本的收入来维持，但是像爱消除这种游戏，更新速度如此之快，免费的话，更新脚本的动力又在哪里？也许一开始兴趣使然，还能写一写，长期更新脚本的话，免费肯定是坚持不下去的，毕竟要花很多的时间和精力，所以请大家理解，免费的午餐也许偶尔会有，但不可能永远。
本文结束之时，我再强调一下，我不是做生意的！最近白天上班，QQ和旺旺的消息我都没看，很多人在旺旺上质问我，没见过你这么做生意的，问个问题都不回复，对此我表示理解，如果我是买家我肯定也有意见，但是相比于工作和家庭，哪个重要不言而喻，空余时间写个脚本，更多的意义在于帮助新人实现解放双手的目的，帮助想赢钻石的玩家更容易地赢到钻石，仅此而已。
22:10 上传
点击文件名下载附件
52.41 KB, 下载次数: 2084
1.0.26版本游戏
请教楼主，脚本可以开始游戏，但是开始后不.
阅读权限10
主题帖子积分
精灵小学生, 积分 30, 距离下一级还需 20 积分
精灵小学生, 积分 30, 距离下一级还需 20 积分
在线时间1 小时
看看来能不能用！
阅读权限10
主题帖子积分
精灵学前班, 积分 13, 距离下一级还需 7 积分
精灵学前班, 积分 13, 距离下一级还需 7 积分
在线时间2 小时
为什么我的手机总显示脚本精灵已停止........三星note3
阅读权限60
主题帖子积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
在线时间103 小时
乱码怎么回事呢
用脚本精灵打开不可能乱码的
阅读权限60
主题帖子积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
在线时间103 小时
能一直挂机么
当然能一直挂机了。。。测试版只能运行2次，不限次数的加我QQ:
阅读权限10
主题帖子积分
精灵小学生, 积分 35, 距离下一级还需 15 积分
精灵小学生, 积分 35, 距离下一级还需 15 积分
在线时间12 小时
亲测，运行正常，但只能运行两次，每次就30-50W分
阅读权限15
自我介绍哥只是传说
主题帖子积分
精灵初中生, 积分 80, 距离下一级还需 20 积分
精灵初中生, 积分 80, 距离下一级还需 20 积分
在线时间58 小时
有没有540x960的楼主出一个吧
阅读权限15
自我介绍哥只是传说
主题帖子积分
精灵初中生, 积分 80, 距离下一级还需 20 积分
精灵初中生, 积分 80, 距离下一级还需 20 积分
在线时间58 小时
亲测，运行正常，但只能运行两次，每次就30-50W分
能一直挂机么
阅读权限60
主题帖子积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
在线时间103 小时
亲测，运行正常，但只能运行两次，每次就30-50W分
测试版只能运行2次，不限次数的加我QQ:
阅读权限60
主题帖子积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
精灵博士生, 积分 1577, 距离下一级还需 223 积分
在线时间103 小时
有没有540x960的楼主出一个吧
可以的，联系我
阅读权限15
自我介绍哥只是传说
主题帖子积分
精灵初中生, 积分 80, 距离下一级还需 20 积分
精灵初中生, 积分 80, 距离下一级还需 20 积分
在线时间58 小时
可以的，联系我
我早就联系你了& &你不是说找不到我这种分辨率的手机么
阅读权限10
主题帖子积分
精灵小学生, 积分 24, 距离下一级还需 26 积分
精灵小学生, 积分 24, 距离下一级还需 26 积分
在线时间0 小时
乱码怎么回事呢
Powered by你的位置：
怎样显示脚本执行进度！
22:36:42 |
来源: 按键精灵资源站
本帖最后由 wanghao85227 于
23:05 编辑
判断脚本执行进度，不知道能不能实现：
1.在屏幕上显示一个进度条（不是在QUI上显示，即小精灵在后台运行时也能看到），这个进度条对小精灵而言是透明的（否则就会影响找图、找色）
2.由于脚本由多个子程序构成，用户的不同选择会让实际执行代码的长度不一，所以要能根据实际情况判断脚本的长度并根据运行情况给出进度！[code]Sub 子程序1
& &SayString &运行子程序1&
Sub 子程序2
& &SayString &运行子程序2&
Sub 子程序3
& &SayString &运行子程序3&
Sub 子程序4
& &SayString &运行子程序4&
Sub 子程序5
& &SayString &运行子程序5&
If Form1.CheckBox1.Value = 1 Then'用户选择要执行的子程序
&&call 子程序1
If Form1.CheckBox2.Value = 1 Then
&&call 子程序2
If Form1.CheckBox3.Value = 1 Then
&&call 子程序3
If Form1.CheckBox4.Value = 1 Then
&&call 子程序4
If Form1.CheckBox5.Value = 1 Then
&&call 子程序5