scripts to fade in and fade out lamps

# volierenlicht.rules: 
rule "Voliere Sonnenuntergang"
        when
                Time cron "0 15 21 1/1 * ? *"
        then
                logInfo("Volierendimmer","Volierendimmer: Sonnenuntergang")
                callScript("sonnenuntergang.script")
        end

rule "Voliere Sonnenaufgang"
        when
                Time cron "0 45 6 1/1 * ? *"
        then
                logInfo("Volierendimmer","Volierendimmer: Sonnenaufgang")
                callScript("sonnenaufgang")
        end

rule "Voliere Mittagspause Start"
        when
                Time cron  "0 0 12 1/1 * ? *"
        then
                logInfo("Volierendimmer","Volierendimmer: Mittagpause beginnt")
                callScript("mittagstart")
        end

rule "Voliere Mittagspause Ende"
        when
                Time cron  "0 0 12 1/1 * ? *"
        then
                logInfo("Volierendimmer","Volierendimmer: Mittagpause endet")
                callScript("mittagend")
        end
       
# mittagstart.script:
var Number FadeOutDimmer
FadeOutDimmer=Volierendimmer.state
while(FadeOutDimmer>0){
        FadeOutDimmer=FadeOutDimmer-10
        logInfo("Volierendimmer", "Volierendimmer Mittag beginnt: " + FadeOutDimmer)
        sendCommand(Volierendimmer,FadeOutDimmer)
    Thread::sleep(30000)
}

# mittagende.script:
var Number FadeInDimmer
FadeInDimmer=Volierendimmer.state
while(FadeInDimmer<100){
        FadeInDimmer=FadeInDimmer+10
        logInfo("Volierendimmer", "Volierendimmer Mittagende: " + FadeInDimmer)
        sendCommand(Volierendimmer,FadeInDimmer)
    Thread::sleep(30000)
}

# sonnenaufgang.script:
var Number FadeInDimmer
if (Volierendimmer.state != 0) {
        logInfo("Volierendimmer", "Volierendimmer Sonnenaufgang: Setze Dimmer auf 0.")
        sendCommand(Volierendimmer, 0) }
FadeInDimmer=Volierendimmer.state
while(FadeInDimmer<100){
        FadeInDimmer=FadeInDimmer+10
        logInfo("Volierendimmer", "Volierendimmer Sonnenaufgang: " + FadeInDimmer)
        sendCommand(Volierendimmer,FadeInDimmer)
    Thread::sleep(120000)
}

sonnenuntergang.script:
var Number FadeOutDimmer
FadeOutDimmer=Volierendimmer.state
while(FadeOutDimmer>0){
        FadeOutDimmer=FadeOutDimmer-10
        logInfo("Volierendimmer", "Volierendimmer Sonnenunterganng: " + FadeOutDimmer)
        sendCommand(Volierendimmer,FadeOutDimmer)
    Thread::sleep(120000)
}