运行速度上，好像易语言还真不是很快啊。

FanLi

但是易语言上手简单啊

虚vs伪

超级萌新 发表于 2023-10-23 09:42
最新优化

兄弟加上  内存加速优化 模块再试试。

超级萌新

果心豆腐酱 发表于 2023-10-23 06:58
[e=0].版本 2

.计次循环首 (10000, )

一群人都不是实践派，都只会说，大哥看看我的回复，我是来真学习交流的

超级萌新

' 谁来继续优化一下，我100万次耗时 344ms  我技术有限了

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
i	整数型
t	整数型

内存分配加速优化 (真)
SetProcessAffinityMask (-1, 4)
t ＝ 取启动时间 ()
调试输出 (时间戳转文本2 (1697965604 ＋ i))
计次循环首 (1000000, i)
时间戳转文本2 (1697965604 ＋ i)
计次循环尾 ()
调试输出 (取启动时间 () － t)
信息框 (到文本 (取启动时间 () － t), 0, , )
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
时间戳转文本2	文本型
参数名	类 型	参考	可空	数组	备 注
时间戳	长整数型

变量名	类 型	静态	数组	备 注
局_秒	长整数型
内容	字节集
小时	整数型
分钟	整数型
秒	整数型
返回内容	文本型

局_秒 ＝ 时间戳 ＋ 28800
小时 ＝ (局_秒 ％ 86400) ÷ 3600
内容 ＝ { 48, 48, 58, 48, 48, 58, 48, 48, 0 }
如果 (小时 ＜ 10)
内容 [2] ＝ 48 ＋ 小时
内容 [1] ＝ 48 ＋ 到整数 (小时 ÷ 10)
内容 [2] ＝ 48 ＋ 小时 ％ 10
分钟 ＝ (局_秒 ％ 3600) ÷ 60
如果 (分钟 ＜ 10)
内容 [5] ＝ 48 ＋ 分钟
内容 [4] ＝ 48 ＋ 到整数 (分钟 ÷ 10)
内容 [5] ＝ 48 ＋ 分钟 ％ 10
秒 ＝ 局_秒 ％ 60
如果 (秒 ＜ 10)
内容 [8] ＝ 48 ＋ 秒
内容 [7] ＝ 48 ＋ 到整数 (秒 ÷ 10)
内容 [8] ＝ 48 ＋ 秒 ％ 10
返回 (到文本 (内容))

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 i, 整数型<br /> .局部变量 t, 整数型<br /> <br /> 内存分配加速优化 (真)<br /> SetProcessAffinityMask (-1, 4)<br /> t ＝ 取启动时间 ()<br /> 调试输出 (时间戳转文本2 (1697965604 ＋ i))<br /> .计次循环首 (1000000, i)<br />     时间戳转文本2 (1697965604 ＋ i)<br /> .计次循环尾 ()<br /> 调试输出 (取启动时间 () － t)<br /> 信息框 (到文本 (取启动时间 () － t), 0, , )<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 时间戳转文本2, 文本型<br /> .参数 时间戳, 长整数型<br /> .局部变量 局_秒, 长整数型<br /> .局部变量 内容, 字节集<br /> .局部变量 小时, 整数型<br /> .局部变量 分钟, 整数型<br /> .局部变量 秒, 整数型<br /> .局部变量 返回内容, 文本型<br /> <br /> 局_秒 ＝ 时间戳 ＋ 28800<br /> 小时 ＝ (局_秒 ％ 86400) ÷ 3600<br /> 内容 ＝ { 48, 48, 58, 48, 48, 58, 48, 48, 0 }<br /> .如果 (小时 ＜ 10)<br />     内容 [2] ＝ 48 ＋ 小时<br /> .否则<br />     内容 [1] ＝ 48 ＋ 到整数 (小时 ÷ 10)<br />     内容 [2] ＝ 48 ＋ 小时 ％ 10<br /> .如果结束<br /> 分钟 ＝ (局_秒 ％ 3600) ÷ 60<br /> .如果 (分钟 ＜ 10)<br />     内容 [5] ＝ 48 ＋ 分钟<br /> .否则<br />     内容 [4] ＝ 48 ＋ 到整数 (分钟 ÷ 10)<br />     内容 [5] ＝ 48 ＋ 分钟 ％ 10<br /> .如果结束<br /> 秒 ＝ 局_秒 ％ 60<br /> .如果 (秒 ＜ 10)<br />     内容 [8] ＝ 48 ＋ 秒<br /> .否则<br />     内容 [7] ＝ 48 ＋ 到整数 (秒 ÷ 10)<br />     内容 [8] ＝ 48 ＋ 秒 ％ 10<br /> .如果结束<br /> 返回 (到文本 (内容))

1147828541

蘑菇君 发表于 2023-10-23 08:27
楼主为什么不把你1.2秒的易语言代码贴出来，让我们开心一下

人不行，怪路不平

wtflxk

为啥我的垃圾电脑本 跑10000次只用了78ms?

一剑磨十年

方法多了你这个太慢  我这边80毫秒内

sihuyc

你这种不贴易代码怎么有说服力呢

雨落无声

果心豆腐酱 发表于 2023-10-23 06:58
[e=0].版本 2

.计次循环首 (10000, )

时间戳本来可以直接转成易语言的时间，你却先转换文本，再从文本转换成时间！你不慢谁慢...

蘑菇君

楼主为什么不把你1.2秒的易语言代码贴出来，让我们开心一下