|
60精币
这是五星的写法,这样就没错指针到文本不会出现乱码 变量名 | 类 型 | 静态 | 数组 | 备 注 | a | 文本型 | | | n | 整数型 | | | 算号结果地址 | 整数型 | | | 偏移 | 整数型 | | | 缩水结果 | 文本型 | | |
算号结果地址 = 申请内存 ( (5 + 1 ) × 99999, )变量循环首 (0, 99999, 1, n )a = 格式化文本 (“%05d”, n )如果真 (判断号码 (a, “123”, “345”)) 写到内存 (a, 算号结果地址 + 偏移, 5 )偏移 = 偏移 + 5 写到内存 (“ ”, 算号结果地址 + 偏移, 1 )偏移 = 偏移 + 1 变量循环尾 ()缩水结果 = 指针到文本 (算号结果地址 )释放内存 (算号结果地址 )返回 (缩水结果 )|
判断号码 | 逻辑型 | | |
参数1 | 文本型 | | | | 参数2 | 文本型 | | | | 参数3 | 文本型 | | | | 计次循环首 (5, n )如果真 (寻找文本 (参数2, 取文本中间 (参数1, n, 1 ), , 假) ≠ -1 )m = m + 1 计次循环尾 ()如果真 (寻找文本 (参数3, 到文本 (m ), , 假) ≠ -1 )返回 (真)返回 (假)q = 取启动时间 ()超级编辑框1.内容 = 缩水 ()调试输出 (取启动时间 () - q )
下面的这个是四星的写法,指针到文本就会出现乱码
.版本 2
.支持库 spec
.支持库 eAPI
.支持库 iext2
.子程序 __启动窗口_创建完毕
.子程序 缩水, 文本型
.局部变量 a, 文本型
.局部变量 n, 整数型
.局部变量 算号结果地址, 整数型
.局部变量 偏移, 整数型
.局部变量 缩水结果, 文本型
算号结果地址 = 申请内存 ((4 + 1) × 9999, )
.变量循环首 (0, 9999, 1, n)
a = 格式化文本 (“%04d”, n)
.如果真 (判断号码 (a, “123”, “345”))
写到内存 (a, 算号结果地址 + 偏移, 4)
偏移 = 偏移 + 4
写到内存 (“ ”, 算号结果地址 + 偏移, 1)
偏移 = 偏移 + 1
.如果真结束
.变量循环尾 ()
缩水结果 = 指针到文本 (算号结果地址)
释放内存 (算号结果地址)
调试输出 (缩水结果)
返回 (缩水结果)
.子程序 判断号码, 逻辑型
.参数 参数1, 文本型, , a
.参数 参数2, 文本型, , 123
.参数 参数3, 文本型, , 12345
.局部变量 n, 整数型
.局部变量 m, 整数型
.计次循环首 (5, n)
.如果真 (寻找文本 (参数2, 取文本中间 (参数1, n, 1), , 假) ≠ -1)
m = m + 1
.如果真结束
.计次循环尾 ()
.如果真 (寻找文本 (参数3, 到文本 (m), , 假) ≠ -1)
返回 (真)
.如果真结束
返回 (假)
.子程序 _按钮3_被单击
.局部变量 q, 整数型
q = 取启动时间 ()
超级编辑框1.内容 = 缩水 ()
调试输出 (取启动时间 () - q)
这是什么原因
|
|