_ge = function (id) {
	if (document.getElementById) {
		var elem = document.getElementById(id)
	} else if (document.all) {
		var elem = document.all[id]
	}
	return elem
};

String.prototype.countOccurences = function (search_tag, caseInsensitive) {
	if (caseInsensitive === true) {
		var tstring = this.toLowerCase();
		search_tag = search_tag.toLowerCase()
	} else {
		var tstring = this
	}
	var startpos = 0;
	var cnt = 0;
	for (var i = 0; i < tstring.length; i++) {
		var temp = tstring.indexOf(search_tag, startpos + search_tag.length);
		if (temp > 0) {
			i = temp;
			startpos = temp;
			cnt++
		}
	}
	return cnt
};



cutManual = function (layer, cnt, tag_limit) {
	var search_tag = '<br';
	if (tag_limit == "" || tag_limit == null || tag_limit == "undefined") {
		var tag_limit = 2
	}
	var sub = 0;
	var el = _ge(layer);
	var kw = el.innerHTML;
	if (cnt == "" || cnt == null || cnt == "undefined") {
		var cnt = 110
	}
	var substract = cnt - sub;
	var temp_kw = kw.toLowerCase();
	var startpos = 0;
	var count_tag = temp_kw.countOccurences(search_tag);
	if (count_tag >= tag_limit) {
		for (var i = 0; i < tag_limit; i++) {
			startpos = temp_kw.indexOf(search_tag, startpos + search_tag.length)
		}
	}
	if (kw.length >= cnt || count_tag >= tag_limit) {
		if (count_tag >= tag_limit && startpos < cnt - 1) {
			ntxt = kw.substr(0, startpos);
			ntxt += ' (...) <a href="javascript:oclText(\'' + layer + '\',\'open\');"><img src="' + images_dir + '/plus.gif" border="0" hspace="0" valign="middle" title="' + default_js_more + '" alt="' + default_js_more + '" /></a>'
		} else if (startpos >= cnt - 1 || count_tag < tag_limit) {
			ntxt = kw.substr(0, substract);
			ntxt += ' (...) <a href="javascript:oclText(\'' + layer + '\',\'open\');"><img src="' + images_dir + '/plus.gif" border="0" hspace="0" valign="middle" title="' + default_js_more + '" alt="' + default_js_more + '" /></a>'
		}
	} else {
		ntxt = kw
	};
	oclText = function (lay, oc) {
		switch (oc) {
		default:
		case 'open':
			_ge(lay).innerHTML = kw + ' <a href="javascript:oclText(\'' + lay + '\',\'close\');"><img src="' + images_dir + '/minus.gif" border="0" hspace="6" valign="middle" /></a>';
			break;
		case 'close':
			_ge(lay).innerHTML = ntxt;
			break
		}
	};
	el.innerHTML = ntxt
};


var images_dir = 'http://pimg.brincar.pt/frontpage';
var default_js_more = "Mais";