XML: Decimal To Hex Macro - Revision history

Rpmc: Replaced content with "work in progress ......."

2015-07-25T14:48:48Z

Replaced content with "work in progress ......."

← Older revision		Revision as of 09:48, 25 July 2015
Line 1:		Line 1:
	~~'''Decimal to Hex Macro using XMLVars'''~~		work in progress .......

	~~<Macro Name="HexDigit">~~
	~~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) <nowiki>''</nowiki> '@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)~~
	~~0 sp31~~
	~~:300~~
	~~l31 ++ s31~~
	~~'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)~~
	~~l30 16 % @HexDigit~~
	~~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)~~
	~~<nowiki>''</nowiki> 'HexDigit' l31 scat (>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 now contains the string CE4010 which is the hexadecimal equivalent of 13516816 (base 10)~~

	~~Dec2Hex macro creates the XMLVar string variable when it is executed~~.


	~~'''XMLVARS''' is part of the ''''XMLTools'''' XML expansion module written by Tom Aguilo~~. ~~XMLTools can be freely downloaded here [http://fsdeveloper~~.~~com/forum/resources/xmltools-2-0-xml-expansion-module-for-fsx~~.~~148/]~~


	~~'''NOTE:''' The side-by-side single quotes in Dec2Hex lines 2 and 13: these are two single quotes with no space in between~~

	~~[[rpmc]]~~
	~~[[Category:Aircraft Design]]~~
	~~[[Category:Panel and Gauge Design]]~~

Rpmc at 09:34, 25 July 2015

2015-07-25T09:34:03Z

← Older revision		Revision as of 04:34, 25 July 2015
Line 20:		Line 20:
	'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string) scat		'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string) scat
	'@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)		'@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)
			<nowiki>''</nowiki> 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)
	l31 -- s31 0 != if{ g301 }		l31 -- s31 0 != if{ g301 }
	</Macro>		</Macro>
Line 37:		Line 38:


	'''NOTE:''' The side-by-side single quotes in Dec2Hex ~~line two~~: these are two single quotes with no space in between		'''NOTE:''' The side-by-side single quotes in Dec2Hex lines 2 and 13: these are two single quotes with no space in between

	[[rpmc]]		[[rpmc]]
	[[Category:Aircraft Design]]		[[Category:Aircraft Design]]
	[[Category:Panel and Gauge Design]]		[[Category:Panel and Gauge Design]]

Rpmc at 09:03, 25 July 2015

2015-07-25T09:03:45Z

← Older revision		Revision as of 04:03, 25 July 2015
Line 1:		Line 1:
	'''Decimal to Hex Macro using XMLVars'''		'''Decimal to Hex Macro using XMLVars'''

	<Macro Name="~~HexVal~~">		<Macro Name="HexDigit">
	int d 10 >=		int d 10 >=
	if{ 55 + chr 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }		if{ 55 + chr 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }
Line 14:		Line 14:
	l31 ++ s31		l31 ++ s31
	'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)		'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)
	l30 16 % @~~HexVal~~		l30 16 % @HexDigit
	l30 16 / int s30 0 == if{ g301 } els{ g300 }		l30 16 / int s30 0 == if{ g301 } els{ g300 }
	:301		:301

Rpmc at 09:02, 25 July 2015

2015-07-25T09:02:57Z

← Older revision		Revision as of 04:02, 25 July 2015
Line 1:		Line 1:
	'''Decimal to Hex Macro using XMLVars'''		'''Decimal to Hex Macro using XMLVars'''

	<Macro Name="~~ValHex~~">		<Macro Name="HexVal">
	int d 10 >=		int d 10 >=
	if{ 55 + chr 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }		if{ 55 + chr 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }
Line 14:		Line 14:
	l31 ++ s31		l31 ++ s31
	'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)		'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)
	l30 16 % @~~ValHex~~		l30 16 % @HexVal
	l30 16 / int s30 0 == if{ g301 } els{ g300 }		l30 16 / int s30 0 == if{ g301 } els{ g300 }
	:301		:301

Rpmc at 08:59, 25 July 2015

2015-07-25T08:59:00Z

← Older revision		Revision as of 03:59, 25 July 2015
Line 32:		Line 32:

	Dec2Hex macro creates the XMLVar string variable when it is executed.		Dec2Hex macro creates the XMLVar string variable when it is executed.


			'''XMLVARS''' is part of the ''''XMLTools'''' XML expansion module written by Tom Aguilo. XMLTools can be freely downloaded here [http://fsdeveloper.com/forum/resources/xmltools-2-0-xml-expansion-module-for-fsx.148/]

Rpmc at 08:46, 25 July 2015

2015-07-25T08:46:04Z

← Older revision		Revision as of 03:46, 25 July 2015
Line 29:		Line 29:
	13516816 @Dec2Hex(HexExample)		13516816 @Dec2Hex(HexExample)

	XMLVar HexExample contains the string CE4010 which is the hexadecimal equivalent of 13516816 (base 10)		XMLVar HexExample now contains the string CE4010 which is the hexadecimal equivalent of 13516816 (base 10)

	Dec2Hex macro creates the XMLVar string variable when it is executed.		Dec2Hex macro creates the XMLVar string variable when it is executed.

Rpmc at 08:45, 25 July 2015

2015-07-25T08:45:03Z

← Older revision		Revision as of 03:45, 25 July 2015
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)

Rpmc at 08:35, 25 July 2015

2015-07-25T08:35:00Z

← Older revision		Revision as of 03:35, 25 July 2015
Line 15:		Line 15:
	'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)		'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)
	l30 16 % @ValHex		l30 16 % @ValHex
	l30 16 / int 0 == if{ g301 } els{ g300 }		l30 16 / int s30 0 == if{ g301 } els{ g300 }
	:301		:301
	'@1' (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string)		'@1' (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string)

Rpmc at 08:31, 25 July 2015

2015-07-25T08:31:39Z

← Older revision		Revision as of 03:31, 25 July 2015
Line 37:		Line 37:

	[[rpmc]]		[[rpmc]]
			[[Category:Aircraft Design]]
			[[Category:Panel and Gauge Design]]

Rpmc at 08:29, 25 July 2015

2015-07-25T08:29:44Z

← Older revision		Revision as of 03:29, 25 July 2015
Line 1:		Line 1:
	Decimal to Hex Macro using XMLVars		'''Decimal to Hex Macro using XMLVars'''

	<Macro Name="ValHex">		<Macro Name="ValHex">
	int ~~s15~~		int d 10 >=
	~~l15~~ 10 >=		if{ 55 + chr 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }
	if{ ~~l15~~ 55 + chr 'HexDigit' ~~l32~~ scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }		els{ 'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }
	els{ ~~l15~~ 'HexDigit' ~~l32~~ scat (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string) }
	</Macro>		</Macro>

	<Macro Name="Dec2Hex">		<Macro Name="Dec2Hex">
	s30		s30
	'@1' (>C:XMLVARS:StoreVarName, string) "" '@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)		'@1' (>C:XMLVARS:StoreVarName, string) <nowiki>''</nowiki> '@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)
	0 ~~sp32~~		0 sp31
	:300		:300
	~~l32~~ ++ ~~s32~~		l31 ++ s31
	'HexDigit' ~~l32~~ scat (>C:XMLVARS:StoreVarName, string)		'HexDigit' l31 scat (>C:XMLVARS:StoreVarName, string)
	l30 16 % @ValHex		l30 16 % @ValHex
	l30 16 / int ~~s31 d~~ 0 == if{ g301 } els{ ~~s30~~ g300 }		l30 16 / int 0 == if{ g301 } els{ g300 }
	:301		:301
	'@1' (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string)		'@1' (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string)
	'HexDigit' ~~l32~~ scat (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string) scat		'HexDigit' l31 scat (>C:XMLVARS:SearchVarName, string) (C:XMLVARS:StringValue, string) scat
	'@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)		'@1' (>C:XMLVARS:SearchVarName, string) (>C:XMLVARS:StringValue, string)
	~~l32~~ -- ~~s32~~ 0 != if{ g301 }		l31 -- s31 0 != if{ g301 }
	</Macro>		</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

			[[rpmc]]