// ==UserScript==
// @name 			Erweiterte Dorfinfos
// @description	Zeigt Infos aus Berichten direkt im Infopopup auf der Karte.
// @version		2.0.3 (2009-06-21 16:40)
// @author 		Simon Hilz, realneode, Heinzelmaenchen, Peety
// @include 		http://*.*staemme.*/game.php?*screen=map*
// @include 		http://*.*staemme.*/game.php?*village=*&screen=report&mode=all*
// @include 		http://*.*staemme.*/game.php?*village=*&screen=report&mode=attack*
// @include 		http://*.*staemme.*/game.php?*screen=info_village&id=*
// ==/UserScript==

var server = document.location.host.split('.')[0];
var akt_map = "mapOld";
var watch_map = false;
var watch_map_timer;

if(document.body.innerHTML.match(/Uslogge/))	{
	var rohstoffe = ["Houz","Lehm","Isä"];
	var names = ["Houzfäuer", "Lehmgruebe", "Isemine", "Spicher", "Vrsteck", "Wall"];
	var ausdruck =[/Agrifer:/,/vom Vrteidiger/,/Vrteidiger:/,/Beute:/,/Zuestimmig/,/Spionage/];
	var bonusliste = [/Houzprod/,/Lehmprod/,/Iseprod/,/Rohstoffprod/,/Spicherkap/,/Kasärne/,/Stau/,/Wärkstatt/,/Bevöukerig/,/notinuse/];
} else {
	var rohstoffe = ["Holz","Lehm","Eisen"];	
	var names = ["Holzfäller", "Lehmgrube", "Eisenmine", "Speicher", "Versteck", "Wall"];
	var ausdruck =[/Angreifer:/,/des Verteidigers/,/Verteidiger:/,/Beute:/,/Zustimmung/,/Spionage/];
	var bonusliste = [/Holzprod/,/Lehmprod/,/Eisenprod/,/Rohstoffprod/,/Speicherkap/,/Kaserne/,/Stall/,/Werkstatt/,/Bevölkerung/,/notinuse/];
}
var grafik = ["spear","sword","axe","light","marcher","heavy"];
/* settings: Truppen,Ressis,Speer,Schwert,Axt,LKav,BB,SKav,Gebäude,Speed,Spieler-ID,Info */
var sets = (GM_getValue(server+"_settings", "1,1,1,0,1,1,0,0,1,0,0,1")).split(",");
var settings = new Array(11);
for(var i=0; i<=10; i++) { settings[i] = parseInt(sets[i],10);}
if (settings[10] > 0) { var player_id = settings[10];}
else { var player_id = false;}
settings[11] = parseInt(sets[11],10);
var show_ressis = new Boolean(settings[1]);

if(document.body.innerHTML.match(/input name=\"sid_refresh_password/)) {
	return;
}
else if(document.location.href.match (/screen=map/)) {
	var koor_start = document.body.innerHTML.match(/\((\d+\|\d+)\)/);
	scan_map();
	var map_container = getElementsByClassName("map_container")[0];
	var tds = map_container.getElementsByTagName("td");
	tds[1].addEventListener("click",function() {check_map_move(akt_map);}, true);
	tds[3].addEventListener("click",function() {check_map_move(akt_map);}, true);
	tds[(tds.length - 4)].addEventListener("click",function() {check_map_move(akt_map);}, true);
	tds[(tds.length - 2)].addEventListener("click",function() {check_map_move(akt_map);}, true);
	var insertpos = getElementsByClassName("map_container")[1];
	insertpos = insertpos.parentNode.parentNode;
	var main = getElementsByClassName("main")[0];
	var div = document.createElement("div");
	div.setAttribute("style","text-align:left; margin: 0px auto;");

	var hr = document.createElement("hr");
	div.appendChild(hr);

	var table = document.createElement("table");
	table.setAttribute("id",'extended_dorfinfo_settings');
	table.setAttribute("class","small");
	table.setAttribute("style","display:none;");
	var p = document.createElement("p");
	p.setAttribute("class","small");
	p.setAttribute("align","center");
	p.setAttribute("style","font-size:88%;");

	var a = document.createElement("a");
	a.setAttribute("href","javascript:void(0);");
	a.addEventListener("click",function() {show_settings();}, false);
	a.appendChild(document.createTextNode("» Dorfinfo Optionen «"));
	p.appendChild(a);
	div.appendChild(p);

	var row, td, check;

	show_einstellung("showtroups_0","Truppen anzeigen",0);
	show_einstellung("showressis_1","Rohstoffe anzeigen",1);

	row = document.createElement("tr");
	td = document.createElement("td");
	td.setAttribute("style","text-indent:20px;");
	td.appendChild(document.createTextNode("Farmeinheiten (max. 4): "));
	br = document.createElement("br");
	td.appendChild(br);

	for(i=2; i<8; i++) {
		var obj = grafik[i-2];
		img = document.createElement("img");
		img.setAttribute("alt", "");
		img.setAttribute("src", "graphic/unit/unit_"+obj+".png");
		check = document.createElement("input");
		check.setAttribute("type", "Checkbox");
		check.setAttribute("name", "showunits_"+i);
		check.checked = settings[i];
		check.addEventListener("change",function() {edit_setting(this.name, this.checked);}, false);
		td.appendChild(check);
		td.appendChild(img);
	}
	row.appendChild(td);
	table.appendChild(row);

	show_einstellung("showwall_8","Gebäude und Zustimmung anzeigen",8);
	show_einstellung("speed_9","Geschwindigkeit 1,6-fach?",9);
	show_einstellung("showinfo_11","Hinweis bei älteren Berichten",11);

	div.appendChild(table);
	hr = document.createElement("hr");
	div.appendChild(hr);
	insertpos.appendChild(div);
}
else if((document.location.href.search(/&screen=report&mode=all/) > -1)||(document.location.href.search(/.+&screen=report&mode=attack/) > -1)) {
	var report = readReport();
	if (report) {
		report = report.split(",");
/* report: Holz, Lehm, Eisen, Holzmine , Lehmmine, Eisenmine, Speicher, Versteck, Wall, Dorf-ID, Datum, neuste Bericht-ID, (Zustimmung) */
		var report_id = document.location.href.split('=');
		var rep_id = parseInt(report_id[report_id.length-1]);
		var vil_id = report[9];
		if (report[0] == -1) {			// eigenes Dorf
			var old = GM_getValue(server+"_"+vil_id, false);
			if (old) {
				del_village(vil_id);
				show_meldung("eigenes Dorf, Dorfinfos gelöscht");
			}
			else {
				show_meldung("eigenes Dorf");
			}
		}
		else {
			var old = GM_getValue(server+"_"+vil_id, false);
			if (old) {
				var old_report = old.split(",");
				var old_rep_id = old_report[11];
			}
			else {
				var old_rep_id = 0;
			}
			if(old && (old_rep_id > 0)) {
				if(rep_id > old_rep_id) {		// aktueller Bericht ist neuer
					var marker = false;
					for (i=3;i<9;i++) {
						if (report[i] == -1) {
						/* alte Gebäudestufen behalten */
							report[i] = old_report[i];
							marker = true;
						}
					}
					report[11] = rep_id;
					GM_setValue(server + "_" + vil_id, ""+report);
					GM_setValue(server + "_truppen_" + vil_id, getTroups());
					if (marker) show_meldung("Dorfinfos teilweise aktualisiert");
					else  show_meldung("Dorfinfos aktualisiert");
				}
				else {
					if (rep_id == old_rep_id) show_meldung("Diese Dorfinfos wurden bereits eingelesen");
					else show_meldung("Dorfinfos in diesem Bericht sind veraltet");
				}
			}
			else {
				report[11] = rep_id;
				GM_setValue(server + "_" + vil_id, ""+report);
				GM_setValue(server + "_truppen_" + vil_id, getTroups());
				show_meldung("Dorfinfos eingetragen");
			}
		}
	}
}
else if(document.location.href.match (/screen=info_village&id=/)) {
	if(document.body.innerHTML.match(/» Dorfübersicht/)) {
		if (player_id == false) {
			player_id = document.body.innerHTML.match(/screen=info_player&amp;id=(\d+)/)[1];
			edit_setting("playerid_10", player_id);
		}
	}
	var tab = document.evaluate('//table[@class="main"]/tbody/tr/td/table[@class="vis left"]/tbody',document,null,XPathResult.ORDERED_NODE_SNAPSHOT_TYPE,null).snapshotItem(0);
	var new_row_0 = document.createElement("tr");
	var new_row_2 = document.createElement("tr");
	var new_cell_0 = document.createElement("td");
	var new_cell_2 = document.createElement("td");
	var new_Link = document.createElement("a");
	var new_Link2 = document.createElement("a");
	new_cell_0.setAttribute("colspan","2");
	new_cell_2.setAttribute("colspan","2");

/* Die Funktionen per Eventhandler an die Links koppeln */
	new_Link.innerHTML = "»  Dorfinformationen löschen";
	new_Link.href = "javascript: //do nothing";
	new_Link.addEventListener('click', function() {
		var id = location.href.split("id=")[1].replace(/\&.+/,"");
		if(GM_getValue(server + "_" + id, false)) {
			del_village(id);
			new_Link.innerHTML = "»  Dorfinformationen gelöscht";
		}
		else { 
			new_Link.innerHTML = "»  keine Dorfinformationen vorhanden";
		}
	}, false); 

	new_Link2.innerHTML = "»  Alle Dorfinformationen löschen";
	new_Link2.href = "javascript: //do nothing";
	new_Link2.addEventListener('click', function() {
		var liste = [];
		liste = GM_listValues();
		var sicher;
		sicher = window.confirm("Möchtest du wirklich alle Dorfinformationen dieser Welt löschen ?");
		if (sicher) {
			var counter = 0;
			for (var i=0; i<liste.length; i++){
				if (liste[i].split("_")[0] == server) {
					GM_deleteValue(liste[i]);
					counter++;
				}
			}
			new_Link2.innerHTML = "» "+counter+" Dorfinformationen gelöscht";
		}
		else {
			new_Link2.innerHTML = "»  Dorfinformationen nicht gelöscht";
		}
	}, false); 
	new_cell_0.appendChild(new_Link);
	new_cell_2.appendChild(new_Link2);
	new_row_0.appendChild(new_cell_0);
	new_row_2.appendChild(new_cell_2);
	tab.appendChild(new_row_0);
	tab.appendChild(new_row_2);
}


function show_meldung(msg) {
	var row = document.createElement("tr");
	var td1 = document.createElement("td");
	var td2 = document.createElement("td");
	td1.innerHTML = "Dorfinfo Meldung";
	td2.innerHTML = msg;
	row.appendChild(td1);
	row.appendChild(td2);

	if(document.body.innerHTML.match(/DS Report/)) { var spoo = 1;}
	else	{ var spoo = 0;}
	var tab = getElementsByClassName("vis")[1 + spoo].getElementsByTagName("tbody")[0].getElementsByTagName("tr")[1];
	tab.parentNode.insertBefore(row, tab);
}


function show_einstellung(msg,msg2,wert) {
	row = document.createElement("tr");
	td = document.createElement("td");
	check = document.createElement("input");
	check.setAttribute("type","checkbox");
	check.setAttribute("name",msg);
	check.checked = settings[wert];
	check.addEventListener("change",function() {edit_setting(this.name, this.checked);}, false);
	td.appendChild(check);
	td.appendChild(document.createTextNode(msg2));
	row.appendChild(td);
	table.appendChild(row);
}


function show_settings() {
	$('extended_dorfinfo_settings').setAttribute("style", "");
	a.removeEventListener("click",function(){show_settings();}, false);
	a.addEventListener("click",function(){hide_settings();}, false);
	a.innerHTML = "« Optionen verstecken »";
}


function hide_settings() {
	$('extended_dorfinfo_settings').setAttribute("style", "display:none;");
	a.removeEventListener("click",function(){hide_settings();}, false);
	a.addEventListener("click",function(){show_settings();}, false);
	a.innerHTML = "» Dorfinfo Optionen «";
}


function edit_setting(set, new_value) {
	if (set == "playerid_10") {
		settings[10] = new_value;
	} 
	else {
		var wert = 1;
		if ((new_value == false) || (new_value == "false")) wert = 0;
		settings[set.split("_")[1]] = wert;
	}
	GM_setValue(server+"_settings", ""+settings);
}


function check_map_move(akt_map_loc) {
	var groesse = $('map').getElementsByTagName("tr").length;
	if(!watch_map) {
		watch_map_timer = window.setInterval(check_map_move,300,akt_map);
		watch_map=true;
		return false;
	}
	if($(akt_map_loc).style.left == (groesse * 53) * (-1) + "px" || $(akt_map_loc).style.left == (groesse * 53) + "px" || $(akt_map_loc).style.top == (groesse * 38) * (-1) + "px" || $(akt_map_loc).style.top == (groesse * 38) + "px")
	{
		switch(akt_map_loc)
		{
			case "mapOld":
				akt_map = "mapNew";
			break;
			case "mapNew":
				akt_map = "mapOld";
			break;
		}
		scan_map();
		window.clearInterval(watch_map_timer);
		watch_map = false;
	}
}


function readReport() {
	var player = [1,1,1];
	var bericht = false;
	var beute_x = 0;
	/* handelt es sich um einen Bericht?  */
	for(var x = 0, h4 = document.getElementsByTagName("th"); x < h4.length; x++) {
		if(h4[x].innerHTML.search(ausdruck[2]) >-1) {
			bericht = true;
		}
	/* Spieler-ID auslesen */
		if(bericht && (h4[x].innerHTML.match(/screen=info_player&amp;id=\d+">\w+</))) {
			player = h4[x].innerHTML.match(/screen=info_player&amp;id=(\d+)">(\w+)</);
		}
	/* Beute */
		if(h4[x].innerHTML.search(/Beute:/) > -1) {
			beute_x = x;
		}
	}

/* Dorf-ID auslesen */
	var hit = document.body.innerHTML.match(/info_village&amp\;id=(\d+)/g);
	if (!hit[1]) {
		return false;
	}
	var vilId = hit[1].split("=")[1];

	if (player[1] == player_id) {				// Prüfen ob Spieler selbst
		output = "-1,-1,-1,-1,-1,-1,-1,-1,-1,"+vilId+",0,0";
		return output;
	}
/* Bericht-ID auslesen */
	if(document.location.href.search(/&screen=report&mode=all/) > -1) {
		var berId = document.location.href.match(/&screen=report&mode=all&view=(\d+)/)[1];
	}
	else {
		var berId = document.location.href.match(/&screen=report&mode=attack&view=(\d+)/)[1];
	}
/* Datum + Zeit auslesen */
	var tab = document.evaluate('//table[@class="main"]/tbody/tr/td/table/tbody/tr/td/table/tbody/tr/td/table[@class="vis"]/tbody',document,null,XPathResult.ORDERED_NODE_SNAPSHOT_TYPE,null).snapshotItem(0);
	var date = tab.getElementsByTagName("tr")[1].getElementsByTagName("td")[1].innerHTML;

/* Spähbericht oder Adelsbericht?  */
	var adel = false;
	var xx = 0;
	for(var x = 0, h4 = document.getElementsByTagName("h4"), spy = false; x < h4.length; x++) {
		if(h4[x].innerHTML.match(ausdruck[5])) {
			spy = true; 
			xx = x;
			break;
		}
		if(bericht && (h4[x].innerHTML.search(ausdruck[1]) > -1)) {
			adel = true;
		}
	}
	if (adel) {
		var bericht1 = 0;
		var ths = document.getElementsByTagName("th");
		for(var x = 0; x < ths.length; x++) {
			if(ths[x].innerHTML.search(ausdruck[0])>-1) {
				bericht1 = x;
			}
		}
		if(bericht1 > 0) {
		/* Angreifer-ID auslesen */
			if(ths[bericht1+1].innerHTML.match(/screen=info_player&amp;id=\d+/)) {
				var player1 = ths[bericht1+1].innerHTML.match(/screen=info_player&amp;id=(\d+)/);
				if (player1[1] == player_id) {
					output = "-1,-1,-1,-1,-1,-1,-1,-1,-1,"+vilId+",0,"+berId+",25";
					return output;
				}
			}
		}
		output = "0,0,0,-1,-1,-1,-1,-1,-1,"+vilId+","+date+","+berId+",25";	// fremder Adelsbericht
		return output;
	}

	if (spy) 	{
	/* Rohstoffe auslesen */
		var tab1 = h4[xx].nextSibling.nextSibling;
		var res = [];
		var html = tab1.getElementsByTagName("td")[0].innerHTML.replace(/<span class="grey">\.<\/span>/g, "");
		res[0] = (html.match(/holz\.png/)) ? html.split("title=\""+rohstoffe[0]+"\" alt=\"\">")[1].split(" <img")[0] : 0;
		res[1] = (html.match(/lehm\.png/)) ? html.split("title=\""+rohstoffe[1]+"\" alt=\"\">")[1].split(" <img")[0] : 0;
		res[2] = (html.match(/eisen\.png/)) ? html.split("title=\""+rohstoffe[2]+"\" alt=\"\">")[1].replace(/ /, "") : 0;

		if (!tab1.getElementsByTagName("td")[1]) {
			var output = res[0]+","+res[1]+","+res[2]+",-1,-1,-1,-1,-1,-1,"+vilId+","+date+","+berId; //  -1  damit Gebäudestufen nicht gelöscht werden
			output = zustimmung(output);
			return output;
		}
	/* Gebäude auslesen */
		var code = tab1.getElementsByTagName("td")[1].innerHTML;
		var buildings = [0,0,0,0,0,0];
		var marker = 0;
		for(var x = 0; x < names.length; x++) {
			if(code.match(names[x]))	{
				buildings[x] = code.split(names[x] + " <b>(Stufe ")[1].split(")</b>")[0];
				marker += buildings[x];
			}
		}
		if (marker == 0) {
		/* Gebäude konnten nicht ausgelesen werden */
			for(var x = 0; x < names.length; x++){
				buildings[x] = -1;  				// Gebäudestufen aus altem Bericht behalten
			}
		}
		var output = res+","+buildings+","+vilId+","+date+","+berId;
		output = zustimmung(output);
		return output;
	}
	else { 	/* (keine Spionage) */
		if(bericht){
			var beute = "0";
			if (beute_x > 0) {
				var res_beute = new Array(3);
				for(var beute_x = 0, h4 = document.getElementsByTagName("th"); beute_x < h4.length; beute_x++) {
					if(h4[beute_x].innerHTML.search(ausdruck[3]) > -1) {
						res_beute = h4[beute_x].nextSibling.nextSibling.nextSibling.nextSibling.innerHTML.match(/(\d+)\/(\d+)/);
					}
				}
				if (parseInt(res_beute [1]) == parseInt(res_beute[2])) {  	// Res sind nicht leer
					beute = "-1";
				}
			}
		 	var output = "0,"+beute+",0,-1,-1,-1,-1,-1,-1,"+vilId+","+date+","+berId;
			output = zustimmung(output);
			return output;
		}
		return false;
	}
}


function zustimmung(output) {
	for(var x = 0, th = document.getElementsByTagName("th"), zs = false; x < th.length; x++) {
		if(th[x].innerHTML.match(ausdruck[4])) {
			zs = true;
			var ZS = th[x].nextSibling.nextSibling.getElementsByTagName("b")[1].innerHTML;
			break;
		}
	}
  	if(!zs) {
		return output;
	}
	var ZS = th[x].nextSibling.nextSibling.getElementsByTagName("b")[1].innerHTML;
	if (parseInt(ZS) <= 0) ZS = 25;
	output += "," + ZS;
	return output;
}


function getTroups() {
/* Liest die Truppen aus einem Bericht aus */
	var units = [];	// inside troups
	var stand = [];
	var tab = document.evaluate('//table[@class="main"]/tbody/tr/td/table/tbody/tr/td/table/tbody/tr/td/table[@class="vis"]/tbody/tr/td/table/tbody/tr/td/table[@class="vis"]/tbody',document,null,XPathResult.ORDERED_NODE_SNAPSHOT_TYPE,null).snapshotItem(1);
	if(tab) {
		stand = tab.getElementsByTagName("tr")[1].getElementsByTagName("td");
		var loose = tab.getElementsByTagName("tr")[2].getElementsByTagName("td");

		for(var x = 1; x < stand.length; x++) {
			var diff = stand[x].innerHTML-loose[x].innerHTML;
			units.push(diff);
		}
	}
	var unitsa = [];	// outside troups
	var tab = document.evaluate('//table[@class="main"]/tbody/tr/td/table/tbody/tr/td/table/tbody/tr/td/table[@class="vis"]/tbody/tr/td/table/tbody/tr/td/table/tbody',document,null,XPathResult.ORDERED_NODE_SNAPSHOT_TYPE,null).snapshotItem(3); 
	if(tab) {
		var tds = tab.getElementsByTagName("td"); 
		for(var x = 0; x < tds.length; x++) {
			unitsa[x] = tds[x].innerHTML;
		}
	}
	return (units+";"+unitsa);
}


function del_village(id) {
	GM_deleteValue(server + "_" + id);
	GM_deleteValue(server + "_truppen_" + id);
}


function trennzeichen(zahl) {
	zahl=Math.floor(zahl);
	var ausgabe = "";
	if (zahl>1000) {
		ausgabe += Math.floor(zahl/1000);
		ausgabe += ".";
		if (zahl%1000<100) {
			if (zahl%1000<10) {
				ausgabe += "00" + zahl%1000;
			}
			else {
				ausgabe += "0" + zahl%1000;
			}
		}
		else {
			ausgabe += zahl%1000;
		}
	}
	else {
		ausgabe+=zahl;
	}
	return ausgabe;
}


function getElementsByClassName(classname, node) {
	if(!node) node = document.getElementsByTagName("body")[0];
	var a = [];
	var re = new RegExp('\\b' + classname + '\\b');
	var els = node.getElementsByTagName("*");
	for(var i=0,j=els.length; i<j; i++) {
		if(re.test(els[i].className)) {
			a.push(els[i]);
		}
	}
	return a;
}


function $(id) {
	var object = document.getElementById(id);
	return object;
}


function scan_map() {
	var cont_tb = $('info_content').getElementsByTagName("tbody")[0];
	remove_info(cont_tb);

	switch(getElementsByClassName("map").length) {
	case 1:
		map = getElementsByClassName("map")[0];
		break;

	case 2:
		map = getElementsByClassName("map")[1];
		break;
	}
	var tds = map.getElementsByTagName("td");
	for(var j = 0; j<tds.length;j++) {
		if(tds[j].getElementsByTagName('a').length == 1) {
			tds[j].getElementsByTagName("img")[0].setAttribute("id",j);
			tds[j].getElementsByTagName("img")[0].addEventListener("mouseover",function(e) {add_info_to_map(e.target.id);}, false);
		}
	}
}


function diffhour (last_att) {
	var att_time = last_att.split(" ")[1].split(":");
	var att_date = last_att.split(" ")[0].split(".");
	var att = new Date(("20"+att_date[2]),(att_date[1]-1),att_date[0],att_time[0],att_time[1],0);
	var now = new Date();
	var diff_h = (now.getTime() - att.getTime()) /1000 /3600;
	return diff_h;
}


function remove_info(cont_tb) {
	if($('last_att_units')) cont_tb.removeChild($('last_att_units'));
	if($('last_att_ressis')) cont_tb.removeChild($('last_att_ressis'));
	if($('next_att_units')) cont_tb.removeChild($('next_att_units'));
	if($('last_att_zustimmung')) cont_tb.removeChild($('last_att_zustimmung'));
	if($('last_att_wall')) cont_tb.removeChild($('last_att_wall'));
	if($('last_date')) cont_tb.removeChild($('last_date'));
}


function add_info_to_map(k) {
	var cont_tb = $('info_content').getElementsByTagName("tbody")[0];
	remove_info(cont_tb);

	var trs = cont_tb.getElementsByTagName("tr");
	var hidden = 0;
	for(var j = 0; j < trs.length;j++) {
		if(trs[j].style.display == "none") hidden++;
	}
	if ($('info_bonus_image')) {
		$('info_bonus_image').setAttribute("rowspan",(8 - (hidden -1)));   // testen
	}
	var map = getElementsByClassName("map")[0];
	var tds = map.getElementsByTagName("td");
	var link = tds[k].getElementsByTagName("a")[0];
	var akt_id = link.href.split("info_village&id=")[1];
	var koor_target = tds[k].innerHTML.match(/\((\d+\|\d+)\)/);
	var grau = tds[k].innerHTML.match(/, null, null, false,/);
	var report = GM_getValue(server+"_"+akt_id, false);
	if (report) {
/* report: Holz, Lehm, Eisen, Holzmine , Lehmmine, Eisenmine, Speicher, Versteck, Wall, Dorf-ID, Datum, neueste Bericht-ID, (Zustimmung) */
		var report = report.split(",");
		var ressis = [report[0], report[1], report[2]];
		var show_troups = Boolean(settings[0]);
		var show_ressis = Boolean(settings[1]);
		var show_wall = Boolean(settings[8]);
		var server_speed = Boolean(settings[9]);
		var show_info = Boolean(settings[11]);
		var diff_h = diffhour(report[10]);
		var speed = 1.0; var speed2 = 1.0; 			//speed2 für Zustimmung
		if (server_speed) {
			speed = 1.6; speed2 = 1.6;
			if (server == "de30" || server == "de32") speed2 = 1.0;
		}

		if (show_ressis) {
		/* Bonusdörfer ermitteln */
			var bonuswert = 0.0;
			var bonustyp = 9;
			var bonus = false;
			if (tds[k].innerHTML.match(/\/bonus\//)) {
				for (var i=0; i < bonusliste.length; i++) {
					if (tds[k].innerHTML.match(bonusliste[i])) {
						if (i < 5) {
							bonus = true;			// hat Einfluss auf die Ressi-Produktion
							bonustyp = i;
							bonuswert = tds[k].innerHTML.match(/(\w+)% [m,s][e,c]h/)[1];
							bonuswert = bonuswert/100;
						}
						break;
					}
				}
			}
		}

		/* Truppen */
		if (show_troups) {
			var truppen = ""+GM_getValue(server + "_truppen_" + akt_id, false);
			var truppenHeim = false;
			var truppenAus = false;
			if (truppen) {
				truppen = truppen.split(";");
				truppenHeim = truppen[0];
				truppenAus = truppen[1];
			}
			if (truppenHeim) {
				truppenHeim = truppenHeim.split(",");
				row = document.createElement("tr");
				row.setAttribute("id",'last_att_units');
				td1 = document.createElement("td");
				td1.innerHTML = "Truppen: ";
				if (truppenAus) {
					truppenAus = truppenAus.split(",");
					td1.innerHTML = "<br>Truppen: <br><br>+ auswärts: ";
				}
				td2 = document.createElement("td");
				td2.setAttribute("valign","top");
				td2.setAttribute("colspan","2");

				if (truppenHeim.length == 12) {
					var einheiten = ["spear","sword","axe","archer","spy","light","marcher","heavy","ram","catapult","knight","snob"];
				}
				else if (truppenHeim.length == 11) {
					var einheiten = ["spear","sword","axe","archer","spy","light","marcher","heavy","ram","catapult","snob"];
				}
				else if (truppenHeim.length == 9) {
					var einheiten = ["spear","sword","axe","spy","light","heavy","ram","catapult","snob"];
				}

				var	code = "<tr class=\"center\">";
				var counter = 0;
				for (var i=0; i < truppenHeim.length; i++) {
					if ((truppenHeim[i] >0) || (truppenAus && (truppenAus[i] >0))) {
						counter++;
						code += "<td width=\"35\"><img src=\"/graphic/unit/unit_" + einheiten[i] + ".png\"></td>";
					}
				}

				if (counter >0) {
					code += "</tr><tr class=\"center\">";
				}
				for (var i=0; i < truppenHeim.length; i++) {
					if (parseInt(truppenHeim[i]) == 0) {
						if (truppenAus[i] >0) {
							code += "<td width=\"35\">" + ""+truppenHeim[i] + "</td>";
						}
					}
					else {
						code += "<td width=\"35\">" + ""+truppenHeim[i] + "</td>";
					}
				}
				if (counter == 0) {
					if (grau) {
						code += "keine";
					}
					else {
						code += "keine bekannt";
					}
				}
				code += "</tr>";
				if (truppenAus) {
					code += "<tr class=\"center\">";
					for (var i=0; i < truppenAus.length; i++)
					{
						if (parseInt(truppenAus[i]) == 0) {
							if (truppenHeim[i] >0) {
								code += "<td width=\"35\">" + ""+truppenAus[i] + "</td>";
							}
						} else {
							code += "<td width=\"35\">" + ""+truppenAus[i] + "</td>";
						}
					}
					code += "</tr>";
				}
				var table = document.createElement("table");
				table.setAttribute("class","vis");
				table.innerHTML = code;
				td2.appendChild(table);
				row.appendChild(td1);
				row.appendChild(td2);
				cont_tb.appendChild(row);
			}
		}

	/* Rohstoffe */
		var ResPerHour = [5,30,35,41,47,55,64,74,86,100,117,136,158,184,214,249,289,337,391,455,530,616,717,833,969,1127,1311,1525,1774,2063,2400];
		var speicher = [0,1000,1229,1512,1859,2285,2810,3454,4247,5222,6420,7893,9705,11932,14670,18037,22177,27266,33523,41217,50675,62305,76604,94184,115798,142373,175047,215219,264611,325337,400000];
		var speicherstufe = parseInt(report[6]);
		var versteck = [0,150,200,267,356,474,632,843,1125,1500,2000];
		var versteckstufe = parseInt(report[7]);
		var maxres = speicher[speicherstufe] - versteck[versteckstufe] - (versteckstufe>0 && speicherstufe<30);
		if (bonustyp == 4) {
			maxres += Math.floor(speicher[speicherstufe] * bonuswert);
		}
		var ressis1 = [1.0,1.0,1.0];  		// Res Bericht
		var graphic = ["holz","lehm","eisen"];
		var tragen1 = [25,15,10,80,50,50]; 	// Beute tragen
		var duration1= [18,22,18,10,10,11]; 	// Dauer in min. pro Feld
		var ressis2 = [1.0,1.0,1.0];			// Res errechnet
		var graphicname = ["spear","axe","light","heavy"];
		var tragen = [10,25,80,50];
		var duration = [18,18,10,11];
		var anzahl_werte = 0;
		for (var i=0; (i<6) && (anzahl_werte < 4); i++) {
			obj = grafik[i];
			if (settings[i+2] == 1) {
				duration[anzahl_werte] = duration1[i];
				tragen[anzahl_werte] = tragen1[i];
				graphicname[anzahl_werte] = grafik[i];
				anzahl_werte++;
			}
		}

	/*  Berechnen der Ressis zur aktuellen Zeit (mit Bonusdörfern) */
		var ausgabe = "";
		var unknown = (parseInt(ressis[1]) == -1);
		for (var i=0; i<=2; i++) {
			ressis1[i] = parseInt(ressis[i],10); 	//vorhandene Res
			if (maxres > 100) {					// Res-Berechnung ist möglich
					ressis2[i] += (diff_h * ResPerHour[report[i+3]] * speed); //berechnete Res
				if (bonus) {
					if ((bonustyp == i) || (bonustyp == 3)) {
						ressis2[i] += (ressis2[i] * bonuswert)	// Bonus addieren
					}
				}
				ressis2[i] += ressis1[i];  		// vorhandene und berechnete addieren
				ausgabe += "<img src=\"/graphic/"+graphic[i]+".png\">";
				if (maxres <= ressis2[i]){
					ausgabe += "<a style=\"color:#FF0000\">";
				}
				else if (0.8*maxres <=ressis2[i]) {
					ausgabe += "<a style=\"color:#EE8000\">";
				}
				else if (bonus) {
					if ((bonustyp==i) || (bonustyp ==3)) {
						ausgabe += "<a style=\"color:#005000\">";
					}
				}
				ressis2[i] = Math.min(maxres, Math.ceil(ressis2[i]));
				if (ressis2[i] >0) {
					ausgabe += trennzeichen(ressis2[i])+" ";
				}
				if ((0.8 * maxres <= ressis2[i]) || (bonustyp ==i) || (bonustyp ==3)) {
					ausgabe += "</a>";
				}
			}
			else {  							// keine Res-Berchnung möglich
				ausgabe += "<a style=\"color:#0000B0\"><img src=\"/graphic/"+graphic[i]+".png\" alt=\"\">";
				if (unknown) {
					ausgabe += "<b>?</b></a> ";
				}
				else {
					ausgabe += ressis1[i]+"</a> ";
				}
			}
		}
		if ((show_ressis)&&(speicherstufe!=0)) {   		// Rohstoffe anzeigen
			row = document.createElement("tr");
			row.setAttribute("id",'last_att_ressis');
			td1 = document.createElement("td");
			td1.innerHTML = "Rohstoffe: ";
			td2 = document.createElement("td");
			td2.setAttribute("colspan","2");
			td2.innerHTML = ausgabe;
			row.appendChild(td1);
			row.appendChild(td2);
			cont_tb.appendChild(row);
		}
		if(anzahl_werte > 0){						// Farmeinheiten anzeigen
			row = document.createElement("tr");
			row.setAttribute("id",'next_att_units');
			td1 = document.createElement("td");
			td1.innerHTML = "Farmeinheiten: ";
			td2 = document.createElement("td");
			td2.setAttribute("colspan","2");

		/* Berechnen der Ressis für die Laufzeit zum Zieldorf (mit Bonusdörfern) */
			var vstart = koor_start[1].split("|");		// Koordinaten Startdorf  und Zieldorf
			var vtarget = koor_target[1].split("|");
			var fields  = laufzeitfaktor(vstart[0],vstart[1],vtarget[0],vtarget[1]);
			var bedarf  = [0,0,0,0];
			var bedarf1 = [0,0,0,0];
			var ressis3 = [1,1,1,1]; 				//Einheiten
			ausgabe = "";
			for (var i=0; i < anzahl_werte; i++) {
				ressis3[i] = [0,0,0];				// Holz, Lehm, Eisen
				for (var j=0; j <=2; j++) {
					ressis3[i][j] = (fields * duration[i] * speed * ResPerHour[report[j+3]] /60.0);  // Felder mal Laufzeit/Feld mal Ressis/min
					if (bonus) {
						if ((bonustyp == 3) || (bonuswert == j)) {
							ressis3[i][j] =+ (ressis3[i][j] * bonuswert);
						}
					}
					bedarf[i] += Math.min(maxres,Math.ceil(ressis2[j]+ressis3[i][j]));
				}
				bedarf1[i]= Math.ceil(bedarf[i] / tragen[i]);
				ausgabe += " <img src=\"/graphic/unit/unit_"+graphicname[i]+".png\">";
				if (bedarf1[i] >0){
					ausgabe +=trennzeichen(bedarf1[i])+" ";
				}
				else {
					ausgabe += "<b>?</b> ";
				}
			}
			td2.innerHTML = ausgabe;
			row.appendChild(td1);
			row.appendChild(td2);
			cont_tb.appendChild(row);
		}

	/* Gebäude */
		if (show_wall) {
			row = document.createElement("tr");
			row.setAttribute("id",'last_att_wall');
			td1 = document.createElement("td");
			td1.innerHTML = "Gebäude: ";
			td2 = document.createElement("td");
			td2.setAttribute("colspan","2");
			var counter = 0;
			var ausgabe = "";
			if (speicherstufe > 0) {
				ausgabe = "<img src=\"/graphic/res.png\">";
				ausgabe += speicherstufe+" ";
				if (bonustyp == 4) {
					ausgabe += "<a style=\"color:#005000\">";
				}
				ausgabe += " ("+trennzeichen(maxres)+") ";
				if (bonustyp == 4) {
					ausgabe += "</a>";
				}
				if (versteckstufe > 0) {
					ausgabe += " <img src=\"/graphic/buildings/hide.png\">"+ versteckstufe;
				}
			}
			else {
				for (var x=3; x<8; x++) {
					counter += parseInt(report[x]);
				}
			}
			if (counter == -5){
				ausgabe += "nicht bekannt";
			}
			if (report[8] != -1) {
				ausgabe += " <img src=\"/graphic/buildings/wall.png\"> "+report[8];
			}
			if (report.length == 13) {
				var zustimmung = parseInt(report[12]);
				zustimmung += diff_h * speed2;
				zustimmung = Math.min(Math.floor(zustimmung),100);
				ausgabe += " / Zustimmung " + zustimmung;
			}
			td2.innerHTML = ausgabe;
			row.appendChild(td1);
			row.appendChild(td2);
			cont_tb.appendChild(row);
		}
		if (show_info) {
			var alter = parseInt(diff_h/24);
			if (alter >= 2) {
				row = document.createElement("tr");
				row.setAttribute("id",'last_date');
				td1 = document.createElement("td");
				td1.innerHTML = "Info: ";
				td2 = document.createElement("td");
				td2.setAttribute("colspan","2");
				var ausgabe = "Bericht ist über";
				if (alter < 14) {
					ausgabe += " <b>"+alter+"</b> Tage alt";
				}
				else {
					ausgabe += "<a style=\"color:#DD2200\"> <b>"+parseInt(alter/7)+" Wochen</b></a> alt!";
				}
				td2.innerHTML = ausgabe;
				row.appendChild(td1);
				row.appendChild(td2);
				cont_tb.appendChild(row);
			}
		}
	}
}


function laufzeitfaktor(x1,y1,x2,y2) {
	var Ergebnis = (x1-x2)*(x1-x2);
	Ergebnis += (y1-y2)*(y1-y2);
	Ergebnis = Math.sqrt(Ergebnis);
	return Ergebnis;
}