kansi_valid 0.0.7

data/lib/kansi_valid/sample.rb

@@ -0,0 +1,17 @@
+# coding:utf-8
+
+module Kansi_valid
+module_function
+
+  def sample
+    "#偶成　朱熹\n少年易老学難成\n一寸光陰不可軽\n未覚池塘春草夢\n階前梧葉已秋声\n"
+  end
+  
+  def samples(num)
+    str=""
+    num.times do
+      str+=generate()+"\n\n"      
+    end
+    return str
+  end
+end

data/lib/kansi_valid/search.rb

@@ -0,0 +1,28 @@
+# coding:utf-8
+
+module Kansi_valid
+module_function
+  # 辞書にある読みなどから調べる
+  # search("かえで")#=>{"楓"=>["楓", "2440", "", "0", "○", "一東", "上平", "", "フウ", "", "かえで", "4976", "4186", "13", "木風几丿虫", "0"],
+  #                     "槭"=>["槭", "4166", "", "0", "●", "屋", "入声", "", "セキ", "", "かえで", "5C65", "6069", "15", "木戚戈上小", "0"]}
+  def search(str)
+    hash={}
+    Dic.each do |key,val|
+      val.each do |content|
+        if content.include?(str)
+          hash[key]=val
+        end
+      end
+    end
+    return hash
+  end
+end
+
+if $0==__FILE__
+  include Kansi_valid
+  str=ARGV[0] ||"かえで"
+  p res=search(str)
+  p str
+  p res.keys
+  p res.size
+end

data/lib/kansi_valid/seikei.rb

@@ -0,0 +1,20 @@
+# coding:utf-8
+
+module Kansi_valid
+module_function
+
+  def seikei(kekka)
+    if kekka!=nil
+      res=""
+      begin
+        list=kekka.split("\n")
+        list.each{|i|res+="#"+i+"\n"}
+        xx=res
+      rescue
+        xx="#"+kekka.strip+"\n"
+      end
+      return xx
+    end
+    return res
+  end
+end

data/lib/kansi_valid/version.rb

@@ -0,0 +1,14 @@
+# coding:utf-8
+
+module Kansi_valid
+module_function
+  Version = '0.0.7'
+  
+  CHENGE_LOG="'0.0.7' Also use NameSpace (module_function add).
+'0.0.6' Rdoc error fixed. UnitTest add.
+'0.0.5' search() add.
+'0.0.4' Linux support. ,delete 'win32ole' 
+'0.0.3' for win 2009.2.6Takayasu_H
+'0.0.2' some bug fix  
+'0.0.1' first on windows XP. Thanks Kantarou(Author:Jigen Konou),and its great dictionary."
+end

data/lib/kansi_valid/wiktionary.rb

@@ -0,0 +1,79 @@
+#coding:utf-8
+require 'uri'
+
+module Kansi_valid
+module_function  
+  ##
+  #===文字データベースのwiktionary:
+  #  http://en.wiktionary.org/wiki/
+  #  で文字を調べるように、urlを作成する(1字のみ)
+  #===exsample：
+  # wiktionary("字") # =>"http://en.wiktionary.org/wiki/%E5%AD%97"
+  #
+  # to_wiktionary
+  # ref
+  def wiktionary(str)
+    str_uri = URI.escape("http://en.wiktionary.org/wiki/#{str}")
+  end
+  
+  ##
+  #===文字データベースのwiktionary
+  #  http://en.wiktionary.org/wiki/
+  #  で文字を調べるように、urlを作成する(1字のみ)
+  #  htmlに貼り付けるリンク向きです。
+  #===exsample：
+  # ref("字")  # =>"<a href=\"http://en.wiktionary.org/wiki/%E5%AD%97\" target=\"_blank\">字</a>"
+  # :to_wiktionary
+  # :wiktionary
+  def ref(str)
+    #str should be 1 char
+    
+    #result=see_dic(str,8)
+    kekka=str#rubi(str,result)
+    begin
+      x="<a href=\"#{wiktionary(str)}\" target=\"_blank\">#{kekka}</a>"
+    rescue
+      x="<a href=\"#{wiktionary(str)}\">#{str}</a>"
+    end
+    return x
+  end
+
+  ##
+  #===文字データベースのwiktionary
+  #  http://en.wiktionary.org/wiki/
+  #  で文字を調べるように、urlを作成する
+  #  こちらは他文字に対応している。
+  #===exsample：
+  # to_wiktionary("漢字")# =>"<a href=\"http://en.wiktionary.org/wiki/%E6%BC%A2\" target=\"_blank\">漢</a>
+  #                          <a href=\"http://en.wiktionary.org/wiki/%E5%AD%97\" target=\"_blank\">字</a>
+  #wiktionary
+  #ref
+  def to_wiktionary(str)
+    kekka=""
+    flag=true #perse flag
+    ##core
+    x=str.split(//) #each characters into Array
+    x.each do |ji|
+        #if comment
+        if ji=="#"
+          flag=false
+          kekka+="<span class='comment'>#"
+        elsif ji=="\n"
+          kekka+="</span>" if flag==false
+          flag=true
+          kekka+="<br/>\n"
+        else
+          if flag
+            kekka+=ref(ji)
+          else
+            kekka+=ji
+          end
+        end
+    end
+    #kekka+="<br/><p>単漢字をクリックすると辞書へ移動します。!!</p>"
+    
+    yield kekka if block_given?
+    return kekka
+  end
+
+end

data/test/tc_kansi_valid.rb

@@ -0,0 +1,92 @@
+# coding:utf-8
+
+$:.unshift(File.dirname(__FILE__) + "/../lib/")  
+$KCODE="u" if RUBY_VERSION<"1.9"
+
+require 'test/unit'
+require "kansi_valid"
+
+
+class TC_Kansi_valid < Test::Unit::TestCase
+  include Kansi_valid  
+  def setup
+    srand(12345)
+    @str=samples(1) # =>"襟道珠曇凍傘釭\n騒衷祥字机麻撞\n優幾院看維彰芋\n腰空需嘆共仮窓\n\n"
+    srand(12345)
+  end
+
+  def test_sample
+    assert_equal("#偶成　朱熹\n少年易老学難成\n一寸光陰不可軽\n未覚池塘春草夢\n階前梧葉已秋声\n",sample)
+  end
+  
+  def test_samples
+    assert_equal("襟道珠曇凍傘釭\n騒衷祥字机麻撞\n優幾院看維彰芋\n腰空需嘆共仮窓\n\n",@str)
+  end
+  
+  def test_kv
+    
+    assert_equal(1,("#偶成　朱熹\n少年易老学難成\n一寸光陰不可軽\n未覚池塘春草夢\n階前梧葉已秋声\n\n\n#　庚　平起\n#篠●先○陌●皓●覚●寒◇庚○\n#質●願●陽○侵◇物◇哿●庚◇\n#未●覚●支○陽○真○皓●東◇\n#佳○先○虞◇葉●紙●尤○庚○\n#Valid 絶句(Ver0.0.6)\n#2013-01-04 12:57:41 +0900\n\n#少:●:篠:嘯:ショウ:すくない すこし わかい\n#年:○:一先::ネン:とし よわい みのり\n#易:●:陌:寘:エキ:やさしい やすい かわる\n#老:●:皓::ロウ:おいる ふける おいかんむり\n#学:●:覚::ガク:まなぶ\n#難:◇:十四寒:翰五歌:ナン:かたい むずかしい ●くるしむ\n#成:○:八庚::セイ:なる なす たいらげる\n#\n#一:●:質::イチ:ひと ひとつ いち\n#寸:●:願::スン:ながさ  3,03㎝ すん\n#光:○:七陽::コウ:ひかり ひかる\n#陰:◇:十二侵:覃沁:イン:かげ かげる ひそか くもる\n#不:◇:物:有紙:フ:・・ず ・・ざる ○いなや否\n#可:●:哿:陌:カ:よい べし\n#軽:◇:八庚:敬:ケイ:かるい かろやか ●かるがるしい\n#\n#未:●:未::ミ:いまだ・・ず ひつじ\n#覚:●:覚:効:カク:おぼえる さめる さとる\n#池:○:四支::チ:いけ\n#塘:○:七陽::トウ:つつみ\n#春:○:十一真::シュン:はる\n#草:●:皓::ソウ:くさ\n#夢:◇:一東:送:ム:ゆめ  ゆめをみる○あきらかならざる貌\n#\n#階:○:九佳::カイ:きざはし かいだん しな\n#前:○:一先::ゼン:まえ さき すすむ\n#梧:◇:七虞:遇:ゴ:あおぎり\n#葉:●:葉::ヨウ:は\n#已:●:紙:寘:イ:すでに のみ やめる はなはだ\n#秋:○:十一尤::シュウ:あき みのり とき としつき\n#声:○:八庚::セイ:こえ うわさ こわ\n".split("\n")-kansi_valid(sample).split("\n")).size)
+  end
+  
+  def test_valid
+    assert_equal(true,valid?("少年易老学難成 一寸光陰不可軽 未覚池塘春草夢 階前梧葉已秋声"))
+  end
+  
+  def test_dic
+    assert_equal("漢:●:翰::カン:国名 あや から\nあ:::::\n峠:■:国字::トウゲ:とうげ\n",dic("漢あ峠"))
+    assert_equal(["漢", "413", "", "0", "●", "翰", "去声", "", "カン", "", "国名 あや から", "3441", "2033", "13", "水艸口夫漢", "0"],Dic["漢"])
+    assert_equal(
+    {"楓"=>["楓", "2440", "", "0", "○", "一東", "上平", "", "フウ", "", "かえで", "4976", "4186", "13", "木風几丿虫", "0"],
+     "槭"=>["槭", "4166", "", "0", "●", "屋", "入声", "", "セキ", "", "かえで", "5C65", "6069", "15", "木戚戈上小", "0"]
+     },
+     search("かえで"))
+    assert_equal( "咸銜鹹緘岩巌杉衫凡鑑函監讒帆",inji[29])
+    assert_equal("亜",Jouyou[0])
+    assert_equal("亜",Ji[0])
+  end
+  
+  def test_hyousoku
+    assert_equal("虞◇曷●",hyousoku("菩薩"))      # =>"虞◇曷●"  
+    assert_equal("虞◇曷●",hyosoku("菩薩"))      # =>"虞◇曷●"
+  end
+  
+  def test_poetter
+    assert_equal("常国見搬納\n玉筒恒勺戎\n操銅置招演\n毛貝器移楓",poetter("常国◇○●\n◇○○●◎\n○○●○●\n○●●○◎",[Jouyou,inji[0]]))
+  end
+  
+  def test_kougo
+    assert_equal("班定常国河双\n#江",kougo("◇●常国○◎"))
+  end
+end
+=begin
+  puts sample # =>"#偶成　朱熹\n少年易老学難成\n一寸光陰不可軽\n未覚池塘春草夢\n階前梧葉已秋声\n"
+              #other valid=>"少年易老学難成\n一寸光陰不可軽\n未覚池塘春草夢\n階前梧葉已秋声"
+              #other valid=>"少年易老学難成 一寸光陰不可軽 未覚池塘春草夢 階前梧葉已秋声"
+              #other valid=>"少年易老学難成一寸光陰不可軽未覚池塘春草夢階前梧葉已秋声"
+  puts samples(10)        # =>make many 'Meaningless' Kansi-Poet on 1 sec 
+  
+  puts str1 = generate(7) # => make random 'Meaningless' poet(7 gon Zekku)
+  generate(5)             # => make random 'Meaningless' poet(5 gon Zekku)
+  
+  puts kansi_valid(sample)# =>絶句ならば禁則評価と辞書の結果表示、research dictionary and answer,validate
+  kv(str1)                # =>同上、   same above
+  valid(str1)             # =>同上、   same above
+  
+  valid?(str1)            # =>絶句が正しいならtrue。両韻・畳字などはtrueを返せない、return true or false(nil).  
+  kv_bool(str1)           # =>同上、   same above
+    
+  Dic["漢"]              # =>単漢字を調べる、Character Hash Dictionary(Author Jigen Kanou,in Kantarou)
+  dic("漢字辞典")        # =>文字列を調べる。普通こちら、Simple dictionary using Dic[]
+  search("かえで")       # =>Dicの内容から該当する漢字のハッシュをつくる
+  
+  kougo()                # =>香語、make random 'Meaningless' "kougo",you know.
+  kougo("◇●常国○◎")  # =>"囚故常国挑琴\n#侵"  平仄式から字を充て､最後に韻をコメント｡
+                         #   "◇不問　●仄　○平　◎韻"
+  
+  hyousoku("菩薩")       # =>"虞◇曷●"韻と平仄式を返す
+  hyosoku("菩薩")        # =>同上、   same above
+  
+  inji                   # =>平韻の配列表(inji[x],x=0..29)
+  
+=end
+

metadata

@@ -0,0 +1,120 @@
+--- !ruby/object:Gem::Specification 
+name: kansi_valid
+version: !ruby/object:Gem::Version 
+  hash: 17
+  prerelease: 
+  segments: 
+  - 0
+  - 0
+  - 7
+  version: 0.0.7
+platform: ruby
+authors: 
+- Takayasu Hayashi
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2013-01-04 00:00:00 +09:00
+default_executable: 
+dependencies: []
+
+description: |
+  Usage:
+    requrie "rubyems"
+    require "Kansi_valid"
+    inclide Kansi_valid
+    
+    puts str1 = generate(7) # => make random poet(7 gon Zekku)
+    puts str2 = generate(5) # => make random poet(5 gon Zekku)
+    
+    kansi_valid(str1)       # => research dictionary and answer,validate
+    kv(str1)                # =>   same above
+    valid(str1)             # =>   same above
+    
+    valid?(str1)            # =>true,false(nil)  
+    kv_bool(str1)           # =>   same above
+
+email: joe.ko9ji@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README
+files: 
+- lib/kansi_valid/sample.rb
+- lib/kansi_valid/kansi_htm.rb
+- lib/kansi_valid/check_tuuin.rb
+- lib/kansi_valid/nihongo.rb
+- lib/kansi_valid/be_hyo.rb
+- lib/kansi_valid/pick.rb
+- lib/kansi_valid/version.rb
+- lib/kansi_valid/be_soku.rb
+- lib/kansi_valid/bouin.rb
+- lib/kansi_valid/check_ouin.rb
+- lib/kansi_valid/kansi_organize.rb
+- lib/kansi_valid/kansi_generate.rb
+- lib/kansi_valid/seikei.rb
+- lib/kansi_valid/hyousoku.rb
+- lib/kansi_valid/check_zekku.rb
+- lib/kansi_valid/wiktionary.rb
+- lib/kansi_valid/kansi_analyze.rb
+- lib/kansi_valid/_24hudou.rb
+- lib/kansi_valid/search.rb
+- lib/kansi_valid/kanji.rb
+- lib/kansi_valid/inji.rb
+- lib/kansi_valid/kohyo.rb
+- lib/kansi_valid/kansi_comment.rb
+- lib/kansi_valid/_3ren.rb
+- lib/kansi_valid/check_okosi.rb
+- lib/kansi_valid/check_ryouin.rb
+- lib/kansi_valid/kougo.rb
+- lib/kansi_valid.rb
+- test/tc_kansi_valid.rb
+- dic/parts.dic
+- dic/jouyou_kanji.txt
+- dic/dic.txt
+- dic/kaku.dic
+- dic/ji_s.txt
+- dic/yomi.dic
+- dic/kanji_list.txt
+- kansi_valid.gemspec
+- LICENSE.txt
+- README
+has_rdoc: true
+homepage: 
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: "\xE6\xBC\xA2\xE8\xA9\xA9\xE3\x81\xAE\xE4\xBD\x9C\xE6\x88\x90\xE8\xA3\x9C\xE5\x8A\xA9\xE3\x80\x81\xE6\xB7\xBB\xE5\x89\x8A\xE3\x80\x82\xE3\x80\x80Easy to make Kanshi(Zekku)(Han-poet)and validate it. str=generate(5);kansi_valid(str);kv_bool(str)"
+test_files: 
+- test/tc_kansi_valid.rb