Problem mit CASE

[dave.p]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo!

Ich habe wieder mal ein Problem und komm einfach nicht drauf was hier schief läuft:

init:=        0;

CASE init OF

0:    Rton(ton_start_timer:=TRUE);
    Rton(ton_zeit:=R_P);
    IF Rton.ton_OK THEN Rton(ton_start_timer:=FALSE); R1_Signal:=TRUE;
        Rtof(tof_start_timer:=TRUE);
        Rtof(tof_zeit:=R_D);
        IF Rtof.tof_OK THEN Rtof(tof_start_timer:=FALSE) ; R1_Signal:=FALSE;     init:=1;
        END_IF
    END_IF

1:    Rton(ton_start_timer:=TRUE);
    Rton(ton_zeit:=R_P);
    IF Rton.ton_OK THEN Rton(ton_start_timer:=FALSE); R2_Signal:=TRUE;
        Rtof(tof_start_timer:=TRUE);
        Rtof(tof_zeit:=R_D);
        IF Rtof.tof_OK THEN Rtof(tof_start_timer:=FALSE); R2_Signal:=FALSE; init:=2;
        END_IF
    END_IF

2:    Rton(ton_start_timer:=TRUE);
    Rton(ton_zeit:=R_P);
    IF Rton.ton_OK THEN Rton(ton_start_timer:=FALSE); R3_Signal:=TRUE;
        Rtof(tof_start_timer:=TRUE);
        Rtof(tof_zeit:=R_D);
        IF Rtof.tof_OK THEN Rtof(tof_start_timer:=FALSE); R3_Signal:=FALSE; init:=3;
        END_IF
    END_IF

3:    Rton(ton_start_timer:=TRUE);
    Rton(ton_zeit:=R_P);
    IF Rton.ton_OK THEN Rton(ton_start_timer:=FALSE); R4_Signal:=TRUE;
        Rtof(tof_start_timer:=TRUE);
        Rtof(tof_zeit:=R_D);
        IF Rtof.tof_OK THEN Rtof(tof_start_timer:=FALSE); R4_Signal:=FALSE; init:=0;
        END_IF
    END_IF

END_CASE

Es sollten sich hier eigentlich nach der Reihe 4 Rüttler aktivieren, leider schaltet sich aber immer nur R1 ein und das Programm springt nie in den zweiten Abschnitt (auch nicht wenn ich den Wert online überschreibe).

Grüße

 

[Tigerente1974]

Weil vor der CASE-Anweisung

init := 0;

steht und damit zyklisch überschrieben wird!?!

 

[dave.p]

Zuviel Werbung?
-> Hier kostenlos registrieren

Alles klar, dämlicher Fehler, danke dir!