awk -F= ' {
printf "!%c%s!%c\n",25,center("COMPUTACION BUIN LTDA."),1
printf "%s\n",center("Casa Matriz : Av. San Martin 174, Buin ")
printf "%s\n",center("       Fono: 822 1481 - Fax : 822 1405 ")
printf "%s\n",center("   Sucursal: Eyzaguirre 715, Talagante")
printf "%s\n",center("       Fono: 815 2831                  ")
printf "%s\n",center("     e-Mail: compubuin@tie.cl          ")
} END {
printf "m"
}
function centerdw(text)
{
	w=10
	l=length(text)/4
	fr=sprintf("h%%%ds%%s",w-l)
	return sprintf(fr,"",text)
}
function center(text)
{
	w=20
	l=length(text)/2
	fr=sprintf("%%%ds%%s",w-l)
	return sprintf(fr,"",text)
} ' $1

	
