易语言取U码文本模块源码

系统结构:取U码文本,取十进制,取数值,UNICODE转汉字,Unicode转Ansi,取字节集变量地址_,RtlFreeAnsiString,RtlUnicodeStringToAnsiString,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 取U码文本
           |  |
           |  |------ 取十进制
           |  |
           |  |------ 取数值
           |  |
           |  |------ UNICODE转汉字
           |  |
           |  |------ Unicode转Ansi
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取字节集变量地址_
           |  |
           |  |---[dll]------   RtlFreeAnsiString
           |  |
           |  |---[dll]------   RtlUnicodeStringToAnsiString

调用的DLL命令:

.DLL命令 取字节集变量地址_, 整数型, "kernel32.dll", "lstrcpyn", , ,
    .参数 数据1, 字节集, 传址, lpString1
    .参数 数据2, 字节集, 传址, lpString2
    .参数 数据长度, 整数型, , iMaxLength

.DLL命令 RtlFreeAnsiString, 整数型, "ntdll.dll", "RtlFreeUnicodeString"
    .参数 AnsiString, PANSI_STRING

.DLL命令 RtlUnicodeStringToAnsiString, 整数型, "ntdll.dll", "RtlUnicodeStringToAnsiString"
    .参数 DestinationString, PANSI_STRING
    .参数 SourceString, PUNICODE_STRING
    .参数 AllocateDestinationString, 逻辑型