' Nachfolgendes VB-Skript definiert einen Block mit zwei
' Eingängen und drei Ausgängen
'
' In den folgenden Zeilen werden die Namen der Ein- und Ausgänge
' festgelegt (kann entfallen, dann werden Standardnamen gewählt)
'
' Input(1) = "Steuereingang"
' Input(2) = "Dateneingang"
'
' Output(1) = "Datenausgang"
' Output(2) = "Datenausgang (Absolutwert)"
' Output(3) = "Datenausgang (quadriert)"

' Jetzt folgt die eigentliche Blockfunktion 'main'

function main(In1, In2)    ' Block hat 2 Eingänge!
dim Output(3)            ' Block hat 3 Ausgänge!

 ' Jetzt folgt die eigentliche Zuweisung an die Ausgänge
' In diesem Beispiel wird der Dateneingang des Blocks
' mit 2 multipliziert, falls am Steuereingang LOW-Pegel
' anliegt, ansonsten wird der mit -3 multipliziert.
' Die anderen beiden Blockausgänge werden durch Absolutwertbildung
' bzw. Quadrierung des ersten Datenausgangs ermittelt.

if In1 2.5 then
Output(1) = 2 * In2
else
Output(1) = -3 * In2
end if

Output(2) = abs(Output(1))
Output(3) = Output(1) * Output(1)

 ' Zuweisung der Ausgänge an den Rückgabewert der Funktion
main = Output
end function