ManiaPlugin-hex coords of cursor

#RequireContext CGameCtnEditorPluginScriptHandler

Text CreateManialink()
{
	declare MLText =
	"""
		<script><!--
			Void UpdateValues() {
				declare CursorX for Page = "";
				declare CursorY for Page = "";
				declare CursorZ for Page = "";
				declare CursorDirectionText for Page = "";
				declare LblCursorXValue <=> (Page.GetFirstChild("CursorXValue") as CGameManialinkLabel);
				declare LblCursorYValue <=> (Page.GetFirstChild("CursorYValue") as CGameManialinkLabel);
				declare LblCursorZValue <=> (Page.GetFirstChild("CursorZValue") as CGameManialinkLabel);
				declare LblCursorDirectionValue <=> (Page.GetFirstChild("CursorDirectionValue") as CGameManialinkLabel);
				LblCursorXValue.SetText("" ^ CursorX);
				LblCursorYValue.SetText("" ^ CursorY);
				LblCursorZValue.SetText("" ^ CursorZ);
				LblCursorDirectionValue.SetText(CursorDirectionText);
			}
			main () {
				declare BoxOffset = 0;
				while(True) {
					yield;
					UpdateValues();
				}
			}
		--></script>
		<frame>
			<quad id="CursorCoordBox" posn="140 35 -1" sizen="20 28" style="Bgs1" substyle="BgList" ScriptEvents="1"/>
			<label id="CursorXLabel" text="HEX" posn="142 33"/>
			<label id="CursorXLabel" text="D" posn="142 28"/>
			<label id="CursorDirectionValue" text="XXX" posn="148 28"/>
			<label id="CursorXLabel" text="X" posn="142 23"/>
				<label id="CursorXValue" text="XXX" posn="148 23"/>
			<label id="CursorYLabel" text="Y" posn="142 18"/>
				<label id="CursorYValue" text="XXX" posn="148 18"/>
			<label id="CursorZLabel" text="Z" posn="142 13"/>
				<label id="CursorZValue" text="XXX" posn="148 13"/>

		</frame>
	""";
	return MLText;
}

//make lookup for hex conversion
Text hexLookup(Integer v)
{
	declare Text ret;
	switch(v){
		case 0: ret= "00";
		case 1: ret= "01";
		case 2: ret= "02";
		case 3: ret= "03";
		case 4: ret= "04";
		case 5: ret= "05";
		case 6: ret= "06";
		case 7: ret= "07";
		case 8: ret= "08";
		case 9: ret= "09";
		case 10: ret= "0A";
		case 11: ret= "0B";
		case 12: ret= "0C";
		case 13: ret= "0D";
		case 14: ret= "0E";
		case 15: ret= "0F";
		case 16: ret= "10";
		case 17: ret= "11";
		case 18: ret= "12";
		case 19: ret= "13";
		case 20: ret= "14";
		case 21: ret= "15";
		case 22: ret= "16";
		case 23: ret= "17";
		case 24: ret= "18";
		case 25: ret= "19";
		case 26: ret= "1A";
		case 27: ret= "1B";
		case 28: ret= "1C";
		case 29: ret= "1D";
		case 30: ret= "1E";
		case 31: ret= "1F";
		case 32: ret= "20";
		case 33: ret= "21";
		case 34: ret= "22";
		case 35: ret= "23";
		case 36: ret= "24";
		case 37: ret= "25";
		case 38: ret= "26";
		case 39: ret= "27";
		case 40: ret= "28";
	}
	return ret;
}

/////////////////////////////////////
// Main
/////////////////////////////////////
main()
{
	log("CursorCoords.Script starts");

	declare CursorAction for ManialinkPage = 0;
	declare CursorX for ManialinkPage = "";
	declare CursorY for ManialinkPage = "";
	declare CursorZ for ManialinkPage = "";
	declare CursorDirectionText for ManialinkPage = "";

	ManialinkText = CreateManialink();

	while(True) {
		yield;
		// update ManialinkPage variables
		CursorX = hexLookup(CursorCoord[0]+1);
		CursorY = hexLookup(CursorCoord[1]);
		CursorZ = hexLookup(CursorCoord[2]+1);
		switch(CursorDir) {
			case ::CardinalDirections::North: 	CursorDirectionText = "00";
			case ::CardinalDirections::East: 	CursorDirectionText = "01";
			case ::CardinalDirections::South: 	CursorDirectionText = "02";
			case ::CardinalDirections::West: 	CursorDirectionText = "03";
			default: 							CursorDirectionText = "DirError";
		}
	}
}