All Downloads are FREE. Search and download functionalities are using the official Maven repository.

data.nodescript.application.ReadyServoTurn.ReadyServoTurn-CrossingsServoLights.nodescript Maven / Gradle / Ivy

## Dieses Script erstellt Accessory, Macro und ServoPort für Bahnübergang mit 2 Servo.
##  
## history: 2022-08-08 A.Kuhtz, erste Version
##
##
## -------------- 1. Select Target
##application(text:de="Bahnübergang mit Servo und Blinklichtern", text:en="Crossing with 2 servo and warning lights", text:nl="Crossing with 2 servo and warning lights")
##instruction(text:de="Konfiguration von Bahnübergang mit Servo und Blinklichtern", text:en="Configuration of crossing with 2 servo and warning lights")
##
##input($AccessoryName:string, text:de="Name des Accessory: ", text:en="Name of the Accessory: ", default="Übergang")
##input($AccessoryNumber:accessory, text:de="Nummer des verwendeten Accessory", text:en="Number of the used Accessory", default=0)
##input($MacroNumber:macro, text:de="Nummer des ersten Macros (Benötigt = Anzahl Positionen)", text:en="Number of the first macro (total = number of positions)", default=0)
##input($ServoCount:int, text:de="Anzahl der Servos", text:en="Number of the servos", default=1)
##input($ServoPortNumber:servo, text:de="Nummer des ServoPort", text:en="Number of the servo port", default=0)
##input($ServoPositionCount:int, text:de="Anzahl der ServoPositionen", text:en="Number of servo positions", default=2)
##input($ServoName:string, text:de="Name des Servo: ", text:en="Name of the servo: ", default="Schranke")
##input($SwitchPortNumber:switch, text:de="Nummer des Schaltausgang", text:en="Number of the switch port", default=0)
##input($SwitchName:string, text:de="Name des Schaltausgang: ", text:en="Name of the switch port: ", default="Blinklicht")

#set ($accessoryOffset = 0)
#set ($macroOffset = $MacroNumber)
#set ($currentServo = ${ServoPortNumber})
#set ($currentSwitch = ${SwitchPortNumber})

## calculate the number of macros that are required
#set($macroCount  = 2 - 1)


#foreach ($currentCrossingIndex in [0..1])

    ### Define the servos
    #set ($servoA = ${ServoPortNumber})
    #set ($servoB = ${ServoPortNumber} + 1)
    ### Define the lights macro
    #set ($lightsMacroNumber = 2 + $macroOffset)

    ### -------------- 3. execute part of the script

    #set($currentAccessory = $AccessoryNumber + $accessoryOffset)

    ### Set label of Accessories
set accessory ${currentAccessory} name="${AccessoryName}_${accessoryOffset}"

    ### Set label of ServoPort
set servo $servoA name="${ServoName}_${servoA}"
set servo $servoB name="${ServoName}_${servoB}"

    ########################################
    #set($firstMacroNumber = $macroOffset)

    #foreach ($currentMacroIndex in [0..$macroCount])

        #set($currentMacroNum = $currentMacroIndex + $firstMacroNumber)

        ## calculate the target position
        #set($targetPosition = 0)
        #set($targetPositionName = "öffnen")
        #if ($currentMacroIndex == $macroCount)
            #set($targetPosition = 100)
            #set($targetPositionName = "schliessen")
        #end

        ### Set label of Macro
    set macro ${currentMacroNum} name="${AccessoryName}_${accessoryOffset}_${targetPositionName}"

        ################################################
        ### configure macro
        ###
    select macro ${currentMacroNum}
    config macro repeat=1 slowdown=1

        ### stop all macro
        #foreach ($macroNum in [0..$macroCount])

            #set($stopMacroNum = $macroNum + $firstMacroNumber)
            #if ($stopMacroNum != $currentMacroNum)
            add step ptype=macro action=stop number=${stopMacroNum}
            #end ## #if
        #end ## #foreach

    add step ptype=macro action=start number=${lightsMacroNumber}
        #if($targetPosition == 100)
        add step delay=50 ptype=delay
        #end

    add step ptype=servo action=start target=$targetPosition number=$servoA
    add step ptype=servo action=start target=$targetPosition number=$servoB
    add step ptype=moveServoQuery number=$servoA
    add step ptype=moveServoQuery number=$servoB

        #if($targetPosition == 0)
        add step delay=50 ptype=delay
        add step ptype=macro action=stop number=${lightsMacroNumber}
        add step delay=10 ptype=switch action=off number=${currentSwitch}
        #end

    #end


    ### Set label of Macro
set macro ${lightsMacroNumber} name="${AccessoryName}_${accessoryOffset}_Blinklicht"

    ################################################
    ### configure macro
    ###
select macro ${lightsMacroNumber}
config macro repeat=0 slowdown=1

add step ptype=switch action=on number=${currentSwitch}
add step delay=50 ptype=switch action=off number=${currentSwitch}

    ### Define Accessory
select accessory ${currentAccessory}
config accessory startup restore
    #foreach ($currentMacroIndex in [0..$macroCount])

        #set($currentMacroNum = $currentMacroIndex + $firstMacroNumber)

    add aspect $currentMacroIndex macronumber=$currentMacroNum
    #end

    #set ($accessoryOffset = $accessoryOffset + 1)
    #set ($macroOffset = $macroOffset + 2 + 1)
    #set ($currentServo = $currentServo + 2)

    #set ($ServoPortNumber = $ServoPortNumber + 2)
    #set ($currentSwitch = $currentSwitch + 1)
#end




© 2015 - 2024 Weber Informatics LLC | Privacy Policy