# Count number of executing Immediate Execution TC Files VAR_ImmediateTcFileCount := 0; # # TC SEQ 0 if ((NCDD08Z3 <> "TCSEQ_IDLE") land (NCDD08Z2 == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # # TC SEQ 1 if ((NCDNBE03 <> "TCSEQ_IDLE") land (NCDNBE02 == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # # TC SEQ 2 if ((NCDNBE0C <> "TCSEQ_IDLE") land (NCDNBE0B == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # # TC SEQ 3 if ((NCDNBE0M <> "TCSEQ_IDLE") land (NCDNBE0L == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # # TC SEQ 4 if ((NCDNBE0X <> "TCSEQ_IDLE") land (NCDNBE0W == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # # TC SEQ 5 if ((NCDNBE16 <> "TCSEQ_IDLE") land (NCDNBE15 == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # # TC SEQ 6 if ((NCDNBE1F <> "TCSEQ_IDLE") land (NCDNBE1E == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # # TC SEQ 7 if ((NCDNBE1R <> "TCSEQ_IDLE") land (NCDNBE1P == 1)) then VAR_x := VAR_ImmediateTcFileCount; VAR_ImmediateTcFileCount := VAR_x + 1; endif; # return (VAR_ImmediateTcFileCount);