Blame view
abntex-abrev.sty
2.3 KB
1fbcbd399 first commit |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 |
%% $Id: abntex-abrev.sty,v 1.3 2003/10/13 09:41:21 gweber Exp $ %% name of this file abntex-abrev.sty %% Copyright 2003 by the abnTeX group at http://abntex.codigolivre.org.br %% %% This file is distributed under the LaTeX-Project Public License (LPPL) %% http://www.latex-project.org/lppl.html %% You are free to modify this file under the LPPL. %% %% $Log: abntex-abrev.sty,v $ %% Revision 1.3 2003/10/13 09:41:21 gweber %% Passa a usar cvs-id.def para gerar informações sobre data e versão. %% %% Revision 1.2 2003/10/10 10:08:09 gweber %% Passa a usar cvs-id.def para gerar informações sobre data e versão. %% %% Revision 1.1 2003/06/27 13:49:21 gweber %% Estilo principal que implementa abreviações para o projeto abntex. %% O arquivo pode ser usado sozinho ou em conjunto com classes e estilos bibliográficos. %% Ele carrega um aquivo com traduções portugês-inglês abntex-abrev-pt_BR.def e um arquivo %% com as definições da norma 10522/1988. %% \NeedsTeXFormat{LaTeX2e} \input{cvs-id.def} \CVSExtract$Id: abntex-abrev.sty,v 1.3 2003/10/13 09:41:21 gweber Exp $ \CVSPackage{abntexabrev}{\space Abreviacoes} \RequirePackage{ifthen} ewcommand{\NoAbrevending}{\let\Abrevending\@empty} \input{nbr10522-1988.def} ewcommand{\@NBR}{@NBR@A@} ewcommand{\@PREF@}[1]{\csname \@NBR#1\endcsname} \input{abntex-abrev-pt_BR.def} \ProcessOptions ewcommand{\@TR@}{@TR@} ewcommand{\Capitalize}[1]{\uppercase{#1}} %para testar, coloca os resultados em forma mais explícita ewcommand{\TESTabrev}[1]{% \@ifundefined{@TR@#1}{pt(#1):\csname \@NBR#1\endcsname}{en(#1):\csname \@TR@#1\endcsname}} %controla como termina a abreviação ewcommand{\abrevending}{.} ewcommand{\Abrevending}{} %comando para usuários, pode ser portugês ou inglês ewcommand{\abrev}[1]{\let\Abrevending\abrevending% \@ifundefined{@TR@#1}{\csname \@NBR#1\endcsname\Abrevending}{\csname \@TR@#1\endcsname\Abrevending}} %comando para usuários, pode ser portugês ou inglês ewcommand{\Abrev}[1]{\expandafter\Capitalize\abrev{#1}} %comando para desenvolvedores, só inglês sem finalização, ou seja sem ponto ewcommand{\ABNTEXabrev}[1]{\@ifundefined{@TR@#1}{#1}{\csname \@TR@#1\endcsname}} %comando para desenvolvedores, só inglês com finalização, ou seja com ponto ewcommand{\ABNTEXabrevp}[1]{\let\Abrevending\abrevending \ABNTEXabrev{#1}\Abrevending} |