如题所述
你可以用word软件 把unicode码打上去 然后按下alt+x 然后unicode码就变成汉字了 注意要打一个unicode码按一次要不然不能转换
温馨提示：答案为网友推荐，仅供参考
第1个回答 2014-02-24
/ /机器代码 - >字符
功能MacCode2Chinese（AiUniCode：整数）：字符串;
CH，CL：整数;
CH：= AiUniCode股息256;
CL：= AiUniCode国防部256;
结果：= CHR（CH）+ CHR（CL）;
结束;
/ /汉字 - >机代码
功能Chinese2MacCode（AiChinese：字符串）：整数;
CH，CL：整数;
CH：=条例（AiChinese [1]）;
CL：=条例（AiChinese [2]）;
结果：=（CH SHL 8）+发光;
结束;
/ / UNICODE - >字符
功能UniCode2Chinese（AiUniCode：整数）：字符串;
CH，CL：字符串[3];
S：字符串;
s ：= IntToHex以及（AiUniCode，2）;
CL：='$'+ COPY（S，1，2）;
CH：='$'+ COPY（S，3,2）; BR /> S：= CHR（StrToInt（CH））+ CHR（StrToInt（CL））+＃0;
结果：= WideCharToString（pWideChar（S））;
结束;
/ /汉字 - > UNICODE
功能Chinese2UniCode（AiChinese：字符串）：整数;
CH，CL：字符串[2];
一：数组[ 1 .. 2]为char;
StringToWideChar（复制（AiChinese，1，2），@（A [1]），2）;
CH：= IntToHex以及（整数（一[2]），2）;
CL：= IntToHex以及（整数（[1]），2）;
结果：= StrToInt（'$'+ CH + CL）;
>结束;追问
功能MacCode2Chinese（AiUniCode：整数）：字符串;
CH，CL：整数;
CH：= AiUniCode股息256;
CL：= AiUniCode国防部256;
结果：= CHR（CH）+ CHR（CL）;
结束;
/ /汉字 - >机代码
功能Chinese2MacCode（AiChinese：字符串）：整数;
CH，CL：整数;
CH：=条例（AiChinese [1]）;
CL：=条例（AiChinese [2]）;
结果：=（CH SHL 8）+发光;
结束;
/ / UNICODE - >字符
功能UniCode2Chinese（AiUniCode：整数）：字符串;
CH，CL：字符串[3];
S：字符串;
s ：= IntToHex以及（AiUniCode，2）;
CL：='$'+ COPY（S，1，2）;
CH：='$'+ COPY（S，3,2）; BR /> S：= CHR（StrToInt（CH））+ CHR（StrToInt（CL））+＃0;
结果：= WideCharToString（pWideChar（S））;
结束;
/ /汉字 - > UNICODE
功能Chinese2UniCode（AiChinese：字符串）：整数;
CH，CL：字符串[2];
一：数组[ 1 .. 2]为char;
StringToWideChar（复制（AiChinese，1，2），@（A [1]），2）;
CH：= IntToHex以及（整数（一[2]），2）;
CL：= IntToHex以及（整数（[1]），2）;
结果：= StrToInt（'$'+ CH + CL）;
>结束;追问
不懂
本回答被网友采纳