uim/SJ3/uim-sj3
SJ3のuimのためのコードをちょっとだけ書いた。
要SJ3のパッチ: SJ3/2007/04/01/patch
このままじゃ入力はできないけど、遊べるところまでは行った。
てか、これから忙しくなりそうなので、 誰か書いてくれないですかね。 ここからが楽しいところでマジおすすめなんですけど。
$ uim-sh
uim> (load-plugin "sj3")
#t
uim> (sj3-lib-open "localhost" (getenv "USER"))
#t
uim> (sj3-lib-getkan "いれたてのおちゃ")
("入れた手のお茶" ("いれた" "入れた" #<c_pointer 0xcfbe8340>) ("ての" "手の" #<c_pointer 0xcfbe8370>) ("おちゃ" "お茶" #<c_pointer 0xcfbe83a0>))
uim> (sj3-lib-touroku "いれたて" "入れ立て" 'sj3-hinshi-nrmnoun)
#t
uim> (sj3-lib-getkan "いれたてのおちゃ")
("入れ立てのお茶" ("いれたての" "入れ立ての" #<c_pointer 0xcfbe8340>) ("おちゃ" "お茶" #<c_pointer 0xcfbe8370>))
uim> (define douon (sj3-lib-getdouon "おちゃ"))
douon
uim> douon
(("お茶" . #<c_pointer 0xcfb65444>) ("御茶" . #<c_pointer 0xcfb65668>))
uim> (sj3-lib-gakusyuu (cdr (nth 1 douon)))
#t
uim> (sj3-lib-getkan "いれたてのおちゃ")
("入れ立ての御茶" ("いれたての" "入れ立ての" #<c_pointer 0xcfbe8340>) ("おちゃ" "御茶" #<c_pointer 0xcfbe8370>))
uim> (sj3-lib-syoukyo "いれたて" "入れ立て" 'sj3-hinshi-nrmnoun)
#t
uim> (sj3-lib-getkan "いれたてのおちゃ")
("入れた手の御茶" ("いれた" "入れた" #<c_pointer 0xcfbe8340>) ("ての" "手の" #<c_pointer 0xcfbe8370>) ("おちゃ" "御茶" #<c_pointer 0xcfbe83a0>))
uim> (sj3-lib-close)
#t
uim> ^D
やる気のある方はuimのML
で名乗りを挙げてください。おながいします。
Comments
![[image]](http://quasiquote.org/images/feed-icon-12x12.png){kind=icon}