summaryrefslogtreecommitdiff
path: root/macros/luatex/generic/barracuda/test/test-code39/001-code39-test.lua
blob: e4a8569e9383ea792432eba33727ba7adcda62cf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
-- Copyright (C) 2019 Roberto Giacomelli
-- test Code 39 encoder

local barracuda = require "barracuda"

for k, v in pairs(barracuda) do
    print(k,v)
end

local barcode = barracuda:get_barcode_class()

local c39, err = barcode:new_encoder("code39")
assert(not err, err)

print(c39._NAME)
print(c39._VERSION)

local info = c39:info()

print("encoder name = ", info.name)
print("description = ", info.description)

for k, tp in ipairs(info.param) do
    print(k, tp.name, tp.value)
end

local symb = c39:from_string("123")

print("print internal representation of chars")
for _, c in ipairs(symb.code) do
    print(c)
end
print()

local canvas = barracuda:new_canvas()
symb:append_ga(canvas)

-- native driver
local drv = barracuda:get_driver()

for _, code in ipairs(canvas._data) do print(code) end