_NumToDec
Конвертирует указанное число в десятичное
#Include <ConvertingNumbers.au3>
_NumToDec ( $num, $sSymbol[, $casesense = 0] )
Параметры
| $num | Число |
| $sSymbol |
Набор символов определяющих последовательность в разряде |
| $casesense |
Регистро-зависимость (0,1,2), соответствует флагам StringInStr |
Возвращаемое значение
| Успех: | Возвращает десятичное число, @extended определяет предыдущее количество символов в разряде |
| Ошибка: | Возвращает число переданное в параметре $num и устанавливает @error: |
| @error: | 1 - $sSymbol содержит менее 2 символов |
| 2 - Символ числа не найден в наборе символов |
Примечания
Не используйте функцию для конвертирования в 16, 8 - ричные числа, для этого есть Hex, StringFormatСм. также
_DecToNumПример
; AZJIO
; http://www.autoitscript.com/forum/topic/141984-num1-to-num2/#entry999132
#include <ConvertingNumbers.au3>
$sSymbol = 'abcdefghijklmnopqrstuvwxyz'
$sText = 'a = ' & _NumToDec('a', $sSymbol) & @CRLF
$sText &= 'b = ' & _NumToDec('b', $sSymbol) & @CRLF
$sText &= 'c = ' & _NumToDec('c', $sSymbol) & @CRLF
$sText &= 'x = ' & _NumToDec('x', $sSymbol) & @CRLF
$sText &= 'y = ' & _NumToDec('y', $sSymbol) & @CRLF
$sText &= 'z = ' & _NumToDec('z', $sSymbol) & @CRLF
$sText &= 'ba = ' & _NumToDec('ba', $sSymbol) & @CRLF
$sText &= 'bb = ' & _NumToDec('bb', $sSymbol)
MsgBox(0, 'Сообщение', $sText)
$md5 = '5DD66C671119146C30CC27FB9A138733'
$sSymbol = '0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ'
$timer = TimerInit()
$n = _DecToNum(_NumToDec($md5, '0123456789ABCDEF'), $sSymbol)
MsgBox(0, Round(TimerDiff($timer), 2) & ' msec', $n)