Currency: Stelle auf Fixer.io um und ergänze Inline (danke @Centzilius)

otouto/plugins/currency.lua

@@ -7,54 +7,116 @@ function currency:init(config)
       "^/cash ([A-Za-z]+)$",
       "^/cash ([A-Za-z]+) ([A-Za-z]+)$",
 	  "^/cash (%d+[%d%.,]*) ([A-Za-z]+) ([A-Za-z]+)$",
-  	"^(/eur)$"
+	  "^(/cash)$"
+	}
+	currency.inline_triggers = {
+	  "^c ([A-Za-z]+)$",
+	  "^c ([A-Za-z]+) ([A-Za-z]+)$",
+	  "^c (%d+[%d%.,]*) ([A-Za-z]+) ([A-Za-z]+)$"
 	}
 	currency.doc = [[*
 ]]..config.cmd_pat..[[cash* _[Menge]_ _<von>_ _<zu>_
+*]]..config.cmd_pat..[[cash* _<von>_: Rechnet in Euro um
+*]]..config.cmd_pat..[[cash* _<von>_ _<zu>_: Rechnet mit der Einheit 1
 Beispiel: _]]..config.cmd_pat..[[cash 5 USD EUR_]]
 end
 
-function currency:action(msg, config)
+local BASE_URL = 'https://api.fixer.io'
-  if not matches[2] then
+
-    from = string.upper(matches[1])
+function currency:inline_callback(inline_query, config, matches)
-	to = 'EUR'
+  if not matches[2] then -- first pattern
+    base = 'EUR'
+	to = string.upper(matches[1])
 	amount = 1
-  elseif matches[3] then
+  elseif matches[3] then -- third pattern
-    from = string.upper(matches[2])
+    base  = string.upper(matches[2])
 	to = string.upper(matches[3])
 	amount = matches[1]
-  else
+  else -- second pattern
-    from = string.upper(matches[1])
+    base = string.upper(matches[1])
 	to = string.upper(matches[2])
 	amount = 1
   end
   
+  local value, iserr = currency:convert_money(base, to, amount)
+  if iserr then utilities.answer_inline_query(self, inline_query) return end
+  
+  local output = amount..' '..base..' = *'..value..' '..to..'*'
+  if tonumber(amount) == 1 then
+    title = amount..' '..base..' entspricht'
+  else
+    title = amount..' '..base..' entsprechen'
+  end
+  local results = '[{"type":"article","id":"20","title":"'..title..'","description":"'..value..' '..to..'","thumb_url":"https://anditest.perseus.uberspace.de/inlineQuerys/currency/cash.jpg","thumb_width":157,"thumb_height":140,"input_message_content":{"message_text":"'..output..'","parse_mode":"Markdown"}}]'
+  utilities.answer_inline_query(self, inline_query, results, 3600)
+end
+
+function currency:convert_money(base, to, amount)
+  local url = BASE_URL..'/latest?base='..base..'&symbols='..to
   local amount = string.gsub(amount, ",", ".")
-  amount = tonumber(amount)
+  local amount = tonumber(amount)
-  local result = 1
+  local res, code = https.request(url)
-  local BASE_URL = 'https://www.google.com/finance/converter'
+  if code ~= 200 and code ~= 422 then
+    return 'NOCONNECT', true
+  end
+  
+  local res, code = https.request(url)
+  local data = json.decode(res)
+  if data.error then
+    return 'WRONGBASE', true
+  end
+  
+  local rate = data.rates[to]
+  if not rate then
+	 return 'WRONGCONVERTRATE', true
+  end
+  
+  if amount == 1 then
+    value = round(rate, 2)
+  else
+    value = round(rate * amount, 2)
+  end
+  local value = tostring(string.gsub(value, "%.", ","))
+
+  return value
+end
+
+function currency:action(msg, config, matches)
+  if matches[1] == '/cash' then
+    utilities.send_reply(self, msg, currency.doc, true)
+    return
+  elseif not matches[2] then -- first pattern
+    base = 'EUR'
+	to = string.upper(matches[1])
+	amount = 1
+  elseif matches[3] then -- third pattern
+    base  = string.upper(matches[2])
+	to = string.upper(matches[3])
+	amount = matches[1]
+  else -- second pattern
+    base = string.upper(matches[1])
+	to = string.upper(matches[2])
+	amount = 1
+  end
+
   if from == to then
     utilities.send_reply(self, msg, 'Jaja, sehr witzig...')
 	return
   end
-  
+
-  local url = BASE_URL..'?from='..from..'&to='..to..'&a='..amount
+  local value = currency:convert_money(base, to, amount)
-  local str, res = https.request(url)
+  if value == 'NOCONNECT' then
-  if res ~= 200 then
     utilities.send_reply(self, msg, config.errors.connection)
     return
-  end
+  elseif value == 'WRONGBASE' then 
-  
+    utilities.send_reply(self, msg, 'Keine gültige Basiswährung.')
-  local str = str:match('<span class=bld>(.*) %u+</span>')
+	return
-  if not str then
+  elseif value == 'WRONGCONVERTRATE' then
-	utilities.send_reply(self, msg, 'Keine gültige Währung - sieh dir die Währungsliste bei [Google Finanzen](https://www.google.com/finance/converter) an.', true)
+    utilities.send_reply(self, msg, 'Keine gültige Umwandlungswährung.')
 	return
   end
-  local result = string.format('%.2f', str)
-  local result = string.gsub(result, "%.", ",")
 
-  local amount = tostring(string.gsub(amount, "%.", ","))
+  local output = amount..' '..base..' = *'..value..' '..to..'*'
-  local output = amount..' '..from..' = *'..result..' '..to..'*'
   utilities.send_reply(self, msg, output, true)
 end