// Popups varios de fotos
function f3(URL) {
ventananueva= window.open(URL,"F3","toolbar=0,scrollbars=no,location=0,statusbar=0,menubar=0,resizable=0,width=505,height=604,left=10,top=10");
}
function f4(URL) {
ventananueva= window.open(URL,"F4","toolbar=0,scrollbars=no,location=0,statusbar=0,menubar=0,resizable=0,width=740,height=462,left=10,top=10");
}
function f5(URL) {
ventananueva= window.open(URL,"F5","toolbar=0,scrollbars=no,location=0,statusbar=0,menubar=0,resizable=0,width=740,height=452,left=10,top=10");
}
function freg1(URL) {
ventananueva= window.open(URL,"FREG1","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=740,height=572,left=10,top=10");
}
function fmreg1(URL) {
ventananueva= window.open(URL,"FMREG1","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=541,height=422,left=10,top=10");
}
function frev1(URL) {
ventananueva= window.open(URL,"FMREV1","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=510,height=707,left=10,top=10");
}
function frev2(URL) {
ventananueva= window.open(URL,"FMREV2","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=540,height=551,left=10,top=10");
}
function fis1(URL) {
ventananueva= window.open(URL,"FIS1","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=790,height=601,left=10,top=10");
}
function fap1(URL) {
ventananueva= window.open(URL,"FAP1","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=790,height=604,left=10,top=10");
}
function fapv1(URL) {
ventananueva= window.open(URL,"FAPV1","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=790,height=604,left=10,top=10");
}
function fph1(URL) {
ventananueva= window.open(URL,"FAPV1","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=505,height=664,left=10,top=10");
}
// Popup enviar página
function enviar_pagina(URL) {
ventananueva= window.open(URL,"Enviar","toolbar=0,scrollbars=no,location=0,statusbar=0,menubar=0,resizable=0,width=407,height=378,left=10,top=10");
}
// Popup curriculum vitae
function pcv(URL) {
ventananueva= window.open(URL,"PCV","toolbar=0,scrollbars=yes,location=0,statusbar=0,menubar=0,resizable=0,width=640,height=500,left=10,top=10");
}
// popup encuesta portada
function resultados(){ 
window.open("resultados.php","resultados","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width=550,height=306,left=15,top=15"); 
}
function validaencuesta(theForm)
{
voto = 0
for(m=0;m<7;m++){
if(theForm.voto[m].checked == true){
voto++
}
}
if(voto==0){
alert('Por favor, seleccione una opción para responder la Encuesta.')
theForm.voto[0].focus();
return (false);
}
resultados();
}
// funciones para validar el formulario de enviar página a un amigo
function isMail(_email) {
     var emailReg = /^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/;	 				
     return emailReg.test(_email);
}

function Valida_Solicitud(theForm)
{
if (theForm.nombre_remitente.value == "")
{
alert("Por favor, introduzca el nombre del remitente.");
theForm.nombre_remitente.focus();
return (false);
}

if (theForm.correo_remitente.value == "")
{ 
alert("Por favor, introduzca la dirección de correo electrónico del remitente."); 
theForm.correo_remitente.focus(); 
return (false); 
}

if (!(isMail(theForm.correo_remitente.value)))
{ 
alert("Por favor, introduzca una dirección de correo electrónico del remitente válida.");
theForm.correo_remitente.focus(); 
return (false); 
}

if (theForm.nombre_destinatario.value == "")
{
alert("Por favor, introduzca el nombre del destinatario.");
theForm.nombre_destinatario.focus();
return (false);
}

if (theForm.correo_destinatario.value == "")
{ 
alert("Por favor, introduzca la dirección de correo electrónico del destinatario."); 
theForm.correo_destinatario.focus(); 
return (false); 
}

if (!(isMail(theForm.correo_destinatario.value)))
{ 
alert("Por favor, introduzca una dirección de correo electrónico del destinatario válida.");
theForm.correo_destinatario.focus(); 
return (false); 
}
}
//-->
// función para controlar que han ingresado alguna palabra o palabras
// para buscar en el campo Buscador del fomulario BUSCADOR
function validarf(formulario)
{
	var flag=true;
	with(formulario)
	{
		if(query_string.value == "")
		{
			alert("Por favor, introduzca la palabra o palabras con la que desea realizar la búsqueda en el campo Buscador.");
			flag=false;
		}
	}	
	return flag;
}
/********** Estas funciones son para el tamaño del texto ******************/

function MM_changeProp(objName,x,theProp,theValue) { //v3.0
  var obj = MM_findObj(objName);
  if (obj && (theProp.indexOf("style.")==-1 || obj.style)) eval("obj."+theProp+"='"+theValue+"'");
}

function getProp(objName,theProp) { //v0.1 by GuS
  var obj = MM_findObj(objName);
  var prop;
  if (obj && (theProp.indexOf("style.")==-1 || obj.style)) {
	  eval("prop=obj."+theProp);
  }
  return prop;
}

fontsizes=new Array('10px','11px','14px');

function increaseSize(objName,fontsizes) { //v0.1 by GuS
	var obj = MM_findObj(objName);
	var newindex=1;
	var currentFontSize=(getProp(objName,'style.fontSize')!="")?getProp(objName,'style.fontSize'):"11px";
	for (var i = 0; i < fontsizes.length; i++) {	
		if (fontsizes[i]==currentFontSize){
			newindex=(i+1<fontsizes.length)?i+1:i;
			//alert("Encontrado :"+i+" / "+fontsizes[i]+" / "+newindex+" / "+fontsizes[newindex]);
		}
	}
	var newFontSize=fontsizes[newindex];
	//alert("Encontrado :"+currentFontSize+" / "+newindex+" / "+fontsizes[newindex]);
	MM_changeProp(objName,'','style.fontSize',newFontSize,'TD')
}

function decreaseSize(objName,fontsizes) { //v0.1 by GuS
	var obj = MM_findObj(objName);
	var newindex=1;
	var currentFontSize=(getProp(objName,'style.fontSize')!="")?getProp(objName,'style.fontSize'):"11px";

	for (var i = 0; i < fontsizes.length; i++) {	
		if (fontsizes[i]==currentFontSize){
			newindex=(i-1>=0)?i-1:i;
			//alert("Encontrado :"+i+" / "+fontsizes[i]+" / "+newindex+" / "+fontsizes[newindex]);
		}
	}
	var newFontSize=fontsizes[newindex];
	MM_changeProp(objName,'','style.fontSize',newFontSize,'TD')
}

function subir(){
	increaseSize('texto',fontsizes);
	increaseSize('texto2',fontsizes);
	increaseSize('texto3',fontsizes);
	increaseSize('texto4',fontsizes);
	increaseSize('texto5',fontsizes);
	increaseSize('texto6',fontsizes);
	increaseSize('texto7',fontsizes);
	increaseSize('texto8',fontsizes);
	increaseSize('texto9',fontsizes);
	increaseSize('texto10',fontsizes);
	increaseSize('texto11',fontsizes);
	increaseSize('texto12',fontsizes);
	increaseSize('texto13',fontsizes);
	increaseSize('texto14',fontsizes);
	increaseSize('texto15',fontsizes);
	increaseSize('texto16',fontsizes);
	increaseSize('texto17',fontsizes);
	increaseSize('texto18',fontsizes);
	increaseSize('texto19',fontsizes);
	increaseSize('texto20',fontsizes);
	increaseSize('texto21',fontsizes);
	increaseSize('texto22',fontsizes);
	increaseSize('texto23',fontsizes);
	increaseSize('texto24',fontsizes);
	increaseSize('texto25',fontsizes);
	increaseSize('texto26',fontsizes);
	increaseSize('texto27',fontsizes);
	increaseSize('texto28',fontsizes);
	increaseSize('texto29',fontsizes);
	increaseSize('texto30',fontsizes);
}

function bajar(){
	decreaseSize('texto',fontsizes);
	decreaseSize('texto2',fontsizes);
	decreaseSize('texto3',fontsizes);
	decreaseSize('texto4',fontsizes);
	decreaseSize('texto5',fontsizes);
	decreaseSize('texto6',fontsizes);
	decreaseSize('texto7',fontsizes);
	decreaseSize('texto8',fontsizes);
	decreaseSize('texto9',fontsizes);
	decreaseSize('texto10',fontsizes);
	decreaseSize('texto11',fontsizes);
	decreaseSize('texto12',fontsizes);
	decreaseSize('texto13',fontsizes);
	decreaseSize('texto14',fontsizes);
	decreaseSize('texto15',fontsizes);
	decreaseSize('texto16',fontsizes);
	decreaseSize('texto17',fontsizes);
	decreaseSize('texto18',fontsizes);
	decreaseSize('texto19',fontsizes);
	decreaseSize('texto20',fontsizes);
	decreaseSize('texto21',fontsizes);
	decreaseSize('texto22',fontsizes);
	decreaseSize('texto23',fontsizes);
	decreaseSize('texto24',fontsizes);
	decreaseSize('texto25',fontsizes);
	decreaseSize('texto26',fontsizes);
	decreaseSize('texto27',fontsizes);
	decreaseSize('texto28',fontsizes);
	decreaseSize('texto29',fontsizes);
	decreaseSize('texto30',fontsizes);		
}

// función para controlar que han ingresado alguna palabra o palabras
// para buscar en el campo Buscador del fomulario BUSCADOR
function validarf(formulario)
{
	var flag=true;
	with(formulario)
	{
		if(query_string.value == "")
		{
			alert("Por favor, introduzca la palabra o palabras con la que desea realizar la búsqueda en el campo Buscador.");
			flag=false;
		}
	}	
	return flag;
}
// función para controlar que han ingresado el Usuario y la Contraseña
// en el formulario AREA DE SOCIOS
function validaracceso(formulario)
{
	var flag=true;
	with(formulario)
	{
		if(usuario.value == "")
		{
			alert("Por favor, introduzca su Nombre de Usuario en el campo Usuario.");
			flag=false;
		}
	    if(contrasena.value == "")
		{
		    alert("Por favor, introduzca su Contraseña en el campo Contraseña.");
		    flag=false;
		}		
	}	
	return flag;
}
// función para controlar que han ingresado el Nombre de Cuenta y la Contraseña
// en el formulario WEBMAIL
function validarleercorreo(formulario)
{
	var flag=true;
	with(formulario)
	{
		if(f_user.value == "")
		{
			alert("Por favor, introduzca el Nombre de Cuenta de su Correo Electrónico en el campo E-mail.");
			flag=false;
		}
	    if(f_pass.value == "")
		{
		    alert("Por favor, introduzca la Contraseña de acceso de su Correo Electrónico en el campo Contraseña.");
		    flag=false;
		}		
	}	
	return flag;
}
// función para controlar que en el formulario del archivo formulariorecuperar
// se ha ingresado un correo electrónico válido
 function validarcorreo(form){
    var pos1, pos2, bOk = true;
    var sDir = document.recuperar.mail.value;
    if (sDir == ""){
     alert("Por favor, ingrese la dirección de Correo Electrónico ingresada en su registro de Socio.");
     document.recuperar.mail.focus();
     return false;
    }
    pos1 = sDir.indexOf('@', 0);
    pos2 = sDir.indexOf('.', 0);
    bOk = bOk && (pos1 > 0);
    bOk = bOk && (pos2 != -1);
    bOk = bOk && (pos1 < pos2 - 1);
    bOk = bOk && (pos2 < sDir.length - 1);
    if (!bOk){
     alert("Por favor, ingrese una dirección de Correo Electrónico válida.");
     document.recuperar.mail.focus();
     return false;
    }
   }
<!--
// función para validar el formulario para abrir las cuentas de correo electrónico de la SCPD
// del archivo webmail.php
function Valida_Solicitud_Correo(theForm)
{
if (theForm.CORREO_ELECTRONICO_SCPD.value == "")
{
alert("Correo Electrónico SCPD debe contener el nombre de cuenta que desea para su cuenta de correo electrónico de la SCPD.");
theForm.CORREO_ELECTRONICO_SCPD.focus();
return (false);
}
if (theForm.CONTRASENA.value == "")
{
alert("Contraseña debe contener la contraseña de acceso que desea para su cuenta de correo electrónico de la SCPD.");
theForm.CONTRASENA.focus();
return (false);
}
if (theForm.REPITA_CONTRASENA.value == "")
{
alert("Repita Contraseña debe contener la misma cadena que ha ingresado en el campo Contraseña.");
theForm.REPITA_CONTRASENA.focus();
return (false);
}
if (theForm.REPITA_CONTRASENA.value != theForm.CONTRASENA.value)
{
alert("Repita Contraseña debe contener la misma cadena que ha ingresado en el campo Contraseña.");
theForm.REPITA_CONTRASENA.focus();
return (false);
}
if (theForm.NOMBRE.value == "")
{
alert("Nombre debe contener su nombre personal.");
theForm.NOMBRE.focus();
return (false);
}
if (theForm.APELLIDOS.value == "")
{
alert("Apellidos debe contener sus apellidos.");
theForm.APELLIDOS.focus();
return (false);
}
if (theForm.DNI.value == "")
{
alert("DNI debe contener su DNI.");
theForm.DNI.focus();
return (false);
}
if (theForm.CORREO_ELECTRONICO.value == "")
{
alert("Correo Electrónico debe contener la dirección de su correo electrónico.");
theForm.CORREO_ELECTRONICO.focus();
return (false);
}
}
//-->   
// Scrooll de la Barra de Estado 
var current = 0
var x = 0
var speed = 100
var speed2 = 2000

function initArray(n) {
  this.length = n;
  for (var i =1; i <= n; i++) {
    this[i] = ' '
  }
}

typ = new initArray(2)
typ[0]="BIENVENIDO!!!"
typ[1]="Asociación de Cirujanos del Norte"

function typewrite() {
var m = typ[current]

window.status = m.substring(0, x++) + "_"

if (x == m.length + 1) {
x = 0
current++

if (current > typ.length - 1) {
current = 0
}

setTimeout("typewrite()", speed2)
}

else {
setTimeout("typewrite()", speed)
}
}

typewrite()
//-->