Cheque Edit

[Kenneth Brody]

On 10/8/2011 10:35 PM, frank7767 at aol.com wrote:
> the edit
> CHEQUE °[{!" "!}](zero|<***>(tt|THOU|HUN|TENS|ONES) CENTS |<*** zero>  cents)
>
>
> works great until the amount is greater around 100,00.00
> then the amount is not printed
>
>
> SOmeone on the List sent me an amended edit which allowed for muc larger sums. I lost that edit.

Here's the one I wrote many years ago, which goes up to $9,999,999,999,999.99

==========
CHEQUE:[{!" "!}](zero|<*** > lots cents|<*** zero>cents)
lots:(tr| hb | tb | bil | hm | tm | ml | ht | tt | thou | hun | tens | ones)
tr:N N N N N N N N N N N N N & (!0! | ones< trillion >) hb
hb:N N N N N N N N N N N N & (!000! | chek2 < billion > ) hm
tb:N N N N N N N N N N N & ( !00! | ( (!0! ones | tens) < billion >)) hm
bil:N N N N N N N N N N & (!0!|ones< billion >) hm
hm:N N N N N N N N N & ( !000! | chek2 < million >  ) ml2
ml2:                    ( !000! | chek2 < thousand > ) chek2
tm:N N N N N N N N & ( (!0! ml) | ( tens < million > ml2 ) )
ml:N N N N N N N & (!0! | ones < million >) ml2
ht:N N N N N N & ml2
chek2:( !0! | ones< hundred > )  ( !00! | ( !0! ones | tens ) )
tt:N N N N N & (!00! | ( !0! ones | tens ) < thousand > ) (hun|tens|ones)
thou:N N N N & (!0!| ones < thousand >)(hun | tens | ones)
hun:N N N & (!0!|ones < hundred >) (tens | ones)
ones:!0!|!1!<one>|!2!<two>|!3!<three>|!4!<four>|!5!<five>|!6!<six>|one2
one2:!7!<seven>|!8!<eight>|!9!<nine>
tens:!10!<ten>|!11!<eleven>|!12!<twelve>|!13!<thirteen>|!14!<fourteen>|ten2
ten2:!15!<fifteen>|!16!<sixteen>|!17!<seventeen>|!18!<eighteen>|ten3
ten3:!19!<nineteen>|!20!<twenty>|!30!<thirty>|!40!<forty>|!50!<fifty>|ten4
ten4:!60!<sixty>|!70!<seventy>|!80!<eighty>|!90!<ninety>|ten5
ten5:(!0!|ten6 <"-">) ones
ten6:!2!<twenty>|!3!<thirty>|!4!<forty>|!5!<fifty>|!6!<sixty>|ten7
ten7:!7!<seventy>|!8!<eighty>|!9!<ninety>
cents:< and > [!.!] num num </100 dollars ***>
zero:zer1 <*** zero> !.! cents
zer1:(N N N N N&!00000!)|(N N N N&!0000!)|zer2
zer2:(N N N&!000!)|(N N&!00!)|(N&!0!)
========

-- 
Kenneth Brody