def.arc

Boehringer数控加工程序经典示例.

%_N_GUD8_DEF
;$PATH=/_N_DEF_DIR
DEF NCK REAL RUECKZUG1[1,3]
DEF NCK REAL RUECKZUG2[1,3]
DEF NCK INT RUESTABBR
DEF NCK INT WKSTCKTYP
DEF NCK INT RMAT[2,21]
DEF NCK REAL GD[46,15] 
DEF NCK STRING[32] BEARBOM
DEF NCK REAL KOMPX
DEF NCK REAL KOMPX2
DEF NCK REAL TCOR_STEP_X 
DEF NCK REAL TCOR_STEP_X2 
DEF NCK INT ZAEHLER

M17
%_N_GUD9_DEF
;$PATH=/_N_DEF_DIR
;Version NBS0001 vom 22.07.05 Bonnet
; - 20.04.05 RE KAN eingef黦t
; - 20.07.05 AB Kan wieder raus. ist im gud8 !!!!
; - 22.07.05 AB Schutzbereiche: SB_Kx wird in Moveschutzbereiche aufgerufen
;-------------------------------------------------------------


REDEF $MA_SPIND_EXTERN_VELO_LIMIT APR 7 APW 7
REDEF $MA_POSCTRL_GAIN APR 7 APW 7

;SB
DEF CHAN BOOL SB_RUN=0
REDEF SB_RUN INIPO


;Geometrie-Achs-Support im Kanal x ist (A oder B oder C)------
DEF NCK STRING[1] GEOAXSUP_K1
DEF NCK STRING[1] GEOAXSUP_K2
DEF NCK STRING[1] GEOAXSUP_K3


;Fahren gegen Festanschlag------------------------------------
DEF NCK INT PIN_KRAFT,PIN_KR_ALT,MOMENT
DEF NCK REAL TEILEPOS,UEBERFAHRWEG,ABHEBEWEG,TOLERANZ
DEF NCK REAL ENDL_AUSSEN,ENDL_INNEN,ANLAGE_POS


;KOLLISION Support----------------------------------------------------
DEF NCK REAL ABSTAND_A_B
DEF NCK REAL ABSTAND_D_C
DEF NCK REAL ABSTAND_D_F
DEF NCK REAL ABSTAND_C_F
DEF NCK REAL VERKUERZTER_ABSTAND_D_F
DEF NCK REAL ABSTAND_B_F
DEF NCK REAL DISTANZUEBERWACHUNG_B_F


;********************************************************
;*              Variablen deklarieren                   *
;*            ARTIS Kollisions黚erwachung VG4           *
;*                f黵 IDS_ARTIS_K1/K2.spf               *
;********************************************************
DEF NCK STRING[20] ARTIS_VERSION_K1    ;Version im Kanal 1
DEF NCK STRING[20] ARTIS_VERSION_K2    ;Version im Kanal 2
DEF NCK INT ARTIS_ADR_SYNC_K1          ; Startadresse Synchronaktion
DEF NCK INT ARTIS_ADR_SYNC_K2          ; Startadresse Synchronaktion
;********************************************************
M30