xb.lua

module("modules/xb/xb")

function parse_message(bot, msg)
  local i,j,chan,n = string.find(msg, ":.-!.- PRIVMSG (.-) ::xb (.+)")
  if not (i == nil) then
    
    local http = require("socket.http")
    local b, c, h = http.request("http://profile.mygamercard.net/" .. tostring(n))
    
    if not (b == nil) then
      local i,j = string.find(b, "Invalid GamerTag")
      if (i == nil) then
        local i,j,s = string.find(b, "userProfileStatusImage\" />%s+(.-)</div>")
        if not (i == nil) then
          local s = string.gsub(s, "<br.->", ", ")
          s = string.gsub(s, "%s+", " ")
          s = string.gsub(s, "%s+,%s+", " ")
          s = string.gsub(s, "<span.->", "")
          s = string.gsub(s, "</span>", "")
          bot:say(chan, tostring(s))
        else
          bot:say(chan, "Unable to find status for gamertag.")
        end
      else
        bot:say(chan, "Invalid GamerTag!")
      end
    else
      bot:say(chan, "Error while trying to get MyGamerCard webpage.")
    end
  
  end

end