blob: 7ee6b021040a331ab0f325b725a8b6e3bc38eb5b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
%
\NeedsTeXFormat{LaTeX2e}[2009/06/27]
\ProvidesPackage{barracuda}[2018/12/30 v0.1 a barcode typesetting package]%
\newbox\barracudabox
\newcommand\barracuda[2]{\directlua{
local barracuda = require "barracuda"
local e = [[#1]]
local s = [[#2]]
local enc, err = barracuda:get_barcode_class():new_encoder(e)
assert(enc, err)
local symb, err = enc:from_string(s); assert(symb, err)
local canvas = barracuda:new_canvas()
symb:append_ga(canvas)
local drv = barracuda:get_driver()
drv:ga_to_hbox(canvas, "barracudabox")
}%
\box\barracudabox
}
\endinput
|