Program to Convert Numberic to Word

* Author      : Team of Pelagian Softwares
* Date        : 11/10/2004
* Source      : rupword.prg
* Description : Program to Convert Numberic to Word


set print off
set talk off
unt='One       Two       Three     Four      Five      Six       '
unt= unt+'Seven     Eight     Nine      Ten       Eleven    Twelve    '
unt= unt+'Thirteen  Fourteen  Fifteen   Sixteen   Seventeen Eighteen  '
unt= unt+'Ninteen'
ten='Twenty    Thirty    Fourty    Fifty     Sixty     Seventy   '
ten= TEN+'Eighty    Ninty'
clth='Crore     Lac       Thousand  Hundred               '