Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- onDlugoscCyklu(IN:=xtonON AND xMANCHESTER = xManchesterOld , PT:=tBlink+t#3ms , Q=> , ET=> );
- rttonDlugoscCyklu(CLK:=tonDlugoscCyklu.Q , Q=> );
- xManchesterOld := xMANCHESTER;
- xUpdated:=FALSE;
- (*KROK DRUGI- OPERACJA ZAMIANY MANCHESTERU NA DANE*)
- CASE iLoading OF
- 0: IF rtGetClock.Q THEN (*oczekiwanie*)
- aBoolData_1[Index]:= xMANCHESTER;
- Index:=Index+1;
- IF Index > 0 THEN
- xBUSY:= TRUE;
- eError:=0;
- xReady:=FALSE;
- iLoading:=iLoading+1;
- END_IF;
- END_IF;
- 1: IF rtGetClock.Q THEN (*oczekiwanie*)
- aBoolData_1[Index]:= xMANCHESTER;
- Index:=Index+1;
- xBUSY:= TRUE;
- ELSIF ftGetClock.Q THEN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement