TC官方合作论坛

 找回密码
 立即注册
查看: 5577|回复: 12

[游戏] 【有源码】补充定时关机脚本内容

[复制链接]
发表于 2011-12-6 09:59:04 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
//涉及了不少控件,新手可以参考学习下,献丑了:D
//(软件下载地址:http://bbs.tyuyan.com/thread-4079-1-1.html)

空间 定时关机
线程
功能 定时关机()

图片框.设置图片("图片框0","c:\\aaaa.jpg")

现在时间,现在小时,现在分,现在秒,标签显示
现在时间=系统.时间(0)
标签显示=字符串.连接("现在时间:",现在时间)
标签.设置文本("标签0",标签显示)

分隔符位置
现在时间=系统.时间(1)
分隔符位置=字符串.查找字符(现在时间,124)
现在小时=字符串.截取(现在时间,0,分隔符位置)

现在时间=字符串.移除(现在时间,分隔符位置+1,真)
分隔符位置=字符串.查找字符(现在时间,124)
现在分=字符串.截取(现在时间,0,分隔符位置)

现在时间=字符串.移除(现在时间,分隔符位置+1,真)
分隔符位置=字符串.查找字符(现在时间,124)
现在秒=字符串.截取(现在时间,0,分隔符位置)

选项1,选项2
选择小时,选择分
选项1=下拉框.得到选项("下拉框0")
// 下拉框.设置选项("下拉框0",0)
如果(选项1==-1)
选择小时=下拉框.获得内容("下拉框0",23)
下拉框.设置选项("下拉框0",23)
如果结束
如果(选项1==0)
选择小时=下拉框.获得内容("下拉框0",0)
下拉框.设置选项("下拉框0",0)
如果结束

如果(选项1==1)
选择小时=下拉框.获得内容("下拉框0",1)
下拉框.设置选项("下拉框0",1)
如果结束

如果(选项1==2)
选择小时=下拉框.获得内容("下拉框0",2)
下拉框.设置选项("下拉框0",2)
如果结束

如果(选项1==3)
选择小时=下拉框.获得内容("下拉框0",3)
        下拉框.设置选项("下拉框0",3)
如果结束

如果(选项1==4)
选择小时=下拉框.获得内容("下拉框0",4)
        下拉框.设置选项("下拉框0",4)
如果结束

如果(选项1==5)
选择小时=下拉框.获得内容("下拉框0",5)
        下拉框.设置选项("下拉框0",5)
如果结束

如果(选项1==6)
选择小时=下拉框.获得内容("下拉框0",6)
        下拉框.设置选项("下拉框0",6)
如果结束

如果(选项1==7)
选择小时=下拉框.获得内容("下拉框0",7)
        下拉框.设置选项("下拉框0",7)
如果结束

如果(选项1==8)
选择小时=下拉框.获得内容("下拉框0",8)
        下拉框.设置选项("下拉框0",8)
如果结束

如果(选项1==9)
选择小时=下拉框.获得内容("下拉框0",9)
        下拉框.设置选项("下拉框0",9)
如果结束

如果(选项1==10)
选择小时=下拉框.获得内容("下拉框0",10)
        下拉框.设置选项("下拉框0",10)
如果结束

如果(选项1==11)
选择小时=下拉框.获得内容("下拉框0",11)
        下拉框.设置选项("下拉框0",11)
如果结束

如果(选项1==12)
选择小时=下拉框.获得内容("下拉框0",12)
        下拉框.设置选项("下拉框0",12)
如果结束

如果(选项1==13)
选择小时=下拉框.获得内容("下拉框0",13)
        下拉框.设置选项("下拉框0",13)
如果结束

如果(选项1==14)
选择小时=下拉框.获得内容("下拉框0",14)
        下拉框.设置选项("下拉框0",14)
如果结束

如果(选项1==15)
选择小时=下拉框.获得内容("下拉框0",15)
        下拉框.设置选项("下拉框0",15)
如果结束

如果(选项1==16)
选择小时=下拉框.获得内容("下拉框0",16)
        下拉框.设置选项("下拉框0",16)
如果结束

如果(选项1==17)
选择小时=下拉框.获得内容("下拉框0",17)
        下拉框.设置选项("下拉框0",17)
如果结束

如果(选项1==18)
选择小时=下拉框.获得内容("下拉框0",18)
        下拉框.设置选项("下拉框0",18)
如果结束

如果(选项1==19)
选择小时=下拉框.获得内容("下拉框0",19)
        下拉框.设置选项("下拉框0",19)
如果结束

如果(选项1==20)
选择小时=下拉框.获得内容("下拉框0",20)
        下拉框.设置选项("下拉框0",20)
如果结束

如果(选项1==21)
选择小时=下拉框.获得内容("下拉框0",21)
        下拉框.设置选项("下拉框0",21)
如果结束

如果(选项1==22)
选择小时=下拉框.获得内容("下拉框0",22)
        下拉框.设置选项("下拉框0",22)
如果结束

如果(选项1==23)
选择小时=下拉框.获得内容("下拉框0",23)
        下拉框.设置选项("下拉框0",23)
如果结束

选项2=下拉框.得到选项("下拉框1")
如果(选项2==-1)
选择分=下拉框.获得内容("下拉框1",12)
下拉框.设置选项("下拉框1",12)
如果结束
如果(选项2==0)
选择分=下拉框.获得内容("下拉框1",0)
        下拉框.设置选项("下拉框1",0)
  如果结束

如果(选项2==1)
选择分=下拉框.获得内容("下拉框1",1)
        下拉框.设置选项("下拉框1",1)
如果结束

如果(选项2==2)
选择分=下拉框.获得内容("下拉框1",2)
        下拉框.设置选项("下拉框1",2)
如果结束

如果(选项2==3)
选择分=下拉框.获得内容("下拉框1",3)
        下拉框.设置选项("下拉框1",3)
如果结束

如果(选项2==4)
选择分=下拉框.获得内容("下拉框1",4)
        下拉框.设置选项("下拉框1",4)
如果结束

如果(选项2==5)
选择分=下拉框.获得内容("下拉框1",5)
        下拉框.设置选项("下拉框1",5)
如果结束

如果(选项2==6)
选择分=下拉框.获得内容("下拉框1",6)
        下拉框.设置选项("下拉框1",6)
如果结束

如果(选项2==7)
选择分=下拉框.获得内容("下拉框1",7)
        下拉框.设置选项("下拉框1",7)
如果结束

如果(选项2==8)
选择分=下拉框.获得内容("下拉框1",8)
        下拉框.设置选项("下拉框1",8)
如果结束

如果(选项2==9)
选择分=下拉框.获得内容("下拉框1",9)
        下拉框.设置选项("下拉框1",9)
如果结束

如果(选项2==10)
选择分=下拉框.获得内容("下拉框1",10)
        下拉框.设置选项("下拉框1",10)
如果结束

如果(选项2==11)
选择分=下拉框.获得内容("下拉框1",11)
        下拉框.设置选项("下拉框1",11)
如果结束

如果(选项2==12)
选择分=下拉框.获得内容("下拉框1",12)
        下拉框.设置选项("下拉框1",12)
如果结束
关机时间
选择小时1,选择分1,现在小时1,现在分1,现在秒1
选择小时1=选择小时
        选择分1=选择分
                现在小时1=现在小时
                现在分1=现在分
                现在秒1=现在秒
如果(选择小时1<现在小时1)
辅助.消息框("您选择的小时数小于现在时间的小时数")
返回 假
如果结束

如果(选择小时1==现在小时1&&选择分1<现在分1)
辅助.消息框("您选择的分钟数小于现在时间的分钟数")
返回 假
如果结束

如果(选择小时1==现在小时1&&选择分1==现在分1)
辅助.消息框("您选择的秒数小于现在时间的分钟数")
返回 假
如果结束
如果(选择小时1==现在小时1&&选择分1>现在分1)
关机时间=(选择分1-现在分1-1)*60+60-现在秒1
如果结束

如果(选择小时1>现在小时1&&选择分1==现在分1)
关机时间=(选择小时1-现在小时1-1)*60*60-现在秒1
如果结束

如果(选择小时1>现在小时1&&选择分1>现在分1)
关机时间=(选择小时1-现在小时1)*60*60+(选择分1-现在分1)*60-现在秒1
如果结束

如果(选择小时1>现在小时1&&选择分1<现在分1)
关机时间=(选择小时1-现在小时1-1)*60*60+(选择分1+60-现在分1)*60-现在秒1
如果结束

标签内容2=字符串.连接(关机时间,"秒")
标签.设置文本("标签3",标签内容2)

如果(复选框.获得状态("复选框1")==真)
窗口句柄=窗口.找到窗口("定时关机")
窗口.隐藏(窗口句柄)
如果结束

提醒时间,提醒内容,路径
等待秒数
提醒时间=编辑框.获得文本("编辑框0")
如果(类型.是否为整型(提醒时间)==假)
辅助.消息框("提醒时间请填数字秒数")
如果结束
如果(字符串.长度(提醒时间)==0)
编辑框.设置文本("编辑框0","5")
提醒时间=编辑框.获得文本("编辑框0")
辅助.消息框("提醒时间未填!请确认")
如果结束
提醒内容=编辑框.获得文本("编辑框1")
如果(字符串.长度(提醒内容)==0)
编辑框.设置文本("编辑框0","这家伙很懒,没有设置提醒")
辅助.消息框("日程提醒未填!请确认")
如果结束
路径=浏览框.获得("浏览框0")
等待秒数=提醒时间*60
如果(等待秒数>关机时间)
辅助.消息框("提醒时间超过预定关机时间")
如果结束
如果(复选框.获得状态("复选框0")==真)
辅助.等待(等待秒数*1000)
辅助.播放(路径)
辅助.等待(1000)
辅助.消息框(提醒内容)
如果结束

如果(单选框.获得状态("单选框0")==真)
辅助.等待((关机时间-1)*1000)
系统.关机(1)
如果结束

如果(单选框.获得状态("单选框1")==真)
//重启 ctrl+alt+home
辅助.等待(关机时间*1000)
键盘.按下(17)
辅助.等待(50)
键盘.按下(164)
辅助.等待(50)
键盘.按下(36)
辅助.等待(500)
键盘.弹起(17)
辅助.等待(50)
键盘.弹起(164)
辅助.等待(50)
键盘.弹起(36)
如果结束

返回 真
功能结束
功能 开始_点击()
线程=线程.开启("定时关机.定时关机","")
返回 真
//函数返回语句
功能结束

功能 退出_点击()
线程.关闭(线程)
辅助.退出()

返回 真
//函数返回语句
功能结束


功能 单选框2_点击()
如果(单选框.获得状态("单选框2")==真)
系统.关机(1)
如果结束
返回 真
功能结束

功能 热键0_热键()
窗口句柄=窗口.找到窗口("定时关机")
窗口.显示(窗口句柄)

返回 真
功能结束
空间结束
回复

使用道具 举报

发表于 2011-12-6 11:33:50 | 显示全部楼层
路过~~~
回复 支持 反对

使用道具 举报

发表于 2011-12-6 11:44:22 | 显示全部楼层
z怎么下载东西
回复 支持 反对

使用道具 举报

发表于 2011-12-6 12:29:31 | 显示全部楼层
顶个   
问个问题
如果   编辑框   输入多少  秒后  进行关机
   而那个  编辑框   随时间一秒一秒的  减下去??
回复 支持 反对

使用道具 举报

 楼主| 发表于 2011-12-6 12:57:58 | 显示全部楼层
回复 4楼shi317920304的帖子

额,这个是分2个部分,第一部分选择的时间是预定你在几点关机或者重启。
第二部分的附加功能,是能让你在关机时间前设置个提醒。比如你在晚上八点的时候想设定晚上23::0关机,21:30收菜,你就可以在选择时间那小时选23,分钟选0,执行动作默认是关机不用管。把播放提醒音乐选项勾上,选择一首自己喜欢的音乐,提醒内容写收菜,提醒时间填90分钟后提醒。软件界面只显示你设置的内容,然后脚本根据现在时间算出距离提醒时间所需毫秒数,距离关机所需秒数,准时完成指令
回复 支持 反对

使用道具 举报

发表于 2011-12-6 16:36:30 | 显示全部楼层
ding起
回复 支持 反对

使用道具 举报

发表于 2011-12-6 20:10:54 | 显示全部楼层
回复 5楼花落莫相离的帖子

其实我是想问下
   那个     定时炸弹   的倒计时      会么:~
回复 支持 反对

使用道具 举报

发表于 2011-12-6 20:12:22 | 显示全部楼层
回复 0楼shi317920304的帖子

电视上   定时炸弹    那种   倒计时      会么0 0 请教……
回复 支持 反对

使用道具 举报

 楼主| 发表于 2011-12-6 23:21:01 | 显示全部楼层
回复 8楼shi317920304的帖子

呃,炸中央银行还是天安门呢
回复 支持 反对

使用道具 举报

发表于 2011-12-7 11:39:17 | 显示全部楼层
回复 9楼花落莫相离的帖子

炸也要炸  国外啊   是吧   咱是爱国青年   哈哈
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-4-28 02:53 , Processed in 0.044235 second(s), 22 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表