[MASOCH-L] Impressao de Codigo de Barras e Formularios em Laser

[Lao DanTong]

On Wed, 26 Sep 2007, Marcio Gomes wrote:

> Pessoal,
>
> Gostaria de indicação de soluções de impressão de códigos de barra 2 de
> 5 interlacado
> e formulários em impressoras laser.

se você souber programar direto em PostScript, use o seguinte código:

%!PS-Adobe-2.0 EPSF-2.0
%%Title: barcode.eps
%%Creator: fig2dev Version 3.2 Patchlevel 0-beta2
%%CreationDate: Fri Jan 30 18:51:07 1998
%%For: danton at quantum (Danton Nunes)
%%Orientation: Portrait
%%BoundingBox: 0 0 292 36
%%Pages: 0
%%Magnification: 1.00
%%EndComments
/bar$wbase 0.72 def
/bar$heigth 36 def
/bar$thin 0.2 def
/bar$tab [ 6 17 9 24 5 20 12 3 18 10 ] def
/bar$toggle 1 def
/bar$make { 2 mul 1 add 0 bar$toggle 1 eq
 		{ bar$thin 0 rlineto 0 1 rlineto
 			exch bar$thin sub bar$thin sub exch rlineto
 			0 -1 rlineto bar$thin 0 rlineto }
 		{ rmoveto } ifelse
 		/bar$toggle 1 bar$toggle sub def } def
/bar$code {gsave bar$wbase bar$heigth scale
 	0 setlinewidth
 	4 { 0 bar$make } repeat
 	/bar$toggle 1 def
 	/bar$even 1 def
 	{ bar$even 1 eq
 		{ /bar$black exch 48 sub def /bar$even 0 def }
 		{ /bar$white exch 48 sub def
 			bar$tab dup bar$black get exch bar$white get
 			10 { exch dup 16 and 16 div bar$make dup add } repeat
 			pop pop /bar$even 1 def } ifelse
 	} forall
 	1 bar$make 0 bar$make 0 bar$make
 	closepath fill
 	grestore } def

para produzir o código, por exemplo:

0 0 moveto (12345678901234567890123456789012345678901234) bar$code

> - O Código de barras, pelo que entendo tenho que ter as fontes do código
> de barras na impressora, podendo as mesmas serem enviadas por upload,
> ou estarem permanentemente armazendas na impressora através de uma flash.

não, como mostra o código acima, não precisa, se souber mexer direto no 
postscript.