Beispiel-Code

VAR
     nStateInitEnvironment     : INT;
     fbXplanarEnvironment      : FB_TcIoXPlanarEnvironment;  
     fbVisuXPlanarDiag         : FB_XPlanarUtilityVisu;  
     ipXpu                     : I_TcIoXplanarProcessingUnit; 
END_VAR 
CASE nStateInitEnvironment OF  
0: // Init Xplanar Environment  
     IF fbXplanarEnvironment.Init(TRUE) THEN  
          fbXplanarEnvironment.Init(FALSE); 
          ipXpu := fbXplanarEnvironment.XpuTcIo(1);  
          nStateInitEnvironment := nStateInitEnvironment + 1;  
     END_IF

1: // Init Visu  
     fbVisuXPlanarDiag.Environment := fbXplanarEnvironment;  
     nStateInitEnvironment := nStateInitEnvironment + 1;

ELSE  
     fbVisuXPlanarDiag.Cycle();  
END_CASE
Beispiel-Code 1:

Die Parameterliste Param_TcIoXPlanarEnvironment muss an die Konfiguration angepasst werden. Jeder einzelne Parameter muss größer oder mindestens gleich der Konfiguration sein, um sicherzustellen, dass die Initialisierung von FB_TcIoXPlanarEnvironment erfolgreich abgeschlossen werden kann.