func main()
	var mp: dict<[]char, []char> :: #dict<[]char, []char>
	do mp.add("うし", "a")
	do mp.add("うあ", "b")
	do mp.add("ん笑", "c")
	do mp.add("たぷ", "d")
	do mp.add("くん", "e")
	do mp.add("ぷに", "f")
	do mp.add("しき", "g")
	do mp.add("あく", "h")
	do mp.add("うく", "i")
	do mp.add("あ笑", "j")
	do mp.add("うん", "k")
	do mp.add("しぷ", "l")
	do mp.add("うき", "m")
	do mp.add("く笑", "n")
	do mp.add("う笑", "o")
	do mp.add("にき", "p")
	do mp.add("ぷ笑", "q")
	do mp.add("たき", "r")
	do mp.add("たん", "s")
	do mp.add("しあ", "t")
	do mp.add("しん", "u")
	do mp.add("うう", "v")
	do mp.add("うた", "w")
	do mp.add("き笑", "x")
	do mp.add("にく", "y")
	do mp.add("笑笑", "z")
	do mp.add("　　", " ")
	do mp.add("。。", ". ")
	do mp.add("、、", ", ")
	do mp.add("くに", "\"う　し　た　ぷ　に　き　あ　王　国　笑\"")
	do mp.add("ひと", "\"う　し　た　ぷ　に　き　あ　く　ん　笑\"")
	
	while loop(true)
		var s: []char :: cui@input()
		do s :: s.replace("\"う　し　た　ぷ　に　き　あ　王　国　笑\"", "くに")
		do s :: s.replace("\"う　し　た　ぷ　に　き　あ　く　ん　笑\"", "ひと")
		do s :: s.replace("　　", "★")
		do s :: s.replace("　", "")
		do s :: s.replace("★", "　　")
		do s :: s.replace("｡", "｡｡")
		do s :: s.replace("、", "、、")
		if(^s % 2 <> 0 | ^s = 0)
			do cui@print("\{s}\n")
			break loop
		end if
		for i(0, ^s / 2 - 1)
			var ch: []char :: [s[2 * i], s[2 * i + 1]]
			var x: []char :: mp.get(ch, &)
			if(x =& null)
				do x :: "?[\{ch}]"
			end if
			do cui@print(x)
		end for
		do cui@print("\n")
	end while
end func