首页 电脑教程 电脑知识 易语言的计数循环导致CPU使用率过高

易语言的计数循环导致CPU使用率过高

Jan 23, 2024 am 09:15 AM

易语言的计数循环导致CPU使用率过高

易语言的计数循环导致CPU使用率过高

你这样读法可能一秒钟就读了几百次硬盘,一分钟就读了一万多次硬盘!!!

你可以试试下面的数组方式,应该会好点!

.版本 2

.支持库 EdirectX

.程序集 窗口程序集1

.程序集变量 屏幕, 屏幕

.程序集变量 页面, 页面, , "0"

.程序集变量 横坐标, 整数型, , "0"

.程序集变量 纵坐标, 整数型, , "0"

.程序集变量 后台, 页面

.程序集变量 记录数, 整数型

.子程序 __启动窗口_创建完毕

.局部变量 n, 整数型

屏幕.创建全屏模式 (取窗口句柄 (), 800, 600, 32, 假)

后台 = 屏幕.取后台页面 ()

打开 (取运行目录 () + “data地图1.edb”, , , , , , )

记录数 = 取记录数 ()

重定义数组 (页面, 假, 记录数)

重定义数组 (横坐标, 假, 记录数)

重定义数组 (纵坐标, 假, 记录数)

到首记录 ()

.计次循环首 (记录数, n)

页面 [n].建位图页面 (屏幕, 取运行目录 () + 读 (“名称”), )

横坐标 [n] = 读 (“横坐标”) ' 按理数据库中的类型对应的话是不用再次转换的

纵坐标 [n] = 读 (“纵坐标”)

跳过 ()

.计次循环尾 ()

关闭 ()

时钟1.时钟周期=100

.子程序 _时钟1_周期事件

.局部变量 n, 整数型

时钟1.时钟周期=0'此两句可以去掉

后台.填充页面 (#白色)

.计次循环首 (记录数, n)

页面 [n].块复制 (后台, 横坐标 [n], 纵坐标 [n], )

.计次循环尾 ()

屏幕.交换页面 (假, 假, 假)

时钟1.时钟周期=100'此两句可以去掉

易语言程序怎么让CPU使用率减小

直接上易语言代码,汉字编程语言代码就是不一般呀。

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

.版本 2

.数据类型 取电脑cpu信息, , system_info

.成员 dwoemid, 整数型, , , 标识符

.成员 dwpagesize, 整数型, , , 分页大小

.成员 lpminimumapplicationaddress, 整数型, , , 最小寻址空间

.成员 lpmaximumapplicationaddress, 整数型, , , 最大寻址空间

.成员 dwactiveprocessormask, 整数型, , , 处理器掩码

.成员 dwnumberorfprocessors, 整数型, , , 处理器数目

.成员 dwprocessortype, 整数型, , , 处理器类型

.成员 dwallocationgranularity, 整数型, , , 虚拟内存空间的粒度

.成员 dwreserved, 整数型, , , 保留

.数据类型 memorystatusex

.成员 dwlength, 整数型, , , 64

.成员 dwmemoryload, 整数型

.成员 ulltotalphys, 长整数型

.成员 ullavailphys, 长整数型

.成员 ulltotalpagefile, 长整数型

.成员 ullavailpagefile, 长整数型

.成员 ulltotalvirtual, 长整数型

.成员 ullavailvirtual, 长整数型

.成员 ullavailextendedvirtual, 长整数型

.版本 2.支持库 spec.程序集 窗口程序集_启动窗口.子程序 __启动窗口_创建完毕调试输出 (取内存条信息 ()).子程序 取内存条信息, 文本型.局部变量 指针, memorystatusex指针.dwlength = 64globalmemorystatusex (指针)返回 (“总物理内存:” + 到文本 (四舍五入 (指针.ulltotalphys ÷ 1048576, )) + “mb” + #换行符 + “可用物理内存:” + 到文本 (四舍五入 (指针.ullavailphys ÷ 1048576, )) + “mb” + #换行符 + “虚拟内存:” + 到文本 (四舍五入 (指针.ulltotalvirtual ÷ 1048576, )) + “mb” + #换行符 + “可用虚拟内存:” + 到文本 (四舍五入 (指针.ullavailvirtual ÷ 1048576, )) + “mb” + #换行符 + “总页面文件:” + 到文本 (四舍五入 (指针.ulltotalpagefile ÷ 1048576, )) + “mb” + #换行符 + “可用页面文件:” + 到文本 (四舍五入 (指针.ullavailpagefile ÷ 1048576, )) + “mb” + #换行符 + “电脑内存占用:” + 到文本 (指针.dwmemoryload) + “%”)

以上是易语言的计数循环导致CPU使用率过高的详细内容。更多信息请关注PHP中文网其他相关文章!

本站声明
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn

热AI工具

Undresser.AI Undress

Undresser.AI Undress

人工智能驱动的应用程序,用于创建逼真的裸体照片

AI Clothes Remover

AI Clothes Remover

用于从照片中去除衣服的在线人工智能工具。

Undress AI Tool

Undress AI Tool

免费脱衣服图片

Clothoff.io

Clothoff.io

AI脱衣机

Video Face Swap

Video Face Swap

使用我们完全免费的人工智能换脸工具轻松在任何视频中换脸!

热工具

记事本++7.3.1

记事本++7.3.1

好用且免费的代码编辑器

SublimeText3汉化版

SublimeText3汉化版

中文版,非常好用

禅工作室 13.0.1

禅工作室 13.0.1

功能强大的PHP集成开发环境

Dreamweaver CS6

Dreamweaver CS6

视觉化网页开发工具

SublimeText3 Mac版

SublimeText3 Mac版

神级代码编辑软件(SublimeText3)

热门话题

Java教程
1655
14
CakePHP 教程
1413
52
Laravel 教程
1306
25
PHP教程
1252
29
C# 教程
1226
24
如何修复蒸汽云错误?尝试这些方法 如何修复蒸汽云错误?尝试这些方法 Apr 04, 2025 am 01:51 AM

蒸汽云错误可能是由于许多原因引起的。要顺利玩游戏,您需要采取一些措施来删除此错误,然后才能启动游戏。 PHP.CN软件在这篇文章中介绍了一些最佳方法以及更多有用的信息。

删除PC App Store恶意软件 - 适合您的完整指南! 删除PC App Store恶意软件 - 适合您的完整指南! Apr 04, 2025 am 01:41 AM

如果您在计算机上有一个名为PC App Store的程序,并且没有故意安装它,则可能会感染恶意软件。 PHP.CN的这篇文章介绍了如何删除PC App Store恶意软件。

核心隔离是否被ew_usbccgpfilter.sys阻止?这是修复程序! 核心隔离是否被ew_usbccgpfilter.sys阻止?这是修复程序! Apr 13, 2025 am 12:47 AM

许多Surfacebook用户报告说,他们符合Windows 11/10上的“由EW_USBCCGPFILTER.SYS阻止的核心隔离”问题。 PHP.CN的这篇文章有助于解决烦人的问题。继续阅读。

FIXDISK Windows 7:检查您的硬盘是否Windows 7中的错误 FIXDISK Windows 7:检查您的硬盘是否Windows 7中的错误 Apr 14, 2025 am 12:40 AM

如果您怀疑自己的硬盘遇到问题,可以检查Windows 7上的错误。此php.cn帖子讨论了FixDisk Windows 7。您可以遵循该指南以检查Windows 7上的错误。

安装图形驱动程序后,努力修复黑屏 安装图形驱动程序后,努力修复黑屏 Apr 15, 2025 am 12:11 AM

在Windows 10/11中安装了像NVIDIA驱动程序这样的图形驱动程序之后,您是否曾经遇到过黑屏?现在,在PHP.CN的这篇文章中,您可以找到一些值得尝试的NVIDIA驱动程序更新黑屏的解决方案。

hacktool:win64/explorerPatcher!mtb-如何删除? hacktool:win64/explorerPatcher!mtb-如何删除? Apr 04, 2025 am 01:23 AM

ExplorerPatcher是一种开源可行可执行文件,可让您自定义Windows 11开始菜单,任务栏,文件资源管理器等。但是,许多用户会收到有关HackTool的Trojan警告:Win64/ExplorerPatcher!MTB。为什么会发生

如何通过ISO安装Windows X-Lite最佳11 23H2 HOME/PRO 如何通过ISO安装Windows X-Lite最佳11 23H2 HOME/PRO Apr 09, 2025 am 12:49 AM

如果您需要基于Windows 11 23H2的自定义LITE系统,则可以选择Windows X-Lite最佳11 23H2 HOME或OVERMIM 11 PRO。继续阅读,PHP.CN将向您展示如何下载最佳11 23H2 ISO并在PC上安装Pro或Home。

Win 11构建22621.3078和22631.3078(KB5034204) Win 11构建22621.3078和22631.3078(KB5034204) Apr 05, 2025 am 01:35 AM

是否想知道Windows 11 KB5034204中的新改进和错误修复?想要如何在设备上获取Windows 11 KB5034204?在这篇文章中,PHP.CN软件将介绍您想知道的信息。

See all articles