Дробные числа прописью

Доброго времени суток!

Хочу поделиться своими наработками.
Функция преобразования дробей в запись прописью, например:
1,012 - Одна целая двенадцать тысячных
13/156 - Тринадцать сто пятьдесят шестых

Ограничения: десятичная дробь - максимум 3 знака после запятой
обыкновенная дробь - наименьший знаменатель = 1000

Также может переводить и целые числа.

Вызывать функцию NumValueToString(NumValue)

Сервис прилагаю.

Кто найдет баги пишите!