Lines Matching refs:txt
108 set txt "[number_name [expr {$n/1000}]] thousand"111 set txt {}114 append txt " [lindex $::ones [expr {$n/100}]] hundred"118 append txt " [lindex $::tens [expr {$n/10}]]"122 append txt " [lindex $::ones $n]"124 set txt [string trim $txt]125 if {$txt==""} {set txt zero}126 return $txt