public vzdalenost, plusminus, berstat(35), pismenko
private sub window_onload()
opak=0
window.status="Beruščina stránka"
document.body.style.cursor="beruska.cur"
nadpis.style.letterSpacing=-17
window.setinterval "mezery",100
vzdalenost=-17
plusminus= "+"
pismenko=1
berstat(1)="     B"
berstat(2)="     Be"
berstat(3)="     Ber"
berstat(4)="     Beru"
berstat(5)="     Beruš"
berstat(6)="     Berušč"
berstat(7)="     Berušči"
berstat(8)="     Beruščin"
berstat(9)="     Beruščina"
berstat(10)="     Beruščina "
berstat(11)="     Beruščina s"
berstat(12)="     Beruščina st"
berstat(13)="     Beruščina str"
berstat(14)="     Beruščina strá"
berstat(15)="     Beruščina strán"
berstat(16)="     Beruščina stránk"
berstat(17)="     Beruščina stránka"
berstat(18)="     Beruščina stránka"
berstat(19)="     Beruščina stránka"
berstat(20)="     Beruščina stránka"
berstat(21)="     Beruščina stránka"
berstat(22)="     Beruščina stránka"
berstat(23)="     Beruščina stránka"
berstat(24)="     Beruščina stránka"
berstat(25)="     Beruščina stránka"
berstat(26)="     Beruščina stránka"
berstat(27)="     Beruščina stránka"
berstat(28)="     Beruščina stránka"
berstat(29)="     Beruščina stránka"
berstat(30)="     Beruščina stránka"
berstat(31)="     Beruščina stránka"
berstat(32)="     Beruščina stránka"
berstat(33)="     Beruščina stránka"
berstat(34)="     Beruščina stránka"
berstat(35)="     Beruščina stránka"
end sub
sub mezery()
if plusminus = "+" then vzdalenost = vzdalenost + 1
if plusminus = "-" then vzdalenost = vzdalenost - 1
if vzdalenost = 10 then plusminus = "-"
if vzdalenost = -17 then plusminus = "+"
nadpis.style.letterSpacing=vzdalenost
if pismenko = 36 then pismenko = 1
window.status = berstat(pismenko)
document.title = berstat(pismenko)
pismenko = pismenko + 1
end sub