mirror of
https://github.com/eworm-de/routeros-scripts.git
synced 2024-05-11 05:55:19 +00:00
global-functions: $HexToNum: properly handle capital characters
This commit is contained in:
@ -429,12 +429,12 @@
|
|||||||
# convert from hex (string) to num
|
# convert from hex (string) to num
|
||||||
:set HexToNum do={
|
:set HexToNum do={
|
||||||
:local Input [ :tostr $1 ];
|
:local Input [ :tostr $1 ];
|
||||||
:local Hex "0123456789abcdef";
|
:local Hex "0123456789abcdef0123456789ABCDEF";
|
||||||
:local Multi 1;
|
:local Multi 1;
|
||||||
:local Return 0;
|
:local Return 0;
|
||||||
|
|
||||||
:for I from=([ :len $Input ] - 1) to=0 do={
|
:for I from=([ :len $Input ] - 1) to=0 do={
|
||||||
:set Return ($Return + ([ :find $Hex [ :pick $Input $I ] ] * $Multi));
|
:set Return ($Return + (([ :find $Hex [ :pick $Input $I ] ] % 16) * $Multi));
|
||||||
:set Multi ($Multi * 16);
|
:set Multi ($Multi * 16);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user