• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1// ***************************************************************************
2// *
3// *   Copyright (C) 2004-2007, International Business Machines
4// *   Corporation and others.  All Rights Reserved.
5// *
6// ***************************************************************************
7//
8
9pt {
10    SpelloutRules {
11    "%main:\n"
12        "-x: menos >>;\n"
13        "x.x: << ponto >>;\n"
14        "zero; um; dois; tr\u00EAs; quatro; cinco; seis; sete; oito; nove;\n"
15        "dez; onze; doze; treze; catorze; quinze; dezasseis;"
16        "    dezassete; dezoito; dezanove;\n"
17        "20: vinte[ e >>];\n"
18        "30: trinta[ e >>];\n"
19        "40: quarenta[ e >>];\n"
20        "50: cinquenta[ e >>];\n"
21        "60: sessenta[ e >>];\n"
22        "70: setenta[ e >>];\n"
23        "80: oitenta[ e >>];\n"
24        "90: noventa[ e >>];\n"
25        "100: cem;\n"
26        "101: cento[ e >>];\n"
27        "200: duzcentos[ e >>];\n"
28        "300: trezentos[ e >>];\n"
29        "400: quatrocentos[ e >>];\n"
30        "500: quinhentos[ e >>];\n"
31        "600: seiscentos[ e >>];\n"
32        "700: setecentos[ e >>];\n"
33        "800: oitocentos[ e >>];\n"
34        "900: novecentos[ e >>];\n"
35        "1000: mil[ >%%with-e>];\n"
36        "2000: << mil[ >%%with-e>];\n"
37        "1,000,000: um milh\u00E3o[ >%%with-e>];\n"
38        "2,000,000: << milh\u00F5es[ >%%with-e>];\n"
39        "1,000,000,000: um bilh\u00E3o[ >%%with-e>];\n"
40        "2,000,000,000: << bilh\u00F5es[ >%%with-e>];\n"
41        "1,000,000,000,000: =#,##0=;"
42    "%%with-e:\n"
43        "zero; e um; e dois; e tr\u00EAs; e quatro; e cinco; e seis; e sete; e oito; e nove;\n"
44        "e dez; e onze; e doze; e treze; e catorze; e quinze; e dezasseis;"
45        "    e dezassete; e dezoito; e dezanove;\n"
46        "20: e vinte; vinte[ e >%main>];\n"
47        "30: e trinta; trinta[ e >%main>];\n"
48        "40: e quarenta; quarenta[ e >%main>];\n"
49        "50: e cinquenta; cinquenta[ e >%main>];\n"
50        "60: e sessenta; sessenta[ e >%main>];\n"
51        "70: e setenta; setenta[ e >%main>];\n"
52        "80: e oitenta; oitenta[ e >%main>];\n"
53        "90: e noventa; noventa[ e >%main>];\n"
54        "100: e cem;\n"
55        "101: cento[ e >%main>];\n"
56        "200: e duzentos; duzcentos[ e >%main>];\n"
57        "300: e trezentos; trezentos[ e >%main>];\n"
58        "400: e quatrocentos; quatrocentos[ e >%main>];\n"
59        "500: e quinhentos; quinhentos[ e >%main>];\n"
60        "600: e seiscentos; seiscentos[ e >%main>];\n"
61        "700: e setecentos; setecentos[ e >%main>];\n"
62        "800: e oitocentos; oitocentos[ e >%main>];\n"
63        "900: e novecentos; novecentos[ e >%main>];\n"
64        "1000: e mil; mil[ >%%with-e>];\n"
65        "2000: << mil[ >%%with-e>];\n"
66        "1,000,000: um milh\u00E3o[ >%%with-e>];\n"
67        "2,000,000: << milh\u00F5es[ >%%with-e>];\n"
68        "1,000,000,000: um bilh\u00E3o[ >%%with-e>];\n"
69        "2,000,000,000: << bilh\u00F5es[ >%%with-e>];\n"
70        "1,000,000,000,000: =#,##0=;"
71    }
72}
73