- 1
- 0
- 约6.8千字
- 约 6页
- 2019-06-18 发布于江苏
- 举报
汉字取内码、区位码及拼音简码 源代码
汉字取内码、区位码及拼音简码
.版本 2
.子程序 取汉字内码, 文本型, 公开
.参数 待查汉字, 文本型
.局部变量 高字节, 整数型
.局部变量 低字节, 整数型
.局部变量 内码, 文本型
源代码中的“高字节”和“低字节”可以直接用字节型数据,而不用整数型,这样就不用做“位与”运算了。
高字节 = 位与 (取代码 (待查汉字, 1), 255)
低字节 = 位与 (取代码 (待查汉字, 2), 255)
内码 = 取十六进制文本 (高字节) + 取十六进制文本 (低字节)
返回 (内码)
.子程序 取汉字区位码, 文本型, 公开
.参数 待查汉字, 文本型
.局部变量 高字节, 整数型
.局部变量 低字节, 整数型
.局部变量 内码, 文本型
.局部变量 区码, 整数型
.局部变量 位码, 整数型
.局部变量 区位码, 文本型
高字节 = 位与 (取代码 (待查汉字, 1), 255)
低字节 = 位与 (取代码 (待查汉字, 2), 255)
内码 = 取十六进制文本 (高字节) + 取十六进制文本 (低字节)
区码 = 高字节 - 160
位码 = 低字节 - 160
区位码 = 到文本 (区码 × 100 + 位码)
返回 (区位码)
.子程序 取汉字拼音简码, 文本型, 公开, 取GB2812-80一级字库汉字拼音简码
.参数 待查汉字, 文本型
.局部变量 高字节, 整数型
.局部变量 低字节, 整数型
.局部变量 内码, 文本型
.局部变量 区码, 整数型
.局部变量 位码, 整数型
.局部变量 区位码, 整数型
高字节 = 位与 (取代码 (待查汉字, 1), 255)
低字节 = 位与 (取代码 (待查汉字, 2), 255)
内码 = 取十六进制文本 (高字节) + 取十六进制文本 (低字节)
区码 = 高字节 - 160
位码 = 低字节 - 160
区位码 = 区码 × 100 + 位码
.判断开始 (区位码 ≥ 1601 且 区位码 ≤ 1636)
返回 (“A”)
.判断 (区位码 ≥ 1637 且 区位码 ≤ 1832)
返回 (“B”)
.判断 (区位码 ≥ 1833 且 区位码 ≤ 2077)
返回 (“C”)
.判断 (区位码 ≥ 2078 且 区位码 ≤ 2273)
返回 (“D”)
.判断 (区位码 ≥ 2274 且 区位码 ≤ 2301)
返回 (“E”)
.判断 (区位码 ≥ 2302 且 区位码 ≤ 2432)
返回 (“F”)
.判断 (区位码 ≥ 2433 且 区位码 ≤ 2593)
返回 (“G”)
.判断 (区位码 ≥ 2594 且 区位码 ≤ 2786)
返回 (“H”)
.判断 (区位码 ≥ 2787 且 区位码 ≤ 3105)
返回 (“J”)
.判断 (区位码 ≥ 3106 且 区位码 ≤ 3211)
返回 (“K”)
.判断 (区位码 ≥ 3212 且 区位码 ≤ 3471)
返回 (“L”)
.判断 (区位码 ≥ 3472 且 区位码 ≤ 3634)
返回 (“M”)
.判断 (区位码 ≥ 3635 且 区位码 ≤ 3721)
返回 (“N”)
.判断 (区位码 ≥ 3722 且 区位码 ≤ 3729)
返回 (“O”)
.判断 (区位码 ≥ 3730 且 区位码 ≤ 3857)
返回 (“P”)
.判断 (区位码 ≥ 3858 且 区位码 ≤ 4026)
返回 (“Q”)
.判断 (区位码 ≥ 4027 且 区位码 ≤ 4085)
返回 (“R”)
.判断 (区位码 ≥ 4086 且 区位码 ≤ 4389)
返回 (“S”)
.判断 (区位码 ≥ 4390 且 区位码 ≤ 4557)
返回 (“T”)
.判断 (区位码 ≥ 4558 且 区位码 ≤ 4683)
返回 (“W”)
.判断 (区位码 ≥ 4684 且 区位码 ≤ 4924)
返回 (“X”)
.判断 (区位码 ≥ 4925 且 区位码 ≤ 5248)
返回 (“Y”)
.判断 (区位码 ≥ 5249 且 区位码 ≤ 5589)
返回 (“Z”)
.默认
返回 (“出范围”)
.判断结束
具体实践代码,以内码为例
public static string GetCodstring(string UnName)
{
int i = 0;
ushort ke
您可能关注的文档
最近下载
- 宝马电梯图纸BMDT-5000电气原理图纸2009年NICE3000.pdf
- 血液中心质量管理科年度工作总结和工作计划.doc VIP
- 特种设备日常使用状况记录.xls VIP
- 2025年XX血液中心工作总结及2026年工作计划.docx VIP
- 第九版外科学 绪论.pptx VIP
- 特种设备日常维护保养记录表.xls VIP
- 2025年澳大利亚袋鼠数学竞赛C卷L3(5-6年级)中国赛区试题(含答案).docx VIP
- 第九版-外科学-教学大纲.pptx VIP
- 《差动变压器式(LVDT)位移传感器》-毕业论文(设计).doc VIP
- 2024-2025学年八年级英语下学期月考试卷 人教版 Units 1~2(安徽专用)解析版.docx VIP
原创力文档

文档评论(0)