rghost_barcode 0.8

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (144) hide show
  1. data/lib/doc/classes/RGhost.html +109 -0
  2. data/lib/doc/classes/RGhost/Barcode.html +147 -0
  3. data/lib/doc/classes/RGhost/Barcode/Auspost.html +113 -0
  4. data/lib/doc/classes/RGhost/Barcode/Azteccode.html +113 -0
  5. data/lib/doc/classes/RGhost/Barcode/Base.html +266 -0
  6. data/lib/doc/classes/RGhost/Barcode/Base.src/M000004.html +34 -0
  7. data/lib/doc/classes/RGhost/Barcode/Base.src/M000005.html +30 -0
  8. data/lib/doc/classes/RGhost/Barcode/Base.src/M000006.html +20 -0
  9. data/lib/doc/classes/RGhost/Barcode/Border.html +170 -0
  10. data/lib/doc/classes/RGhost/Barcode/Border.src/M000001.html +27 -0
  11. data/lib/doc/classes/RGhost/Barcode/Code11.html +113 -0
  12. data/lib/doc/classes/RGhost/Barcode/Code128.html +113 -0
  13. data/lib/doc/classes/RGhost/Barcode/Code2of5.html +113 -0
  14. data/lib/doc/classes/RGhost/Barcode/Code39.html +113 -0
  15. data/lib/doc/classes/RGhost/Barcode/Code93.html +113 -0
  16. data/lib/doc/classes/RGhost/Barcode/Datamatrix.html +113 -0
  17. data/lib/doc/classes/RGhost/Barcode/Ean13.html +113 -0
  18. data/lib/doc/classes/RGhost/Barcode/Ean2.html +113 -0
  19. data/lib/doc/classes/RGhost/Barcode/Ean5.html +113 -0
  20. data/lib/doc/classes/RGhost/Barcode/Ean8.html +113 -0
  21. data/lib/doc/classes/RGhost/Barcode/Guard.html +174 -0
  22. data/lib/doc/classes/RGhost/Barcode/Guard.src/M000003.html +27 -0
  23. data/lib/doc/classes/RGhost/Barcode/Interleaved2of5.html +113 -0
  24. data/lib/doc/classes/RGhost/Barcode/Isbn.html +113 -0
  25. data/lib/doc/classes/RGhost/Barcode/Kix.html +113 -0
  26. data/lib/doc/classes/RGhost/Barcode/Maxicode.html +113 -0
  27. data/lib/doc/classes/RGhost/Barcode/Msi.html +113 -0
  28. data/lib/doc/classes/RGhost/Barcode/Onecode.html +113 -0
  29. data/lib/doc/classes/RGhost/Barcode/Parameter.html +262 -0
  30. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000007.html +20 -0
  31. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000008.html +18 -0
  32. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000009.html +18 -0
  33. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000010.html +18 -0
  34. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000011.html +18 -0
  35. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000012.html +24 -0
  36. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000013.html +18 -0
  37. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000014.html +18 -0
  38. data/lib/doc/classes/RGhost/Barcode/Parameter.src/M000015.html +16 -0
  39. data/lib/doc/classes/RGhost/Barcode/Pdf417.html +113 -0
  40. data/lib/doc/classes/RGhost/Barcode/Pharmacode.html +113 -0
  41. data/lib/doc/classes/RGhost/Barcode/Plessey.html +113 -0
  42. data/lib/doc/classes/RGhost/Barcode/Postnet.html +113 -0
  43. data/lib/doc/classes/RGhost/Barcode/Qrcode.html +113 -0
  44. data/lib/doc/classes/RGhost/Barcode/Rationalizedcodabar.html +113 -0
  45. data/lib/doc/classes/RGhost/Barcode/Raw.html +113 -0
  46. data/lib/doc/classes/RGhost/Barcode/Royalmail.html +113 -0
  47. data/lib/doc/classes/RGhost/Barcode/Rss14.html +113 -0
  48. data/lib/doc/classes/RGhost/Barcode/Rssexpanded.html +113 -0
  49. data/lib/doc/classes/RGhost/Barcode/Rsslimited.html +113 -0
  50. data/lib/doc/classes/RGhost/Barcode/Symbol.html +113 -0
  51. data/lib/doc/classes/RGhost/Barcode/Text.html +193 -0
  52. data/lib/doc/classes/RGhost/Barcode/Text.src/M000002.html +30 -0
  53. data/lib/doc/classes/RGhost/Barcode/Upca.html +113 -0
  54. data/lib/doc/classes/RGhost/Barcode/Upce.html +113 -0
  55. data/lib/doc/classes/RGhost/Config.html +150 -0
  56. data/lib/doc/classes/RGhost/Config.src/M000016.html +45 -0
  57. data/lib/doc/classes/RGhost/Document.html +704 -0
  58. data/lib/doc/classes/RGhost/Document.src/M000017.html +19 -0
  59. data/lib/doc/classes/RGhost/Document.src/M000018.html +18 -0
  60. data/lib/doc/classes/RGhost/Document.src/M000019.html +18 -0
  61. data/lib/doc/classes/RGhost/Document.src/M000020.html +18 -0
  62. data/lib/doc/classes/RGhost/Document.src/M000021.html +18 -0
  63. data/lib/doc/classes/RGhost/Document.src/M000022.html +18 -0
  64. data/lib/doc/classes/RGhost/Document.src/M000023.html +18 -0
  65. data/lib/doc/classes/RGhost/Document.src/M000024.html +18 -0
  66. data/lib/doc/classes/RGhost/Document.src/M000025.html +18 -0
  67. data/lib/doc/classes/RGhost/Document.src/M000026.html +18 -0
  68. data/lib/doc/classes/RGhost/Document.src/M000027.html +18 -0
  69. data/lib/doc/classes/RGhost/Document.src/M000028.html +18 -0
  70. data/lib/doc/classes/RGhost/Document.src/M000029.html +18 -0
  71. data/lib/doc/classes/RGhost/Document.src/M000030.html +18 -0
  72. data/lib/doc/classes/RGhost/Document.src/M000031.html +18 -0
  73. data/lib/doc/classes/RGhost/Document.src/M000032.html +18 -0
  74. data/lib/doc/classes/RGhost/Document.src/M000033.html +18 -0
  75. data/lib/doc/classes/RGhost/Document.src/M000034.html +18 -0
  76. data/lib/doc/classes/RGhost/Document.src/M000035.html +18 -0
  77. data/lib/doc/classes/RGhost/Document.src/M000036.html +18 -0
  78. data/lib/doc/classes/RGhost/Document.src/M000037.html +18 -0
  79. data/lib/doc/classes/RGhost/Document.src/M000038.html +18 -0
  80. data/lib/doc/classes/RGhost/Document.src/M000039.html +18 -0
  81. data/lib/doc/classes/RGhost/Document.src/M000040.html +18 -0
  82. data/lib/doc/classes/RGhost/Document.src/M000041.html +18 -0
  83. data/lib/doc/classes/RGhost/Document.src/M000042.html +18 -0
  84. data/lib/doc/classes/RGhost/Document.src/M000043.html +18 -0
  85. data/lib/doc/classes/RGhost/Document.src/M000044.html +18 -0
  86. data/lib/doc/classes/RGhost/Document.src/M000045.html +18 -0
  87. data/lib/doc/classes/RGhost/Document.src/M000046.html +18 -0
  88. data/lib/doc/classes/RGhost/Document.src/M000047.html +18 -0
  89. data/lib/doc/classes/RGhost/Document.src/M000048.html +18 -0
  90. data/lib/doc/created.rid +1 -0
  91. data/lib/doc/files/rghost_barcode/rghost_barcode_adapter_rb.html +101 -0
  92. data/lib/doc/files/rghost_barcode/rghost_barcode_base_rb.html +101 -0
  93. data/lib/doc/files/rghost_barcode/rghost_barcode_classes_rb.html +101 -0
  94. data/lib/doc/files/rghost_barcode/rghost_barcode_examples_rb.html +101 -0
  95. data/lib/doc/files/rghost_barcode/rghost_barcode_version_rb.html +101 -0
  96. data/lib/doc/files/rghost_barcode_rb.html +111 -0
  97. data/lib/doc/files/teste_main_rb.html +110 -0
  98. data/lib/doc/fr_class_index.html +67 -0
  99. data/lib/doc/fr_file_index.html +33 -0
  100. data/lib/doc/fr_method_index.html +74 -0
  101. data/lib/doc/index.html +24 -0
  102. data/lib/rghost_barcode.rb +7 -0
  103. data/lib/rghost_barcode/ps/auspost.ps +192 -0
  104. data/lib/rghost_barcode/ps/azteccode.ps +357 -0
  105. data/lib/rghost_barcode/ps/barcode_template.eps +1193 -0
  106. data/lib/rghost_barcode/ps/code11.ps +128 -0
  107. data/lib/rghost_barcode/ps/code128.ps +121 -0
  108. data/lib/rghost_barcode/ps/code2of5.ps +106 -0
  109. data/lib/rghost_barcode/ps/code39.ps +109 -0
  110. data/lib/rghost_barcode/ps/code93.ps +117 -0
  111. data/lib/rghost_barcode/ps/datamatrix.ps +328 -0
  112. data/lib/rghost_barcode/ps/ean13.ps +183 -0
  113. data/lib/rghost_barcode/ps/ean2.ps +101 -0
  114. data/lib/rghost_barcode/ps/ean5.ps +116 -0
  115. data/lib/rghost_barcode/ps/ean8.ps +101 -0
  116. data/lib/rghost_barcode/ps/interleaved2of5.ps +132 -0
  117. data/lib/rghost_barcode/ps/isbn.ps +118 -0
  118. data/lib/rghost_barcode/ps/kix.ps +98 -0
  119. data/lib/rghost_barcode/ps/maxicode.ps +307 -0
  120. data/lib/rghost_barcode/ps/msi.ps +104 -0
  121. data/lib/rghost_barcode/ps/onecode.ps +276 -0
  122. data/lib/rghost_barcode/ps/pdf417.ps +428 -0
  123. data/lib/rghost_barcode/ps/pharmacode.ps +69 -0
  124. data/lib/rghost_barcode/ps/plessey.ps +121 -0
  125. data/lib/rghost_barcode/ps/postnet.ps +114 -0
  126. data/lib/rghost_barcode/ps/qrcode.ps +530 -0
  127. data/lib/rghost_barcode/ps/rationalizedcodabar.ps +117 -0
  128. data/lib/rghost_barcode/ps/raw.ps +35 -0
  129. data/lib/rghost_barcode/ps/render.ps +307 -0
  130. data/lib/rghost_barcode/ps/render.ps~ +308 -0
  131. data/lib/rghost_barcode/ps/royalmail.ps +119 -0
  132. data/lib/rghost_barcode/ps/rss14.ps +237 -0
  133. data/lib/rghost_barcode/ps/rssexpanded.ps +211 -0
  134. data/lib/rghost_barcode/ps/rsslimited.ps +191 -0
  135. data/lib/rghost_barcode/ps/symbol.ps +49 -0
  136. data/lib/rghost_barcode/ps/upca.ps +128 -0
  137. data/lib/rghost_barcode/ps/upce.ps +157 -0
  138. data/lib/rghost_barcode/rghost_barcode_adapter.rb +249 -0
  139. data/lib/rghost_barcode/rghost_barcode_base.rb +210 -0
  140. data/lib/rghost_barcode/rghost_barcode_classes.rb +96 -0
  141. data/lib/rghost_barcode/rghost_barcode_examples.rb +35 -0
  142. data/lib/rghost_barcode/rghost_barcode_version.rb +8 -0
  143. data/lib/teste_main.rb +94 -0
  144. metadata +218 -0
data/lib/doc/fr_file_index.html ADDED
@@ -0,0 +1,33 @@
1
+
2
+ <?xml version="1.0" encoding="iso-8859-1"?>
3
+ <!DOCTYPE html
4
+ PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
5
+ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
6
+
7
+ <!--
8
+
9
+ Files
10
+
11
+ -->
12
+ <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
13
+ <head>
14
+ <title>Files</title>
15
+ <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
16
+ <link rel="stylesheet" href="rdoc-style.css" type="text/css" />
17
+ <base target="docwin" />
18
+ </head>
19
+ <body>
20
+ <div id="index">
21
+ <h1 class="section-bar">Files</h1>
22
+ <div id="index-entries">
23
+ <a href="files/rghost_barcode_rb.html">rghost_barcode.rb</a><br />
24
+ <a href="files/rghost_barcode/rghost_barcode_adapter_rb.html">rghost_barcode/rghost_barcode_adapter.rb</a><br />
25
+ <a href="files/rghost_barcode/rghost_barcode_base_rb.html">rghost_barcode/rghost_barcode_base.rb</a><br />
26
+ <a href="files/rghost_barcode/rghost_barcode_classes_rb.html">rghost_barcode/rghost_barcode_classes.rb</a><br />
27
+ <a href="files/rghost_barcode/rghost_barcode_examples_rb.html">rghost_barcode/rghost_barcode_examples.rb</a><br />
28
+ <a href="files/rghost_barcode/rghost_barcode_version_rb.html">rghost_barcode/rghost_barcode_version.rb</a><br />
29
+ <a href="files/teste_main_rb.html">teste_main.rb</a><br />
30
+ </div>
31
+ </div>
32
+ </body>
33
+ </html>
data/lib/doc/fr_method_index.html ADDED
@@ -0,0 +1,74 @@
1
+
2
+ <?xml version="1.0" encoding="iso-8859-1"?>
3
+ <!DOCTYPE html
4
+ PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
5
+ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
6
+
7
+ <!--
8
+
9
+ Methods
10
+
11
+ -->
12
+ <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
13
+ <head>
14
+ <title>Methods</title>
15
+ <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
16
+ <link rel="stylesheet" href="rdoc-style.css" type="text/css" />
17
+ <base target="docwin" />
18
+ </head>
19
+ <body>
20
+ <div id="index">
21
+ <h1 class="section-bar">Methods</h1>
22
+ <div id="index-entries">
23
+ <a href="classes/RGhost/Barcode/Parameter.html#M000009">add (RGhost::Barcode::Parameter)</a><br />
24
+ <a href="classes/RGhost/Barcode/Parameter.html#M000010">add_color (RGhost::Barcode::Parameter)</a><br />
25
+ <a href="classes/RGhost/Barcode/Parameter.html#M000011">add_single (RGhost::Barcode::Parameter)</a><br />
26
+ <a href="classes/RGhost/Barcode/Parameter.html#M000012">add_with_unit (RGhost::Barcode::Parameter)</a><br />
27
+ <a href="classes/RGhost/Document.html#M000023">barcode_auspost (RGhost::Document)</a><br />
28
+ <a href="classes/RGhost/Document.html#M000026">barcode_azteccode (RGhost::Document)</a><br />
29
+ <a href="classes/RGhost/Document.html#M000018">barcode_code11 (RGhost::Document)</a><br />
30
+ <a href="classes/RGhost/Document.html#M000033">barcode_code128 (RGhost::Document)</a><br />
31
+ <a href="classes/RGhost/Document.html#M000019">barcode_code2of5 (RGhost::Document)</a><br />
32
+ <a href="classes/RGhost/Document.html#M000024">barcode_code39 (RGhost::Document)</a><br />
33
+ <a href="classes/RGhost/Document.html#M000038">barcode_code93 (RGhost::Document)</a><br />
34
+ <a href="classes/RGhost/Document.html#M000032">barcode_datamatrix (RGhost::Document)</a><br />
35
+ <a href="classes/RGhost/Document.html#M000041">barcode_ean13 (RGhost::Document)</a><br />
36
+ <a href="classes/RGhost/Document.html#M000043">barcode_ean2 (RGhost::Document)</a><br />
37
+ <a href="classes/RGhost/Document.html#M000027">barcode_ean5 (RGhost::Document)</a><br />
38
+ <a href="classes/RGhost/Document.html#M000020">barcode_ean8 (RGhost::Document)</a><br />
39
+ <a href="classes/RGhost/Config.html#M000016">barcode_examples (RGhost::Config)</a><br />
40
+ <a href="classes/RGhost/Document.html#M000044">barcode_interleaved2of5 (RGhost::Document)</a><br />
41
+ <a href="classes/RGhost/Document.html#M000017">barcode_isbn (RGhost::Document)</a><br />
42
+ <a href="classes/RGhost/Document.html#M000047">barcode_kix (RGhost::Document)</a><br />
43
+ <a href="classes/RGhost/Document.html#M000036">barcode_maxicode (RGhost::Document)</a><br />
44
+ <a href="classes/RGhost/Document.html#M000039">barcode_msi (RGhost::Document)</a><br />
45
+ <a href="classes/RGhost/Document.html#M000042">barcode_onecode (RGhost::Document)</a><br />
46
+ <a href="classes/RGhost/Document.html#M000046">barcode_pdf417 (RGhost::Document)</a><br />
47
+ <a href="classes/RGhost/Document.html#M000048">barcode_pharmacode (RGhost::Document)</a><br />
48
+ <a href="classes/RGhost/Document.html#M000028">barcode_plessey (RGhost::Document)</a><br />
49
+ <a href="classes/RGhost/Document.html#M000021">barcode_postnet (RGhost::Document)</a><br />
50
+ <a href="classes/RGhost/Document.html#M000035">barcode_qrcode (RGhost::Document)</a><br />
51
+ <a href="classes/RGhost/Document.html#M000037">barcode_rationalizedcodabar (RGhost::Document)</a><br />
52
+ <a href="classes/RGhost/Document.html#M000029">barcode_raw (RGhost::Document)</a><br />
53
+ <a href="classes/RGhost/Document.html#M000031">barcode_royalmail (RGhost::Document)</a><br />
54
+ <a href="classes/RGhost/Document.html#M000030">barcode_rss14 (RGhost::Document)</a><br />
55
+ <a href="classes/RGhost/Document.html#M000022">barcode_rssexpanded (RGhost::Document)</a><br />
56
+ <a href="classes/RGhost/Document.html#M000040">barcode_rsslimited (RGhost::Document)</a><br />
57
+ <a href="classes/RGhost/Document.html#M000045">barcode_symbol (RGhost::Document)</a><br />
58
+ <a href="classes/RGhost/Document.html#M000034">barcode_upca (RGhost::Document)</a><br />
59
+ <a href="classes/RGhost/Document.html#M000025">barcode_upce (RGhost::Document)</a><br />
60
+ <a href="classes/RGhost/Barcode/Parameter.html#M000013">inspect (RGhost::Barcode::Parameter)</a><br />
61
+ <a href="classes/RGhost/Barcode/Parameter.html#M000015">make (RGhost::Barcode::Parameter)</a><br />
62
+ <a href="classes/RGhost/Barcode/Text.html#M000002">make (RGhost::Barcode::Text)</a><br />
63
+ <a href="classes/RGhost/Barcode/Guard.html#M000003">make (RGhost::Barcode::Guard)</a><br />
64
+ <a href="classes/RGhost/Barcode/Base.html#M000005">make (RGhost::Barcode::Base)</a><br />
65
+ <a href="classes/RGhost/Barcode/Border.html#M000001">make (RGhost::Barcode::Border)</a><br />
66
+ <a href="classes/RGhost/Barcode/Parameter.html#M000008">map (RGhost::Barcode::Parameter)</a><br />
67
+ <a href="classes/RGhost/Barcode/Parameter.html#M000007">new (RGhost::Barcode::Parameter)</a><br />
68
+ <a href="classes/RGhost/Barcode/Base.html#M000004">new (RGhost::Barcode::Base)</a><br />
69
+ <a href="classes/RGhost/Barcode/Base.html#M000006">ps (RGhost::Barcode::Base)</a><br />
70
+ <a href="classes/RGhost/Barcode/Parameter.html#M000014">to_s (RGhost::Barcode::Parameter)</a><br />
71
+ </div>
72
+ </div>
73
+ </body>
74
+ </html>
data/lib/doc/index.html ADDED
@@ -0,0 +1,24 @@
1
+ <?xml version="1.0" encoding="iso-8859-1"?>
2
+ <!DOCTYPE html
3
+ PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN"
4
+ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd">
5
+
6
+ <!--
7
+
8
+ RDoc Documentation
9
+
10
+ -->
11
+ <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
12
+ <head>
13
+ <title>RDoc Documentation</title>
14
+ <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
15
+ </head>
16
+ <frameset rows="20%, 80%">
17
+ <frameset cols="25%,35%,45%">
18
+ <frame src="fr_file_index.html" title="Files" name="Files" />
19
+ <frame src="fr_class_index.html" name="Classes" />
20
+ <frame src="fr_method_index.html" name="Methods" />
21
+ </frameset>
22
+ <frame src="files/teste_main_rb.html" name="docwin" />
23
+ </frameset>
24
+ </html>
data/lib/rghost_barcode.rb ADDED
@@ -0,0 +1,7 @@
1
+ $LOAD_PATH << File.dirname(__FILE__)+File::SEPARATOR+"rghost_barcode"
2
+
3
+ require 'rghost_barcode_base'
4
+ require 'rghost_barcode_version'
5
+ require 'rghost_barcode_classes'
6
+ require 'rghost_barcode_adapter'
7
+
data/lib/rghost_barcode/ps/auspost.ps ADDED
@@ -0,0 +1,192 @@
1
+
2
+ % --DESC: AusPost 4 State Customer Code
3
+ % --EXAM: 5956439111ABA 9
4
+ % --EXOP: includetext custinfoenc=character
5
+ % --RNDR: renlinear
6
+ /auspost {
7
+
8
+ 0 begin
9
+
10
+ /options exch def % We are given an option string
11
+ /useropts options def
12
+ /barcode exch def % We are given a barcode string
13
+
14
+ /includetext false def % Enable/disable text
15
+ /textfont /Courier def
16
+ /textsize 10 def
17
+ /textyoffset -7 def
18
+ /height 0.175 def
19
+ /custinfoenc (character) def
20
+
21
+ % Parse the input options
22
+ options {
23
+ token false eq {exit} if dup length string cvs (=) search
24
+ true eq {cvlit exch pop exch def} {cvlit true def} ifelse
25
+ } loop
26
+
27
+ /textfont textfont cvlit def
28
+ /textsize textsize cvr def
29
+ /textyoffset textyoffset cvr def
30
+ /height height cvr def
31
+
32
+ % Create an array containing the character mappings
33
+ /encs
34
+ [ (000) (001) (002) (010) (011) (012) (020) (021)
35
+ (022) (100) (101) (102) (110) (111) (112) (120)
36
+ (121) (122) (200) (201) (202) (210) (211) (212)
37
+ (220) (221) (222) (300) (301) (302) (310) (311)
38
+ (312) (320) (321) (322) (023) (030) (031) (032)
39
+ (033) (103) (113) (123) (130) (131) (132) (133)
40
+ (203) (213) (223) (230) (231) (232) (233) (303)
41
+ (313) (323) (330) (331) (332) (333) (003) (013)
42
+ (00) (01) (02) (10) (11) (12) (20) (21) (22) (30)
43
+ (13) (3)
44
+ ] def
45
+
46
+ % Create a string of the available characters
47
+ /barchars (ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz #) def
48
+
49
+ /barlen barcode length def
50
+ barcode 0 2 getinterval (11) eq {37} if
51
+ barcode 0 2 getinterval (45) eq {37} if
52
+ barcode 0 2 getinterval (59) eq {52} if
53
+ barcode 0 2 getinterval (62) eq {67} if
54
+ /encstr exch string def
55
+ /txt barlen 2 sub array def
56
+
57
+ % Put start character
58
+ encstr 0 encs 74 get putinterval
59
+
60
+ % Encode the FCC
61
+ 0 1 1 {
62
+ /i exch def
63
+ encs barcode i 1 getinterval cvi 64 add get
64
+ encstr i 2 mul 2 add 3 2 roll putinterval
65
+ } for
66
+
67
+ % Encode the DPID
68
+ 2 1 9 {
69
+ /i exch def
70
+ encs barcode i 1 getinterval cvi 64 add get
71
+ encstr i 2 mul 2 add 3 2 roll putinterval
72
+ txt i 2 sub [barcode i 1 getinterval i 2 sub 2 mul 6 add 3.312 mul textyoffset textfont textsize] put
73
+ } for
74
+
75
+ % Encode the customer information
76
+ custinfoenc (numeric) eq {
77
+ 0 1 barlen 11 sub {
78
+ /i exch def
79
+ encs barcode i 10 add 1 getinterval cvi 64 add get
80
+ encstr i 2 mul 22 add 3 2 roll putinterval
81
+ txt i 8 add [barcode i 10 add 1 getinterval i 2 mul 22 add 3.312 mul textyoffset textfont textsize] put
82
+ } for
83
+ /ciflen barlen 10 sub 2 mul def
84
+ } {
85
+ 0 1 barlen 11 sub {
86
+ /i exch def
87
+ barcode i 10 add 1 getinterval barchars exch search
88
+ pop
89
+ length /indx exch def
90
+ pop pop
91
+ /enc encs indx get def
92
+ encstr i 3 mul 22 add enc putinterval
93
+ txt i 8 add [barcode i 10 add 1 getinterval i 3 mul 22 add 3.312 mul textyoffset textfont textsize] put
94
+ } for
95
+ /ciflen barlen 10 sub 3 mul def
96
+ } ifelse
97
+
98
+ % Add any filler characters
99
+ 22 ciflen add 1 encstr length 14 sub {
100
+ encstr exch encs 75 get putinterval
101
+ } for
102
+
103
+ % Create the 64x64 Reed-Solomon table
104
+ /rstable 64 64 mul array def
105
+ rstable 0 [ 64 {0} repeat ] putinterval
106
+ rstable 64 [ 0 1 63 {} for ] putinterval
107
+ /prev 1 def
108
+ 64 {
109
+ /next prev 1 bitshift def
110
+ next 64 and 0 ne {
111
+ /next next 67 xor def
112
+ } if
113
+ 0 1 63 {
114
+ /j exch def
115
+ /nextcell {rstable 64 next mul j add} def
116
+ nextcell rstable 64 prev mul j add get 1 bitshift put
117
+ nextcell get 64 and 0 ne {
118
+ nextcell nextcell get 67 xor put
119
+ } if
120
+ } for
121
+ /prev next def
122
+ } repeat
123
+
124
+ % Calculate the Reed-Solomon codes for triples
125
+ /rscodes encstr length 16 sub 3 idiv 4 add array def
126
+ rscodes 0 [ 4 {0} repeat ] putinterval
127
+ 2 3 encstr length 16 sub {
128
+ /i exch def
129
+ rscodes rscodes length i 2 sub 3 idiv sub 1 sub
130
+ encstr i 1 getinterval cvi 16 mul
131
+ encstr i 1 add 1 getinterval cvi 4 mul add
132
+ encstr i 2 add 1 getinterval cvi add
133
+ put
134
+ } for
135
+ rscodes length 5 sub -1 0 {
136
+ /i exch def
137
+ 0 1 4 {
138
+ /j exch def
139
+ rscodes i j add rscodes i j add get
140
+ rstable 64 [48 17 29 30 1] j get mul rscodes i 4 add get add get
141
+ xor put
142
+ } for
143
+ } for
144
+ /checkcode (000000000000) 12 string copy def
145
+ 0 1 3 {
146
+ /i exch def
147
+ /enc rscodes 3 i sub get 4 3 string cvrs def
148
+ checkcode i 3 mul 3 enc length sub add enc putinterval
149
+ } for
150
+
151
+ % Put checkcode and end characters
152
+ encstr encstr length 14 sub checkcode putinterval
153
+ encstr encstr length 2 sub encs 74 get putinterval
154
+
155
+ /bbs encstr length array def
156
+ /bhs encstr length array def
157
+ 0 1 encstr length 1 sub {
158
+ /i exch def
159
+ /enc encstr i 1 getinterval def
160
+ enc (0) eq {
161
+ bbs i 0 height mul 8 div put
162
+ bhs i 8 height mul 8 div put
163
+ } if
164
+ enc (1) eq {
165
+ bbs i 3 height mul 8 div put
166
+ bhs i 5 height mul 8 div put
167
+ } if
168
+ enc (2) eq {
169
+ bbs i 0 height mul 8 div put
170
+ bhs i 5 height mul 8 div put
171
+ } if
172
+ enc (3) eq {
173
+ bbs i 3 height mul 8 div put
174
+ bhs i 2 height mul 8 div put
175
+ } if
176
+ } for
177
+
178
+ /retval 8 dict def
179
+ retval (ren) (renlinear) put
180
+ retval (bbs) bbs put
181
+ retval (bhs) bhs put
182
+ retval (sbs) [bhs length 1 sub {1.44 1.872} repeat 1.44] put
183
+ includetext {
184
+ retval (txt) txt put
185
+ } if
186
+ retval (opt) useropts put
187
+ retval
188
+
189
+ end
190
+
191
+ } bind def
192
+ /auspost load 0 1 dict put
data/lib/rghost_barcode/ps/azteccode.ps ADDED
@@ -0,0 +1,357 @@
1
+
2
+ % --DESC: Aztec Code
3
+ % --EXAM: 00100111001000000101001101111000010100111100101000000110
4
+ % --EXOP: format=compact
5
+ % --RNDR: renmatrix
6
+ /azteccode {
7
+
8
+ 0 begin
9
+
10
+ /options exch def
11
+ /useropts options def
12
+ /barcode exch def
13
+
14
+ /format (unset) def % full, compact or rune
15
+ /readerinit false def
16
+ /layers -1 def
17
+ /eclevel 23 def
18
+ /ecaddchars 3 def
19
+
20
+ % Parse the input options
21
+ options {
22
+ token false eq {exit} if dup length string cvs (=) search
23
+ true eq {cvlit exch pop exch def} {cvlit true def} ifelse
24
+ } loop
25
+
26
+ /layers layers cvi def
27
+ /eclevel eclevel cvr def
28
+ /ecaddchars ecaddchars cvi def
29
+
30
+ % Convert from input into message bitstream
31
+ /msgbits () def
32
+ format (rune) ne {/msgbits barcode def} if
33
+
34
+ % Lookup the most appropriate symbol specification
35
+ /metrics [
36
+ [ (rune) 0 0 0 6 ] % Special metric for rune symbols
37
+ [ (compact) 1 1 17 6 ] [ (full) 1 1 21 6 ] [ (compact) 2 0 40 6 ]
38
+ [ (full) 2 1 48 6 ] [ (compact) 3 0 51 8 ] [ (full) 3 1 60 8 ]
39
+ [ (compact) 4 0 76 8 ] [ (full) 4 1 88 8 ] [ (full) 5 1 120 8 ]
40
+ [ (full) 6 1 156 8 ] [ (full) 7 1 196 8 ] [ (full) 8 1 240 8 ]
41
+ [ (full) 9 1 230 10 ] [ (full) 10 1 272 10 ] [ (full) 11 1 316 10 ]
42
+ [ (full) 12 1 364 10 ] [ (full) 13 1 416 10 ] [ (full) 14 1 470 10 ]
43
+ [ (full) 15 1 528 10 ] [ (full) 16 1 588 10 ] [ (full) 17 1 652 10 ]
44
+ [ (full) 18 1 720 10 ] [ (full) 19 1 790 10 ] [ (full) 20 1 864 10 ]
45
+ [ (full) 21 1 940 10 ] [ (full) 22 1 1020 10 ] [ (full) 23 0 920 12 ]
46
+ [ (full) 24 0 992 12 ] [ (full) 25 0 1066 12 ] [ (full) 26 0 1144 12 ]
47
+ [ (full) 27 0 1224 12 ] [ (full) 28 0 1306 12 ] [ (full) 29 0 1392 12 ]
48
+ [ (full) 30 0 1480 12 ] [ (full) 31 0 1570 12 ] [ (full) 32 0 1664 12 ]
49
+ ] def
50
+
51
+ /i 0 def
52
+ { % loop
53
+ /m metrics i get def
54
+ /frmt m 0 get def % Format of the symbol
55
+ /mlyr m 1 get def % Data layers
56
+ /icap m 2 get def % Reader initialisation capable
57
+ /ncws m 3 get def % Total of codewords
58
+ /bpcw m 4 get def % Bits per codeword
59
+ /numecw ncws eclevel mul 100 div ecaddchars add ceiling cvi def
60
+ msgbits length 0 eq {/numecw 0 def} if % Error correction codewords
61
+ /numdcw ncws numecw sub def % Data codewords
62
+ /okay true def
63
+ format (unset) ne format frmt ne and {/okay false def} if
64
+ readerinit icap 1 ne and {/okay false def} if
65
+ layers -1 ne layers mlyr ne and {/okay false def} if
66
+ msgbits length bpcw div ceiling cvi numdcw gt {/okay false def} if
67
+ okay {exit} if
68
+ /i i 1 add def
69
+ } loop
70
+ /layers mlyr def
71
+ /format frmt def
72
+
73
+ % Expand message bits into codewords avoiding codewords with all zeros or all ones
74
+ /allzero {dup length (000000000000) 0 3 -1 roll getinterval eq} bind def
75
+ /allones {dup length (111111111111) 0 3 -1 roll getinterval eq} bind def
76
+ /cws ncws array def
77
+ /m 0 def /c 0 def
78
+ {
79
+ msgbits length m le {exit} if
80
+ msgbits length m sub bpcw ge {
81
+ /cwb msgbits m bpcw 1 sub getinterval def % All but last bit
82
+ /cwf msgbits m bpcw add 1 sub 1 getinterval def % Last bit
83
+ cwb allzero {/cwf (1) def /m m 1 sub def} if % Flip last bit to avoid zeros
84
+ cwb allones {/cwf (0) def /m m 1 sub def} if % Flip last bit to avoid ones
85
+ % Concatinate the bits
86
+ 12 string dup 0 cwb putinterval
87
+ dup bpcw 1 sub cwf putinterval
88
+ 0 bpcw getinterval
89
+ /cwb exch def
90
+ } { % Final codeword
91
+ /cwb msgbits m msgbits length m sub getinterval def
92
+ /cwb (111111111111) 12 string copy dup 0 cwb putinterval 0 bpcw getinterval def
93
+ cwb allones {cwb cwb length 1 sub (0) putinterval} if % Prevent all ones
94
+ } ifelse
95
+ % Conversion of binary data into byte array
96
+ /cw 0 def
97
+ 0 1 bpcw 1 sub {
98
+ /i exch def
99
+ /cw cw 2 bpcw i sub 1 sub exp cvi cwb i get 48 sub mul add def
100
+ } for
101
+ cws c cw put
102
+ /m m bpcw add def
103
+ /c c 1 add def
104
+ } loop
105
+ /cws cws 0 c getinterval def
106
+
107
+ % Reed-Solomon algorithm
108
+ /rscodes {
109
+
110
+ /rspm exch def
111
+ /rsgf exch def
112
+ /rsnc exch def
113
+ /rscws exch def
114
+
115
+ % Calculate the log and anti-log tables
116
+ /rslog [ 1 rsgf sub rsgf 1 sub {0} repeat ] def
117
+ /rsalog [ 1 rsgf 1 sub {0} repeat ] def
118
+ 1 1 rsgf 1 sub {
119
+ /i exch def
120
+ rsalog i rsalog i 1 sub get 2 mul put
121
+ rsalog i get rsgf ge { rsalog i rsalog i get rspm xor put } if
122
+ rslog rsalog i get i put
123
+ } for
124
+
125
+ % Function to calculate the product in the field
126
+ /rsprod {
127
+ /y exch def
128
+ /x exch def
129
+ x y mul 0 ne {
130
+ rsalog rslog x get rslog y get add rsgf 1 sub mod get
131
+ } {
132
+ 0
133
+ } ifelse
134
+ } bind def
135
+
136
+ % Generate the coefficients
137
+ /coeffs [ 1 rsnc {0} repeat ] def
138
+ 1 1 rsnc {
139
+ /i exch def
140
+ coeffs i coeffs i 1 sub get put
141
+ i 1 sub -1 1 {
142
+ /j exch def
143
+ coeffs j coeffs j 1 sub get coeffs j get rsalog i get rsprod xor put
144
+ } for
145
+ coeffs 0 coeffs 0 get rsalog i get rsprod put
146
+ } for
147
+
148
+ % Extend the input with the error correction values
149
+ /nd rscws length def
150
+ /rscws [ rscws {} forall rsnc {0} repeat 0 ] def
151
+ 0 1 nd 1 sub {
152
+ /k exch rscws exch get rscws nd get xor def
153
+ 0 1 rsnc 1 sub {
154
+ /j exch def
155
+ rscws nd j add rscws nd j add 1 add get k coeffs rsnc j sub 1 sub get rsprod xor put
156
+ } for
157
+ } for
158
+
159
+ % Return all but the last codeword
160
+ rscws 0 rscws length 1 sub getinterval
161
+
162
+ } bind def
163
+
164
+ % Create the codewords and bit string for the mode
165
+ format (full) eq {
166
+ /mode layers 1 sub 11 bitshift cws length 1 sub add def
167
+ readerinit {/mode mode 2#1000000000000000 or def} if
168
+ /mode [
169
+ mode 2#1111000000000000 and -12 bitshift
170
+ mode 2#0000111100000000 and -8 bitshift
171
+ mode 2#0000000011110000 and -4 bitshift
172
+ mode 2#0000000000001111 and
173
+ ] def
174
+ /mode mode 6 16 19 rscodes def
175
+ } if
176
+ format (compact) eq {
177
+ /mode layers 1 sub 6 bitshift cws length 1 sub add def
178
+ readerinit {/mode mode 2#10000000 or def} if
179
+ /mode [
180
+ mode 2#11110000 and -4 bitshift
181
+ mode 2#00001111 and
182
+ ] def
183
+ /mode mode 5 16 19 rscodes def
184
+ } if
185
+ format (rune) eq {
186
+ /mode barcode cvi def
187
+ /mode [
188
+ mode 2#11110000 and -4 bitshift
189
+ mode 2#00001111 and
190
+ ] def
191
+ /mode mode 5 16 19 rscodes def
192
+ /mode [mode {2#1010 xor} forall] def % Invert alternate bits
193
+ } if
194
+ /modebits mode length 4 mul string def
195
+ 0 1 modebits length 1 sub {modebits exch (0) putinterval} for
196
+ 0 1 mode length 1 sub {
197
+ /i exch def
198
+ modebits mode i get 2 4 string cvrs dup length 4 exch sub 4 i mul add exch putinterval
199
+ } for
200
+
201
+ % Extend the data codewords with error correction codewords to create the bit string for the data
202
+ /rsparams [
203
+ [] [] [] [] [] []
204
+ [ 64 67 ] % 6-bit codewords
205
+ []
206
+ [ 256 301 ] % 8-bit codewords
207
+ []
208
+ [ 1024 1033 ] % 10-bit codewords
209
+ []
210
+ [ 4096 4201 ] % 12-bit codewords
211
+ ] def
212
+ /cws cws ncws cws length sub rsparams bpcw get {} forall rscodes def
213
+ format (full) eq {
214
+ /databits layers layers mul 16 mul layers 112 mul add string def
215
+ } {
216
+ /databits layers layers mul 16 mul layers 88 mul add string def
217
+ } ifelse
218
+ 0 1 databits length 1 sub {databits exch (0) putinterval} for
219
+ 0 1 ncws 1 sub {
220
+ /i exch def
221
+ databits cws i get 2 bpcw string cvrs
222
+ dup length bpcw exch sub bpcw i mul add databits length ncws bpcw mul sub add
223
+ exch putinterval
224
+ } for
225
+
226
+ % Move to a point in the cartesian plane centered on the bullseye
227
+ /cmv {size mul sub mid add} bind def
228
+
229
+ % Move to a bit position within a layer
230
+ /lmv {
231
+ /lbit exch def
232
+ /llyr exch def
233
+ /lwid fw llyr 4 mul add def
234
+ /ldir lbit 2 idiv lwid idiv def
235
+ ldir 0 eq { % Top
236
+ lwid 1 sub 2 idiv neg 1 add lbit 2 idiv lwid mod add
237
+ fw 1 sub 2 idiv llyr 2 mul add lbit 2 mod add
238
+ cmv
239
+ } if
240
+ ldir 1 eq { % Right
241
+ fw 2 idiv llyr 2 mul add lbit 2 mod add
242
+ lwid 1 sub 2 idiv 1 sub lbit 2 idiv lwid mod sub
243
+ cmv
244
+ } if
245
+ ldir 2 eq { % Bottom
246
+ lwid 2 idiv neg 1 add lbit 2 idiv lwid mod add neg
247
+ fw 2 idiv llyr 2 mul add lbit 2 mod add neg
248
+ cmv
249
+ } if
250
+ ldir 3 eq { % Left
251
+ fw 1 sub 2 idiv llyr 2 mul add lbit 2 mod add neg
252
+ lwid 2 idiv 1 sub lbit 2 idiv lwid mod sub neg
253
+ cmv
254
+ } if
255
+ } bind def
256
+
257
+ % Create the pixel map
258
+ % For full symbols we disregard the reference grid at this stage
259
+ format (full) eq {/fw 12 def} {/fw 9 def} ifelse
260
+ /size fw layers 4 mul add 2 add def
261
+ /pixs [size size mul {-1} repeat] def
262
+ /mid size 1 sub 2 idiv size mul size 1 sub 2 idiv add def
263
+
264
+ % Data layers
265
+ /i 0 def
266
+ 1 1 layers {
267
+ /layer exch def
268
+ 0 1 fw layer 4 mul add 8 mul 1 sub {
269
+ /pos exch def
270
+ pixs layer pos lmv databits databits length i sub 1 sub get 48 sub put
271
+ /i i 1 add def
272
+ } for
273
+ } for
274
+
275
+ % For full symbols expand the pixel map by inserting the reference grid
276
+ format (full) eq {
277
+ /fw 13 def
278
+ /size fw layers 4 mul add 2 add layers 10.5 add 7.5 div 1 sub cvi 2 mul add def
279
+ /mid size size mul 2 idiv def
280
+ /npixs [size size mul {-2} repeat] def
281
+ 0 16 size 2 idiv {
282
+ /i exch def
283
+ 0 1 size 1 sub {
284
+ /j exch def
285
+ npixs size 2 idiv neg j add i cmv [size 2 idiv j add i add 1 add 2 mod] putinterval
286
+ npixs size 2 idiv neg j add i neg cmv [size 2 idiv j add i add 1 add 2 mod] putinterval
287
+ npixs i size 2 idiv neg j add cmv [size 2 idiv j add i add 1 add 2 mod] putinterval
288
+ npixs i neg size 2 idiv neg j add cmv [size 2 idiv j add i add 1 add 2 mod] putinterval
289
+ } for
290
+ } for
291
+ /j 0 def
292
+ 0 1 npixs length 1 sub {
293
+ /i exch def
294
+ npixs i get -2 eq {
295
+ npixs i pixs j get put
296
+ /j j 1 add def
297
+ } if
298
+ } for
299
+ /pixs npixs def
300
+ } if
301
+
302
+ % Finder pattern
303
+ /fw fw 2 idiv def
304
+ fw neg 1 fw {
305
+ /i exch def
306
+ fw neg 1 fw {
307
+ /j exch def
308
+ pixs i j cmv
309
+ i abs j abs gt {i abs} {j abs} ifelse 1 add 2 mod
310
+ put
311
+ } for
312
+ } for
313
+
314
+ % Orientation bits
315
+ [ [ fw 1 add neg fw 1 ] [ fw 1 add neg fw 1 add 1 ]
316
+ [ fw neg fw 1 add 1 ] [ fw 1 add fw 1 add 1 ]
317
+ [ fw 1 add fw 1 ] [ fw 1 add fw neg 1 ]
318
+ [ fw fw 1 add 0 ] [ fw 1 add fw 1 add neg 0 ]
319
+ [ fw fw 1 add neg 0 ] [ fw neg fw 1 add neg 0 ]
320
+ [ fw 1 add neg fw 1 add neg 0 ] [ fw 1 add neg fw neg 0 ]
321
+ ] {pixs exch {} forall 3 1 roll cmv exch put} forall
322
+
323
+ % Mode ring
324
+ format (full) eq {
325
+ /modemap [
326
+ [-5 7] [-4 7] [-3 7] [-2 7] [-1 7] [ 1 7] [ 2 7] [ 3 7] [ 4 7] [ 5 7]
327
+ [ 7 5] [ 7 4] [ 7 3] [ 7 2] [ 7 1] [ 7 -1] [ 7 -2] [ 7 -3] [ 7 -4] [ 7 -5]
328
+ [ 5 -7] [ 4 -7] [ 3 -7] [ 2 -7] [ 1 -7] [-1 -7] [-2 -7] [-3 -7] [-4 -7] [-5 -7]
329
+ [-7 -5] [-7 -4] [-7 -3] [-7 -2] [-7 -1] [-7 1] [-7 2] [-7 3] [-7 4] [-7 5]
330
+ ] def
331
+ } {
332
+ /modemap [
333
+ [-3 5] [-2 5] [-1 5] [ 0 5] [ 1 5] [ 2 5] [ 3 5]
334
+ [ 5 3] [ 5 2] [ 5 1] [ 5 0] [ 5 -1] [ 5 -2] [ 5 -3]
335
+ [ 3 -5] [ 2 -5] [ 1 -5] [ 0 -5] [-1 -5] [-2 -5] [-3 -5]
336
+ [-5 -3] [-5 -2] [-5 -1] [-5 0] [-5 1] [-5 2] [-5 3]
337
+ ] def
338
+ } ifelse
339
+ 0 1 modemap length 1 sub {
340
+ /i exch def
341
+ pixs modemap i get {} forall cmv modebits i get 48 sub put
342
+ } for
343
+
344
+ /retval 7 dict def
345
+ retval (ren) (renmatrix) put
346
+ retval (pixs) pixs put
347
+ retval (pixx) size put
348
+ retval (pixy) size put
349
+ retval (height) size 2 mul 72 div put
350
+ retval (width) size 2 mul 72 div put
351
+ retval (opt) useropts put
352
+ retval
353
+
354
+ end
355
+
356
+ } bind def
357
+ /azteccode load 0 1 dict put