summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips/pst-barcode
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2012-11-16 23:22:47 +0000
committerKarl Berry <karl@freefriends.org>2012-11-16 23:22:47 +0000
commit1872a4397a1cdaf65caab05faba8d51f007c5dee (patch)
tree7da2b30320cc6e4d389e6c8d90c1a363d69be4b5 /Master/texmf-dist/dvips/pst-barcode
parent351b5fe3106e281bf9269440e6270dc1b56635f5 (diff)
pst-barcode (16nov12)
git-svn-id: svn://tug.org/texlive/trunk@28278 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips/pst-barcode')
-rw-r--r--Master/texmf-dist/dvips/pst-barcode/pst-barcode.pro28
1 files changed, 15 insertions, 13 deletions
diff --git a/Master/texmf-dist/dvips/pst-barcode/pst-barcode.pro b/Master/texmf-dist/dvips/pst-barcode/pst-barcode.pro
index 453d96fbc1b..429b300be0e 100644
--- a/Master/texmf-dist/dvips/pst-barcode/pst-barcode.pro
+++ b/Master/texmf-dist/dvips/pst-barcode/pst-barcode.pro
@@ -3,11 +3,13 @@
%%DocumentPaperSizes: a4
%%EndComments
-% Barcode Writer in Pure PostScript - Version 2012-06-26
+% Barcode Writer in Pure PostScript - Version 2012-11-15
% http://www.terryburton.co.uk/barcodewriter/
%
% Copyright (c) 2004-2012 Terry Burton
%
+% $Id: barcode.ps 2399 2012-11-15 13:18:46Z terry.burton $
+%
% Permission is hereby granted, free of charge, to any
% person obtaining a copy of this software and associated
% documentation files (the "Software"), to deal in the
@@ -205,11 +207,11 @@ begin
textcolor (unset) ne { textcolor setanycolor } if
includetext {
textxalign (unset) eq textyalign (unset) eq and alttext () eq and {
- /s 0 def /f () def
+ /s 0 def /fn () def
txt {
{} forall
- 2 copy s ne exch f ne or {
- 2 copy /s exch def /f exch def
+ 2 copy s ne exch fn ne or {
+ 2 copy /s exch def /fn exch def
exch findfont exch scalefont setfont
} {
pop pop
@@ -666,7 +668,7 @@ end
% --BEGIN ENCODER ean13--
% --SUGGESTS ean5 ean2--
% --DESC: EAN-13
-% --EXAM: 977147396801
+% --EXAM: 2071473968010
% --EXOP: includetext guardwhitespace
% --RNDR: renlinear
/setpacking where {pop currentpacking true setpacking} if
@@ -1033,7 +1035,7 @@ end
% --BEGIN ENCODER upca--
% --SUGGESTS ean5 ean2--
% --DESC: UPC-A
-% --EXAM: 78858101497
+% --EXAM: 488581014973
% --EXOP: includetext
% --RNDR: renlinear
/setpacking where {pop currentpacking true setpacking} if
@@ -1214,7 +1216,7 @@ end
% --BEGIN ENCODER upce--
% --SUGGESTS ean5 ean2--
% --DESC: UPC-E
-% --EXAM: 0123456
+% --EXAM: 00123457
% --EXOP: includetext height=0.4
% --RNDR: renlinear
/setpacking where {pop currentpacking true setpacking} if
@@ -11784,8 +11786,8 @@ begin
/i 0 def
{ % loop
/m metrics i get def
- /c m 0 get def % Rows in symbol
- /r m 1 get def % Columns in symbol
+ /c m 0 get def % Columns in symbol
+ /r m 1 get def % Rows in symbol
/k m 2 get def % Error correction codewords
/rapl m 3 get def % Left row address pattern
/rapc m 4 get def % Centre row address pattern
@@ -15533,7 +15535,7 @@ end
% --REQUIRES ean13 micropdf417 pdf417 gs1-cc--
% --SUGGESTS ean5 ean2--
% --DESC: EAN-13 Composite
-% --EXAM: 331234567890|(99)1234-abcd
+% --EXAM: 2112345678900|(99)1234-abcd
% --EXOP: includetext
% --RNDR: renlinear renmatrix
/setpacking where {pop currentpacking true setpacking} if
@@ -15613,7 +15615,7 @@ end
% --REQUIRES ean8 micropdf417 pdf417 gs1-cc--
% --SUGGESTS ean5 ean2--
% --DESC: EAN-8 Composite
-% --EXAM: 12345670|(21)A12345678
+% --EXAM: 02345673|(21)A12345678
% --EXOP: includetext
% --RNDR: renlinear renmatrix
/setpacking where {pop currentpacking true setpacking} if
@@ -15696,7 +15698,7 @@ end
% --REQUIRES upca micropdf417 pdf417 gs1-cc--
% --SUGGESTS ean5 ean2--
% --DESC: UPC-A Composite
-% --EXAM: 01600033610|(99)1234-abcd
+% --EXAM: 416000336108|(99)1234-abcd
% --EXOP: includetext
% --RNDR: renlinear renmatrix
/setpacking where {pop currentpacking true setpacking} if
@@ -15776,7 +15778,7 @@ end
% --REQUIRES upce micropdf417 pdf417 gs1-cc--
% --SUGGESTS ean5 ean2--
% --DESC: UPC-E Composite
-% --EXAM: 0121230|(15)021231
+% --EXAM: 00123457|(15)021231
% --EXOP: includetext
% --RNDR: renlinear renmatrix
/setpacking where {pop currentpacking true setpacking} if