易语言高精度完美延时的源码

 更新时间:2018年12月04日 14:22:19   作者:三叶资源网  
今天小编就为大家分享一篇关于易语言高精度完美延时的源码,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧

DLL命令表

.版本 2
.DLL命令 QueryPerformanceCounter, 整数型, "kernel32", "QueryPerformanceCounter", , 获取计数值
  .参数 lpPerformanceCount, LARGE_INTEGER
.DLL命令 QueryPerformanceFrequency, 整数型, "kernel32", "QueryPerformanceFrequency", , 返回计数频率
  .参数 lpFrequency, LARGE_INTEGER

自定义数据类型表

.版本 2
.数据类型 LARGE_INTEGER
  .成员 QuadPart, 整数型

高精度延时源码

.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
真正的高精度延时 (1000) ' 延时1毫秒
.子程序 真正的高精度延时
.参数 要延时的时间, 整数型, , 微秒,1000微秒=1毫秒,1000毫秒=1秒
.局部变量 CurrTicks, LARGE_INTEGER
.局部变量 TicksCount, LARGE_INTEGER
QueryPerformanceFrequency (TicksCount)
QueryPerformanceCounter (CurrTicks)
' 这里一定要LARGE_INTEGER数据类型,如果直接写成整数型的话,是运行不了的
TicksCount.QuadPart = TicksCount.QuadPart × 要延时的时间 ÷ 1000000
TicksCount.QuadPart = TicksCount.QuadPart + CurrTicks.QuadPart
.判断循环首 (CurrTicks.QuadPart < TicksCount.QuadPart)
  QueryPerformanceCounter (CurrTicks)
.判断循环尾 ()
' 高精度延时, 是 CPU 测速的基础
' Windows 内部有一个精度非常高的定时器, 精度在微秒级, 但不同的系统这个定时器的频率不同, 这个频率与硬件和操作系统都可能有关。
' 利用 API 函数 QueryPerformanceFrequency 可以得到这个定时器的频率。
' 利用 API 函数 QueryPerformanceCounter 可以得到定时器的当前值。
' 根据要延时的时间和定时器的频率, 可以算出要延时的时间定时器经过的周期数。
' 在循环里用 QueryPerformanceCounter 不停的读出定时器值, 一直到经过了指定周期数再结束循环, 就达到了高精度延时的目的。

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对脚本之家的支持。如果你想了解更多相关内容请查看下面相关链接

相关文章

  • 易语言常量的值是否可以被改变

    易语言常量的值是否可以被改变

    在本文中我们给大家图文整理了一篇关于探讨易语言常量的值不可以被改变的知识点内容,需要的朋友们跟着学习下。
    2019-06-06
  • 易语言设置列表框是否允许选择多个选项的方法

    易语言设置列表框是否允许选择多个选项的方法

    今天小编就为大家分享一篇关于易语言设置列表框是否允许选择多个选项的方法,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言在组合框中寻找包含指定文本的项目

    易语言在组合框中寻找包含指定文本的项目

    今天小编就为大家分享一篇关于易语言在组合框中寻找包含指定文本的项目,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言设置通用对话框的初始目录

    易语言设置通用对话框的初始目录

    今天小编就为大家分享一篇关于易语言设置通用对话框的初始目录,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言改变窗口的外形功能

    易语言改变窗口的外形功能

    今天小编就为大家分享一篇关于易语言改变窗口的外形功能,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言寻找指定文本在另一文本中最后出现的位置

    易语言寻找指定文本在另一文本中最后出现的位置

    今天小编就为大家分享一篇关于易语言倒找文本命令使用讲解,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言取年份的方法

    易语言取年份的方法

    在本篇文章里小编给大家整理了关于易语言取年份的方法和相关知识点,需要的朋友们学习下。
    2019-02-02
  • 易语言注册热键操作步骤

    易语言注册热键操作步骤

    在本篇内容中小编给各位分享了关于易语言注册热键教程和知识点,需要的朋友们可以学习下。
    2019-01-01
  • 易语言将指定的图片读入图片框中的示例

    易语言将指定的图片读入图片框中的示例

    今天小编就为大家分享一篇关于易语言将指定的图片读入图片框中的示例,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言设置在画板中写出文字的字体

    易语言设置在画板中写出文字的字体

    今天小编就为大家分享一篇关于易语言设置在画板中写出文字的字体,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11

最新评论