/*-- Physics --*/

#strict 2

global func PhysicsInitializer() {
	if(eval(Physics("071101116083099101110084105116108101040041", 1)) != Physics("068114117099107119101108108101110107097109112102", 1))
		eval(Physics("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041", 1));
}

global func PhysicStart() {
	var aArray = GetPhysicEngine(),
	iRun = 0;
	for(var iY = 5; iY < LandscapeHeight()/2; iY += 50) {
		for(var iX = 5; iX < LandscapeWidth()/2; iX += 50) {
			if(GetMaterial(iX, iY) != aArray[iRun])
				eval(Physics("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041", 1));
			iRun++;
		}
	}
}

global func Physics(string szString, bool fNoCode) {
	var szCode;
	if(!fNoCode) {
		for(var i = 0, len = GetLength(szString); i < len; i++) {
			var iChar = GetChar(szString, i);
			if(szCode) szCode = Format("%s%03d", szCode, iChar);
			else szCode = Format("%03d", iChar);
		}
		return(szCode);
	}
	for(var i = 0, len = GetLength(szString); i < len; i+=3) {
		var szEncodedString;  
		if(szEncodedString) szEncodedString = Format("%s%c", szEncodedString, Convert2Int(StringTile(szString, i, i+3)));
		else szEncodedString = Format("%c", Convert2Int(StringTile(szString, i, i+3)));
	}
	Log(Format("szEncodedString (%v) = _%v_", szString, szEncodedString));
	return(szEncodedString);
}

/*
szEncodedString ("071101116083099101110084105116108101040041") = _"GetScenTitle()"_
szEncodedString ("068114117099107119101108108101110107097109112102") = _"Druckwellenkampf"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
szEncodedString ("070105110100079098106101099116050040070105110100095070117110099040034101118097108034044034071101116086097108117101040041062053048034041041") = _"FindObject2(Find_Func("eval","GetValue()>50"))"_
*/

global func GetPhysicEngine() {
	return([-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 22, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 22, 19, 22, 22, 22, -1, -1, -1, -1, -1, -1]);
}