|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 qq771886388 于 2015-2-13 22:10 编辑
四个功能 我想先开启定时功能,时间到了开启功能 自动**,然后过一段时间再开启线程检测功能,24点关闭功能 自动**,开启功能 循环找色 ;如何联系更科学!
空间 时间差
//默认空间
变量 线程句柄
功能 定时启动脚本()
变量 指定时间,at
变量 年_月,返回值,长度,年_字,月_字,日_字,时_字,分_字
变量 时间开关 = 真
编辑框.设置文本("编辑框6","")
年_月 = 日期框.获得文本("日期框0")
调试输出(年_月)
是否成功=字符串.分割(年_月,"-",返回值)
数组空间.大小(返回值,长度)
年_字=返回值[0]
月_字=返回值[1]
日_字=返回值[2]
调试输出(返回值[0])
调试输出(返回值[1])
调试输出(返回值[2])
时_字 = 下拉框.获得文本("下拉框3")
调试输出(时_字)
分_字 = 下拉框.获得文本("下拉框4")
编辑框.设置文本("编辑框6","定时任务启动")
循环(时间开关)
提醒时间=年_字&"/"&月_字&"/"&日_字&" "&时_字&":"&分_字
调试输出(提醒时间)
at = 日期时间.当前日期()
调试输出(at)
年 = 日期时间.年(at)
月 = 日期时间.月(at)
日 = 日期时间.日(at)
时 = 日期时间.时(at)
分 = 日期时间.分(at)
调试输出(年&"/"&月&"/"&日&" "&时&":"&分)
如果(年_字 >= 年)
如果(月_字 >= 月)
如果(日_字 >= 日)
如果(时_字>=时)
如果(分_字>=分)
如果(提醒时间 == 年&"/"&月&"/"&日&" "&时&":"&分)
//***********************************************************
编辑框.设置文本("编辑框6","时间到了.....")
//*********************************************************
跳出
如果结束
否则
如果(分_字<分)
如果(时_字>时)
如果(提醒时间 == 年&"/"&月&"/"&日&" "&时&":"&分)
//***********************************************************
编辑框.设置文本("编辑框6","时间到了.....")
//***********************************************************
跳出
如果结束
否则
//辅助.消息框("[分钟<当前分钟请重新设置分钟]:"&分)
//调试输出("[ 分_字< 分]设置错误:"&分)
编辑框.设置文本("编辑框6","脚本停止工作,请重新设置日期时间")
时间开关 = 假
如果结束
如果结束
如果结束
否则
如果(时_字 < 时)
如果(日_字 > 日)
如果(提醒时间 == 年&"/"&月&"/"&日&" "&时&":"&分)
//***********************************************************
编辑框.设置文本("编辑框6","时间到了.....")
//***********************************************************
跳出
如果结束
否则
//辅助.消息框("[时<当前时请重新设置时]:"&时)
//调试输出("[ 时_字< 时,月应当>当前时]设置错误:"&时)
编辑框.设置文本("编辑框6","脚本停止工作,请重新设置日期时间")
时间开关 = 假
如果结束
如果结束
如果结束
否则
//--------------------------------设置日
如果(日_字 < 日)
如果(年_字>=年)
如果(月_字>月)
如果(提醒时间 == 年&"/"&月&"/"&日&" "&时&":"&分)
//***********************************************************
//***********************************************************
编辑框.设置文本("编辑框6","时间到了.....")
跳出
如果结束
否则
//辅助.消息框("[日<当前日期请重新设置日期]:"&日)
//调试输出("[日_字 < 日,月应当>当前月]设置错误:"&日)
编辑框.设置文本("编辑框6","脚本停止工作,请重新设置日期时间")
时间开关 = 假
如果结束
如果结束
如果结束
如果结束
否则
如果(月_字 < 月)
如果(年_字>年)
如果(提醒时间 == 年&"/"&月&"/"&日&" "&时&":"&分)
//***********************************************************
编辑框.设置文本("编辑框6","时间到了.....")
//***********************************************************
跳出
如果结束
否则
//辅助.消息框("[月份<当前月份请重新设置月份]:"&月)
//调试输出("[月_字<月设置错误];"&月)
编辑框.设置文本("编辑框6","脚本停止工作,请重新设置日期时间")
时间开关 = 假
如果结束
如果结束
如果结束
否则
//辅助.消息框("[年份<当前年份请重新设置年份]:"&年)
//辅助.消息框("[年_字<年请重新设置年份]:"&年)
编辑框.设置文本("编辑框6","脚本停止工作,请重新设置日期时间")
时间开关 = 假
如果结束
辅助.等待(1000)
循环结束
启动线程句柄 = 线程.开启("时间差.自动**","")
功能结束
功能 检测线程()
循环(真)
提醒时间="24.00"
at=日期时间.当前日期()
时=日期时间.时(at)
分=日期时间.分(at)
如果(分<1)
分="0"&分
如果结束
如果(提醒时间==时&"."&分)
//辅助.消息框("提醒时间")
如果结束
//调试输出(时&"."&分)
线程.关闭("时间差.自动**","")
启动线程句柄 = 线程.开启("时间差.循环找色","")
辅助.等待(60000)
循环结束
功能结束
功能 自动**()
鼠标.移动(100,200)
功能结束
功能 循环找色()
鼠标.右键单击(1)
功能结束
//开始按钮_点击操作
功能 开始_点击()
线程句柄 = 线程.开启("时间差.定时启动脚本","")
辅助.等待(600000)//等待一段时候后再开启功能 检测线程()
线程句柄 = 线程.开启("时间差.检测线程","")
功能结束
//退出按钮_点击操作
功能 退出_点击()
线程.关闭(线程句柄)
辅助.退出()
功能结束
空间结束
//空间结束语句
|
|