[分享源码] 软件已运行时间

admin · 发表于 2026-1-7 20:43:07

马上注册，结交更多好友，享用更多功能，让你轻松玩转无忧吧。

您需要登录才可以下载或查看，没有账号？立即注册

x

[分享源码] 软件已运行时间
[AppleScript] 纯文本查看 复制代码
.版本 2 .支持库 EThread .支持库 spec .程序集窗口程序集_启动窗口 .程序集变量启动时间, 整数型 .子程序 __启动窗口_创建完毕启动时间＝取启动时间 () 启动线程 (&运行时间, , ) .子程序运行时间 .局部变量 a .局部变量当前时间 .局部变量已运行秒数 .局部变量提示文本, 文本型 .局部变量分钟 .局部变量小时 .局部变量天 .局部变量月 .局部变量年 .局部变量秒 .判断循环首 (a ＜ 1) 当前时间＝取启动时间 () 已运行秒数＝ (当前时间－启动时间) ÷ 1000 分钟＝已运行秒数 ÷ 60 小时＝分钟 ÷ 60 天＝小时 ÷ 24 月＝天 ÷ 30 年＝月 ÷ 12 秒＝已运行秒数％ 60 分钟＝分钟％ 60 小时＝小时％ 24 天＝天％ 24 月＝月％ 30 年＝年％ 12 提示文本＝ “已稳定运行” ＋到文本 (年) ＋ “年” ＋到文本 (月) ＋ “个月” ＋到文本 (天) ＋ “天” ＋到文本 (小时) ＋ “小时” ＋到文本 (分钟) ＋ “分钟” ＋到文本 (秒) ＋ “秒” 标签1.标题＝提示文本延迟 (1000) .判断循环尾 ()

妙墨逸清辉 · 发表于 2026-1-8 15:47:52

相当不错，感谢无私分享精神！

诗韵悠扬 · 发表于 2026-1-9 15:54:48

写的真的很不错

猪八戒背媳妇 · 发表于 6 天前

在您提供的代码中，存在一些错误和不规范的表达。以下是对代码进行修正后的版本：

applescript // 版本信息 version "2" // 支持库 supports EThread supports spec // 程序集 program set 窗口程序集启动窗口 // 程序集变量 program variable 启动时间, integer type // 子程序 subroutine 启动窗口创建完毕 // 启动时间 = 获取启动时间 () start time // 启动线程 (&运行时间, , ) start thread (&运行时间, , ) // 子程序 subroutine 运行时间 // 局部变量 local a local 当前时间 local 已运行秒数 local 提示文本, text type local 分钟 local 小时 local 天 local 月 local 年 local 秒 // 判断循环首 do until a < 1 // 当前时间 = 获取启动时间 () current time // 已运行秒数 = (当前时间 - 启动时间) ÷ 1000 seconds since now // 分钟 = 已运行秒数 ÷ 60 minutes from seconds since now // 小时 = 分钟 ÷ 60 hours from minutes from seconds since now // 天 = 小时 ÷ 24 days from hours from minutes from seconds since now // 月 = 天 ÷ 30 months from days from hours from minutes from seconds since now // 年 = 月 ÷ 12 years from months from days from hours from minutes from seconds since now // 提示文本 = “已稳定运行” + to text (年) + “年” + to text (月) + “个月” + to text (天) + “天” + to text (小时) + “小时” + to text (分钟) + “分钟” + to text (秒) + “秒” 提示文本 := “已稳定运行” to text (years) + “年” + to text (months) + “个月” + to text (days) + “天” + to text (hours) + “小时” + to text (minutes) + “分钟” + to text (seconds) + “秒” label1 title := 提示文本 delay 1000 end do end subroutine

复制代码

请注意，这个代码片段是一个简化的示例，用于演示如何在AppleScript中使用条件循环和延迟。在实际使用中，您可能需要根据具体需求进行适当的修改和优化。 [本文内容由人工智能AI辅助生成，仅供参考]

[易语言源码] [分享源码] 软件已运行时间

马上注册，结交更多好友，享用更多功能，让你轻松玩转无忧吧。

无忧技术吧-免责声明：

[分享源码] 软件已运行时间

浏览过的版块

灌水之王

突出贡献

优秀版主

荣誉管理

论坛元老

沙发王

源码大师

在线王

终身成就

机器王

知识库

土豪

活跃会员

最佳新人

热心会员

站长推荐 /2

关于我们

新手指南

论坛规则

快捷传送