What am I doing wrong here?

I get this out put with this logic - just a single line with multiple tools and calling the tools at different places within the program

IF[#592EQ1211]GOTO1211 (RESTART FOR : T12)

# -------------------------------------------------------------------------- 

# Buffer 1 - Tool Recall Table
# --------------------------------------------------------------------------
wc1         : 1     #Initial count for write buffer 1
rc1         : 1     #Initial count for read buffer 1
size1     : 0     #Buffer 1 size
b1_tool_number    : 0          #Saved Tool number at tool change
b1_ntooltrack    : 0          #Saved tool count
fbuf 1 0 2 0 0    

# Format of Recall List Variables
fmt ""     4    b1_tool_number          #Saved Tool number at tool change
fmt ""     4    b1_ntooltrack          #Saved tool count
fmt ""     5  ptool_count3
recalltable_out    : 1 #Recall Table is written to NC code - flag

pWriteBuffer_1 # Write Tool Buffer at every opertion (@ pre-read)
    b1_tool_number = abs(t$)          #Saved Tool number at tool change
    b1_ntooltrack = ptool_count3      #Tool call count at tool change
    b1_tool_number = wbuf(1,wc1)
    
pRecallTable    #Writes standalone recall table
    size1 = rbuf(1,0)
    rc1 = 1
    recalltable_out = 1
    while rc1 < size1, # Loop to find
        [
        b1_tool_number = rbuf(1, rc1)
        b1_ntooltrack = rbuf(1, rc1)
        ]
            if recalltable_out = 1, "IF[#592EQ", *b1_tool_number, *b1_ntooltrack,"]", "GOTO", *b1_tool_number, *b1_ntooltrack, "(RESTART FOR", ":", "T", *b1_tool_number, ")", e$
            if recalltable_out = 0,

# --------------------------------------------------------------------------      
ptool_count3     # Track number of times each tool is used
      tused3 = finc(11,t$)
      *tused3

# -------------------------------------------------------------------------- 

pwrtt$          #Pre-read NCI file
      if tool_info > 1 & t$ > 0 & gcode$ <> 1003, ptooltable
      if op_id$ <> prv_op_id$ & gcode$ <> 1003,
         [
         pWriteBuffer_1 # Tool Number // Tool Count    
         ]
         !op_id$

psof$            #Start of file for non-zero tool number  
    
      "(*****TOOL RESTART LIST*****)",e$
     pRecallTable

WOW buffers! I'm not sure we're to even start.

Great stuff Craig! This has merit, just wish I had time to look at it deeper. I will dive in deep this weekend. Thanks for sharing as I do appreciate it.

Thanks for the replys gentlemen! I think it's time I dive into buffers this weekend. I'll hit Collin up about his classes. Thanks again for the input.

I need some help with getting my tool recalls at the top of my program below my tool list as I'm tired of "copy/paste"

Heres the output I have so far. In red is what I need to add, but for the life of me I can't get the out put I need.  I hope this can be done without a buffer as my head is not wrap tightly around them yet. Maybe I just need to walk away from this for a few days :wallbash:

%
O2001( SC2001 REVD MILL PROGRAM )


#6=1
M97 P9900 (TOOL/PROGRAM CHECK SUB)
(NO COMMENTS ABOVE THIS LINE)

(CUSTOMER      - ADD CUSTOMER)
(PROGRAM REV  - N/C)
( DATE - MAR. 08 2015 )

(SET #600= TO PROGRAM NUMBER)
(PROGRAM# 2001 )

(*****BEGIN TOOL LIST*****)
(---------------------------------------------------------)
( T11 -  NO. 47 CARB DRILL MELIN BRD - H11 | D11 )
( HOLDER STYLE - CT40 SMALL KEYLESS CHUCK )
( TOOL PROJECTION - 1.25 )
( ================================= )
( T12 -  NO. 2-56 YMW FORM TAPRH - H12 | D12 )
( HOLDER STYLE - CT40 - SOLID - JACOBS CHUCK )
( TOOL PROJECTION - 1.2 )
( ================================= )
(---------------------------------------------------------)
(*****END TOOL LIST*****)
I need to add this here

IF[#592EQ1101]GOTO1101 (RESTART FOR T11 FIRST CALL)
IF[#592EQ1201]GOTO1201 (RESTART FOR T12 FIRST CALL)
IF[#592EQ1102]GOTO1102 (RESTART FOR T11 SECOND CALL)

....

....

....

#3000=123(INVALID RESTART)

G20
G0 G17 G40 G49 G80 G90 (SAFETY LINE)




N1101
G103 P1
#592= HERE I NEED TO ADD 1101 FROM 2 LINES ABOVE
G103
(  NO. 47 CARB DRILL MELIN BRD - TOOL - 11 )
T11 M6
IF [ #6 NE 1 ] THEN #3000= 666 (RESET AND CYCLE START)
/M8
G0 G90 G55 X-.5512 Y-.5512 A0. S7299 M3
G43 H11 Z.25 T12
G98 G83 Z-1.0873 R-.5 Q.1 F7.3
X.5512
Y.5512
X-.5512
G80
M09
M5
G91 G28 Z0.
G90 G49
T#3026
G0 G90
G103 P1
G65 P9853 B1. T#3026 H.01
G103
N1201
G103 P1
#592= HERE I NEED TO ADD 1201 FROM 2 LINES ABOVE
G103
(  NO. 2-56 YMW FORM TAPRH - TOOL - 12 )
T12 M6
IF [ #6 NE 1 ] THEN #3000= 666 (RESET AND CYCLE START)
/M8
G0 G90 G55 X-.5512 Y-.5512 A0. S2000 M3
G43 H12 Z.25 T11
G98 G84 Z-1.03 R-.35 J2 F35.7
X.5512
Y.5512
X-.5512
G80
M09
M5
G91 G28 Z0.
G90 G49
T#3026
G0 G90
G103 P1
G65 P9853 B1. T#3026 H.01
G103
N1102
G103 P1
#592= HERE I NEED TO ADD 1102 FROM 2 LINES ABOVE
G103
(  NO. 47 CARB DRILL MELIN BRD - TOOL - 11 )
T11 M6
IF [ #6 NE 1 ] THEN #3000= 666 (RESET AND CYCLE START)
/M8
G0 G90 G55 X-.5512 Y-.5512 A0. S7299 M3
G43 H11 Z.25 T11
G98 G83 Z-1.0873 R-.5 Q.1 F7.3
X.5512
Y.5512
X-.5512
G80
M09
M5
G91 G28 Z0.
G28 Y0.
GOTO9999
N9900(TOOL LENGTH/PROGRAM # CHECKS)
G103 P1
(THIS ROUTINE INCLUDES LENGTH CHECKS FOR PROBE ONLY )
IF[#2025 NE 5.5122] THEN #3000=333 (PROBE LENGTH WRONG)
IF[#2225 NE 0] THEN #3000=334 (NO LENGTH WEAR ALLOWED)
IF[#2625 NE 0] THEN #3000=335 (NO DIA WEAR ALLOWED)
IF[#600 NE2001 ]GOTO9601
IF[#800NE-24.1905]THEN#3000=336(WRONG X VALUE DNL#1)
IF[#801NE-10.0269]THEN#3000=337(WRONG Y VALUE DNL#1)
IF[#806NE-12.1896]THEN#3000=336(WRONG X VALUE DNL#2)
IF[#807NE-10.0271]THEN#3000=337(WRONG Y VALUE DNL#2)
G103
M99
N9600 (ERRORS)
N9601 #3000=336 (WRONG PROGRAM TO RUN)
M99
G103
N9999
G103 P1
G0 G90 G55 X0.
#592=0 (PROGRAM COMPLETE)
G28 G91 A0.0
G103
M30
%
 

Thanks