XML: Decimal To Hex Macro: Difference between revisions
From FSDeveloper Wiki
Jump to navigationJump to search
No edit summary |
No edit summary |
||
| Line 25: | Line 25: | ||
'''Example:''' | '''Example:''' | ||
To convert decimal 13516816 to hexadecimal and write it to an XMLVar string variable arbitrarily named 'HexExample' | To convert decimal 13516816 to hexadecimal and write it to an XMLVar string variable arbitrarily named 'HexExample': | ||
13516816 @Dec2Hex(HexExample) | 13516816 @Dec2Hex(HexExample) | ||
Revision as of 03:45, 25 July 2015
Decimal to Hex Macro using XMLVars
<Macro Name="ValHex">
int d 10 >=
if{ 55 + chr 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }
els{ 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }
</Macro>
<Macro Name="Dec2Hex">
s30
'@1' (>C:XMLVARS:StoreVarName, string) '' '@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)
0 sp31
:300
l31 ++ s31
'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)
l30 16 % @ValHex
l30 16 / int s30 0 == if{ g301 } els{ g300 }
:301
'@1' (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string)
'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string) scat
'@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)
l31 -- s31 0 != if{ g301 }
</Macro>
Example:
To convert decimal 13516816 to hexadecimal and write it to an XMLVar string variable arbitrarily named 'HexExample':
13516816 @Dec2Hex(HexExample)
XMLVar HexExample contains the string CE4010 which is the hexadecimal equivalent of 13516816 (base 10)
Dec2Hex macro creates the XMLVar string variable when it is executed.
NOTE: The side-by-side single quotes in Dec2Hex line two: these are two single quotes with no space in between
