// ####### # # # # # # # # ##### #
// # # # # # # ## ## # # ## # # # #
// ####### # # # # # # # # # # # # # # # # #
// # ####### # ####### # # # ####### # ## # #######
// ####### # # ###### # # # # # # # # ##### # #
function menudebiografia(){
document.write('');
document.write(' ');
document.write(' |
')
}
function menudederechosdeautor(){
document.write('');
document.write(' ');
document.write(' ');
document.write(' ');
document.write(' ');
document.write(' ');
document.write( ' ');
//document.write(' ');
document.write(' ');
document.write(' |
')
}
function menudegaleria(){
document.write('');
document.write('');
document.write('');
document.write(' ');
document.write('');
document.write('');
document.write( '');
//document.write('');
document.write('');
document.write(' |
')
}
function menudecancionero(){
document.write('| ');
document.write('');
document.write('');
document.write('');
document.write('');
document.write('');
document.write( '');
//document.write('');
document.write('');
document.write(' |
')
}
function menudeenlaces(){
document.write('| ');
document.write('');
document.write('');
document.write('');
document.write('');
document.write('');
document.write( '');
//document.write('');
document.write('');
document.write(' |
')
}
function menudereportajes(){
document.write('| ');
document.write('');
document.write('');
document.write('');
document.write('');
document.write('');
//document.write('');
document.write('');
document.write(' |
')
}
function menudelinks(){
document.write('| ');
document.write('');
document.write('');
document.write('');
document.write('');
document.write('');
document.write( '');
//document.write('');
document.write(' |
')
}
function piedepagina(){
document.write('')
document.write('')
document.write('');
document.write('
Todos los derechos reservados, el uso de la información contenida en esta página, para fines de lucro y/o sin autorización expresa por su autor sera penado por la ley, ya que esta protegido por la Ley de Derechos de Autor de El Salvador, aplicable internacionalmente, el numero de registro en el Centro Nacional de Registro de El Salvador es 265-2005
')
document.write(' |
')
document.write('')
}
function piedepagina2(){
document.write('')
document.write('')
document.write('');
document.write('
Todos los derechos reservados, el uso de la información contenida en esta página, para fines de lucro y/o sin autorización expresa por su autora sera penado por la ley, ya que esta protegido por la Ley de Derechos de Autor de El Salvador,aplicable internacionalmente, el numero de registro en el Centro Nacional de Registro de El Salvador es 265-2005
')
document.write(' |
')
document.write('')
}
function cerrarventana(){
window.close();
}
////////////////////////////////// ABRIR FUENTE /////////////////////////////////////////
function abrirfuente(){
salamancabot = prompt("Tipo de Letra? (Arial, Verdana, etc. dejelo vacio para ninguna)",'');
if (salamancabot != "" && salamancabot != null){
salamancabot = '"' + salamancabot + '"';
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "\n";
}
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "Escriba Aqui su Texto\n\n";
}
//////////////////////////////////////// IMAGENES /////////////////////////////////////////////
function imagenes(){
salamancabot = prompt("Escriba el lugar en donde esta guardada la imagen y el nombre\n sin olvidar la extensi� .jpg o .gif",'');
if (salamancabot != "" && salamancabot != null){
salamancabot = '"' + salamancabot + '"';
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "![]()
\n";
}
}
//////////////////////////////////////// NEGRITA ///////////////////////////////////////////////
function negrita() {
salamancabot = prompt("Escriba el Texto que desea poner en Negrita",'');
if (salamancabot != null && salamancabot != ""){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "" + salamancabot + "\n";
}
}
///////////////////////////////////////// ITALICA //////////////////////////////////////////////
function italica() {
salamancabot = prompt("Escriba el Texto que desea poner en Italica",'');
if (salamancabot != null && salamancabot != ""){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "" + salamancabot + "\n";
}
}
//////////////////////////////////////// SUBRAYAR ///////////////////////////////////////////////
function subrayado(){
salamancabot = prompt("Escriba el Texto que desea Subrayar",'');
if (salamancabot != null && salamancabot != ""){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "" + salamancabot + "\n";
}
}
////////////////////////////////////// CENTRADO //////////////////////////////////////////////////
function centrar(){
salamancabot = prompt("Escriba el Texto que desea Centrar",'');
if (salamancabot != null && salamancabot != ""){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "" + salamancabot + "\n";
}
}
////////////////////////////////// BARRA HORIZONTAL /////////////////////////////////////////////
function lh(){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "
\n";
}
////////////////////////////////// SALTO DE LINEA ///////////////////////////////////////////////////
function saltodelinea(){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "
\n";
}
//////////////////////////////////// SALTO DE PARRAFO /////////////////////////////////////////////////
function saltodeparrafo(){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "\n";
}
/////////////////////////////////// CREAR LINK /////////////////////////////////////////////////////////
function crearlink(){
salamancabot = prompt("Escriba el sitio web. \nPor favor incluya http:// ",'');
if (salamancabot != "" && salamancabot != null){
salamancabot = '"' + salamancabot + '"';
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "";
salamancabot = prompt("Texto que desea mostrar en el link? (No lo deje vacio ya que no funcionara el link)",'');
if (salamancabot != "" && salamancabot != null){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + salamancabot + "";
}
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "\n";
}
}
///////////////////////////////////// LISTA ORDENADA ///////////////////////////////////////////////////
function listaordenada(){
chequeo=0;
for(i=1;;i++){
chequeo = chequeo + 1;
salamancabot = prompt("Valor " + i + "? (Dejelo en Blanco para cerrar la lista)",'');
if (salamancabot == "" || salamancabot == null){
break;
}
if (i == 1){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "
\n";
delfin = 1;
}
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "- " + salamancabot + "\n";
}
if (chequeo == 1){
}
else {
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "
\n";
}
}
/////////////////////////////////// LISTA SIN ORDEN //////////////////////////////////////////////////////
function listasinorden(){
chequeo=0;
for(i=1;;i++){
chequeo = chequeo + 1;
salamancabot = prompt("Valor " + i + "? (Dejelo en Blanco para cerrar la lista)",'');
if (salamancabot == "" || salamancabot == null){
break;
}
if (i == 1){
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "\n";
delfin = 1;
}
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "- " + salamancabot + "\n";
}
if (chequeo == 1){
}
else {
document.guestbook.mensaje.value = document.guestbook.mensaje.value + "
\n";
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////
function verificarfirma(emailStr){
/* The following variable tells the rest of the function whether or not
to verify that the address ends in a two-letter country or well-known
TLD. 1 means check it, 0 means don't. */
var checkTLD=1;
/* The following is the list of known TLDs that an e-mail address must end with. */
var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
/* The following pattern is used to check if the entered e-mail address
fits the user@domain format. It also is used to separate the username
from the domain. */
var emailPat=/^(.+)@(.+)$/;
/* The following string represents the pattern for matching all special
characters. We don't want to allow special characters in the address.
These characters include ( ) < > @ , ; : \ " . [ ] */
var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
/* The following string represents the range of characters allowed in a
username or domainname. It really states which chars aren't allowed.*/
var validChars="\[^\\s" + specialChars + "\]";
/* The following pattern applies if the "user" is a quoted string (in
which case, there are no rules about which characters are allowed
and which aren't; anything goes). E.g. "jiminy cricket"@disney.com
is a legal e-mail address. */
var quotedUser="(\"[^\"]*\")";
/* The following pattern applies for domains that are IP addresses,
rather than symbolic names. E.g. joe@[123.124.233.4] is a legal
e-mail address. NOTE: The square brackets are required. */
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
/* The following string represents an atom (basically a series of non-special characters.) */
var atom=validChars + '+';
/* The following string represents one word in the typical username.
For example, in john.doe@somewhere.com, john and doe are words.
Basically, a word is either an atom or quoted string. */
var word="(" + atom + "|" + quotedUser + ")";
// The following pattern describes the structure of the user
var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
/* The following pattern describes the structure of a normal symbolic
domain, as opposed to ipDomainPat, shown above. */
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
/* Finally, let's start trying to figure out if the supplied address is valid. */
/* Begin with the coarse pattern to simply break up user@domain into
different pieces that are easy to analyze. */
var matchArray=emailStr.match(emailPat);
if (matchArray==null) {
/* Too many/few @'s or something; basically, this address doesn't
even fit the general mould of a valid e-mail address. */
alert("Por Favor escriba su Email");
return false;
}
var user=matchArray[1];
var domain=matchArray[2];
// Start by checking that only basic ASCII characters are in the strings (0-127).
for (i=0; i127) {
alert("El Nombre del usuario tiene caracteres incorrectos en el Email.");
return false;
}
}
for (i=0; i127) {
alert("El Dominio del Email tiene Caracteres Invalidos.");
return false;
}
}
// See if "user" is valid
if (user.match(userPat)==null) {
// user is not valid
alert("El nombre del Usuario del Email parece Incorrecto.");
return false;
}
/* if the e-mail address is at an IP address (as opposed to a symbolic
host name) make sure the IP address is valid. */
var IPArray=domain.match(ipDomainPat);
if (IPArray!=null) {
// this is an IP address
for (var i=1;i<=4;i++) {
if (IPArray[i]>255) {
alert("Destinacion de direcci� IP es invalida!");
return false;
}
}
return true;
}
// Domain is symbolic name. Check if it's valid.
var atomPat=new RegExp("^" + atom + "$");
var domArr=domain.split(".");
var len=domArr.length;
for (i=0;i