summaryrefslogtreecommitdiff
path: root/macros/luatex/generic/barracuda/test/test-i2of5/002-ITF14-test.tex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2020-02-05 03:03:08 +0000
committerNorbert Preining <norbert@preining.info>2020-02-05 03:03:08 +0000
commit4b795f65d52cde0d136c0175ce20101946378b54 (patch)
tree07b9b0c89193d379ff6971be01a8ca1e3e6931ca /macros/luatex/generic/barracuda/test/test-i2of5/002-ITF14-test.tex
parentfc358ce7332053945afe16ced2a271556cdccfb7 (diff)
CTAN sync 202002050303
Diffstat (limited to 'macros/luatex/generic/barracuda/test/test-i2of5/002-ITF14-test.tex')
-rw-r--r--macros/luatex/generic/barracuda/test/test-i2of5/002-ITF14-test.tex53
1 files changed, 53 insertions, 0 deletions
diff --git a/macros/luatex/generic/barracuda/test/test-i2of5/002-ITF14-test.tex b/macros/luatex/generic/barracuda/test/test-i2of5/002-ITF14-test.tex
new file mode 100644
index 0000000000..52784b66bb
--- /dev/null
+++ b/macros/luatex/generic/barracuda/test/test-i2of5/002-ITF14-test.tex
@@ -0,0 +1,53 @@
+% !TeX program = LuaTeX
+% Copyright (C) 2020 Roberto Giacomelli
+
+\newbox\mybox
+\nopagenumbers
+
+\directlua{barracuda = require "barracuda"}
+
+
+Test 2: Interleaved 2 of 5 encoder test for ITF14 variant.
+
+\directlua{
+local barcode = barracuda:barcode()
+local enc = assert(barcode:new_encoder("i2of5-ITF14"))
+local s1 = assert(enc:from_uint(1234567890123))
+
+local canvas = barracuda:new_canvas()
+s1:append_ga(canvas)
+local drv = barracuda:get_driver()
+drv:ga_to_hbox(canvas, "mybox")
+}
+\vskip 10pt
+12345678901231 is \vrule A\vrule\box\mybox \vrule A\vrule
+
+\directlua{
+local barcode = barracuda:barcode()
+local enc = assert(barcode:enc_by_name("i2of5-ITF14"))
+local s1 = assert(enc:from_string("1234567890123"))
+
+local canvas = barracuda:new_canvas()
+s1:append_ga(canvas)
+local drv = barracuda:get_driver()
+drv:ga_to_hbox(canvas, "mybox")
+}
+\vskip 10pt
+12345678901231 is \vrule A\vrule\box\mybox \vrule A\vrule
+
+\directlua{
+local barcode = barracuda:barcode()
+local enc = assert(barcode:enc_by_name("i2of5-ITF14"))
+local s1 = assert(enc:from_string("(12) 34 56 78 90 12 3"))
+
+local canvas = barracuda:new_canvas()
+s1:append_ga(canvas)
+local drv = barracuda:get_driver()
+drv:ga_to_hbox(canvas, "mybox")
+}
+\vskip 10pt
+12345678901231 is \vrule A\vrule\box\mybox \vrule A\vrule
+
+\bye
+
+