
<!--
//-------------------------------------------------------------
//			Script to Determine Remaining Characters
//-------------------------------------------------------------
function textCounter(field, countfield, maxlimit) {
	if (field.value.length > maxlimit) // if too long...trim it!
		field.value = field.value.substring(0, maxlimit);
	// otherwise, update 'characters left' counter
	else 
		countfield.value =maxlimit - field.value.length;
}

function MakeArray(count){
	for(var d=0;d<count;d++){
		this[d] = null;
	}
	return this;
}
//-------------------------------------------------------------

var maxlimit = 1000
mess_remaining =maxlimit;
var timerID = 0;
save_string = new MakeArray(7);
done = new MakeArray(6);
var var1 = "";
var var2 = "";
var is_message = 0;
save_message = "";
var string_num = 1;
var curr_pos = 0;
var pos_limit = 3;
var goodbrowser_rollover = 0;
var goodbrowser_counter = 0;
var is_mac = 0;
var is_unix = 0;
var jump_ok = 0;

var default_short_speed = 100;
var default_long_speed = 1000;
var mac_short_speed = 80;
var mac_long_speed = 700;
var pc_ns3_short_speed_counter = 10;
var pc_ns3_long_speed_counter = 200;
var pc_ns4_short_speed_counter = 1000;
var pc_ns4_long_speed_counter = 1000;

var counter_speed_short = 0;
var counter_speed_long = 0;

//-------------------------------------------------------------
//			Testing browser for various capabilities
//-------------------------------------------------------------
browserName = navigator.appName.substring(0,8);
browserVer = parseFloat(navigator.appVersion);

if (navigator.appVersion.charAt(navigator.appVersion.indexOf("(")+1) == "M"){
	is_mac = 1;
	}
else if (navigator.appVersion.charAt(navigator.appVersion.indexOf("(")+1) == "X"){
	is_unix = 1;
	}
else if (navigator.appVersion.charAt(navigator.appVersion.indexOf("(")+1) == "L"){
	is_unix = 1;
	}
else if (navigator.appVersion.charAt(navigator.appVersion.indexOf("(")+1) == "O"){
	is_unix = 1;
	}
if (navigator.appVersion.charAt(navigator.appVersion.indexOf("(")+1) == "M"){
	is_mac = 1;
	}
if ((browserName == "Netscape" & browserVer >= 3)||(browserName == "Microsof" & browserVer >= 3.01 & is_mac)){
	goodbrowser_rollover = 1;
	}
if ((browserName == "Netscape" & browserVer >= 3)||((browserName == "Microsof" & browserVer == 3.01) & is_mac)||(browserName == "Microsof" & browserVer >= 4.0 & !is_mac)){
 if (!is_unix){
 goodbrowser_counter = 1;
 }
	}

counter_speed_short = default_short_speed;
counter_speed_long = default_long_speed;
 if (is_mac){
	counter_speed_short =mac_short_speed;
	counter_speed_long =mac_long_speed;
	}
if ((!is_mac)&(browserName == "Netscape" & browserVer >= 3 & browserVer < 4)){
	counter_speed_short = pc_ns3_short_speed_counter;
	counter_speed_long = pc_ns3_long_speed_counter;
	}
if ((!is_mac)&(browserName == "Netscape" & browserVer >= 4)){
	counter_speed_short = pc_ns4_short_speed_counter;
	counter_speed_long = pc_ns4_long_speed_counter;
	jump_ok = 1;
	}
//-------------------------------------------------------------
//			The actual subroutine that starts 
//			the counter.	
//-------------------------------------------------------------
function timer_start() { 
	running = true	
	now = new Date()	
	now = now.getTime() 
	if (is_message){ 
 endTime = now + (counter_speed_short * 0.1 * 1) 
 }
	else{
 endTime = now + (autotab_speed_short * 0.1 * 1) 
 }
	show_timer()
}

//-------------------------------------------------------------
//			The actual subroutine that stops
//			the counter.	
//-------------------------------------------------------------
function timer_stop() { 
	clearTimeout(timerID) 
	running = false
}

//-------------------------------------------------------------
//			This subroutine shifts the focus about
//			while the timer is active in order to keep
//			the data length information current.	Also
//			displays the total remaining characters 
//			when the message box is the center of focus. 
//-------------------------------------------------------------
function show_timer() { 
	var now = new Date() 
	now = now.getTime() 
	if (endTime - now <= 0) { 
		if ((is_message)&(browserName != "Microsof")){
			document.isc.remLen.focus() 
			document.isc.message.focus(); 
		}
		if (!(is_message)){
	 		if (pos1 == 0){ 
				if (browserName == "Microsof"){ 
					document.isc.remLen.focus();
				}
				else{
					document.isc.elements[pos1+1].focus(); 
				}
			}
			else{
				document.isc.elements[pos1-1].focus(); 
			}
			document.isc.elements[pos1].focus(); 
		}
		if (is_message){ 
		count_text(document.isc.message.value) 
		}
		if (!(is_message)){ 
		count_it(document.isc.elements[pos1].value,pos1) 
		}
	} 
	else { 
	 var delta = new Date(endTime - now) 
	 var theMin = delta.getMinutes() 
	 var theSec = delta.getSeconds() 
	 var theTime = theMin 
	 theTime += ((theSec < 10) ? ":0" : ":") + theSec 
	 if (running) {
	 	if (is_message){ 
			timerID = setTimeout("show_timer()",counter_speed_long) 
		}
	 else{
	 	timerID = setTimeout("show_timer()",autotab_speed_long) 
	 }
	} 
 }
}

//-------------------------------------------------------------
//			Starts character counter when focus is 
//			brought to the message box.	 Functions
//			slightly differently from the autotab
//			counter.
//-------------------------------------------------------------
function count_text(data){
  if (goodbrowser_counter){
	is_message = 1;
	curr_pos = 6;
	if (document.isc.message.length == 0){
		data = "";
	}
	data_length= data.length
	xcount = 0;
	ycount = 0;
	while (xcount < data_length){
		if (data.charAt(xcount) != "\r"){
		ycount++;
		}
		xcount++;
	} 
	data_length = ycount;
	document.isc.remLen.value = (1000-data_length);
	mess_remaining = document.isc.remLen.value;
	if (data_length > maxlimit){
		if (document.isc.message.value != save_message){
			document.isc.message.value=data.substring(0,maxlimit);
			document.isc.remLen.value=(1000-maxlimit);
			document.isc.message.blur();
			save_message = document.isc.message.value;
			timer_stop();
			//alert ("Message cannot exceed " + maxlimit + " characters.");
		}
	}
	timer_start();
  }
}

//-------------------------------------------------------------
//			Stops character counter when focus leaves
//			the message box or the message changes. 
//			Functions slightly differently from the 
//			autotab counter.
//-------------------------------------------------------------
function count_text2(form){
  if (goodbrowser_counter){
	is_message = 1;
	curr_pos = 6;
	data = form.message.value;
	if (document.isc.message.length == 0){
	 data = "";
	}
	data_length= data.length 
	xcount = 0;
	ycount = 0;
	while (xcount < data_length){
		if (data.charAt(xcount) != "\r"){
			ycount++;
		}
	xcount++;
	} 
	data_length = ycount;
	document.isc.remLen.value = (1000-data_length);
	mess_remaining = document.isc.remLen.value;
	if (data_length > maxlimit ) { 
		if (document.isc.message.value != save_message){
			document.isc.message.value=data.substring(0,maxlimit);
			document.isc.remLen.value=(1000-maxlimit);
			document.isc.message.blur();
			save_message = document.isc.message.value;
			timer_stop();
			//alert ("El contenido no puede exceder los " + maxlimit + " caracteres.");
		}
	}
	timer_stop();
  }
}
//-->