Gerando Código de barras no padrão brasileiro compatível com Browsers Linux e Windows
Publicado por Alexandre de Jesus Marcolino 08/12/2003
[ Hits: 24.702 ]
Homepage: http://blog.marcolino.com.br/wordpress/
Olá, este script mostra como usar os recursos da biblioteca GD para a geração de um código de
barras on-the-fly. Além da performance indiscutível em relação ao normal que é a criação de um
código HTML que junta GIFS para formar o código, ainda temos a vantagem do controle sob
a imagem gerada podendo compatibilizá-la para outras plataformas além do Windows / Linux caso
a imagem se distorça nesta plataforma.
<?php /* Geração de código de barras padrão p/ boletos bancários brasileiros. Autor: MARCOLINO, Alexandre de Jesus ( marcolino@facil.com ) 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,strlen($entra)-$comp,$comp); } ?>
Automatizando tradução i18n do seu codigo
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Como renomear arquivos de letras maiúsculas para minúsculas
Imprimindo no formato livreto no Linux
Vim - incrementando números em substituição
Efeito "livro" em arquivos PDF
Como resolver o erro no CUPS: Unable to get list of printer drivers
Instalação Uefi com o instalador clássico do Mageia (0)
É cada coisa que me aparece! - não é só 3% (2)
SysAdmin ou DevOps: Qual curso inicial pra essa área? (1)
Alguma pessoa pode me ajudar com drriver Core i3 7020u (Debian 12)? (2)
[Python] Automação de scan de vulnerabilidades
[Python] Script para analise de superficie de ataque
[Shell Script] Novo script para redimensionar, rotacionar, converter e espelhar arquivos de imagem
[Shell Script] Iniciador de DOOM (DSDA-DOOM, Doom Retro ou Woof!)
[Shell Script] Script para adicionar bordas às imagens de uma pasta