; MASCHINE: AK402 ;*RO*
; MEHRACHS-SCHWENKSYSTEM ;*RO*
;************************************************************;*RO*
; KUNDE: BMW BRILLIANCE CHINA ;*RO*
; WERKSTUECK: PLEUEL TYP 7 N20 ;*RO*
; TYP: BM70 ;*RO*
; ZEICHNUNG: 7 618 852 ;*RO*
; DATUM: 04.07.2012 ;*RO*
; WERKSTOFF: 70 S6 BY95 ;*RO*
;************************************************************;*RO*
; ERSTELLT: M. OROTELLI / ALFING / DATUM: 11.06.2012 ;*RO*
; GEAENDERT: ;*R0*
;************************************************************;*RO*
; PROGRAMM: BEARBEITUNG ;*RO*
;************************************************************;*RO*
; ;*RO*
; MASCHINE 3677N00 ;*RO*
; **************************************************************
; Pleuel Typ 7 N20
; **************************************************************
N10 BELADEN=FALSE
N20 IF ($AA_IM[A1]==0) GOTOF PIECES1
N30 IF ($AA_IM[A1]==180) GOTOF PIECES2

N40 PIECES1:
N50 WHILE NOT($AA_IM[A1]==0.000)
N60 MSG("A1-Achse nicht auf 0 Grad")
N70 ENDWHILE
N80 CALL "/_N_CMA_DIR/_N_FIXTURE_UCLMP_3677_SPF"
N90 G4 F0.5
N100 M1010 ;Grosses Auge Drucklos
N110 M1020 ;Kleines Auge Drucklos
N120 M85 ;WKS Beladetuer oeffnen
N130 G4F3
N140 STOPRE
N150 WHILE NOT LOADER_DOOR_CLOSED==TRUE
N160 MSG ("PLEASE CLOSE DOOR")
N170 ENDWHILE
N180 GOTOF FIX_PIECES

N190 PIECES2:
N200 WHILE NOT($AA_IM[A1]==180.000)
N210 MSG("A1-Achse nicht auf 180 Grad")
N220 ENDWHILE
N230 CALL "_N_CMA_DIR/_N_FIXTURE_UCLMP_3677_SPF"
N240 G4 F0.5
N250 M1010 ;Grosses Auge Drucklos
N260 M1020 ;Kleines Auge Drucklos
N270 M85 ;WKS Beladetuer oeffnen
N280 G4F5
N290 STOPRE
N300 WHILE NOT LOADER_DOOR_CLOSED==TRUE
N310 MSG ("PLEASE CLOSE DOOR")
N320 ENDWHILE
;
N330 FIX_PIECES:
N340 STOPRE
N350 CALL "/_N_CMA_DIR/_N_FIXTURE_CLAMP_3677_SPF"
N360 BELADEN=TRUE
;
N370 IF (($AA_IM[A1]==0) AND (TOTAL_MACHINED_SIGNAL_180==TRUE)) GOTOF POS_0
;
N380 IF (($AA_IM[A1]==180) AND (TOTAL_MACHINED_SIGNAL_180==TRUE)) GOTOF POS_180
;
N390 POS_0:
N400 IF BELADEN==TRUE
N410 M96 ;Fertigmeldung 3 (180 Grad Seite) ruecksetzen
N420 GOTOF END
N430 ENDIF
;
N440 POS_180:
N450 IF BELADEN==TRUE
N460 M94 ;Fertigmeldung 1 (0 Grad Seite) ruecksetzen
N470 GOTOF END
N480 ENDIF

N490 END:

N500 M17