Aplicativos em PHP/Recursos Extras/Código de Barras

Código de Barras em PHP

editar

Código de barras 2 de 5 intercalado

Script no PHPBrasil:

http://phpbrasil.com/scripts/script.php/id/3663


Exemplo de Código de Barras em PHP - do Sidiney Sodré Gali de Souza

<?php
/*
Autor: Sidiney Sodré Gali de Souza <sidsodre@bol.com.br>
Data: 21/11/2005 
 
Código de Barras - código-fonte   em:
http://www.vivaolinux.com.br/scripts/verFonte.php?codigo=1394
*/

function CodigoBarras($code) {
  $lw = 2; $hi = 100;
  $Lencode = array('0001101','0011001','0010011','0111101','0100011',
                   '0110001','0101111','0111011','0110111','0001011');
  $Rencode = array('1110010','1100110','1101100','1000010','1011100',
                   '1001110','1010000','1000100','1001000','1110100');
  $ends = '101'; $center = '01010';
  /* UPC-A Must be 11 digits, we compute the checksum. */
  if ( strlen($code) != 11 ) { die("UPC-A Must be 11 digits."); }
  /* Compute the EAN-13 Checksum digit */
  $ncode = '0'.$code;
  $even = 0; $odd = 0;
  for ($x=0;$x<12;$x++) {
   if ($x % 2) { $odd += $ncode[$x]; } else { $even += $ncode[$x]; }
  }
  $code.=(10 - (($odd * 3 + $even) % 10)) % 10;
  /* Create the bar encoding using a binary string */
  $bars=$ends;
  $bars.=$Lencode[$code[0]];
  for($x=1;$x<6;$x++) {
   $bars.=$Lencode[$code[$x]];
  }
  $bars.=$center;
  for($x=6;$x<12;$x++) {
   $bars.=$Rencode[$code[$x]];
  }
  $bars.=$ends;
  /* Generate the Barcode Image */
  $img = ImageCreate($lw*95+30,$hi+30);
  $fg = ImageColorAllocate($img, 0, 0, 0);
  $bg = ImageColorAllocate($img, 255, 255, 255);
  ImageFilledRectangle($img, 0, 0, $lw*95+30, $hi+30, $bg);
  $shift=10;
  for ($x=0;$x<strlen($bars);$x++) {
   if (($x<10) || ($x>=45 && $x<50) || ($x >=85)) { $sh=10; } else { $sh=0; }
   if ($bars[$x] == '1') { $color = $fg; } else { $color = $bg; }
   ImageFilledRectangle($img, ($x*$lw)+15,5,($x+1)*$lw+14,$hi+5+$sh,$color);
  }
  /* Add the Human Readable Label */
  ImageString($img,4,5,$hi-5,$code[0],$fg);
  for ($x=0;$x<5;$x++) {
   ImageString($img,5,$lw*(13+$x*6)+15,$hi+5,$code[$x+1],$fg);
   ImageString($img,5,$lw*(53+$x*6)+15,$hi+5,$code[$x+6],$fg);
  }
  ImageString($img,4,$lw*95+17,$hi-5,$code[11],$fg);
  /* Output the Header and Content. */
  header("Content-Type: image/png");
  ImagePNG($img);
}

CodigoBarras('54879874585');
?>  


Outro exemplo, este do Marcolino

<?php

/* Geração de código de barras padrão p/ boletos bancários brasileiros.

Autor: MARCOLINO, Alexandre de Jesus ( marcolino[]webviva com br )

Este código pode ser usado e copiado livremente desde que site e comunique o autor por email. 

Testado sob o Internet Explorer 6 e o Netscape 7.

*/

function montacodigodebarras($valor) {
  $lw = 1 ; $hi = 50;
/* Tabela de código de barras Padrão Brasileiro para boletos bancários 
		   
  Barra valor 00 =0000111100
  Barra valor 01 =0100101001
  Barra valor 02 =0001101001
  Barra valor 03 =0101101000
  Barra valor 04 =0000111001
  Barra valor 05 =0100111000
  Barra valor 06 =0001111000
  Barra valor 07 =0000101101
  Barra valor 08 =0100101100
  Barra valor 09 =0001101100
  Barra valor 10 =1000010110
  Barra valor 11 =1100000011
  Barra valor 12 =1001000011
  Barra valor 13 =1101000010
  Barra valor 14 =1000010011
  Barra valor 15 =1100010010
  Barra valor 16 =1001010010
  Barra valor 17 =1000000111
  Barra valor 18 =1100000110
  Barra valor 19 =1001000110
  Barra valor 20 =0010010110
  Barra valor 21 =0110000011
  Barra valor 22 =0011000011
  Barra valor 23 =0111000010
  Barra valor 24 =0010010011
  Barra valor 25 =0110010010
  Barra valor 26 =0011010010
  Barra valor 27 =0010000111
  Barra valor 28 =0110000110
  Barra valor 29 =0011000110
  Barra valor 30 =1010010100
  Barra valor 31 =1110000001
  Barra valor 32 =1011000001
  Barra valor 33 =1111000000
  Barra valor 34 =1010010001
  Barra valor 35 =1110010000
  Barra valor 36 =1011010000
  Barra valor 37 =1010000101
  Barra valor 38 =1110000100
  Barra valor 39 =1011000100
  Barra valor 40 =0000110110
  Barra valor 41 =0100100011
  Barra valor 42 =0001100011
  Barra valor 43 =0101100010
  Barra valor 44 =0000110011
  Barra valor 45 =0100110010
  Barra valor 46 =0001110010
  Barra valor 47 =0000100111
  Barra valor 48 =0100100110
  Barra valor 49 =0001100110
  Barra valor 50 =1000110100
  Barra valor 51 =1100100001
  Barra valor 52 =1001100001
  Barra valor 53 =1101100000
  Barra valor 54 =1000110001
  Barra valor 55 =1100110000
  Barra valor 56 =1001110000
  Barra valor 57 =1000100101
  Barra valor 58 =1100100100
  Barra valor 59 =1001100100
  Barra valor 60 =0010110100
  Barra valor 61 =0110100001
  Barra valor 62 =0011100001
  Barra valor 63 =0111100000
  Barra valor 64 =0010110001
  Barra valor 65 =0110110000
  Barra valor 66 =0011110000
  Barra valor 67 =0010100101
  Barra valor 68 =0110100100
  Barra valor 69 =0011100100
  Barra valor 70 =0000011110
  Barra valor 71 =0100001011
  Barra valor 72 =0001001011
  Barra valor 73 =0101001010
  Barra valor 74 =0000011011
  Barra valor 75 =0100011010
  Barra valor 76 =0001011010
  Barra valor 77 =0000001111
  Barra valor 78 =0100001110
  Barra valor 79 =0001001110
  Barra valor 80 =1000011100
  Barra valor 81 =1100001001
  Barra valor 82 =1001001001
  Barra valor 83 =1101001000
  Barra valor 84 =1000011001
  Barra valor 85 =1100011000
  Barra valor 86 =1001011000
  Barra valor 87 =1000001101
  Barra valor 88 =1100001100
  Barra valor 89 =1001001100
  Barra valor 90 =0010011100
  Barra valor 91 =0110001001
  Barra valor 92 =0011001001
  Barra valor 93 =0111001000
  Barra valor 94 =0010011001
  Barra valor 95 =0110011000
  Barra valor 96 =0011011000
  Barra valor 97 =0010001101
  Barra valor 98 =0110001100
  Barra valor 99 =0011001100	   
*/		   

/* A lógica abaixo aplica a tabela acima para dentro da variável tabcodbarra{} */

  $tabcodbarra[0] = "00110" ;
  $tabcodbarra[1] = "10001" ;
  $tabcodbarra[2] = "01001" ;
  $tabcodbarra[3] = "11000" ;
  $tabcodbarra[4] = "00101" ;
  $tabcodbarra[5] = "10100" ;
  $tabcodbarra[6] = "01100" ;
  $tabcodbarra[7] = "00011" ;
  $tabcodbarra[8] = "10010" ;
  $tabcodbarra[9] = "01010" ;

  for($f1=9;$f1>=0;$f1--){ 
    for($f2=9;$f2>=0;$f2--){  
      $f = ($f1 * 10) + $f2 ;
      $texto = "" ;
      for($i=1;$i<6;$i++){ 
        $texto .=  substr($tabcodbarra[$f1],($i-1),1) . substr($tabcodbarra[$f2],($i-1),1);
      }
      $tabcodbarra[$f] = $texto;
   }
  }

	   
/* Gerando a Imagen do Código de Barras */

/* Gera a base para o preenchimento do código. 
$img    -> imagem do código
$branco -> cor branca
$preto  -> cor preta ( ou afrobrasileira, sem preconceito nenhum pô )
*/
      $img = ImageCreate($lw*95+1000,$hi+30);
      
      $preto  = ImageColorAllocate($img, 0, 0, 0);
      $branco = ImageColorAllocate($img, 255, 255, 255);

/* Cria o retángulo principal onde a imagem será aplicada. */            
      
      ImageFilledRectangle($img, 0, 0, $lw*95+1000, $hi+30, $branco);
      
# Abertura do código de barras.
      ImageFilledRectangle($img, 1,5,1,65,$preto);
      ImageFilledRectangle($img, 2,5,2,65,$branco);
      ImageFilledRectangle($img, 3,5,3,65,$preto);
      ImageFilledRectangle($img, 4,5,4,65,$branco);

# Aqui começa a varredura no valor enviado para confecção do código de barras.

$fino = 1 ;
$largo = 2.72 ; // Para o windows funciona mas o tamanho ideal seria 3
$pos   = 5 ;
$texto = $valor ;
if((strlen($texto) % 2) <> 0){
	$texto = "0" . $texto;
}

// Draw dos dados
while (strlen($texto) > 0) {
  $i = round(esquerda($texto,2));
  $texto = direita($texto,strlen($texto)-2);
  
  $f = $tabcodbarra[$i];
  
  for($i=1;$i<11;$i+=2){
    if (substr($f,($i-1),1) == "0") {
      $f1 = $fino ;
    }else{
      $f1 = $largo ;
    }

/* Imprimindo uma barra preta */   
  ImageFilledRectangle($img, $pos,5,$pos-1+$f1,65,$preto)  ;
  $pos = $pos + $f1 ;  
/* Fim da impressão da barra preta */    
  
  if (substr($f,$i,1) == "0") {
      $f2 = $fino ;
    }else{
      $f2 = $largo ;
    }

/* Imprimindo uma barra branca */
  ImageFilledRectangle($img, $pos,5,$pos-1+$f2,65,$branco)  ;
  $pos = $pos + $f2 ;  
/* Fim da impressão da barra branca */    

  }
}

# Fechamento do código de barras.

ImageFilledRectangle($img, $pos,5,$pos-1+$largo,65,$preto);
$pos=$pos+$largo;

ImageFilledRectangle($img, $pos,5,$pos-1+$fino,65,$branco);
$pos=$pos+$fino;


ImageFilledRectangle($img, $pos,5,$pos-1+$fino,65,$preto);
$pos=$pos+$fino;

      
/* MANDA A IMAGEM PRO BROWSER */
      header("Content-Type: image/png");
      ImagePNG($img);
}
//montacodigodebarras('23794225800000041933394060092001280100001020');

//$valorpassado = $_SERVER['QUERY_STRING'] ;

montacodigodebarras('23791227400000041933394060092001280200001020');

montacodigodebarras($_SERVER['QUERY_STRING']) ;

function esquerda($entra,$comp){
	return substr($entra,0,$comp);
}

function direita($entra,$comp){
	return substr($entra,-$comp);
}

?>


Pear parte 5 - Gerando códigos de barras padrão 128

http://www.revistaphp.com.br/print.php?id=146