デスマコロシアム未挑戦言語出力

deathma.coffee

# Description:
#   デスマコロシアム未挑戦言語出力
#
#   第n回デスマコロシアムで挑戦者０名の言語を指定数分ランダムに出力します
#
# Commands:
#   deathma n count - 第 n 回で挑戦者０名の言語を count 個ランダムに出力する
#   deathma         - 最新回で挑戦者０名の言語をランダムに出力する
#
# Author:
#   suppy193

module.exports = (robot) ->
  latest = 9 
  # 『第n回デスマコロシアム』問題 集計報告 のトップページ
  robot.brain.set 'deathma9', "http://tbpgr.hatenablog.com/entry/20141223/1419335771"
  robot.brain.set 'deathma8', "http://tbpgr.hatenablog.com/entry/20141129/1417276802"
  robot.brain.set 'deathma7', "http://tbpgr.hatenablog.com/entry/20140906/1410014282"
  robot.brain.set 'deathma6', "http://tbpgr.hatenablog.com/entry/20140726/1406388500"
  robot.brain.set 'deathma5', "http://tbpgr.hatenablog.com/entry/20140615/1402853082"
  robot.brain.set 'deathma4', "http://tbpgr.hatenablog.com/entry/20140525/1401011965"
  robot.brain.set 'deathma3', "http://tbpgr.hatenablog.com/entry/20140429/1398790099"
  robot.brain.set 'deathma2', "http://tbpgr.hatenablog.com/entry/20140405/1396714344"
  robot.brain.set 'deathma1', "http://tbpgr.hatenablog.com/entry/20140318/1395147131"

  robot.respond /deathma *(\d+)? *(\d+)? *$/i, (msg) ->
    n = msg.match[1]
    if n?
      count = msg.match[2]
    else
      n = latest
      count = 1
    print_title(n, msg)
    url = robot.brain.get('deathma' + n)
    if url is null
      msg.send 'まだ開催されていません'
      return
    # 『第n回デスマコロシアム』問題 集計報告 のトップページを取得します
    robot.http(url)
      .get() (err, res, body) ->
        lang_list = body.split(/<\/?pre.*>/)[1].split("\n")
        challenge_lang_list = []
        if count > lang_list.length
          count = lang_list.length
        for i in [1..count]
          index = msg.random([0..lang_list.length-1])
          challenge_lang_list.push(lang_list[index])
          lang_list.splice(index, 1)
        print_message(challenge_lang_list, msg)

  print_title = (n, msg) ->
    msg.send 'CodeIQ名物'
    msg.send '第' + n + '回デスマコロシアム'

  print_message = (lang_list, msg) ->
    msg.send '今日挑戦するプログラム言語は'
    msg.send lang_list.join('と')
    msg.send 'にしましょう！'

# Examples:
#Hubot> hubot deathma 8 3
#Hubot> CodeIQ名物
#Hubot> 第8回デスマコロシアム
#Hubot> 今日挑戦するプログラム言語は
#Hubot> UnlambdaとObjective-CとAda
#Hubot> にしましょう！
#Hubot> hubot deathma 8 9
#Hubot> CodeIQ名物
#Hubot> 第8回デスマコロシアム
#Hubot> 今日挑戦するプログラム言語は
#Hubot> ScalaとFalconとVB.NETとSQLとAdaとProlog (swi)とTclとUnlambdaとOz
#Hubot> にしましょう！
#Hubot> hubot deathma 1 3
#Hubot> CodeIQ名物
#Hubot> 第1回デスマコロシアム
#Hubot> 今日挑戦するプログラム言語は
#Hubot> bcとCLIPS
#Hubot> にしましょう！
#Hubot> hubot deathma
#Hubot> CodeIQ名物
#Hubot> 第9回デスマコロシアム
#Hubot> 今日挑戦するプログラム言語は
#Hubot> Nemerle
#Hubot> にしましょう！
#Hubot> hubot deathma 10 2
#Hubot> CodeIQ名物
#Hubot> 第10回デスマコロシアム
#Hubot> まだ開催されていません