|
- .版本 2
- .支持库 spec
- .程序集 程序集1
- .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
- _临时子程序 () ' 在初始化代码执行完毕后调用测试代码
- 返回 (0) ' 可以根据您的需要返回任意数值
- .子程序 _临时子程序
- 调试输出 (取现行时间 (), 延时1秒取随机逻辑 ())
- 调试输出 (取现行时间 (), 延时8秒取随机字节 ())
- 调试输出 (取现行时间 (), 延时16秒取随机短整数 ())
- 调试输出 (取现行时间 (), 延时32秒取随机整数 ())
- 调试输出 (取现行时间 (), 延时64秒取随机长整数 ())
- .子程序 延时64秒取随机长整数, 长整数型, 公开, 先延时64秒,然后返回一个随机的长整数
- .局部变量 返回值, 字节集
- .局部变量 计数, 整数型
- 返回值 = 取空白字节集 (8)
- .计次循环首 (8, 计数)
- 返回值 [计数] = 延时8秒取随机字节 ()
- .计次循环尾 ()
- 返回 (取字节集数据 (返回值, #长整数型, ))
- .子程序 延时32秒取随机整数, 整数型, 公开, 先延时32秒,再返回一个随机的整数
- .局部变量 返回值, 整数型
- .计次循环首 (4, )
- 返回值 = 位或 (返回值, 延时8秒取随机字节 ())
- 返回值 = 左移 (返回值, 8)
- .计次循环尾 ()
- 返回 (返回值)
- .子程序 延时16秒取随机短整数, 短整数型, 公开, 先延时16秒,然后返回一个随机的短整数
- .局部变量 返回值, 短整数型
- .计次循环首 (2, )
- 返回值 = 位或 (返回值, 延时8秒取随机字节 ())
- 返回值 = 左移 (返回值, 8)
- .计次循环尾 ()
- 返回 (返回值)
- .子程序 延时8秒取随机字节, 字节型, 公开, 先延时8秒,然后返回一个随机的字节
- .局部变量 返回值, 字节型
- .计次循环首 (8, )
- 返回值 = 位或 (返回值, 到字节 (延时1秒取随机逻辑 ()))
- 返回值 = 左移 (返回值, 1)
- .计次循环尾 ()
- 返回 (返回值)
- .子程序 延时1秒取随机逻辑, 逻辑型, 公开, 先延时1秒,然后返回一个随机的逻辑
- .局部变量 A, 长整数型
- .局部变量 B, 长整数型
- A = rdtsc ()
- 延时 (1000)
- B = rdtsc ()
- 返回 (到整数 (B ÷ (B - A)) < 取启动时间 () ÷ 1000)
- .子程序 rdtsc, 长整数型
- 置入代码 ({ 15, 49, 201, 195 })
- ' rdtsc
- ' leave
- ' retn
- 返回 (0)
复制代码 |
|