100 by pooq

c=.,&'teen'&.>b=:('thir';'fif';'eigh')(0 2 5)}(3+i.7){a=:;:' zero one two three four five six seven eight nine ten eleven twelve'
d=:,&'ty'&.>(<'for')2}'twen';b
f=:'';(' '&,&.>((>:i.9){a))
wd&>a,c
wd&(3 :'(>(0{y){d),(>(1{y){f)')"1(,.10#i.8),.80$i.10
wd'one hundred'

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top