select='a0.gif'
var akt_cash = 150
var var1=0, var2=0, var3=0
var vpower=0, vfarm=0, vstr=0
var vpol=20, vfir=20, vfoo=30, vhos=40
var tornado_there=0

//restore images on the playing field
function bildn(fl,imagen){
if (fl==1) {altes = document.images[imagen].src
document.images[imagen].src = wahl('check')}
if (fl==0) {document.images[imagen].src = altes}
}

//GetRoot function
//copied from the minesweeper JavaScript game!!!
function GetRoot() {
  curHref   = self.location.href;
  lastSlash = curHref.lastIndexOf( "/");
  return   curHref.substring( 0, lastSlash + 1);
}
var pfad  = GetRoot();

//makes the statusbars of residentials, commercials and industry
function balken(){
middle=Math.floor((var1+var2+var3)/3)
document.images[(middle-var1)*6+138].src='a1.gif'
document.images[(middle-var1+1)*6+138].src='off.gif'
document.images[(middle-var1-1)*6+138].src='off.gif'
document.images[(middle-var2)*6+140].src='a2.gif'
document.images[(middle-var2+1)*6+140].src='off.gif'
document.images[(middle-var2-1)*6+140].src='off.gif'
document.images[(middle-var3)*6+142].src='a3.gif'
document.images[(middle-var3+1)*6+142].src='off.gif'
document.images[(middle-var3-1)*6+142].src='off.gif'
}


//tornado
function tornado(){
var tornado_now=(Math.floor(Math.random()*10));
if (tornado_now==1) {
tornado_there=(Math.floor(Math.random()*100));
t_altes=document.images[tornado_there].src
document.varis.demand.value='TORNADO!!!'
document.images[tornado_there].src='tornado.gif'
setTimeout("killaltes(t_altes);document.images[tornado_there].src='3.gif';if (pfad+'a'>t_altes) {document.images[tornado_there].src=t_altes}",2000);
}
}

//recount destroyed fields
function killaltes(alt){
if (alt==pfad+'a11.gif') {var1=var1-1}
if (alt==pfad+'a12.gif') {var1=var1-2}
if (alt==pfad+'a13.gif') {var1=var1-3}
if (alt==pfad+'a14.gif') {var1=var1-4}
if (alt==pfad+'a21.gif') {var2=var2-1}
if (alt==pfad+'a22.gif') {var2=var2-2}
if (alt==pfad+'a23.gif') {var2=var2-3}
if (alt==pfad+'a24.gif') {var2=var2-4}
if (alt==pfad+'a31.gif') {var3=var3-1}
if (alt==pfad+'a32.gif') {var3=var3-2}
if (alt==pfad+'a33.gif') {var3=var3-3}
if (alt==pfad+'a34.gif') {var3=var3-4}
if (alt==pfad+'a4.gif') {vstr=vstr-15}
if (alt==pfad+'a5.gif') {vpower=vpower-20}
if (alt==pfad+'a6.gif') {vfarm=vfarm-10}
if (alt==pfad+'a7.gif') {vpol=vpol-30}
if (alt==pfad+'a8.gif') {vfir=vfir-30}
if (alt==pfad+'a9.gif') {vfoo=vfoo-40}
if (alt==pfad+'a10.gif') {vhos=vhos-50}
}

//the selection of the mouse
function wahl(art){
if (art == 'check') {return select}
select=art+'.gif'
document.status.src = select
statchk(pfad+select)
return select
}

//change the status of field, cash
function aktion(){
if (select=='a0.gif') {document.status.src = altes;statchk(altes)}
if (altes != pfad+select) {
if (akt_cash > 0) {
// reseting the values of destroyed fields
killaltes(altes)
if (altes==pfad+'4.gif') {akt_cash=akt_cash-4}
if (altes==pfad+'5.gif') {akt_cash=akt_cash-6}
if (altes==pfad+'6.gif') {akt_cash=akt_cash-5}
// action on fields
if (select=='a1.gif') {altes = 'a1.gif';akt_cash=akt_cash-10;document.varis.cash.value=akt_cash}
if (select=='a2.gif') {altes = 'a2.gif';akt_cash=akt_cash-15;document.varis.cash.value=akt_cash}
if (select=='a3.gif') {altes = 'a3.gif';akt_cash=akt_cash-20;document.varis.cash.value=akt_cash}
if (select=='a4.gif') {altes = 'a4.gif';vstr=vstr+15;akt_cash=akt_cash-5;document.varis.cash.value=akt_cash}
if (select=='a5.gif') {altes = 'a5.gif';vpower=vpower+20;akt_cash=akt_cash-40;document.varis.cash.value=akt_cash}
if (select=='a6.gif') {altes = 'a6.gif';vfarm=vfarm+10;akt_cash=akt_cash-25;document.varis.cash.value=akt_cash}
if (select=='a7.gif') {altes = 'a7.gif';vpol=vpol+30;akt_cash=akt_cash-70;document.varis.cash.value=akt_cash}
if (select=='a8.gif') {altes = 'a8.gif';vfir=vfir+30;akt_cash=akt_cash-70;document.varis.cash.value=akt_cash}
if (select=='a9.gif') {altes = 'a9.gif';vfoo=vfoo+40;akt_cash=akt_cash-90;document.varis.cash.value=akt_cash}
if (select=='a10.gif') {altes = 'a10.gif';vhos=vhos+50;akt_cash=akt_cash-120;document.varis.cash.value=akt_cash}
}
}
}

//statusfield check
function statchk(wert){
document.varis.stat.value='none'
if (wert > pfad+'a1') {document.varis.stat.value='Siedlungen'}
if (wert > pfad+'a2') {document.varis.stat.value='Industrie'}
if (wert > pfad+'a3') {document.varis.stat.value='Handel'}
if (wert == pfad+'a4.gif') {document.varis.stat.value='Straßen'}
if (wert == pfad+'a5.gif') {document.varis.stat.value='Kraftwerk'}
if (wert == pfad+'a6.gif') {document.varis.stat.value='Bauernhof'}
if (wert == pfad+'a7.gif') {document.varis.stat.value='Polizei'}
if (wert == pfad+'a8.gif') {document.varis.stat.value='Feuerwehr'}
if (wert == pfad+'a9.gif') {document.varis.stat.value='Fußballstadion'}
if (wert == pfad+'a10.gif') {document.varis.stat.value='Krankenhaus'}
if (wert == pfad+'1.gif') {document.varis.stat.value='Steppe (0)'}
if (wert == pfad+'2.gif') {document.varis.stat.value='Grass (0)'}
if (wert == pfad+'3.gif') {document.varis.stat.value='Wüste (0)'}
if (wert == pfad+'4.gif') {document.varis.stat.value='See (4)'}
if (wert == pfad+'5.gif') {document.varis.stat.value='Berge (6)'}
if (wert == pfad+'6.gif') {document.varis.stat.value='Wald (5)'}
}

//playing routine
function playing(){
for (var n=0;n<100;n++) {
i=Math.floor(Math.random()*5)
if (vhos<var1){document.varis.demand.value='Krankenhaus fehlt'} else {
if (vfoo<var1){document.varis.demand.value='Fußballst. fehlt'} else {
if (vfir<var1){document.varis.demand.value='Feuerwehr fehlt'} else {
if (vpol<var1){document.varis.demand.value='Polizei erforderlich'} else {
if (vpower<var1+var2+var3){document.varis.demand.value='Kraftwerk fehlt'} else {
if (vfarm<var1-1){document.varis.demand.value='Bauernhof fehlt'} else {
if (vstr<var1+var2+var3){document.varis.demand.value='Straßen benötigt'} else {
if (i==1) {
document.varis.demand.value='expandiere!'
if (var1>var2+4){document.varis.demand.value='wenig Industrie'} else {
if (var1>var3+4){document.varis.demand.value='wenig Handel'} else {
if (document.images[n].src==pfad+'a13.gif') {var1=var1+1;document.images[n].src=pfad+'a14.gif'}
if (document.images[n].src==pfad+'a12.gif') {var1=var1+1;document.images[n].src=pfad+'a13.gif'}
if (document.images[n].src==pfad+'a11.gif') {var1=var1+1;document.images[n].src=pfad+'a12.gif'}
if (document.images[n].src==pfad+'a1.gif') {var1=var1+1;document.images[n].src=pfad+'a11.gif'}
}
}
if (var2>var1+4){document.varis.demand.value='wenig Siedlungen'} else {
if (var2>var3+4){document.varis.demand.value='wenig Handel'} else {
if (document.images[n].src==pfad+'a23.gif') {var2=var2+1;document.images[n].src=pfad+'a24.gif'}
if (document.images[n].src==pfad+'a22.gif') {var2=var2+1;document.images[n].src=pfad+'a23.gif'}
if (document.images[n].src==pfad+'a21.gif') {var2=var2+1;document.images[n].src=pfad+'a22.gif'}
if (document.images[n].src==pfad+'a2.gif') {var2=var2+1;document.images[n].src=pfad+'a21.gif'}
}
}
if (var3>var2+4){document.varis.demand.value='wenig Industrie'} else {
if (var3>var3+4){document.varis.demand.value='wenig Siedlungen'} else {
if (document.images[n].src==pfad+'a33.gif') {var3=var3+1;document.images[n].src=pfad+'a34.gif'}
if (document.images[n].src==pfad+'a32.gif') {var3=var3+1;document.images[n].src=pfad+'a33.gif'}
if (document.images[n].src==pfad+'a31.gif') {var3=var3+1;document.images[n].src=pfad+'a32.gif'}
if (document.images[n].src==pfad+'a3.gif') {var3=var3+1;document.images[n].src=pfad+'a31.gif'}
}}}}}}}
}}}}
setTimeout("tornado();balken();akt_cash=akt_cash+var1;document.varis.cash.value=akt_cash;playing()",2500)
}