2 Instruction Descriptions
2-474
NJ-series Instructions Reference Manual (W502)
IF ( (StcALIFOStat=TRUE) AND (preStcALIFOStat=FALSE) ) THEN
StackLIFO(
InOut :=StcA[0],
OutVal:=StcAOutVal,
Size :=StcASize,
Num :=StcANum,
ENO =>StcALIFO_OK);
IF (StcALIFO_OK=TRUE) THEN
StcALIFONormalEnd:=TRUE;
ELSE
StcALIFOErrorEnd:=TRUE;
END_IF;
END_IF;
preStcALIFOStat:=StcALIFOStat;
IF ( (StcAInsStat=TRUE) AND (preStcAInsStat=FALSE) ) THEN
StcAInsVal:=UINT#5555;
StcAOffset:=UINT#2;
StackIns(
In :=StcAInsVal,
InOut:=StcA[0],
Size :=StcASize,
Num :=StcANum,
Offset:=StcAOffset,
ENO =>StcAIns_OK);
IF (StcAIns_OK=TRUE) THEN
StcAInsNormalEnd:=TRUE;
ELSE
StcAInsErrorEnd:=TRUE;
END_IF;
END_IF;
preStcAInsStat:=StcAInsStat;
// Remove data with StackLIFO instruction.
// Insert data with StackIns instruction.
// Value to insert into stack
// First element in stack array
// Number of stack elements
// Number of stored elements
// Offset at which to insert value
// Normal end flag
// Normal end flag
// Processing after error end
// First element in stack array
// Value removed from stack
// Number of stack elements
// Number of stored elements
// Normal end flag
// Processing after normal end
// Processing after error end