Akamaru
fe78a49367
Colors on Non valids. Check msg.to.id and msg.from.id function load_from_file(file) vardump uses serpent tabs on scandir Failed on Free games (no price info) Google with unescaped URLs
79 lines
2.1 KiB
Lua
79 lines
2.1 KiB
Lua
-- See https://wiki.teamfortress.com/wiki/User:RJackson/StorefrontAPI
|
|
|
|
do
|
|
|
|
local BASE_URL = 'http://store.steampowered.com/api/appdetails/'
|
|
local DESC_LENTH = 200
|
|
|
|
local function unescape(str)
|
|
str = string.gsub( str, '<', '<' )
|
|
str = string.gsub( str, '>', '>' )
|
|
str = string.gsub( str, '"', '"' )
|
|
str = string.gsub( str, ''', "'" )
|
|
str = string.gsub( str, '&#(%d+);', function(n) return string.char(n) end )
|
|
str = string.gsub( str, '&#x(%d+);', function(n) return string.char(tonumber(n,16)) end )
|
|
str = string.gsub( str, '&', '&' ) -- Be sure to do this after all others
|
|
return str
|
|
end
|
|
|
|
local function get_steam_data (appid)
|
|
local url = BASE_URL
|
|
url = url..'?appids='..appid
|
|
url = url..'&cc=DE'
|
|
local res,code = http.request(url)
|
|
if code ~= 200 then return nil end
|
|
local data = json:decode(res)[appid].data
|
|
return data
|
|
end
|
|
|
|
local function price_info (data)
|
|
local price = '' -- If no data is empty
|
|
|
|
if data then
|
|
local initial = data.initial
|
|
local final = data.final or data.initial
|
|
local min = math.min(data.initial, data.final)
|
|
price = tostring(min/100)
|
|
if data.discount_percent and initial ~= final then
|
|
price = price..data.currency..' ('..data.discount_percent..'% OFF)'
|
|
end
|
|
price = price..' (US)'
|
|
end
|
|
|
|
return price
|
|
end
|
|
|
|
|
|
local function send_steam_data(data, receiver)
|
|
local description = string.sub(unescape(data.about_the_game:gsub("%b<>", "")), 1, DESC_LENTH) .. '...'
|
|
local title = data.name
|
|
local price = price_info(data.price_overview)
|
|
|
|
local text = title..' '..price..'\n'..description
|
|
local image_url = data.header_image
|
|
local cb_extra = {
|
|
receiver = receiver,
|
|
url = image_url
|
|
}
|
|
send_msg(receiver, text, send_photo_from_url_callback, cb_extra)
|
|
end
|
|
|
|
|
|
local function run(msg, matches)
|
|
local appid = matches[1]
|
|
local data = get_steam_data(appid)
|
|
local receiver = get_receiver(msg)
|
|
send_steam_data(data, receiver)
|
|
end
|
|
|
|
return {
|
|
description = "Grabs Steam info for Steam links.",
|
|
usage = "",
|
|
patterns = {
|
|
"http://store.steampowered.com/app/([0-9]+)",
|
|
},
|
|
run = run
|
|
}
|
|
|
|
end
|