|
- .版本 2
- .程序集 程序集1
- .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
- _临时子程序 () ' 在初始化代码执行完毕后调用测试代码
- 返回 (0) ' 可以根据您的需要返回任意数值
- .子程序 _临时子程序
- .局部变量 A, 文本型
- ' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
- A = “AAA中文测试 简体中文字符串测试 Hello World!ABC123” + #换行符 + “Test”
- 输出调试文本 (取文本字数 (A))
- .子程序 取文本字数, 整数型, 公开, 取文本的字数(与字节数不同)中文、全角字符1字 英文字符、空格1字、换行回车不计
- .参数 文本数据, 文本型
- 置入代码 ({ 139, 93, 8, 138, 101, 16, 139, 27, 185, 0, 0, 0, 0, 186, 0, 0, 0, 0, 138, 3, 10, 192, 117, 4, 235, 21, 235, 16, 60, 128, 114, 3, 65, 235, 9, 60, 13, 116, 5, 60, 10, 116, 1, 66, 67, 235, 227, 209, 233, 3, 202, 139, 193, 201, 194, 4, 0 })
- ' mov ebx,[ebp+8]
- ' mov ah,[ebp+16]
- ' mov ebx,[ebx]
- ' mov ecx,0
- ' mov edx,0
- ' START:
- ' mov al,[ebx]
- ' .if al == 0
- ' jmp ASM_END
- ' .elseif al >= 128
- ' inc ecx
- ' .elseif al != 13 && al != 10
- ' inc edx
- ' .endif
- ' inc ebx
- ' JMP START
- ' ASM_END:
- ' shr ecx,1
- ' add ecx,edx
- ' mov eax,ecx
- ' leave
- ' retn 4
- 返回 (0)
复制代码
|
|