function Modulo() {

var key = document.modulo.key.value;
var title = document.modulo.text_title.value;
var description_title = document.modulo.text_description.value;
var key1 = document.modulo.key1.value;
var key2 = document.modulo.key2.value;
var key3 = document.modulo.key3.value;
var key4 = document.modulo.key4.value;
var key5 = document.modulo.key5.value;
var key6 = document.modulo.key6.value;

var url_key1 = document.modulo.url_key1.value;
var url_key2 = document.modulo.url_key2.value;
var url_key3 = document.modulo.url_key3.value;
var url_key4 = document.modulo.url_key4.value;
var url_key5 = document.modulo.url_key5.value;
var url_key6 = document.modulo.url_key6.value;

var name_site = document.modulo.name_site.value;
var url_site = document.modulo.url_site.value;
var url_redirect = document.modulo.url_redirect.value;
var breve_description = document.modulo.breve_description.value;
var full_description = document.modulo.full_description.value;
var email = document.modulo.email.value;
var key_master = document.modulo.key_master.value;

var keylong = document.modulo.key.value.length;
var titlelong = document.modulo.text_title.value.length;
var descriptionlong = document.modulo.text_description.value.length;
var key1long = document.modulo.key1.value.length;
var key2long = document.modulo.key2.value.length;
var key3long = document.modulo.key3.value.length;
var key4long = document.modulo.key4.value.length;
var key5long = document.modulo.key5.value.length;
var key6long = document.modulo.key6.value.length;

var url_key1long = document.modulo.url_key1.value.length;
var url_key2long = document.modulo.url_key2.value.length;
var url_key3long = document.modulo.url_key3.value.length;
var url_key4long = document.modulo.url_key4.value.length;
var url_key5long = document.modulo.url_key5.value.length;
var url_key6long = document.modulo.url_key6.value.length;

var name_sitelong = document.modulo.name_site.value.length;
var url_sitelong = document.modulo.url_site.value.length;
var url_redirectlong = document.modulo.url_redirect.value.length;
var breve_descriptionlong = document.modulo.breve_description.value.length;
var full_descriptionlong = document.modulo.full_description.value.length;

var email_reg_exp = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-]{2,})+\.)+([a-zA-Z0-9]{2,})+$/;


if ((key == "") || (key == "undefined") || (keylong <=5) ) {
alert("Key Obbligatory, Min 6 Char.");
document.modulo.key.focus();
return false;}

if ((title == "") || (title == "undefined") || (titlelong <=5) ) {
alert("Title Obbligatory, Min 6 Char.");
document.modulo.text_title.focus();
return false;}

if ((title == "") || (title == "undefined") || (titlelong <=5) ) {
alert("Title Obbligatory, Min 6 Char.");
document.modulo.text_title.focus();
return false;}

else if ((description_title == "") || (description_title == "undefined") || (descriptionlong <=5)) {
alert("Description Obbligatory, Min 6 Char.");
document.modulo.text_description.focus();
return false;}

else if ((key1 == "") || (key1 == "undefined") || (key1long <=2)) {
alert("Keyword 1 Obbligatory, Min 3 Char.");
document.modulo.key1.focus();
return false;}

else if ((url_key1long <15) || (url_key1.indexOf("http://") == (-1))){
alert("keyword 1 is Wrong.");
document.modulo.url_key1.value = "http://";
document.modulo.url_key1.select();
return false;}

else if ((key2 == "") || (key2 == "undefined") || (key2long <=2)) {
alert("Keyword 2 Obbligatory, Min 3 Char.");
document.modulo.key2.focus();
return false;}

else if ((url_key2long <15) || (url_key2.indexOf("http://") == (-1))){
alert("keyword 2 is Wrong.");
document.modulo.url_key2.value = "http://";
document.modulo.url_key2.select();
return false;}

else if ((key3 == "") || (key3 == "undefined") || (key3long <=2)) {
alert("Keyword 3 is obbligatory, Min 3 Char.");
document.modulo.key3.focus();
return false;}

else if ((url_key3long <15) || (url_key3.indexOf("http://") == (-1))){
alert("keyword 3 is Wrong.");
document.modulo.url_key3.value = "http://";
document.modulo.url_key3.select();
return false;}

else if ((key4 == "") || (key4 == "undefined") || (key4long <=2)) {
alert("Keyword 4 is obbligatory, Min 3 Char.");
document.modulo.key4.focus();
return false;}

else if ((url_key4long <15) || (url_key4.indexOf("http://") == (-1))){
alert("keyword 4 is Wrong.");
document.modulo.url_key4.value = "http://";
document.modulo.url_key4.select();
return false;}

else if (!(key5 =="" || key5 == "undefined" || (key5long >=3))){
alert("keyword 5 is obbligatory, Min 3 Char.");
document.modulo.key5.focus();
return false;}

else if ((!(key5 =="" || key5 == "undefined" || url_key5long >=15)) || url_key5.indexOf("http://") == (-1)){
alert("keyword 5 is Wrong.");
document.modulo.url_key5.value = "http://";
document.modulo.url_key5.select();
return false;}


else if (url_key5long >7 && (key5 =="" || key5 == "undefined" || key5long <=2)){
alert("keyword 5 is obbligatory, Min 3 Char.");
document.modulo.key5.focus();
return false;}

else if (!(key6 =="" || key6 == "undefined" || (key6long >=3))){
alert("keyword 6 is obbligatory, Min 3 Char.");
document.modulo.key6.focus();
return false;}

else if ((!(key6 =="" || key6 == "undefined" || url_key6long >=15)) || url_key6.indexOf("http://") == (-1)){
alert("keyword 6 is Wrong.");
document.modulo.url_key6.value = "http://";
document.modulo.url_key6.select();
return false;}

else if (url_key6long >7 && (key6 =="" || key6 == "undefined" || key6long <=2)){
alert("keyword 6 is obbligatory, Min 3 Char.");
document.modulo.key6.focus();
return false;}

else if ((name_site == "") || (name_site == "undefined") || (name_sitelong <=2) || (name_sitelong >=30)) {
alert("SiteName is Obbligatory, Min 3 and Max 30 Char.");
document.modulo.name_site.focus();
return false;}

else if ((url_site == "") || (url_site == "undefined") || (url_site.indexOf("http://") == (-1)) || (url_sitelong <15) ){
alert("Url Home Page is Wrong.");
document.modulo.url_site.value = "http://";
document.modulo.url_site.select();
return false;}

else if ((url_redirect == "") || (url_redirect == "undefined") || (url_redirect.indexOf("http://") == (-1)) || (url_redirectlong <15) ){
alert("Url Redirect Page is Wrong.");
document.modulo.url_redirect.value = "http://";
document.modulo.url_redirect.select();
return false;}


else if ((breve_description == "") || (breve_description == "undefined") || (breve_descriptionlong <=9)) {
alert("Brief Description is Obbligatory, Min 10 Char.");
document.modulo.breve_description.focus();
return false;}

else if ((full_description == "") || (full_description == "undefined") || (full_descriptionlong <=9)) {
alert("Description Full is Obbligatory, Min 10 Char.");
document.modulo.full_description.focus();
return false;}


else if (!(email=="" || email == "undefined")){
if (!email_reg_exp.test(email)){
alert("Insert a Correct Mail.");
document.modulo.email.focus();
return false;}}		
{document.modulo.action = "Doorway_Generator/Generatore_di_Doorway.asp";
 document.modulo.submit();}}






function contat() {
var countert = document.modulo.contatore1.value = document.modulo.text_title.value.length;
if (countert >=130){
alert("Wrong Max Char Title.");
document.modulo.text_title.focus();
return false;}
if (countert >5){
index=1;
pindex=0;
endwhile=0
bodyt=document.modulo.text_title.value;
bodyl=bodyt.toLowerCase()
finalfs=bodyl.indexOf(".",bodyl.length-1);
if(finalfs>=0)
bodyl=bodyl.substring(0,bodyl.length-1);
while(index>=0){
index = bodyl.indexOf("<",0);
if (index >= 0){
pindex = bodyl.indexOf(">",index);
bodyank=bodyl.substring(index,pindex+1);
bodyl=bodyl.replace(bodyank," ");
bodyl=bodyl.replace(". "," ");
bodyl=bodyl.replace("@ "," ");
bodyl=bodyl.replace("<"," ");
bodyl=bodyl.replace(">"," ");}}
rm_ext_char="";
real_chr="";
for(i=0; i<bodyl.length; i++){
one_chr=bodyl.charCodeAt(i);
if ((one_chr>=65 && one_chr<=90) || (one_chr>=97 && one_chr<=122) || (one_chr>=48 && one_chr<=57)){
real_chr=bodyl.charAt(i);
}else{real_chr=" ";}
rm_ext_char=rm_ext_char+real_chr}
bodyl=rm_ext_char.split(" ");
rm_s_d="";
full_text="";
count=0
for(i=0; i<bodyl.length; i++){rm_s_d=bodyl[i];
if (rm_s_d.length>2){
count=count+1;
full_text=full_text+" "+rm_s_d;}}
if (document.modulo.key.value!=""){
kf=document.modulo.key.value;
rm_ext_char="";
real_chr="";
for(i=0; i<kf.length; i++){one_chr=kf.charCodeAt(i);
if ((one_chr>=65 && one_chr<=90) || (one_chr>=97 && one_chr<=122) || (one_chr>=48 && one_chr<=57)){
real_chr=kf.charAt(i);
}else{real_chr=" ";}
rm_ext_char=rm_ext_char+real_chr}
kf=rm_ext_char;
kslen=kf.split(" ");
if(kslen.length>1){kf=kf.toLowerCase()
countkf=0.1;
kftotal=0;
while(countkf>=0){if (countkf>=0.1 && countkf<0.2){
countkf = full_text.indexOf(kf,0);}else{
end=countkf+kf.length;
countkf = full_text.indexOf(kf,end);}
if (countkf >= 0){kftotal=kftotal+1;}}
if (kslen.length>count)
document.modulo.frequency_title.value=0;
else
document.modulo.frequency_title.value=math_round(kftotal/(count+1-kslen.length)*100,1);
}else{if (document.modulo.key.value!=""){
k1=document.modulo.key.value;
kl=k1.toLowerCase()
ks=k1+"s";
countk1=0;
for(i=0; i<bodyl.length; i++){rm_s_d=bodyl[i];
if (rm_s_d.length>1){if (rm_s_d==kl || rm_s_d==ks){countk1=countk1+1;}}}
document.modulo.frequency_title.value=math_round(countk1/count*100,1);}}}
return (false);}else{
document.modulo.frequency_title.value=0;}
return (false);}
function contad() {
var counterd = document.modulo.contatore2.value = document.modulo.text_description.value.length;
if (counterd >=250){
alert("Wrong Max Char Description.");
document.modulo.text_description.focus();
return false;}
if (counterd >5){
index=1;
pindex=0;
endwhile=0
bodyu=document.modulo.text_description.value;
bodym=bodyu.toLowerCase()
finalfs=bodym.indexOf(".",bodym.length-1);
if(finalfs>=0)
bodym=bodym.substring(0,bodym.length-1);
while(index>=0){index = bodym.indexOf("<",0);
if (index >= 0){pindex = bodym.indexOf(">",index);
bodyank=bodym.substring(index,pindex+1);
bodym=bodym.replace(bodyank," ");
bodym=bodym.replace(". "," ");
bodym=bodym.replace("@ "," ");
bodyl=bodym.replace("<"," ");
bodym=bodym.replace(">"," ");}}
rm_ext_char="";
real_chr="";
for(i=0; i<bodym.length; i++){one_chr=bodym.charCodeAt(i);
if ((one_chr>=65 && one_chr<=90) || (one_chr>=97 && one_chr<=122) || (one_chr>=48 && one_chr<=57)){
real_chr=bodym.charAt(i);}else{
real_chr=" ";}
rm_ext_char=rm_ext_char+real_chr}
bodym=rm_ext_char.split(" ");
rm_s_d="";
full_text="";
count=0
for(i=0; i<bodym.length; i++){rm_s_d=bodym[i];
if (rm_s_d.length>2){count=count+1;
full_text=full_text+" "+rm_s_d;}}
if (document.modulo.key.value!=""){
kf=document.modulo.key.value;
rm_ext_char="";
real_chr="";
for(i=0; i<kf.length; i++){one_chr=kf.charCodeAt(i);
if ((one_chr>=65 && one_chr<=90) || (one_chr>=97 && one_chr<=122) || (one_chr>=48 && one_chr<=57)){
real_chr=kf.charAt(i);}else{
real_chr=" ";}
rm_ext_char=rm_ext_char+real_chr}
kf=rm_ext_char;
kslen=kf.split(" ");
if(kslen.length>1){kf=kf.toLowerCase()
countkf=0.1;
kftotal=0;
while(countkf>=0){if (countkf>=0.1 && countkf<0.2){
countkf = full_text.indexOf(kf,0);}else{
end=countkf+kf.length;
countkf = full_text.indexOf(kf,end);}
if (countkf >= 0){kftotal=kftotal+1;}}
if (kslen.length>count)
document.modulo.frequency_description.value=0;
else
document.modulo.frequency_description.value=math_round(kftotal/(count+1-kslen.length)*100,1);
}else{if (document.modulo.key.value!=""){
k2=document.modulo.key.value;
kl=k2.toLowerCase()
ks=k2+"s";
countk2=0;
for(i=0; i<bodym.length; i++){rm_s_d=bodym[i];
if (rm_s_d.length>1){if (rm_s_d==kl || rm_s_d==ks){countk2=countk2+1;}}}
document.modulo.frequency_description.value=math_round(countk2/count*100,1);}}}
return (false);}
else{document.modulo.frequency_description.value=0;}  
return (false);}

function open_pop(name, url, left, top, width, height, toolbar, menubar, statusbar, scrollbar, resizable)
{toolbar_str = toolbar ? 'yes' : 'no';
menubar_str = menubar ? 'yes' : 'no';
statusbar_str = statusbar ? 'yes' : 'no';
scrollbar_str = scrollbar ? 'yes' : 'no';
resizable_str = resizable ? 'yes' : 'no';
window.open(url, name, 'left='+left+',top='+top+',width='+width+',height='+height+',toolbar='+toolbar_str+',menubar='+menubar_str+',status='+statusbar_str+',scrollbars='+scrollbar_str+',resizable='+resizable_str);}

function copia(area) {
var appoggio=eval("document."+area)
appoggio.focus()
appoggio.select()
intervallo=appoggio.createTextRange()
intervallo.execCommand("Copy")}