|
- .版本 2
- .支持库 spec
- .程序集 程序集1
- .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
- _临时子程序 () ' 在初始化代码执行完毕后调用测试代码
- 返回 (0) ' 可以根据您的需要返回任意数值
- .子程序 _临时子程序
- .局部变量 解码后, 字节集
- ' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
- 解码后 = URL解码 (“Hello+World%21%d6%D0%CE%C4%B2%E2%CA%D41234567890%2b%2B”)
- 调试输出 (解码后, 到文本 (解码后))
- .子程序 URL解码, 字节集, 公开, 与PHP的 urldecode() 函数功能相同
- .参数 文本, 文本型
- .局部变量 返回值, 字节集
- 返回值 = 取空白字节集 (取文本长度 (文本))
- 置入代码 ({ 235, 113, 128, 249, 48, 114, 7, 128, 249, 57, 119, 2, 235, 26, 128, 249, 65, 114, 7, 128, 249, 70, 119, 2, 235, 14, 128, 249, 97, 114, 7, 128, 249, 102, 119, 2, 235, 2, 50, 201, 195, 128, 250, 48, 114, 10, 128, 250, 57, 119, 5, 128, 234, 48, 235, 32, 128, 250, 65, 114, 10, 128, 250, 70, 119, 5, 128, 234, 55, 235, 17, 128, 250, 97, 114, 10, 128, 250, 102, 119, 5, 128, 234, 87, 235, 2, 50, 210, 195, 102, 82, 138, 213, 232, 199, 255, 255, 255, 138, 218, 192, 227, 4, 138, 209, 232, 187, 255, 255, 255, 10, 218, 102, 90, 195, 80, 83, 81, 82, 86, 87, 139, 117, 252, 11, 246, 117, 2, 235, 110, 139, 126, 4, 11, 255, 117, 2, 235, 101, 131, 198, 8, 139, 69, 8, 11, 192, 117, 2, 235, 89, 139, 0, 11, 192, 117, 2, 235, 81, 51, 255, 50, 255, 138, 24, 10, 219, 117, 2, 235, 66, 128, 251, 37, 117, 33, 138, 72, 1, 232, 74, 255, 255, 255, 10, 201, 116, 21, 138, 233, 138, 72, 2, 232, 60, 255, 255, 255, 10, 201, 116, 7, 183, 1, 232, 136, 255, 255, 255, 128, 251, 43, 117, 6, 10, 255, 117, 2, 179, 32, 136, 28, 55, 71, 128, 255, 1, 117, 5, 131, 192, 3, 235, 1, 64, 235, 180, 137, 126, 252, 95, 94, 90, 89, 91, 88 })
- ' jmp MAIN
- ' IS_HEX_BYTE:
- ' .if cl >= 48 && cl <= 57
- ' .elseif cl >= 65 && cl <= 70
- ' .elseif cl >= 97 && cl <= 102
- ' .else
- ' xor cl,cl
- ' .endif
- ' ret
- ' HEX2DEC:
- ' .if dl >= 48 && dl <= 57
- ' sub dl,48
- ' .elseif dl >= 65 && dl <=70
- ' sub dl,55
- ' .elseif dl >= 97 && dl <=102
- ' sub dl,87
- ' .else
- ' xor dl,dl
- ' .endif
- ' ret
- ' BYTE_HEX2DEC:
- ' push dx
- ' mov dl,ch
- ' call HEX2DEC
- ' mov bl,dl
- ' shl bl,4
- ' mov dl,cl
- ' call HEX2DEC
- ' or bl,dl
- ' pop dx
- ' ret
- ' MAIN:
- ' push eax
- ' push ebx
- ' push ecx
- ' push edx
- ' push esi
- ' push edi
- ' mov esi,[ebp-4]
- ' .if esi == 0
- ' jmp ASM_END
- ' .endif
- ' mov edi,[esi+4]
- ' .if edi == 0
- ' jmp ASM_END
- ' .endif
- ' add esi,8
- ' mov eax,[ebp+8]
- ' .if eax == 0
- ' jmp ASM_END
- ' .endif
- ' mov eax,[eax]
- ' .if eax == 0
- ' jmp ASM_END
- ' .endif
- ' xor edi,edi
- ' .while 1
- ' xor bh,bh
- ' mov bl,[eax]
- ' .if !bl
- ' .break
- ' .endif
- ' .if bl == 37
- ' mov cl,[eax+1]
- ' call IS_HEX_BYTE
- ' .if cl
- ' mov ch,cl
- ' mov cl,[eax+2]
- ' call IS_HEX_BYTE
- ' .if cl
- ' mov bh,1
- ' call BYTE_HEX2DEC
- ' .endif
- ' .endif
- ' .endif
- ' .if bl == 43 && bh == 0
- ' mov bl,32
- ' .endif
- ' mov [esi+edi],bl
- ' inc edi
- ' .if bh == 1
- ' add eax,3
- ' .elseif
- ' inc eax
- ' .endif
- ' .endw
- ' mov [esi-4],edi
- ' ASM_END:
- ' pop edi
- ' pop esi
- ' pop edx
- ' pop ecx
- ' pop ebx
- ' pop eax
- 返回 (返回值)
复制代码 |
|