73 lines
2.9 KiB
Plaintext
73 lines
2.9 KiB
Plaintext
// ***************************************************************************
|
|
// *
|
|
// * Copyright (C) 2004-2007, International Business Machines
|
|
// * Corporation and others. All Rights Reserved.
|
|
// *
|
|
// ***************************************************************************
|
|
//
|
|
|
|
pt {
|
|
SpelloutRules {
|
|
"%main:\n"
|
|
"-x: menos >>;\n"
|
|
"x.x: << ponto >>;\n"
|
|
"zero; um; dois; tr\u00EAs; quatro; cinco; seis; sete; oito; nove;\n"
|
|
"dez; onze; doze; treze; catorze; quinze; dezasseis;"
|
|
" dezassete; dezoito; dezanove;\n"
|
|
"20: vinte[ e >>];\n"
|
|
"30: trinta[ e >>];\n"
|
|
"40: quarenta[ e >>];\n"
|
|
"50: cinquenta[ e >>];\n"
|
|
"60: sessenta[ e >>];\n"
|
|
"70: setenta[ e >>];\n"
|
|
"80: oitenta[ e >>];\n"
|
|
"90: noventa[ e >>];\n"
|
|
"100: cem;\n"
|
|
"101: cento[ e >>];\n"
|
|
"200: duzcentos[ e >>];\n"
|
|
"300: trezentos[ e >>];\n"
|
|
"400: quatrocentos[ e >>];\n"
|
|
"500: quinhentos[ e >>];\n"
|
|
"600: seiscentos[ e >>];\n"
|
|
"700: setecentos[ e >>];\n"
|
|
"800: oitocentos[ e >>];\n"
|
|
"900: novecentos[ e >>];\n"
|
|
"1000: mil[ >%%with-e>];\n"
|
|
"2000: << mil[ >%%with-e>];\n"
|
|
"1,000,000: um milh\u00E3o[ >%%with-e>];\n"
|
|
"2,000,000: << milh\u00F5es[ >%%with-e>];\n"
|
|
"1,000,000,000: um bilh\u00E3o[ >%%with-e>];\n"
|
|
"2,000,000,000: << bilh\u00F5es[ >%%with-e>];\n"
|
|
"1,000,000,000,000: =#,##0=;"
|
|
"%%with-e:\n"
|
|
"zero; e um; e dois; e tr\u00EAs; e quatro; e cinco; e seis; e sete; e oito; e nove;\n"
|
|
"e dez; e onze; e doze; e treze; e catorze; e quinze; e dezasseis;"
|
|
" e dezassete; e dezoito; e dezanove;\n"
|
|
"20: e vinte; vinte[ e >%main>];\n"
|
|
"30: e trinta; trinta[ e >%main>];\n"
|
|
"40: e quarenta; quarenta[ e >%main>];\n"
|
|
"50: e cinquenta; cinquenta[ e >%main>];\n"
|
|
"60: e sessenta; sessenta[ e >%main>];\n"
|
|
"70: e setenta; setenta[ e >%main>];\n"
|
|
"80: e oitenta; oitenta[ e >%main>];\n"
|
|
"90: e noventa; noventa[ e >%main>];\n"
|
|
"100: e cem;\n"
|
|
"101: cento[ e >%main>];\n"
|
|
"200: e duzentos; duzcentos[ e >%main>];\n"
|
|
"300: e trezentos; trezentos[ e >%main>];\n"
|
|
"400: e quatrocentos; quatrocentos[ e >%main>];\n"
|
|
"500: e quinhentos; quinhentos[ e >%main>];\n"
|
|
"600: e seiscentos; seiscentos[ e >%main>];\n"
|
|
"700: e setecentos; setecentos[ e >%main>];\n"
|
|
"800: e oitocentos; oitocentos[ e >%main>];\n"
|
|
"900: e novecentos; novecentos[ e >%main>];\n"
|
|
"1000: e mil; mil[ >%%with-e>];\n"
|
|
"2000: << mil[ >%%with-e>];\n"
|
|
"1,000,000: um milh\u00E3o[ >%%with-e>];\n"
|
|
"2,000,000: << milh\u00F5es[ >%%with-e>];\n"
|
|
"1,000,000,000: um bilh\u00E3o[ >%%with-e>];\n"
|
|
"2,000,000,000: << bilh\u00F5es[ >%%with-e>];\n"
|
|
"1,000,000,000,000: =#,##0=;"
|
|
}
|
|
}
|