%{ 

#define set_estado(x) BEGIN(_stack[_i]=x)
#define push_to_stack(x)  _stack[++_i]=YY_START; set_estado(x)
#define pop_back set_estado(_stack[--_i])

   #include <string.h>
   #include <ctype.h>


   #define MAX 1000


   int _i=0;
   int _stack[MAX];

   int i=0;
   int cont_pags=1;
   int cont_fig=1;
   int cont_tab=1;
   int cont_grv=1;
   int cont_toc=1;
   int cont_link=1;
   int cont_entrada=1;
   int cont_pagebreak=1;


%}

LETRA	[a-zA-Z]
PALAVRA	[a-zA-Z&0-9\[\]]+
PALAVRASUPER	[a-zA-Z&0-9\[\]\(\)]+
PALAVRASPAS	[a-zA-Z&0-9\[\]\(\)]+
BLANK [ \t\n]
PONTUACAO [:\.;',?!\-_]
TEXTO ({BLANK}*{PALAVRA}{BLANK}*{PONTUACAO}*{BLANK}*)+
TEXTOASPAS ({BLANK}*{PALAVRASPAS}{BLANK}*{PONTUACAO}*{BLANK}*)+
NUMINT	[0-9]+
NUMREAL	{NUMINT}\.{NUMINT}	

%Start e1 e2 e3 e4 e5 e6 e7 e8 e9


%%

	set_estado(e1);



\\pi	printf("&pi;");
\\normalsize	;
\\numeracao\{{PALAVRA}\}	;
\\pagina\{{NUMINT}\}	;
\\vspace\{{NUMINT}(cm)\}|\\vspace\{{NUMREAL}(cm)\}	;
\\hspace\{{NUMINT}(cm)\}|\\hspace\{{NUMREAL}(cm)\}	;
\\input\{defs\}	;
\\thispagestyle\{empty\}	;
\\noindent	;

\\vspace\*\{{BLANK}*{NUMINT}(cm)\}	;


_\\\\	 printf("<paragrafo>\n");
^(\n)+	printf("<paragrafo>\n");

\\\\	printf("<paragrafo>\n");

\\espaco	printf("<paragrafo>");

(\\linha|\\stracos)	{printf("<linha>");}

&utilde;	printf("u");
&Utilde;	printf("U");
&etilde;	printf("e");
&Etilde;	printf("E");
&itilde;	printf("i");
&Itilde;	printf("I");

\<	printf("&lt;");
\>	printf("&gt;");



\\espacamento\{0\.4\}	;


\\espacamento\{7\}	{printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab);
			cont_tab++;}


\\espacamento\{5\}	{printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab);
			cont_tab++;}

\\espacamento\{8\.5\}	{printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab);
			cont_tab++;}


\\supers\{{PALAVRASUPER}\}	{i=8;
			 printf(".");
                         while(i<yyleng-1){
                                 printf("%c", yytext[i]);
                                 i++;}
			}

\\super\{{PALAVRASUPER}\}	{i=7;
			 printf(".");
                         while(i<yyleng-1){
                                 printf("%c", yytext[i]);
                                 i++;}
			}


\\begin\{quotation\}	printf("\n\n<citacao>\n\n");	

\\end\{quotation\}	printf("\n\n</citacao>\n\n");	
			 

\\hifen\{{TEXTO}\}	{i=7;
			 printf("-");	
		  while(i<yyleng-1){
		    printf("%c", yytext[i]);
		    i++;}
			}

\\\(	{printf("\n<matematica>\n");
	 push_to_stack(e6);}

<e6>\\cal\{	push_to_stack(e7);

<e7>\}	pop_back;

<e6>\\\)	{printf("\n</matematica>\n");
	 pop_back;}


\\centrado{BLANK}*\{{BLANK}*\{\\[lL]arge{BLANK}*        {printf("\n\n<subtit3 idlink=\"link%d\">", cont_link++);
                        push_to_stack(e4);}
 
 
<e4>\}\}       {printf("</subtit3>\n");pop_back;}

\\aspas\{	{push_to_stack(e2);
		 printf("\n\"\n");	
		}

<e2>\}	{printf("\n \" \n");
	 pop_back;}


\\addtocounter\{footnote\}\{{NUMINT}\}	;

\\livro\[({TEXTO}*\\\\*{TEXTO}\\\\{TEXTO})\]	{printf("<corpo>\n\n<pagina>\n\n<estampa idest=\"figura%d\">\t</estampa>\n", cont_fig);
						cont_fig++;}

\\Desc\[aZZ=\"{BLANK}*\"\]	;

\\pags	{switch(cont_pags){

	   case 82: {printf("\n\n[P&aacute;gina %d]\n\n", cont_pags);
                    printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab++);
	            break;}

	   case 83: {printf("\n\n[P&aacute;gina %d]\n\n", cont_pags);
                    printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab++);
		    break;}
	   case 84: {printf("\n\n[P&aacute;gina %d]\n\n", cont_pags);
                    printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab++);
		    break;}
	   case 85: {printf("\n\n[P&aacute;gina %d]\n\n", cont_pags);
                    printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab++);
		    break;}
	   case 86: {printf("\n\n[P&aacute;gina %d]\n\n", cont_pags);
                    printf("\n\n<figura idfig=\"tab%d\">\t</figura>", cont_tab++);
		    break;}
           default: {printf("\n\n[P&aacute;gina %d]\n\n", cont_pags);}

	}
	cont_pags++;
}




\\begin\{itemize\}	printf("\n<lista tipo=\"semmarca\">\n");

\\end\{itemize\}	printf("\n</item>\n\n</lista>\n");

\\entrada\{	{switch(cont_entrada){
			case 1:	{
				 printf("\n<item tipo=\"semmarca\">\n\n");
				 break;}
			default: printf("\n</item>\n<item tipo=\"semmarca\">\n\n");
		 	}
			cont_entrada++;
			push_to_stack(e9);
		}

<e9>\}	pop_back;

			 
\\ultima	printf("\n\n</pagina> \n</apendice>\n\n</livro>\n");

\\last	;

\\pagebreak	{switch(cont_pagebreak){
			case 1: {printf("</pagina>\n</corpo>\n\n<apendice>\n<pagina>\n");
				 break;}
			default: printf("\\novapagina");
			}
			cont_pagebreak++;
		}



\\esima	printf(".a");

\\esimo	printf(".o");

\\gamma	printf("&gamma;");
\\delta	printf("&delta;");
\\omega	printf("&omega;");
\\beta	printf("&beta;");


\\addcontentsline\{toc\}\{section\}\{\\protect\\numberline\{\}\{{TEXTO}\}\}	{printf("\n\n<indicetoc idtoc=\"toc%d\">\t</indicetoc>",cont_toc++);}
 
\\addcontentsline\{grv\}\{section\}\{\\protect\\numberline\{\}\{{TEXTO}\}\}	{printf("\n\n<indicegrv idgrv=\"grv%d\">\t</indicegrv>",cont_grv++);}


\\lado\{Estampa{BLANK}*{NUMINT}\}	;



%%