Luaで半角全角判定

半角全角判定 - 永字八法の続き。
Luaはデフォルトでは日本語(つーか複数byte文字)対応していない。
なのでやってみた。Shift-JISのみだけど。

system.lua

NSExec("luasub is_zenkaku")
function NSCOM_is_zenkaku()
	local res = NSPopIntRef()
	NSPopComma()
	local letter = string.byte(NSPopStr())
	local answer = 0
	if type(letter) == "number" then
		    if letter > 126 and letter < 161 then
			answer = 1
		elseif letter > 223 then
			answer = 1
		end
	end
	NSSetIntValue(res, answer)
end

感想

ここから、半角全角入り乱れた文字列splitとかに持っていける。
……やる意味あったかなあ?