Salve a tutti!!!! Ieri navugando per caso ho trovato queso script!!!
<SCRIPT language=vbscript>
<!--
document.write("<font color='#000000' font size='1' font face='arial narrow'>")
d=weekday(date)
if d=1 then
today="Sterday"
elseif d=2 then
today="Sunday"
elseif d=3 then
today="Monday"
elseif d=4 then
today="Trewsday"
elseif d=5 then
today="Hevensday"
elseif d=6 then
today="Mersday"
elseif d=7 then
today="Highday"
end if
e=day(now+8)
m=month(date)
g=day(now)
if g>=1 and g<=22 and m=1 then
mon="Afteryule"
elseif g=23 and m=1 then
mon="Solmath"
e=1
elseif g>23 and m=1 then
mon="Solmath"
e=e+1
elseif g>=1 and g<=20 and m=2 then
mon="Solmath"
e=e+1
elseif g=21 and m=2 then
mon="Solmath"
e=30
elseif g=22 and m=2 then
mon="Rethe"
e=1
elseif g>=23 and m=2 then
mon="Rethe"
e=e-1
elseif g>=1 and g<=23 and m=3 then
mon="Rethe"
e=e-1
elseif g=24 and m=3 then
mon="Astron"
e=1
elseif g>=25 and m=3 then
mon="Astron"
elseif g=1 and m=4 then
mon="Astron"
elseif g>=2 and g<=22 and m=4 then
mon="Astron"
elseif g>=23 and m=4 then
mon="Thrimidge"
elseif g=1 and m=5 then
mon="Thrimidge"
elseif g>=2 and g<=22 and m=5 then
mon="Thrimidge"
elseif g=23 and m=5 then
mon="Forelithe"
e=1
elseif g>=24 and m=5 then
mon="Forelithe"
e=e+1
elseif g=1 and m=6 then
mon="Forelithe"
e=e+1
elseif g>=2 and g<=21 and m=6 then
mon="Forelithe"
e=e+1
elseif g=22 and m=6 then
e="First Lithe"
elseif g=23 and m=6 then
e="Midyear's Day"
elseif g=24 and m=6 then
e="Second Lithe"
elseif g>=25 and m=6 then
mon="Afterlithe"
e=e-2
elseif g=1 and m=7 then
mon="Afterlithe"
e=e-2
elseif g>=2 and g<=23 and m=7 then
mon="Afterlithe"
e=e-2
elseif g=24 and m=7 then
e=30
mon="Afterlithe"
elseif g>=25 and m=7 then
mon="Wedmath"
e=e-1
elseif g=1 and m=8 then
mon="Wedmath"
e=e-1
elseif g>=2 and g<=23 and m=8 then
mon="Wedmath"
e=e-1
elseif g>=24 and m=8 then
mon="Halimath"
elseif g>=1 and g<=22 and m=9 then
mon="Halimath"
elseif g>=23 and m=9 then
mon="Winterfilth"
elseif g>=1 and g<=22 and m=10 then
mon="Winterfilth"
elseif g=23 and m=10 then
mon="Blotmath"
e=1
elseif g>=24 and m=10 then
mon="Blotmath"
e=e+1
elseif g=1 and m=11 then
mon="Blotmath"
e=e+1
elseif g>=2 and g<=21 and m=11 then
mon="Blotmath"
e=e+1
elseif g=22 and m=11 then
mon="Foreyule"
e=1
elseif g>=23 and m=11 then
mon="Foreyule"
e=e+1
elseif g=1 and m=12 then
mon="Foreyule"
e=e+1
elseif g=>2 and g<=21 and m=12 then
mon="Foreyule"
e=e+1
elseif g=22 and m=12 then
e="First Yule"
elseif g=23 and m=12 then
e="Second Yule"
elseif g=>24 and m=12 then
mon="Afteryule"
end if
document.write("<font size='2' font color='ffffff' font face='arial narrow'>")
document.Write " " & today & ", " & e & " " & mon & " " & Year(date)+1018
//-->
document.write("<font size='2' font color='ffffff' font face='arial narrow'>")
document.Write " Shire Calendar"
</SCRIPT>
Si può trasformare questo vbscript in un javascript???? Se si come si fa???? Qualcuno mi può aiutare???
Grazie!!!!
<SCRIPT language=vbscript>
<!--
document.write("<font color='#000000' font size='1' font face='arial narrow'>")
d=weekday(date)
if d=1 then
today="Sterday"
elseif d=2 then
today="Sunday"
elseif d=3 then
today="Monday"
elseif d=4 then
today="Trewsday"
elseif d=5 then
today="Hevensday"
elseif d=6 then
today="Mersday"
elseif d=7 then
today="Highday"
end if
e=day(now+8)
m=month(date)
g=day(now)
if g>=1 and g<=22 and m=1 then
mon="Afteryule"
elseif g=23 and m=1 then
mon="Solmath"
e=1
elseif g>23 and m=1 then
mon="Solmath"
e=e+1
elseif g>=1 and g<=20 and m=2 then
mon="Solmath"
e=e+1
elseif g=21 and m=2 then
mon="Solmath"
e=30
elseif g=22 and m=2 then
mon="Rethe"
e=1
elseif g>=23 and m=2 then
mon="Rethe"
e=e-1
elseif g>=1 and g<=23 and m=3 then
mon="Rethe"
e=e-1
elseif g=24 and m=3 then
mon="Astron"
e=1
elseif g>=25 and m=3 then
mon="Astron"
elseif g=1 and m=4 then
mon="Astron"
elseif g>=2 and g<=22 and m=4 then
mon="Astron"
elseif g>=23 and m=4 then
mon="Thrimidge"
elseif g=1 and m=5 then
mon="Thrimidge"
elseif g>=2 and g<=22 and m=5 then
mon="Thrimidge"
elseif g=23 and m=5 then
mon="Forelithe"
e=1
elseif g>=24 and m=5 then
mon="Forelithe"
e=e+1
elseif g=1 and m=6 then
mon="Forelithe"
e=e+1
elseif g>=2 and g<=21 and m=6 then
mon="Forelithe"
e=e+1
elseif g=22 and m=6 then
e="First Lithe"
elseif g=23 and m=6 then
e="Midyear's Day"
elseif g=24 and m=6 then
e="Second Lithe"
elseif g>=25 and m=6 then
mon="Afterlithe"
e=e-2
elseif g=1 and m=7 then
mon="Afterlithe"
e=e-2
elseif g>=2 and g<=23 and m=7 then
mon="Afterlithe"
e=e-2
elseif g=24 and m=7 then
e=30
mon="Afterlithe"
elseif g>=25 and m=7 then
mon="Wedmath"
e=e-1
elseif g=1 and m=8 then
mon="Wedmath"
e=e-1
elseif g>=2 and g<=23 and m=8 then
mon="Wedmath"
e=e-1
elseif g>=24 and m=8 then
mon="Halimath"
elseif g>=1 and g<=22 and m=9 then
mon="Halimath"
elseif g>=23 and m=9 then
mon="Winterfilth"
elseif g>=1 and g<=22 and m=10 then
mon="Winterfilth"
elseif g=23 and m=10 then
mon="Blotmath"
e=1
elseif g>=24 and m=10 then
mon="Blotmath"
e=e+1
elseif g=1 and m=11 then
mon="Blotmath"
e=e+1
elseif g>=2 and g<=21 and m=11 then
mon="Blotmath"
e=e+1
elseif g=22 and m=11 then
mon="Foreyule"
e=1
elseif g>=23 and m=11 then
mon="Foreyule"
e=e+1
elseif g=1 and m=12 then
mon="Foreyule"
e=e+1
elseif g=>2 and g<=21 and m=12 then
mon="Foreyule"
e=e+1
elseif g=22 and m=12 then
e="First Yule"
elseif g=23 and m=12 then
e="Second Yule"
elseif g=>24 and m=12 then
mon="Afteryule"
end if
document.write("<font size='2' font color='ffffff' font face='arial narrow'>")
document.Write " " & today & ", " & e & " " & mon & " " & Year(date)+1018
//-->
document.write("<font size='2' font color='ffffff' font face='arial narrow'>")
document.Write " Shire Calendar"
</SCRIPT>
Si può trasformare questo vbscript in un javascript???? Se si come si fa???? Qualcuno mi può aiutare???
Grazie!!!!