diff options
Diffstat (limited to 'macros/luatex/generic/barracuda/test/test-ean')
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.pdf | bin | 23619 -> 23620 bytes | |||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.tex | 40 | ||||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/002-ean-test.pdf | bin | 10601 -> 10601 bytes | |||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/003-ean-test.pdf | bin | 3901 -> 3901 bytes | |||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.pdf | bin | 0 -> 19829 bytes | |||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.tex | 45 | ||||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/006-issn-test.pdf | bin | 0 -> 14883 bytes | |||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/006-issn-test.tex | 57 | ||||
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-ean/ars.svg | 110 |
9 files changed, 227 insertions, 25 deletions
diff --git a/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.pdf b/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.pdf Binary files differindex 0e8abb933f..12eac36ba1 100644 --- a/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.pdf +++ b/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.pdf diff --git a/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.tex b/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.tex index c0a4db3894..7c7b373a6c 100644 --- a/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.tex +++ b/macros/luatex/generic/barracuda/test/test-ean/001-13-ean-test.tex @@ -1,5 +1,5 @@ % !TeX program = LuaTeX -% Copyright (C) 2019 Roberto Giacomelli +% Copyright (C) 2020 Roberto Giacomelli \newbox\mybox \nopagenumbers @@ -9,8 +9,8 @@ EAN encoder test. Test 1: one simple barcode EAN13 with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +barracuda = require "barracuda" +local barcode = barracuda:barcode() local ean13, err = barcode:new_encoder("ean-13") assert(not err, err) @@ -30,8 +30,7 @@ drv:ga_to_hbox(canvas, "mybox") Test 2: one simple EAN8 barcode with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean8, err = barcode:new_encoder("ean-8") assert(not err, err) @@ -51,8 +50,7 @@ drv:ga_to_hbox(canvas, "mybox") Test 3: one simple EAN5 barcode with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean5, err = barcode:new_encoder("ean-5") assert(not err, err) local symbo, err = ean5:from_string("54495") @@ -68,8 +66,7 @@ drv:ga_to_hbox(canvas, "mybox") Test 4: one simple EAN2 barcode with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean2, err = barcode:new_encoder("ean-2") assert(not err, err) local symbo, err = ean2:from_string("53") @@ -85,13 +82,11 @@ drv:ga_to_hbox(canvas, "mybox") Test 5: EAN13 + EAN5 barcode with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean, err = barcode:new_encoder("ean-13+5"); assert(not err, err) local n = 123456789012 -local c = ean:checksum(n) -local s = n .. c -local symbo, err = ean:from_string(s.."12345") +local c = assert(ean:checksum(n)) +local symbo, err = ean:from_string(n..c.."12345") assert(not err, err) local canvas = barracuda:new_canvas() symbo:append_ga(canvas) @@ -104,8 +99,7 @@ drv:ga_to_hbox(canvas, "mybox") Test 6: EAN13 + EAN2 barcode with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean, err = barcode:new_encoder("ean-13+2"); assert(not err, err) local n = 123456789012 local c = ean:checksum(n) @@ -123,8 +117,7 @@ drv:ga_to_hbox(canvas, "mybox") Test 7: EAN8 + EAN5 barcode with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean, err = barcode:new_encoder("ean-8+5"); assert(not err, err) local n = 1234567 local c = ean:checksum(n) @@ -142,8 +135,7 @@ drv:ga_to_hbox(canvas, "mybox") Test 8: EAN8 + EAN2 barcode with default parameter: \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean, err = barcode:new_encoder("ean-8+2"); assert(not err, err) local n = 7865431 local c = ean:checksum(n) @@ -167,8 +159,7 @@ to the object symbol. \smallskip \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean, err = barcode:enc_by_name("ean-13"); assert(not err, err) local n = 818571884348 local c = ean:checksum(n) @@ -194,8 +185,7 @@ The parameter height is setting up in the encoder so it will be global. \smallskip \directlua{ -local barracuda = require "barracuda" -local barcode = barracuda:get_barcode_class() +local barcode = barracuda:barcode() local ean, err = barcode:enc_by_name("ean-13"); assert(not err, err) local ok, err = ean:set_param("height", tex.sp "5mm"); assert(ok, err) local n = 758458535897; local c = ean:checksum(n); local s = n .. c @@ -213,7 +203,7 @@ drv:ga_to_hbox(canvas, "mybox") \vrule Test 10\vrule\box\mybox \vrule Test 10\vrule \medskip -That's all folk! +That's all folks! \bye diff --git a/macros/luatex/generic/barracuda/test/test-ean/002-ean-test.pdf b/macros/luatex/generic/barracuda/test/test-ean/002-ean-test.pdf Binary files differindex 568050371c..796ad29ab0 100644 --- a/macros/luatex/generic/barracuda/test/test-ean/002-ean-test.pdf +++ b/macros/luatex/generic/barracuda/test/test-ean/002-ean-test.pdf diff --git a/macros/luatex/generic/barracuda/test/test-ean/003-ean-test.pdf b/macros/luatex/generic/barracuda/test/test-ean/003-ean-test.pdf Binary files differindex baa5a5b9cd..c52c77a847 100644 --- a/macros/luatex/generic/barracuda/test/test-ean/003-ean-test.pdf +++ b/macros/luatex/generic/barracuda/test/test-ean/003-ean-test.pdf diff --git a/macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.pdf b/macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.pdf Binary files differnew file mode 100644 index 0000000000..d71e87141d --- /dev/null +++ b/macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.pdf diff --git a/macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.tex b/macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.tex new file mode 100644 index 0000000000..d69ff6fc28 --- /dev/null +++ b/macros/luatex/generic/barracuda/test/test-ean/005-isbn-test.tex @@ -0,0 +1,45 @@ +% !TeX program = LuaTeX +\nopagenumbers +% load package and store it in a global Lua variable +\directlua{barracuda = require "barracuda"} +\newbox\mybox + +ISBN test: +\vskip10pt + +\leavevmode +\directlua{barracuda:hbox("ean-isbn", "978-88-8154-348-9", "mybox")} +\box\mybox +\directlua{barracuda:hbox("ean-isbn", "978 88 8154 348 9", "mybox")} +\box\mybox + +\vskip10pt +\directlua{barracuda:hbox("ean-isbn+5", "978 88 8154 348 9-80026", "mybox")}% +\box\mybox + +\vskip10pt +ISBN 10 test, the 10-digits code is automatically converted in an ISBN 13 code: +\vskip10pt +\directlua{barracuda:hbox("ean-isbn", "1-78474-140-X", "mybox")}% +\box\mybox + +\vskip10pt +\directlua{barracuda:hbox("ean-isbn+5", "1-78474-140-X 12345", "mybox")}% +\box\mybox + +\vskip10pt +\directlua{barracuda:hbox("ean-isbn+2", "1-78474-140-X 99", "mybox")}% +\box\mybox + +\vskip5pt +ISBN Test: the value 'auto' for 'text\_isbn\_enabled' option means that +the text above the symbol isn't printed if in the provided code does not +have group chars or the length is not 10: +\vskip5pt +\leavevmode +\directlua{barracuda:hbox("ean-isbn", "9788881543489", "mybox")} +\box\mybox +\directlua{barracuda:hbox("ean-isbn", "978-8881543489", "mybox")} +\box\mybox + +\bye
\ No newline at end of file diff --git a/macros/luatex/generic/barracuda/test/test-ean/006-issn-test.pdf b/macros/luatex/generic/barracuda/test/test-ean/006-issn-test.pdf Binary files differnew file mode 100644 index 0000000000..57f3739fb7 --- /dev/null +++ b/macros/luatex/generic/barracuda/test/test-ean/006-issn-test.pdf diff --git a/macros/luatex/generic/barracuda/test/test-ean/006-issn-test.tex b/macros/luatex/generic/barracuda/test/test-ean/006-issn-test.tex new file mode 100644 index 0000000000..576963bd81 --- /dev/null +++ b/macros/luatex/generic/barracuda/test/test-ean/006-issn-test.tex @@ -0,0 +1,57 @@ +% !TeX program = LuaTeX +\nopagenumbers +% load package and store it in a global Lua variable +\directlua{barracuda = require "barracuda"} +\newbox\mybox + +ISSN test: + +\vskip10pt +\leavevmode +\directlua{barracuda:hbox("ean-issn", "9778881543480", "mybox")} +\box\mybox + +\vskip10pt +\leavevmode +\directlua{barracuda:hbox("ean-issn+5", "977888154348000028", "mybox")} +\box\mybox + +\vskip10pt +\leavevmode +\directlua{ +local ars_issn = { + online = "9771828236001", + print = "9771828235004", +} + +barracuda:hbox("ean-issn+5", ars_issn.online.."00028", "mybox") +} +\box\mybox + +\vskip10pt +\leavevmode +\directlua{barracuda:hbox("ean-issn", "1828-2350", "mybox")} +\box\mybox + +\vskip10pt +\leavevmode +\directlua{barracuda:hbox("ean-issn", "1828-2350 [01]", "mybox")} +\box\mybox + +\vskip10pt +\leavevmode +\directlua{barracuda:hbox("ean-issn+5", "1828-2350 [01] 00028", "mybox")} +\box\mybox + +\vskip10pt +\leavevmode +\directlua{ +barracuda:hbox("ean-issn+2", "1828-2350 [01] 22", "mybox") +barracuda:save("ean-issn+2", "1828-2350 [01] 22", "ars") +} +\box\mybox + + +\bye + + diff --git a/macros/luatex/generic/barracuda/test/test-ean/ars.svg b/macros/luatex/generic/barracuda/test/test-ean/ars.svg new file mode 100644 index 0000000000..5bfc01d0f3 --- /dev/null +++ b/macros/luatex/generic/barracuda/test/test-ean/ars.svg @@ -0,0 +1,110 @@ +<?xml version="1.0" encoding="UTF-8" standalone="no"?> +<!-- Created with Barracuda package (https://github.com/robitex/barracuda) --> +<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" + "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd"> +<svg xmlns="http://www.w3.org/2000/svg" + version="1.1" + width="47.189752mm" height="28.039875mm" + viewBox="-3.629981 -27.259868 47.189752 28.039875" +> + <g stroke="black"> + <path d="M0.164999 -24.499871V-0.000000" style="stroke-width:0.329998"/> + <path d="M0.824996 -24.499871V-0.000000" style="stroke-width:0.329998"/> + </g> + <g stroke="black"> + <path d="M1.814990 -24.499871V-1.649991" style="stroke-width:0.989995"/> + <path d="M2.969984 -24.499871V-1.649991" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M4.124978 -24.499871V-1.649991" style="stroke-width:0.329998"/> + <path d="M5.444971 -24.499871V-1.649991" style="stroke-width:0.329998"/> + </g> + <g stroke="black"> + <path d="M6.269967 -24.499871V-1.649991" style="stroke-width:0.659997"/> + <path d="M7.589960 -24.499871V-1.649991" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M8.579955 -24.499871V-1.649991" style="stroke-width:0.659997"/> + <path d="M9.734949 -24.499871V-1.649991" style="stroke-width:0.989995"/> + </g> + <g stroke="black"> + <path d="M11.219941 -24.499871V-1.649991" style="stroke-width:0.659997"/> + <path d="M12.209936 -24.499871V-1.649991" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M13.199931 -24.499871V-1.649991" style="stroke-width:0.659997"/> + <path d="M14.354924 -24.499871V-1.649991" style="stroke-width:0.989995"/> + </g> + <g stroke="black"> + <path d="M15.344919 -24.499871V-0.000000" style="stroke-width:0.329998"/> + <path d="M16.004916 -24.499871V-0.000000" style="stroke-width:0.329998"/> + </g> + <g stroke="black"> + <path d="M16.829911 -24.499871V-1.649991" style="stroke-width:0.659997"/> + <path d="M17.819906 -24.499871V-1.649991" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M18.974900 -24.499871V-1.649991" style="stroke-width:0.329998"/> + <path d="M20.624891 -24.499871V-1.649991" style="stroke-width:0.329998"/> + </g> + <g stroke="black"> + <path d="M21.284888 -24.499871V-1.649991" style="stroke-width:0.329998"/> + <path d="M22.604881 -24.499871V-1.649991" style="stroke-width:0.989995"/> + </g> + <g stroke="black"> + <path d="M23.924874 -24.499871V-1.649991" style="stroke-width:0.989995"/> + <path d="M25.244867 -24.499871V-1.649991" style="stroke-width:0.329998"/> + </g> + <g stroke="black"> + <path d="M26.069863 -24.499871V-1.649991" style="stroke-width:0.659997"/> + <path d="M27.389856 -24.499871V-1.649991" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M28.379851 -24.499871V-1.649991" style="stroke-width:0.659997"/> + <path d="M29.699844 -24.499871V-1.649991" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M30.524839 -24.499871V-0.000000" style="stroke-width:0.329998"/> + <path d="M31.184836 -24.499871V-0.000000" style="stroke-width:0.329998"/> + </g> + <text x="-3.629981" y="0.780007" font-family="Verdana" font-size="2.877000"> + 9 </text> + <text y="0.780007" font-family="Verdana" font-size="2.877000" text-anchor="middle"> + <tspan x="2.043326">7</tspan> + <tspan x="4.459979">7</tspan> + <tspan x="6.876631">1</tspan> + <tspan x="9.293284">8</tspan> + <tspan x="11.709936">2</tspan> + <tspan x="14.126589">8</tspan> + </text> + <text y="0.780007" font-family="Verdana" font-size="2.877000" text-anchor="middle"> + <tspan x="17.223246">2</tspan> + <tspan x="19.639899">3</tspan> + <tspan x="22.056551">5</tspan> + <tspan x="24.473204">0</tspan> + <tspan x="26.889856">1</tspan> + <tspan x="29.306509">1</tspan> + </text> + <text x="15.674918" y="-25.159868" font-family="Verdana" font-size="2.877000" text-anchor="middle"> + ISSN 1828-2350 </text> + <g stroke="black"> + <path d="M34.814817 -20.824890V-0.000000" style="stroke-width:0.329998"/> + <path d="M35.639812 -20.824890V-0.000000" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M36.959806 -20.824890V-0.000000" style="stroke-width:0.659997"/> + <path d="M37.949800 -20.824890V-0.000000" style="stroke-width:0.659997"/> + </g> + <g stroke="black"> + <path d="M38.774796 -20.824890V-0.000000" style="stroke-width:0.329998"/> + </g> + <g stroke="black"> + <path d="M39.764791 -20.824890V-0.000000" style="stroke-width:0.329998"/> + <path d="M40.919785 -20.824890V-0.000000" style="stroke-width:0.659997"/> + </g> + <text y="-21.154889" font-family="Verdana" font-size="2.877000" text-anchor="middle"> + <tspan x="36.445645">2</tspan> + <tspan x="39.453955">2</tspan> + </text> +</svg> + |