summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/scripts
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2022-09-15 19:58:08 +0000
committerKarl Berry <karl@freefriends.org>2022-09-15 19:58:08 +0000
commit62f01f665729e60472abd2b4c91b7519e1366a65 (patch)
tree6344d0c5e03cf565a127703d4ee3659b0aab49e8 /Master/texmf-dist/scripts
parent8a33cf80b49ed6e7bcd3c73cdaea6d45f41ab32a (diff)
qrbill (15sep22)
git-svn-id: svn://tug.org/texlive/trunk@64406 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts')
-rw-r--r--Master/texmf-dist/scripts/qrbill/qrbill-latexluaqrcode.lua24
1 files changed, 24 insertions, 0 deletions
diff --git a/Master/texmf-dist/scripts/qrbill/qrbill-latexluaqrcode.lua b/Master/texmf-dist/scripts/qrbill/qrbill-latexluaqrcode.lua
new file mode 100644
index 00000000000..b1c31c2c644
--- /dev/null
+++ b/Master/texmf-dist/scripts/qrbill/qrbill-latexluaqrcode.lua
@@ -0,0 +1,24 @@
+qrencode = require("qrencode.lua")
+
+function printQRcode(codestring)
+ local ok, tab = qrencode.qrcode(codestring, 2)
+ local count = 0
+ local tabstr = ""
+ local qrrows = ""
+ if ok then
+ for k,v in pairs(tab) do
+
+ count = count + 1
+ for t,s in pairs(v) do
+ if s > 0 then
+ tabstr=tabstr.."\\qrblack"
+ else
+ tabstr=tabstr.."\\qrwhite"
+ end
+ end
+ qrrows=tabstr.."\\qrnewline"..qrrows
+ tabstr=""
+ end
+ end
+ return count, qrrows
+end \ No newline at end of file