Attachment 104726 Details for Bug 78324 – HR-LATIN numbertext implementation

[patch] HR-LATIN numbertext implementation

numbertext-hr-latin.txt (text/plain), 6.26 KB, created by Mikeyy - L10n HR on 2014-08-16 10:08:25 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Mikeyy - L10n HR

Created: 2014-08-16 10:08:25 UTC

Size: 6.26 KB

patch

obsolete

>#
># Regular number to text transducer for Serbian (Cyrillic) written in Soros
># Copyright (c) Goran Rakic <grakic@devbase.net> 2009.
># Modified, translated and corrected some bugs for Croatian by Mihovil StaniÄ <libreoffice@miho.im> 2014.
>#              
># Released under Creative Commons 3.0 Attribution - Share Alike license
># and relicensed under GNU Lesser General Public License as published by
># the Free Software Foundation, either version 3 of the License, or
># (at your option) any later version.
>#
># Visit http://numbertext.org for more info on Soros language and syntax 
>#
>
>__numbertext__
>(\d{1,3})\.([\d.,]+) $(\1\2)
>
>^0 nula
>1 jedan
>2 dva
>3 tri
>4 Äetiri
>5 pet
>6 Å¡est
>7 sedam
>8 osam
>9 devet
>10 deset
>
>11 jedanaest
>14 Äetrnaest
>16 Å¡esnaest
>1(\d) $1naest
>
>4(\d) Äetrdeset $1
>5(\d) pedeset $1
>6(\d) Å¡ezdeset $1
>9(\d) devedeset $1
>(\d)0 $1deset
>(\d)(\d) $1deset $2
>
>1(\d\d) sto $1
>2(\d\d) dvjesto $1
>3(\d\d) tristo $1
>(\d)(\d\d) $1sto $2
>
>1(\d\d\d) tisuÄu $1
>2(\d\d\d) dvije tisuÄe $1
>([34])(\d\d\d) $1 tisuÄe $2
>(\d{0,1})1(\d)(\d\d\d) $(\11\2) tisuÄa $3
>(\d{1,2})1(\d\d\d) $(\10) jedna tisuÄa $2
>(\d{1,2})2(\d\d\d) $(\10) dvije tisuÄe $2
>(\d{1,2})([34])(\d\d\d) $(\10) $2 tisuÄe $3
>(\d{1,3})(\d\d\d) $1 tisuÄa $2
>
>1(\d{6}) milijun $1
>(\d{0,1})1(\d)(\d{6}) $(\11\2) milijuna $3
>(\d{1,2})1(\d{6}) $(\10) jedan milijun $2
>(\d{1,3})(\d{6}) $1 milijuna $2
>
>1(\d{9}) milijarda $1
>2(\d{9}) dvije milijarde $1
>([34])(\d{9}) $1 milijarde $2
>(\d{1,2})0(\d{9}) $(\10) milijardi $2
>(\d{0,1})1(\d)(\d{9}) $(\11\2) milijardi $3
>(\d{1,2})1(\d{9}) $(\10) jedna milijarda $2
>(\d{1,2})2(\d{9}) $(\10) dvije milijarde $2
>(\d{1,2})([34])(\d{9}) $(\10) $2 milijarde $3
>(\d{1,3})(\d{9}) $1 milijardi $2
>
>1(\d{12}) bilijun $1
>(\d{0,4})1(\d)(\d{12}) $(\11\2) bilijuna $3
>(\d{1,5})1(\d{12}) $(\10) jedan bilijun $2
>(\d{1,6})(\d{12}) $1 bilijuna $2
>
>1(\d{18}) trilijun $1
>(\d{0,4})1(\d)(\d{18}) $(\11\2) trilijuna $3
>(\d{1,5})1(\d{18}) $(\10) jedan trilijun $2
>(\d{1,6})(\d{18}) $1 trilijuna $2
>
>1(\d{24}) kvadrilijun $1
>(\d{0,4})1(\d)(\d{24}) $(\11\2) kvadrilijuna $3
>(\d{1,5})1(\d{24}) $(\10) jedan kvadrilijun $2
>(\d{1,6})(\d{24}) $1 kvadrilijuna $2
>
>1(\d{30}) kvintilijun $1
>(\d{0,4})1(\d)(\d{30}) $(\11\2) kvintilijuna $3
>(\d{1,5})1(\d{30}) $(\10) jedan kvintilijun $2
>(\d{1,6})(\d{30}) $1 kvintilijuna $2
>
>1(\d{36}) sekstilijun $1
>(\d{0,4})1(\d)(\d{36}) $(\11\2) sekstilijuna $3
>(\d{1,5})1(\d{36}) $(\10) jedan sekstilijun $2
>(\d{1,6})(\d{36}) $1 sekstilijuna $2
>
># negative number
>
>[-â] minus
>[-â](\d+) minus |$1
>
># Decimal code by https://twitter.com/_uranium_
>"([-â]?\d+)[.,]" $1| zarez
>"([-â]?\d+[.,])([^0]\d)" $1 $2
>"([-â]?\d+[.,]\d*[1-9]?)0+$" $1
>"([-â]?\d+[.,])(\d)(\d)(\d)" $1| |$2 |$3 |$4 
>"([-â]?\d+[.,]\d*)(\d)" $1 |$2
>
># currency
>
># unit/subunit
>
>us:([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*) \1
>up:([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*) \2
>ug:([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*) \3
>ss:([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*) \4
>sp:([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*) \5
>sg:([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*) \6
>
># f and m comments at the end of line represent female and male groups, first 3 words is group one represented with first letter, etc...
>HRK:(\D+) $(\1: kuna, kune, kuna, lipa, lipe, lipa) #ff
>DKK:(\D+) $(\1: kruna, krune, kruna, ora, ore, ora) #ff
>SEK:(\D+) $(\1: kruna, krune, kruna, ora, ore, ora) #ff
>CZK:(\D+) $(\1: kruna, krune, kruna, haler, halera, halera) #fm
>HUF:(\D+) $(\1: forinta, forinte, forinti, filer, filera, filera) #fm
>GBP:(\D+) $(\1: funta, funte, funti, peni, penija, penija) #fm
>BAM:(\D+) $(\1: konvertibilna marka, konvertibilne marke, konvertibilnih maraka, fening, feninga, feninga) #fm
>BGN:(\D+) $(\1: lev, leva, leva, stotinka, stotinke, stotinki) #mf
>RSD:(\D+) $(\1: dinar, dinara, dinara, para, pare, para) #mf
>RON:(\D+) $(\1: leu, leu, leu, ban, bana, bana) #mm
>CHF:(\D+) $(\1: franak, franka, franaka, centim, centima, centima) #mm
>EUR:(\D+) $(\1: euro, eura, eura, cent, centa, centa) #mm
>USD:(\D+) $(\1: dolar, dolara, dolara, cent, centa, centa) #mm
>PLN:(\D+) $(\1: zlot, zlota, zlota, groÅ¡, groÅ¡a, groÅ¡a) #mm
>
># Covers cases where currency sign is after numbers or different position
>"(.*) kn" $(HRK \1)
>"(.*) â¬" $(EUR \1)
>"(.*)â¬" $(EUR \1)
>"â¬(.*)" $(EUR \1)
>"â¬ (.*)" $(EUR \1)
>"(.*) Ft" $(HUF \1)
>"(.*) din." $(RSD \1)
>"\$(.*)" $(USD \1)
>"\$ (.*)" $(USD \1)
>"(.*) \$" $(USD \1)
>"KM(.*)" $(BAM \1)
>"Â£(.*)" $(GBP \1)
>"(.*) HRK" $(HRK \1)
>"(.*) DKK" $(DKK \1)
>"(.*) SEK" $(SEK \1)
>"(.*) CZK" $(CZK \1)
>"(.*) HUF" $(HUF \1)
>"(.*) GBP" $(GBP \1)
>"(.*) BAM" $(BAM \1)
>"(.*) BGN" $(BGN \1)
>"(.*) RSD" $(RSD \1)
>"(.*) RON" $(RON \1)
>"(.*) CHF" $(CHF \1)
>"(.*) EUR" $(EUR \1)
>"(.*) USD" $(USD \1)
>"(.*) PLN" $(PLN \1)
>
>"(HRK|DKK|SEK|CZK|HUF|GBP|BAM) ([-â]?1)([.,]00?)?" jedna $(\1:us) #female, for 1
>"(HRK|DKK|SEK|CZK|HUF|GBP|BAM) ([-â]?2)([.,]00?)?" dvije $(\1:up) #female, for 2
>"(HRK|DKK|SEK|CZK|HUF|GBP|BAM) ([02-9])1([.,]00?)?" $(\20) jedna $(\1:us) #female, for numbers from 21-91 ending with 1
>"(HRK|DKK|SEK|CZK|HUF|GBP|BAM) ([02-9])2([.,]00?)?" $(\20) dvije $(\1:up) #female, for numbers from 22-92 ending with 2
>"(HRK|DKK|SEK|CZK|HUF|GBP|BAM) ([-â]?\d*)([02-9])1([.,]00?)?" $(\200) $(\30) jedna $(\1:us) #female, for numbers >100 ending with 1 but not 11
>"(HRK|DKK|SEK|CZK|HUF|GBP|BAM) ([-â]?\d*)([02-9])2([.,]00?)?" $(\200) $(\30) dvije $(\1:up) #female, for numbers >100 ending with 2 but not 12
>"([A-Z]{3}) ([-â]?1)([.,]00?)?" $2| $(\1:us)
>"([A-Z]{3}) ([-â]?\d*[02-9]1)([.,]00?)?" $2| $(\1:us)
>"([A-Z]{3}) ([-â]?[234])([.,]00?)?" $2| $(\1:up)
>"([A-Z]{3}) ([-â]?\d*[02-9][234])([.,]00?)?" $2| $(\1:up)
>"([A-Z]{3}) ([-â]?\d+)([.,]00?)?" $2| $(\1:ug)
>
>"((HRK|DKK|SEK|BGN|RSD) [-â]?\d+)[.,]([02-9])1" $1 $(\30) jedna $(\2:ss) #decimal, female, ending with 1 but not 11
>"((HRK|DKK|SEK|BGN|RSD) [-â]?\d+)[.,]([02-9])2" $1 $(\30) dvije $(\2:sp) #decimal, female, ending with 2 but not 12
>"(([A-Z]{3}) [-â]?\d+)[.,](01)" $1 |$(1) $(\2:ss)
>"(([A-Z]{3}) [-â]?\d+)[.,]([02-9]1)" $1 |$3 $(\2:ss)
>"(([A-Z]{3}) [-â]?\d+)[.,]([02-9][234])" $1 |$3 $(\2:sp)
>"(([A-Z]{3}) [-â]?\d+)[.,](\d)" $1 |$(\30) $(\2:sg)
>"(([A-Z]{3}) [-â]?\d+)[.,](\d\d)" $1 |$3 $(\2:sg)

Actions: View

Attachments on bug 78324: 104726 | 106490