Abfrage first_tool / last_tool, für Kopf- und Fusszeile beim Erstellen eine Datei mit def_tool

Hallo zusammen,

ich möchte mit der def_tool eine Datei erzeugen - habe ich auch soweit hinbekommen.

Nun sollte aber noch eine Kopfzeile vor dem ersten Werkzeug und eine Fusszeile nach dem letzten Werkzeug ausgegeben werden.

Das bekomme ich aber nicht auf die Reihe.

Gebe ich die Nummer des ersten und letzten Werkzeug als Abfrage ein gehts :



@def_tool


{nl,'!!open file='program_number'.TXT!!'}



if tool_number eq 1 ; T1 ist first_tool -

{nl}
{'---------- Kopfzeile ---------- '}

{nl}
{nl}



{nl,'!!close file='program_number'.TXT!!'}

endif


{nl,'!!open file='program_number'.TXT!!'}


{nl}
{'P', tool_number}
{' T', tool_number }
{' L','400'}
{' R'(tool_offset)}
{' ('}
{''upper(tool_user_type)}
{' '(tool_offset*2)}
{')'}



{nl,'!!close file='program_number'.TXT!!'}





{nl,'!!open file='program_number'.TXT!!'}

if tool_number eq 4 ; T1 ist last_tool

{nl}
{nl}

{nl,'---------- Fusszeile ---------- '}

endif

{nl,'!!close file='program_number'.TXT!!'}


endp

;-------------------


Wie muss die Abfrage aussehen aussehen wenn die Kopfzeile vor dem " First_tool " und die Fusszeile nach dem "Last_tool" ausgeben werden soll.

Komme leider nicht mehr weiter !!!!!

Bitte um eure Hilfe


Vielen Dank

Banditman

Moin,

sitze nicht am System, aber gibts bei def_tool auch die variablen first_tool und last_tool ?

Wenn ja:

if first_tool eq true then Kopfzeile

if last_tool eq true then Fusszeile

Ansonsten könnte man auch alle def_tool Durchläufe in eine Array schreiben und an irgendeiner Stelle ausgeben, z.B. in end_program

t.

Hallo nebbe,

erstmal vielen Dank für Deine Hilfe !!!!

Du hattest recht die First_ / Last_Tool Variabel gibt es in der def_tool nicht.

Habe mir eine udr@ex_datei geschrieben und und rufe sie beim @start_tool auf und sie da nun geht.

Nochmal vielen Dank für Deinen Tipp

Grüsse O.

Moin,

lass sehen ! Oder zu geheim ?

Gruß,

t.

Hallo nebbe,

hier der gewünschte GPP Auszug.


Kurz zu Erklärung :

Zusätzliche zum Programm sollen zwei Dateien erzeugt werden die,

die im Programm verwendeten Werkzeug enthalten und bei bedarf in

in die Maschine bzw. in das Werkzeugvoreinstellgerät importiert

werden können.


TM-Datei Ist für die Steuerung der Maschine


INP-Datei ist für die Werkzeugvoreinstellung



GPP - Auszug :


...

...


@def_tool

call @udr_TM_datei

endp

;-------------------




@start_tool

...
...
...
...

call @udr_inp_datei

endp

;-------------


@udr_TM_datei


{nl,'!!open file='program_number'.Txt!!'}


if tool_number eq 59 ; - Infrataster ist in der Maschine

;nop

else

{nl}
{'P', tool_number}
{' T', tool_number }
{' L','400'}
{' R'(tool_offset)}
{' ('}
{''upper(tool_user_type)}
{' '(tool_offset*2)}
{')'}

endif

{nl,'!!close file='program_number'.Txt!!'}



endp

;-------------------



@udr_inp_datei


{nl,'!!open file='program_number'.TXT!!'}



if first_tool eq True

; {'---------- Kopfzeile ---------- '}

{nl'#'}
{nl'# ',program_number,'.WZ1'}
{nl}
{nl'# ',part_name,' - ', Zeich_nr}
{nl'# ','DMC 125 U'}

{nl}


{nl,'!!close file='program_number'.TXT!!'}

endif


{nl,'!!open file='program_number'.TXT!!'}

if tool_number eq 59 ; - Infrataster ist in der Maschine

;nop

else



{nl}

{' T', tool_number }
{' L','400'}
{' R'(tool_offset)}
{' 'upper(tool_user_type)}
{' '(tool_offset*2)}
{' / ',upper(tool_message)}

endif

{nl,'!!close file='program_number'.TXT!!'}





{nl,'!!open file='program_number'.TXT!!'}

if last_tool eq true


;{'---------- Fusszeile ---------- '}


{nl}

{nl'#'}

endif

{nl,'!!close file='program_number'.TXT!!'}



endp

;-------------------


Grüsse

O.

So gehts !

Aber Du meinst sicher die section "@change_tool" und nicht "@start_tool", oder ? Die kenne ich nämlich gar nicht.

Und für weitergehende Problemstellungen immer auch noch mal die Möglichkeit eines Arrays im Hinterkopf behalten.

Gruß,

t.

Hallo nebbe,

bei mir ist die "@start_tool" eine Zusatzunterfunktion der "@change_tool".

Sie wird am Ende der "@change_tool" aufgerufen und gibt Zusätzliche Befehle aus z.b. :

N90 G74 Z-230 L1
N91 G7
N92 G93 X0 Y0 Z0
N93 T2 M6 S943 F132 (WNT-BOHRER D=13.5 / 20 TIEF)
N94 M3 T3
N95 M7
N96 M0 (Unterlagen entfernen)



Güsse

O.

Na, dann sind wir ja wieder beieinand.

Was man so alles mit dem SC PP machen kann, was ?

Gruß,
t.