TC官方合作论坛

 找回密码
 立即注册
查看: 3117|回复: 8

[功能] 【有源码】鼠标一段时间不动便自动关机的小脚本

[复制链接]
发表于 2012-9-24 10:27:24 | 显示全部楼层 |阅读模式
宿舍一个同学总是玩完电脑就忘了关,拜拜浪费了很多电,本着节约的原则写了这个小脚本,大家觉得对自己有用的支持下吧,功能比较简单:随时判断鼠标是否移动,如果移动则记录一个新的鼠标点,否则不断获取系统时间,直到时间与第一次获取的时间的差大于等于你设定的时间,然后执行自动关机.代码自己看.顺便感谢自然大神提供的思路
下载地址:



源码
空间 自动关机
tw,tw1,x1,y1,x2,y2,time1,time2,是否开启
isstop
功能 开始_点击()
    if(是否开启==0)
    tw=thread.beginthread("自动关机.关机","")
    是否开启=1
    else
        help.messagebox("已经开启了")
    endif
    返回 真
功能结束
功能 退出_点击()
    辅助.退出()
    返回 真
功能结束
功能 关机()
    value=edit.gettext("edit0")
    if(str.strleng(value)==0)
        help.messagebox("请输入时间")
        return true
    endif
    help.messagebox("开启成功")
    while(true)
     time1=system.gettickcount()
    while(isstop==true)
        time2=system.gettickcount()   
            if(time2-time1>=convert.strtoint(value)*60*1000)  
                system.shutdown(5)
                break
            endif
            help.sleep(200)
    endwhile
    help.sleep(200)
    endwhile
    return true
功能结束
功能 mousemove()
while(true)
    mouse.getmousepoint(x1,y1)
    help.sleep(200)
    mouse.getmousepoint(x2,y2)
    if(x2==x1)
        isstop=true
    else
        isstop=false
    endif
    help.sleep(200)
endwhile
    返回 真
功能结束
功能 自动关机_关闭()
     value=edit.gettext("edit0")
    help.writeini("time","smarttime",value,".\\config.ini")//配置在exe相同的目录下
    thread.closethread(tw)
    辅助.退出()
    返回 真
功能结束
功能 初始化()
    config
    config=help.readini("time","smarttime",".\\config.ini")
    edit.settext("edit0",config)
    help.settray("自动关机",false)
    tw1=thread.beginthread("自动关机.mousemove","")   
    返回 真
功能结束
空间结束

本帖子中包含更多资源

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

x
回复

使用道具 举报

发表于 2012-9-24 10:28:25 | 显示全部楼层
有点邪恶
回复 支持 反对

使用道具 举报

发表于 2012-9-24 10:29:01 | 显示全部楼层
多谢分享
回复 支持 反对

使用道具 举报

发表于 2012-9-24 10:29:22 | 显示全部楼层
   支持下楼主。 为人民服务啊!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-9-24 10:30:41 | 显示全部楼层
回复 2楼绝恋冰封的帖子

不邪恶..很节约..
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-9-24 10:31:38 | 显示全部楼层
回复 4楼Abin的帖子

谢谢哈..为人民服务
回复 支持 反对

使用道具 举报

发表于 2012-9-24 10:48:12 | 显示全部楼层
拿去整人吧,开机启动,看着电影突然关机
回复 支持 反对

使用道具 举报

发表于 2012-9-24 16:21:04 | 显示全部楼层
给剧终友情一顶。
回复 支持 反对

使用道具 举报

发表于 2013-6-19 16:21:14 | 显示全部楼层
呵呵,正想要这个功能
回复 支持 反对

使用道具 举报

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

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

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

GMT+8, 2024-5-5 08:56 , Processed in 0.049563 second(s), 24 queries .

Powered by 海安简单软件服务部

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

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