CosNumberTranslate/example.script at master · KurroLopez/CosNumberTranslate · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
write ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc)
;; one hundred and twenty-three
write ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc,"es")
;; ciento veintitres
write ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc,"ca")
;; cent vint-i-tres
write ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc,"ru")
;; Сто двадцать три
write ##class(NumberTranslate.NumberTranslate).GetText(1000000000,.tSc,"en",1)
;; one billion
write ##class(NumberTranslate.NumberTranslate).GetText(1000000000,.tSc,"en",0)
;; one thousand millions
write ##class(NumberTranslate.NumberTranslate).GetText(1000000000000,.tSc,"en",1)
;; one trillion
write ##class(NumberTranslate.NumberTranslate).GetText(1000000000000,.tSc,"en",0)
;; one billion
write