Arithmetic instructions
491
Part III FP Instructions
ST
IF DF(FIFO_Initalize) THEN
(* Create the FIFO buffer *)
F115_FIFT( n_Number:= Size_Of_Var(FIFO.Data), d1_Start:= FIFO.Size);
REPEAT
(* Initialize FIFO buffer with values *)
Write_Data:=Write_Data+1;
F117_FIFW( s:= Write_Data, d1_Start:= FIFO.Size);
UNTIL(FIFO.Number>=FIFO.Size)
END_REPEAT;
END_IF;
IF DF( FIFO_Write) THEN
(* Write value of Write_Data to FIFO buffer *)
(* at rising edge of FIFO_Write *)
F117_FIFW( s:= Write_Data, d1_Start:= FIFO.Size);
END_IF;
IF DF(FIFO_Read) THEN
(* Read value from FIFO buffer *)
(* at rising edge of FIFO_Read *)
F116_FIFR( d1_Start:= FIFO.Size, d2:= Read_Data);
END_IF;