程序的休眠定时问题

jiajunchao

设定程序为晚上20：00开始休眠，早上六点结束休眠，这个应该怎么写希望大神给提供一下思路或者给个例程2，万分感谢

chenboss

jiajunchao 发表于 2024-11-15 17:38
大哥，你咋没早看到我的贴子，我自己好一顿研究呀

可以了吗，给个好评

LEOONL

  

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
现行时间	日期时间型
秒数	整数型

现行时间 ＝ 取现行时间 ()
秒数 ＝ 取小时 (现行时间) × 3600 ＋ 取分钟 (现行时间) × 60 ＋ 取秒 (现行时间)
如果真 (秒数 ＞ 6 × 3600 或 秒数 ＜ 20 × 3600)

.版本 2<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 现行时间, 日期时间型<br /> .局部变量 秒数, 整数型<br /> <br /> 现行时间 ＝ 取现行时间 ()<br /> 秒数 ＝ 取小时 (现行时间) × 3600 ＋ 取分钟 (现行时间) × 60 ＋ 取秒 (现行时间)<br /> .如果真 (秒数 ＞ 6 × 3600 或 秒数 ＜ 20 × 3600)<br /> <br /> .如果真结束

补充内容 (2024-11-15 14:32):
应该是且，把或改成且

LEOONL

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
休眠	逻辑型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果 (休眠 ＝ 真)
调试输出 (1)
调试输出 (2)

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
现行时间	日期时间型
秒数	整数型

现行时间 ＝ 取现行时间 ()
秒数 ＝ 取小时 (现行时间) × 3600 ＋ 取分钟 (现行时间) × 60 ＋ 取秒 (现行时间)
如果 (秒数 ＞ 6 × 3600 且 秒数 ＜ 20 × 3600)
休眠 ＝ 假
休眠 ＝ 真

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 休眠, 逻辑型<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果 (休眠 ＝ 真)<br />     调试输出 (1)<br /> .否则<br />     调试输出 (2)<br /> .如果结束<br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 现行时间, 日期时间型<br /> .局部变量 秒数, 整数型<br /> <br /> 现行时间 ＝ 取现行时间 ()<br /> 秒数 ＝ 取小时 (现行时间) × 3600 ＋ 取分钟 (现行时间) × 60 ＋ 取秒 (现行时间)<br /> .如果 (秒数 ＞ 6 × 3600 且 秒数 ＜ 20 × 3600)<br />     休眠 ＝ 假<br /> .否则<br />     休眠 ＝ 真<br /> .如果结束

jiajunchao

LEOONL 发表于 2024-11-15 14:34
[e=0].版本 2
.支持库 spec

如果改成上午十一点开始下午13点结束就不行了 大佬

jiajunchao

LEOONL 发表于 2024-11-15 14:34
[e=0].版本 2
.支持库 spec

或者改成凌晨一点开始六点结束也不行，就是因为这个困扰我好几天了 一直不会写

LEOONL

jiajunchao 发表于 2024-11-15 14:45
如果改成上午十一点开始下午13点结束就不行了 大佬

如果真 (秒数 ＞ 11 × 3600 且 秒数 ＜ 13 × 3600)

为啥不行，这样不就行了？

LEOONL

jiajunchao 发表于 2024-11-15 14:48
或者改成凌晨一点开始六点结束也不行，就是因为这个困扰我好几天了 一直不会写 ...

如果真 (秒数 ＞ 1 × 3600 且 秒数 ＜ 6 × 3600)

怎么算个20以内的加减法都不会吗

背靠背拥抱

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
本地时间	日期时间型
整点时间	整数型
执行一次	逻辑型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

时钟1.时钟周期 ＝ 1000  ' 一秒执行一次，换成一分钟执行一次也行，看需求。
执行一次 ＝ 假

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

本地时间 ＝ 取现行时间 ()
整点时间 ＝ 取时间部分 (本地时间, 6)  ' 获取当前整点时间
如果 (整点时间 ≥ 20 且 整点时间 ≤ 24 或 整点时间 ≥ 0 且 整点时间 ≤ 6)  ' 晚上八点~~~~~早上六点内
' 只执行一次你的代码让系统休眠，防止一直触发浪费资源
如果真 (执行一次 ＝ 假)
执行一次 ＝ 取反 (执行一次)
休眠（）

' 只执行一次你的代码让系统唤醒，防止一直触发浪费资源
如果真 (执行一次 ＝ 真)
执行一次 ＝ 取反 (执行一次)
唤醒（）

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 本地时间, 日期时间型<br /> .程序集变量 整点时间, 整数型<br /> .程序集变量 执行一次, 逻辑型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 时钟1.时钟周期 ＝ 1000  ' 一秒执行一次，换成一分钟执行一次也行，看需求。<br /> 执行一次 ＝ 假<br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> 本地时间 ＝ 取现行时间 ()<br /> <br /> 整点时间 ＝ 取时间部分 (本地时间, 6)  ' 获取当前整点时间<br /> <br /> .如果 (整点时间 ≥ 20 且 整点时间 ≤ 24 或 整点时间 ≥ 0 且 整点时间 ≤ 6)  ' 晚上八点~~~~~早上六点内<br />     ' 只执行一次你的代码让系统休眠，防止一直触发浪费资源<br />     .如果真 (执行一次 ＝ 假)<br />         执行一次 ＝ 取反 (执行一次)<br />         休眠（）<br />     .如果真结束<br /> <br /> .否则<br />     ' 只执行一次你的代码让系统唤醒，防止一直触发浪费资源<br />     .如果真 (执行一次 ＝ 真)<br />         执行一次 ＝ 取反 (执行一次)<br />         唤醒（）<br />     .如果真结束<br /> <br /> .如果结束

例子.e (948.42 KB, 下载次数: 1)

7 天前 上传

点击文件名下载附件

jiajunchao

LEOONL 发表于 2024-11-15 14:50
如果真 (秒数 ＞ 1 × 3600 且 秒数 ＜ 6 × 3600)

怎么算个20以内的加减法都不会吗 ...

额，大佬你运行一下试试，我就是这样改的