dzfl::blog

2008-01-24T15:00:43+00:00
CodeReposにコミットしたよ。
http://coderepos.org/share/browser/lang/ruby/chokan/trunk/plugins/erogame_space.rb

chokanのプラグイン書いた。

ErogameScape－エロゲー批評空間－からキーワード検索してタイトル・評価点数・URLを取って来る。だけ。DB直接見れるから他にも色々できそうだけどね。

require 'net/http'
require 'uri'
require 'kconv'

class ErogameSpace < Chokan::PluginBase
  def initialize(config, chokan)
    super
    @prefix = @config['prefix'] || 'erg '
  end

  def on_privmsg(prefix, channel, message)
    case message
    when /^#{@prefix}(.+)$/i
      m = Regexp.last_match[1]
      log m
      parse(m).each {|n| notice(channel, n)}
    end
  end

  private
  def parse(keyword)
    Net::HTTP.start('erogamescape.dyndns.org', 80) do |http|
      begin
        n = URI.encode(keyword.gsub(" ", ".*").toeuc)
        uri = "/~ap2/ero/toukei_kaiseki/create_csv.php?SQL=SELECT+sellday,median,shoukai,gamename+from+gamelist+where+gamename+~*+'.*" + n + ".*'+order+by+sellday+desc+limit+5"
        response = http.get(uri)

        return "見つからない" if response.body.strip.empty?

        o = ""
        response.body.each_line do |line|
          next if line.strip.empty? || line =~ /^<(\/|)pre>/
          row = line.toutf8.strip.split(/,/)
          if row[1] == “” then
            row[1] = “–”
          end
          o << "#{row[3]} - 評価:#{row[1]}"
          o << "\n#{row[2]}\n"
        end
        log o
        return o
      end
    end
  end
end

実行結果

(tomo) erg fate
(chokan) Fate/stay night [Realta Nua] - 評価:90
(chokan) http://www.ps2-fate.com/
(chokan) Fate/hollow ataraxia - 評価:85
(chokan) http://www.typemoon.com/hollow/index.html
(chokan) Fate/dear night - 評価:50
(chokan) http://ogg.sakura.ne.jp/ogg002.html
(chokan) Fate/sword dance - 評価:50
(chokan) http://rapid.vis.ne.jp/RAPIDFIRE/rapid_old/fate/fate.html

# いい加減wordpress消したいな……。