595.089 aktive Mitglieder*
5.640 Besucher online*
Kostenfrei registrieren
Einloggen Registrieren

CamWorks Variable

Beitrag 17.09.2023, 17:07 Uhr
TricksterMr
Level 1 = Community-Lehrling
*

Hallo zusammen. Ich versuche, einen Parameter hinzuzufügen, der in der endgültigen Datei für die Maschine durch eine Variable reflektiert wird, aber aus irgendeinem Grund funktioniert es nicht. Um damit zu beginnen, werde ich Ihnen zeigen, was funktioniert, aber die Wiederholung des Prinzips der leeren Zeile in der Post-Prozess implementiert... das funktioniert bei der Ausgabe habe ich Werte BM="LS" usw. Datei: MPR.SRC :SECTION=DRILLING_CYCLE :T:

file MPR.LIB
ATTRIBUTES
:ATTRNAME=drilling cycle
:ATTRTYPE=SELECT
:ATTREMARK=Drill Mode
:ATTRSEL=N
:ATTRTITLE=Drill Mode
:ATTRSELSTR=Top (LS)
:ATTRSELSTR=Left (XP)
:ATTRSELSTR=Front (YP)
:ATTRSELSTR=Right (XM)
:ATTRSELSTR=Back (YM)
:ATTRSELSTR=Bottom
:ATTRDEFAULT=1
:ATTRUSED=1
:ATTREND

:ATTRNAME=D CYCLE
:ATTRTYPE=POST
:ATTRVTYPE=CHARACTER
:ATTREMARK=
:ATTRINLEN=25
:CODETYPE=FORMAT
:WORD_ADDRESS_BEF=
:WORD_ADDRESS_AFT=
:LEFT_PLACES=0
:RIGHT_PLACES=0
:UNITFLAG=NON_CONVERT
:ATTRSPACES=YES
:MODAL=NO
:ATTRUSED=1
:ATTREND

SECTION
:SECTION=CALC_SINGLE_DRILL_MILL
:C: IF SECTIONEXIST(DEBUG) THEN
:C: DEBUG=17 CALL(DEBUG)
:C: ENDIF
:C: IF SEQ<>0 THEN
:C: EA={EA="}
:C: EE={EE="}
:C: IF SAVE_AXIS_TYPE=0 THEN
:C: CALL(ROUTING_CONTOUR)
:C: ELSE
:C: CALL(5AXIS_ROUTING_CONTOUR)
:C: ENDIF
:C: SEQ=0
:C: ENDIF
:C: X_POS=ABS_X_END
:C: Y_POS=ABS_Y_END
:C: IF drilling_cycle=1 THEN D_CYCLE={BM="LS"} ENDIF
:C: IF drilling_cycle=2 THEN D_CYCLE={BM="XP"} ENDIF
:C: IF drilling_cycle=3 THEN D_CYCLE={BM="YP"} ENDIF
:C: IF drilling_cycle=4 THEN D_CYCLE={BM="XM"} ENDIF
:C: IF drilling_cycle=5 THEN D_CYCLE={BM="YM"} ENDIF
:C: IF drilling_cycle=6 THEN D_CYCLE={BM="LSLU"} ENDIF
:C: IF OPR_AXIS_TYPE>THREE_AXIS OR OPR_AXIS_TYPE=FIVE_AXIS THEN
:C: CALL(5AXIS_DRILLING)
:C: RETURN
:C: ENDIF
:C: CALL(DRILLING_CYCLE)

file GENERAL.LIB
ATTRIBUTES
:ATTRNAME=DEBUG
:ATTRTYPE=POST
:ATTRVTYPE=INTEGER
:ATTREMARK=Debug
:CODETYPE=SELECT
:SELECT=0
:CODE=|||||Start|of|Tape
bla bla bla
:SELECT=17
:CODE=|||||Single|Drill

thats no works
file: MPR.SRC
:SECTION=DRILLING_CYCLE
:T:

file MPR.LIB
ATTRIBUTES
:ATTRNAME=drilling dr
:ATTRTYPE=SELECT
:ATTREMARK=Drill DR
:ATTRSEL=N
:ATTRTITLE=Drill DR
:ATTRSELSTR=Top (<102|Bohrvert)
:ATTRSELSTR=Side (<103|Bohrhoriz)
:ATTRDEFAULT=1
:ATTRUSED=1
:ATTREND

:ATTRNAME=DR CYCLE
:ATTRTYPE=POST
:ATTRVTYPE=CHARACTER
:ATTREMARK=
:ATTRINLEN=25
:CODETYPE=FORMAT
:WORD_ADDRESS_BEF=
:WORD_ADDRESS_AFT=
:LEFT_PLACES=0
:RIGHT_PLACES=0
:UNITFLAG=NON_CONVERT
:ATTRSPACES=YES
:MODAL=NO
:ATTRUSED=1
:ATTREND

SECTION
:SECTION=CALC_SINGLE_DRILL_MILL
:C: IF SECTIONEXIST(DEBUG) THEN
:C: DEBUG=34 CALL(DEBUG)
:C: ENDIF
:C: IF SEQ<>0 THEN
:C: EA={EA="}
:C: EE={EE="}
:C: IF SAVE_AXIS_TYPE=0 THEN
:C: CALL(ROUTING_CONTOUR)
:C: ELSE
:C: CALL(5AXIS_ROUTING_CONTOUR)
:C: ENDIF
:C: SEQ=0
:C: ENDIF
:C: X_POS=ABS_X_END
:C: Y_POS=ABS_Y_END
:C: IF drilling_dr=1 THEN DR_CYCLE={"<102|Bohrvert"} ENDIF
:C: IF drilling_dr=2 THEN DR_CYCLE={"<103|Bohrhoriz"} ENDIF
:C: IF OPR_AXIS_TYPE>THREE_AXIS OR OPR_AXIS_TYPE=FIVE_AXIS THEN
:C: CALL(5AXIS_DRILLING)
:C: RETURN
:C: ENDIF
:C: CALL(DRILLING_CYCLE)

file GENERAL.LIB
ATTRIBUTES
:ATTRNAME=DEBUG
:ATTRTYPE=POST
:ATTRVTYPE=INTEGER
:ATTREMARK=Debug
:CODETYPE=SELECT
:SELECT=0
:CODE=|||||Start|of|Tape
bla bla bla
:SELECT=34
:CODE=|||||Single|Drill


wo habe ich einen Fehler gemacht
TOP    



1 Besucher lesen dieses Thema (Gäste: 1)
0 Mitglieder: