_NumberNumToName
Преобразует число в запись прописью
#Include <ConvertingNumbers.au3>
_NumberNumToName ( $iNumber, $iRusLng = 0 )
Параметры
$iNumber | Любое целое число от 0 до 9223372036854775806 |
$iRusLng |
[необязательный] языковые установки 0 - (по умолчанию) на английском языке 1 - на русском языке |
Возвращаемое значение
Успех: | Возвращает число прописью |
Ошибка: | Возвращает пустую строку, @error = 1, если строка содержит не цифры |
Примечания
Если параметр $iNumber является строковыми данными, то не обязательно его преобразовывать в число.Пример
; http://forum.oszone.net/post-1900913.html#post1900913
#include <ConvertingNumbers.au3>
$sRes = ''
For $i = 1 To 10
$sRes &= _FuncName(Random(1, 10000000000, 1))
Next
$sRes &= _FuncName(000018)
$sRes &= _FuncName(118)
$sRes &= _FuncName(200)
$sRes &= _FuncName(5)
$sRes &= _FuncName(18000000000)
$sRes &= _FuncName(9223372036854775806) ; максимальное число
$sRes &= _FuncName(9223372036854775807) ; максимальное число поддерживаемое AutoIt3
$sRes &= _FuncName(0)
MsgBox(0, 'Сообщение', $sRes)
Func _FuncName($iNumber)
Return StringRegExpReplace($iNumber, '(\A\d{1,3}(?=(\d{3})+\z)|\d{3}(?=\d))', '\1 ') & ' = ' & _NumberNumToName($iNumber, 1) & @CRLF
EndFunc