Anonymous user
Non-decimal radices/Convert: Difference between revisions
+AutoHotkey
(+AutoHotkey) |
|||
Line 155:
===Other libraries or implementation specific extensions===
As of February 2009 no open source libraries to do this task have been located.
=={{header|AutoHotkey}}==
<lang AutoHotkey>
msgbox % number2base(200, 16) ; 12
msgbox % parse(200, 16) ; 512
number2base(number, base)
{
while, base < digit := floor(number / base)
{
result := mod(number, base) . result
number := digit
}
result := digit . result
return result
}
parse(number, base)
{
result = 0
pos := strlen(number) - 1
loop, parse, number
{
result := ((base ** pos) * A_LoopField) + result
base -= 1
}
return result
}
</lang>
=={{header|AWK}}==
| |||