我呢也是一个易语言狂热者，发癫的买了一本书，发癫的看完了，发癫的写一些小程序，再发癫-----
就什么都做不来了
下面给大家看下纯原创手写小软件-----定时关机 供大神们指点优化，小白们研究学习，软件界面
下面是易语言代码：倒数5秒时会读数且不能重复运行
.版本 2
.支持库 ESpeechEngine
.支持库 shell
.支持库 sock
.程序集 窗口程序集1
.程序集变量 剩余秒, 整数型
.程序集变量 文本朗读, 机读文本
.子程序 _时钟1_周期事件
标签1.标题 ＝ 到文本 (取现行时间 ())
.子程序 _时钟2_周期事件, , , 这个子程序是本软件关键，意思是你设置的关机时间=系统时间时，立即关机，“6”是取的系统时间的小时部分，“7”是分钟部分
标签2.标题 ＝ “你设置的关机时间为：” ＋ 编辑框1.内容 ＋ “时” ＋ 编辑框2.内容 ＋ “分”
.如果真 (到整数 (编辑框1.内容) ＝ 取时间部分 (取现行时间 (), 6) 且 到整数 (编辑框2.内容) ＝ 取时间部分 (取现行时间 (), 7))
关闭系统 (#关机, 真)
.如果真结束
.子程序 _按钮1_被单击, , , 下面代码是控制输入数字范围
.判断开始 (编辑框1.内容 ＝ “” 或 编辑框2.内容 ＝ “”)
信息框 (“请你设置关机时间”, 0 ＋ #错误图标, “错误”)
时钟2.时钟周期 ＝ 0
.默认
.判断结束
.如果 (到整数 (编辑框1.内容) ＞ 23 或 到整数 (编辑框2.内容) ＞ 59)
信息框 (“小时取值00-23，分钟取值00-59”, 0 ＋ #错误图标, “错误”)
.否则
时钟2.时钟周期 ＝ 1000
.如果结束
.判断开始 (编辑框1.内容 ＝ “” 或 编辑框2.内容 ＝ “”)
时钟2.时钟周期 ＝ 0
.默认
.判断结束
.如果真 (到整数 (编辑框2.内容) ＝ 取时间部分 (取现行时间 (), 7) ＋ 1)
时钟3.时钟周期 ＝ 1000
.如果真结束
.子程序 __启动窗口_创建完毕, , , 这里是禁止程序重复运行
.局部变量 本机IP, 文本型, , "0"
文本朗读.设置语音库 (“Microsoft Simplified chinese”)
更换新皮肤 (1)
本机IP ＝ 取本机IP ()
.如果 (客户1.连接 (本机IP [1], 4444) ＝ 真)
信息框 (“软件已经运行，请勿重复运行”, 0 ＋ #警告图标, “系统警告”)
销毁 ()
.否则
服务器1.端口 ＝ 4444
客户1.销毁 ()
.如果结束
.子程序 _时钟3_周期事件, , , 这是读倒数5秒
剩余秒 ＝ 59 － 取时间部分 (取现行时间 (), 8)
.如果真 (剩余秒 ≤ 5)
文本朗读.文本到语音 (0, 到文本 (剩余秒), , )
.如果真结束
虽然现在看来代码很简单，但是我作为初学者，还是花了不少时间去修改，再修改！ 提供给编程爱好者指点 交流 学习
大神们求指点
