51 lines
1.6 KiB
Lua
51 lines
1.6 KiB
Lua
-- This is a proprietary plugin, property of Andreas Bielawski, (c) 2015 <andi (dot) b (at) outlook (dot) de>
|
|
-- DO NOT USE WITHOUT PERMISSION
|
|
|
|
do
|
|
|
|
local function get_stock (symbol)
|
|
local BASE_URL = 'https://query.yahooapis.com/v1/public/yql'
|
|
local url = BASE_URL..'?q=select%20*%20from%20yahoo.finance.quotes%20where%20symbol="'..symbol..'"&env=http%3A%2F%2Fdatatables.org%2Falltables.env&format=json'
|
|
local res,code = https.request(url)
|
|
if code ~= 200 then return "HTTP-FEHLER" end
|
|
local data = json:decode(res).query.results.quote
|
|
return data
|
|
end
|
|
|
|
function send_stock_data(data, receiver)
|
|
local bid = data.Bid
|
|
local change = data.Change
|
|
local percent = data.ChangeinPercent
|
|
local currency = data.Currency
|
|
local range = data.DaysRange
|
|
local name = data.Name
|
|
local yesterday = data.PreviousClose
|
|
local year_range = data.YearRange
|
|
local symbol = data.symbol
|
|
|
|
local text = name..' ('..symbol..') Aktien in '..currency..':\nAktueller Preis: '..bid..' ('..change..' / '..percent..')\nGestriger Preis: '..yesterday..'\nHeute: '..range..'\nDieses Jahr: '..year_range
|
|
send_msg(receiver, text, ok_cb, false)
|
|
end
|
|
|
|
local function run(msg, matches)
|
|
local symbol = string.upper(matches[1])
|
|
local data = get_stock(symbol)
|
|
local receiver = get_receiver(msg)
|
|
if data.Bid ~= nil then
|
|
send_stock_data(data, receiver)
|
|
else
|
|
return "Dieses Symbol existiert nicht."
|
|
end
|
|
end
|
|
|
|
return {
|
|
description = "Sendet Aktieninfos",
|
|
usage = "#aktien [Symbol]: Sendet Aktieninfos", "#stocks [Symbol]",
|
|
patterns = {
|
|
"^#[Aa][Kk][Tt][Ii][Ee][Nn]? ([A-Za-z0-9]+)$",
|
|
"^#[Ss][Tt][Oo][Cc][Kk][Ss]? ([A-Za-z0-9]+)$"
|
|
},
|
|
run = run
|
|
}
|
|
|
|
end |