Sprinklersysteem V2

pi=3.141592653589793 ; 1
 //  pi
secondenperuur=3600 ; seconde/uur
 //Aantal seconden in een uur
Breedte=slider(100,0,200) ; meter
 //  onvolledig
Hoogte=slider(50,0,200) ; meter
 //  onvolledig
Aantalkuubwater=Breedte*Hoogte*Benodigdwater/Rendement ; meter3
 //  onvolledig
Sprinklerprijs=19 ; euro
 //  De prijs van een sprinkler
Debiet=0.0025 ; meter3/seconde
 //Het debiet van het systeem
Aantalbuizen=slider(5,0,10) ; 1
 //  Het aantal buizen van een te verleggen verzameling van sprinklers
Aantalsprinklers=Aantalbuizen+1 ; 1
 //  Aantal sprinklers
Aantalkeerverleggen=(Breedte*Hoogte)/(Rendement*pi*Straalsprinkler*Straalsprinkler*Aantalsprinklers) ; 1
 //  Het aantal keer dat een verzameling van sprinklers wordt verlegd
Nulstraal=slider(10,0,15) ; meter
 //Theoretisch maximum van de straal van de sprinkler
Straalsprinkler=pow(0.95,Aantalsprinklers)*Nulstraal ; meter
 //  De straal die een sprinkler kan behalen
Totaletijdbesproeien=Tijdeenkeerbesproeien*Aantalkeerverleggen ; seconde
 //  De totale tijd die het kost om een oppervlakte te besproeien
Tijdeenkeerbesproeien=(Benodigdwater*Aantalsprinklers*Straalsprinkler*Straalsprinkler*pi)/Debiet ; seconde
 //  De tijd die nodig is om een stuk grond te besproeien
Aansluittijd=30 ; seconde
 //De tijd die nodig is om een buis aan te slutien
Totaletijdverleggen=((4*Straalsprinkler*Aantalbuizen)/Loopsnelheid+Aansluittijd*Aantalbuizen)*Aantalkeerverleggen ; seconde
 //  De totale tijd die nodig is om het systeem te verleggen
Loopsnelheid=2 ; meter/seconde
 //  De loopsnelheid van de boer
Totaletijd=Totaletijdbesproeien+Totaletijdverleggen ; seconde
 //  De totale tijd die nodig is om het systeem in gebruik te nemen
Rendement=0.827 ; 1
 //  Het rendement van de homogeniteit
Benodigdwater=0.015 ; meter
 //  Het water dat een vierkante meter gewas nodig heeft
Buizenprijs=7 ; euro
 //  De prijs van een buis
Loonkostenperuur=9.67 ; euro/uur
 //  De kosten die worden gemaakt om het loon van de boer per uur te vergoeden
Loonkosten=Totaletijd/secondenperuur*Loonkostenperuur ; euro/uur
 //  De kosten die worden gemaakt om het loon van de boer te vergoeden
Waterprijs=1.54 ; euro/meter3
 //De kosten van het water
Materiaalkosten=(Waterprijs*Aantalkuubwater)+Buizenprijs*Aantalbuizen+Sprinklerprijs*Aantalsprinklers
 //  De kosten die moeten worden gemaakt om het materiaal aan te schaffen
Totalekosten=Materiaalkosten+Loonkosten ; euro
 //  De totale kosten om het systeem te gebruiken
Tijd=Totaletijd ; seconde
 //Nodig voor display
Sproeitijd=Totaletijdbesproeien ; seconde
 //Nodig voor display
Verlegtijd=Totaletijdverleggen ; seconde
 //Nodig voor display