鼠标无信号自动关机

我就我

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
水平位置	整数型
垂直位置	整数型
时间	整数型

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

置随机数种子 ()
时间 ＝ 取随机数 (500, 999)  ' 随机取得一个鼠标无动作关机时间，单位为秒
判断 (时间 ≠ 0)
时钟1.时钟周期 ＝ 1000


标题 ＝ “倒计时开始：” ＋ 到文本 (时间)

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

判断 (水平位置 ＝ 取鼠标水平位置 () 且 垂直位置 ＝ 取鼠标垂直位置 ())  ' 这句代码是对鼠标初始化定位
_启动窗口.标题 ＝ “距离关机还有：” ＋ 到文本 (时间) ＋ “秒”
时间 ＝ 时间 － 1  ' 这句是在鼠标不动的情况下开始倒计时
' 下面的代码是鼠标被移动之后的重新定位
水平位置 ＝ 取鼠标水平位置 ()
垂直位置 ＝ 取鼠标垂直位置 ()
__启动窗口_创建完毕 ()  ' 鼠标移动之后重置倒计时时间
如果真 (时间 ＜ 1)
关闭系统 (1, 假)
调试输出 (时间)

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 shell<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 水平位置, 整数型<br /> .程序集变量 垂直位置, 整数型<br /> .程序集变量 时间, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 置随机数种子 ()<br /> 时间 ＝ 取随机数 (500, 999)  ' 随机取得一个鼠标无动作关机时间，单位为秒<br /> .判断开始 (时间 ≠ 0)<br />     时钟1.时钟周期 ＝ 1000<br /> .默认<br /> <br /> .判断结束<br /> 标题 ＝ “倒计时开始：” ＋ 到文本 (时间)<br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> .判断开始 (水平位置 ＝ 取鼠标水平位置 () 且 垂直位置 ＝ 取鼠标垂直位置 ())  ' 这句代码是对鼠标初始化定位<br />     _启动窗口.标题 ＝ “距离关机还有：” ＋ 到文本 (时间) ＋ “秒”<br />     时间 ＝ 时间 － 1  ' 这句是在鼠标不动的情况下开始倒计时<br /> .默认<br />     ' 下面的代码是鼠标被移动之后的重新定位<br />     水平位置 ＝ 取鼠标水平位置 ()<br />     垂直位置 ＝ 取鼠标垂直位置 ()<br />     __启动窗口_创建完毕 ()  ' 鼠标移动之后重置倒计时时间<br /> .判断结束<br /> .如果真 (时间 ＜ 1)<br />     关闭系统 (1, 假)<br /> .如果真结束<br /> 调试输出 (时间)

我就我

亿万 发表于 2023-5-4 22:22
开源精神必须支持~

谢谢支持

我就我

一指温柔 发表于 2023-5-4 09:33
支持开源~！感谢分享

谢谢支持

我就我

396384183 发表于 2023-5-4 00:40
感谢分享，支持开源

谢谢支持

我就我

youxigw 发表于 2023-5-8 22:46
支持开源~！感谢分享

谢谢支持

youxigw

支持开源~！感谢分享

wwq200130

支持开源~！感谢分享

我就我

那就是把简单的问题复杂化了

我就我

pipicool 发表于 2023-5-3 09:12
学习一下

谢谢支持

我就我

陈大奶么么哒 发表于 2023-5-3 13:11
就这几行代码 BUG一大堆

bug在哪里？指出来啊？

我就我

亿万 发表于 2023-5-4 22:22
开源精神必须支持~

谢谢支持