To check how many characters are after the decimal point and then
add one or two zeros if necessary.
Since the aim is that specific, I suppose something relatively simple
might do it:
------------------
on currency_format for v
set d to (round (v mod 1 * 100)) / 100 as string
(v div 1 as text) & "." & text 1 thru 2 of (d's text ((offset of "."
in d) + 1) thru -1 & "00")
end currency_format
