psp Lua Player 编程初级指南_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
psp Lua Player 编程初级指南
上传于||文档简介
&&psp 编程
你可能喜欢博客访问： 23234
博文数量： 14
博客积分： 535
博客等级： 中士
技术积分： 145
注册时间：
IT168企业级官微
微信号：IT168qiye
系统架构师大会
微信号：SACC2013
运行平台：WindowsXP需要区位码库文件：hanzi.txt
文件:hanzi.txt.zip
下载后重名为hanzi.txt
程序源代码：zone-bit-code.lua
文件:zone-bit-code.lua.zip
下载:下载后重名为zone-bit-code.lua
源码：[说明：区位码库文件hanzi.txt搜索自互联网，笔者未对其准确性予以确认，因此笔者不对该其中编码负责]--获取str中的汉字并将其存入表中. 若str为空则返回nil和提示信息, 否则返回1和存放汉字的表
function gethz(str)
&&&&if str == nil then return nil, "传入参数为空" end
&&&&local str_len = string.len(str)
&&&&local index = 1
&&&&local hztb = {}
&&&&local substr= str
&&&&while index < str_len do
&&&&&&&&if string.byte(substr) < 176 then
&&&&&&&&&&&&index = index + 1
&&&&&&&&else
&&&&&&&&&&&&index = index + 2
&&&&&&&&&&&&local hz = string.sub(str, index - 2, index - 1)
&&&&&&&&&&&&if (string.find(table.concat(hztb), hz)) == nil then
&&&&&&&&&&&&&&&&table.insert(hztb, hz)
&&&&&&&&&&&&end
&&&&&&&&end
&&&&&&&&substr = string.sub(str, index)
&&&&return 1, hztb
--载入字库内容. 若失败返回nil和失败信息, 否则返回1和存放字库内容的字符串
function getwordstock(wordfile)
&&&&wordfile = wordfile or "hanzi.txt"
&&&&local fp = io.open(wordfile, "r")
&&&&if fp == nil then return nil, "打开字库文件失败" end
&&&&local str = fp:read("*a")
&&&&return 1, str
--打印传入表中的所有汉字的区位码
function print_zone_bit_code(hz, str)
&&&&for _, h in ipairs(hz) do
&&&&&&&&local i, j = string.find(str, h .. ".-\n")
&&&&&&&&if i ~= nil then
&&&&&&&&&&&&print(string.sub(str, i, j - 1))
&&&&&&&&else
&&&&&&&&&&&&print("没有找到汉字[" .. h .. "]的区位码")
&&&&&&&&end
function main()
&&&&local ret, str = getwordstock()
&&&&if ret == nil then print(str) os.exit(1) end
&&&&print("[汉字区位码查询器]\n[by HeQingwei version 0.1 date \t--using Lua]")
&&&&print("[提示: 您可以一次输入多个汉字, 输入quit退出程序]\n")
&&&&while 1 do
&&&&&&&&io.write("汉字: ")
&&&&&&&&local hanzi = io.read()
&&&&&&&&if hanzi == "quit" then break end
&&&&&&&&local ret, hz = gethz(hanzi)
&&&&&&&&if ret == nil then
&&&&&&&&&&&&print(str)
&&&&&&&&else
&&&&&&&&&&&&print_zone_bit_code(hz, str)
&&&&&&&&end
阅读(873) | 评论(0) | 转发(0) |
相关热门文章
给主人留下些什么吧！~~
请登录后评论。}