oui , bien sûr ,
% ,MX--,
;********************PLC PROGRAM for GER CYLINDRIC GRINDING MACHINES***********
;File name : PLC-PRG.PIT
;Control type : FAGOR 8040
;Version PLC : V1.0
;Author : Josu Arriola
;Date : February-2006
; PLC RESOURCES
;------------------------- PLC INPUTS ------16+32+8----------------------------
DEF I-EMERGEN I1;
DEF I-WHEEL-ON I2; CAMBIO I98;
DEF I-INTWHEEL-ON I3; CAMBIO I99;
DEF I-WHEEL-VAR-OK I4; CAMBIO I102;
DEF I-DRIVES-OK I5; CAMBIO I103;
DEF I-POSAX-FORW I6;
DEF I-POSAX-BACK I7;
DEF I-AISIAKIN-PRES-MIN I8; Aisiakin
DEF I-AISIAKIN-PRES-MAX I9; Aisiakin
DEF I-IWHEEL-VAR-OK I10; CAMBIO I104;
;Puertas normales
DEF I-PROT-LOCKED I11; Puertas normales CAMBIO I73
DEF I-PROT-COIL-ACT I12; Puertas normales CAMBIO I74
;Puertas automaticas
DEF I-PROT-CALLIBRATED I11; Puertas automaticas
DEF I-PROT-ERROR I12; Puertas automaticas
DEF I-PROT-POS-REACHED I13; Puertas automaticas
;
DEF I-SETA-RET I14;
DEF I-TERMICO-PRIO1 I15; CAMBIO I100
DEF I-TERMICO-PRIO2 I16;
DEF I-CHUCK-ON I65;
DEF I-DRESSER-BACK I66;
DEF I-DRESSER-FORW I67;
DEF I-LUB-LEVEL I68;
DEF I-LUB-PRES I69;
DEF I-REF-X I70;
DEF I-REF-Z I71;
DEF I-REF-A I72;
DEF I-REF-C I73; CAMBIOI10;
DEF I-POW-OK I74; CAMBIOI97;
DEF I-LIMITS I75;
DEF I-WHEEL-PROT I76;
DEF I-OPEN-CHUCK I77;
DEF I-CLOSE-CHUCK I78;
DEF I-SPINDLE-SLOW I79;
;
; Entradas Grupo hidrostatico
DEF I-HIDROS-ON I82;
DEF I-HIDROS-LEVEL I83;
DEF I-HIDROS-FILTER I84;
DEF I-HIDROS-PRESSURE I85;
; Entradas Equilibrador-Gap-Crash
DEF I-BALANCE-AUT-MAN I86; Balance-Marposs
DEF I-BALANCE-WHEEL-OK I87; Balance System
;DEF I-BALANCE_INCYCLE I87; Marposs
DEF I-BALANCE-ALARM I88; Balance-Marposs
DEF I-BALANCE-RPM-OK I89; Balance-Marposs
DEF I-BALANCE-IN-TOL I90; Balance-Marposs
DEF I-BALANCE-BURN-A I91; Balance
DEF I-BALANCE-COMM-CRITICA I91; Marposs CAMBIO I96
DEF I-BALANCE-CRASH-A I92; Balance-Marposs
DEF I-BALANCE-GAP-A I93; Balance-Marposs
DEF I-BALANCE-ALARM-CRASH-GAP I94; Marposs
DEF I-BALANCE-MAX-VIBR I95; Balance-Marposs-Con el E82 meter 24 v.
; Entradas Medidor
DEF I-MEDIDOR-C1 I80; Marposs
DEF I-MEDIDOR-C2 I81; Marposs
DEF I-MEDIDOR-ALARM I82; Marposs
DEF I-MEDIDOR-AUTO I83; Marposs
DEF I-MEDIDOR-ADELANTE I84; Marposs
DEF I-MEDIDOR-ATRAS I85; Marposs
;
; Entradas de volante portatil
DEF I-JOG+ I96; CAMBIO
DEF I-RAPID I97; CAMBIO
DEF I-JOG- I98; CAMBIO
DEF I-BIT0 I99; CAMBIO
DEF I-BIT1 I100; CAMBIO
DEF I-BIT2 I101; CAMBIO
DEF I-ENABL1 I102; CAMBIO
DEF I-ENABL2 I102; CAMBIO
DEF I-X1 I103; CAMBIO
DEF I-X10 I104; CAMBIO
; Entradas plato magnetico
DEF I-CHUCK-POT-1 I80;
DEF I-CHUCK-POT-2 I81;
DEF I-CHUCK-POT-3 I82;
DEF I-CHUCK-POT-4 I83;
DEF I-CHUCK-POT-5 I84;
DEF I-CHUCK-POT-6 I85;
DEF I-CHUCK-POT-7 I86;
; Entradas enfriadora de URMO
DEF I-FRIGO-OK I80; CAMBIO I2
; Entradas muela de refrentar abatible mismas que el diamantador
DEF I-ABATIBLE-BACK I66
DEF I-ABATIBLE-FORW I67
; Diamantador de moleta con variador
DEF I-MOLETA-OK I81
DEF I-MOLETA-ON I82
;
; Entradas contrapunto
DEF I-PEDAL-CONTRAPTO I82
;
; Sujeciَn de husillo
;
DEF I-DET1-SUJ-IZDA I80
DEF I-DET2-SUJ-IZDA I81
DEF I-DETDOWN-SUJ-IZDA I82
DEF I-DET1-SUJ-DCHA I83
DEF I-DET2-SUJ-DCHA I84
DEF I-DETDOWN-SUJ-DCHA I85
;
;------------------------- PLC OUTPUTS ---8+24-----------------------------------
DEF O-EMERGEN O1;
DEF O-POSAX-FORW O2;
; Balance System
DEF O-CYCLE-SEL-0 O3; Balance System
DEF O-CYCLE-SEL-1 O4; Balance System
DEF O-BALANCE-NEUTRAL O6; Balance System
; Marposs
DEF O-BALANCE-AUTO O3; Marposs.
DEF O-RESET-ALARM O4; Marposs
DEF O-BALANCE-ENABLE O6; Marposs
;Balance System and Marposs
DEF O-BALANCE-REQUEST O5;
DEF O-GAP-ENABLE O7; GAP ENABLE-RESTAURAR LIMITES
DEF O-CRASH-ENABLE O8; CRASH ENABLE-RESTAURAR ALARMAS
;
DEF O-START-WHEEL O33;
DEF O-START-IWHEEL O34;
DEF O-RESET-DRIVES O35;
DEF O-HYDRAULIC O36;
DEF O-POWER-BYPASS O37;
DEF O-DELTA-STAR O38;
DEF O-COOLANT O39;
DEF O-DRESSER-BACK O40;
DEF O-OPEN-PROTECTION O41; Protecciones automaticas y normales
DEF O-UNBLOCK-A-AXIS O42; CAMBIO O52;
DEF O-EV-LUBRICATION O43; Si no lleva central hidraulica es la bomba
DEF O-CLOSE-PROTECTION O44; Protecciones automaticas
DEF O-COOL-INT O45; CAMBIO O51;
DEF O-DRESSER-FORW O46; CAMBIO O48
DEF O-OPEN-CHUCK O47;
DEF O-CLOSE-CHUCK O48;
DEF O-COOL-FACE O49;
DEF O-COOL-EXT O50;
; Transvase
DEF O-TRANSVASE O51; Transvase
; Muela Hidrostatica
DEF O-HIDROSTATIC O52;
; Divisor Aisiakin
DEF O-PUMP-BLOCK-AISIAKIN O53; Aisiakin
; Baliza
DEF O-GREEN-LIGHT O54;
DEF O-YELLOW-LIGHT O55;
DEF O-RED-LIGHT O56;
; Medidor
DEF O-MEDIDOR-AUTO O51; CAMBIO O42
DEF O-MEDIDOR-REQUEST O52; CAMBIO O46
DEF O-MEDIDOR-CONTROL-POINT O53; CAMBIO O48
DEF O-MEDIDOR-AVANZA O54; CAMBIO O45
DEF O-MEDIDOR-BIT-0 O55; CAMBIO O43
DEF O-MEDIDOR-BIT-1 O56; CAMBIO O44
;----------Muela de Refrentar abatible
DEF O-ABATIBLE-FORW O46;
DEF O-ABATIBLE-BACK O40;
DEF O-ABATIBLE-ENGANCHE O42;
;
; Diamantador de moleta con variador
DEF O-MOLETA-ON O56
;
; Contrapunto
DEF O-CONTRAPTO O51
;
; Sujeciَn de husillo
;
DEF O-SUJ-IZDA O51
DEF O-SUJ-DCHA O52
;------------------------- KEYBOARD INPUTS --------------------------------------
;DEF K-ENTER B4R560;
;DEF K-WIN201 B22R560;
;DEF K-TABLE B31R560;
;DEF K-COOLANT B5R561;
;DEF K-DRESSING B6R561;
;DEF K-VAIVEN B7R561;
;DEF K-RESET B12R561;
;DEF K-LUBRI B13R561;
;DEF K-MAGNET-REDUCE B14R561;
;DEF K-BYPASS B15R561;
;DEF K-WHEEL-STOP B26R561;
;DEF K-IWHEEL-STOP B27R561;
;DEF K-WHEEL-START B28R561;
;DEF K-IWHEEL-START B29R561;
;DEF K-POWER B30R561;
;DEF K-HANDWHEEL B31R561;
;DEF K-SPEED-UP B0R562;
;DEF K-DEMAGNETIZATION B1R562;
;DEF K-SPEED-DOWN B2R562;
;DEF K-MAGNETIZATION B3R562;
;DEF K-CONDITIONAL B4R562;
;DEF K-PROTEC B5R562;
;DEF K-SPINDLE-SLOW B6R562; ?????
;DEF K-AXIS-A+ B8R562;
;DEF K-AXIS-X+ B9R562;
;DEF K-VAIVEN-Z+ B10R562; ?????
;DEF K-AXIS-Z- B11R562;
;DEF K-AXIS-Z+ B13R562;
;DEF K-VAIVEN-Z- B14R562; ?????
;DEF K-AXIS-X- B15R562;
;DEF K-SPINDLE-RIGHT B17R562;
;DEF K-SPINDLE-STOP B19R562;
;DEF K-AXIS-A- B20R562;
;DEF K-SPINDLE-LEFT B22R562;
;DEF K-STOP B23R562;
;
;
;------------------------- LED OUTPUTS --------------------------------
;
;DEF L-EXTWHEEL TCLED1
;DEF L-POWER TCLED2
;DEF L-INTWHEEL TCLED3
;DEF L-HNDWH TCLED4
;DEF L-STOP TCLED6
;DEF L-PROTEC TCLED8
;DEF L-VAIVEN TCLED9
;DEF L-LIMIT TCLED10
;DEF L-MAGNET TCLED12
;DEF L-COOLANT TCLED13
;DEF L-LUBRI TCLED14
;
;------------------------- SUBROUTINE DEFINITION----------------
;DEF L-MDECOD L1
;DEF L-INIT L2
;DEF L-EMERGEN L3
;DEF L-LUBRI L4
;DEF L-COOLING L5
;DEF L-AXIS-X L6
;DEF L-AXIS-Z L7
;DEF L-SPINDLE L8
;DEF L-AXIS-A L9
;DEF L-VAIVEN L10
;
;DEF L-PLATO L11
;DEF L-PLATOMAG L61
;
;DEF L-EXTWHEEL L12
;OPCION VARIADOR L62
;
;DEF L-INTWHEEL L13
;OPCION VARIADOR L63
;
;DEF L-DRESSER L14
;OPCION BRAZO L64
;DEF L-GAPCRASH L15
;DEF L-HYDRA L16
;DEF L-AXIAL L17
;DEF L-PROTEC L18
;DEF L-BALANCE L19
;DEF L-CONE L20
;DEF L-HANDWHEEL1 L21
;DEF L-HANDWHEEL2 L71
;DEF L-WHEELPROT L22
;DEF L-BALIZA L23
;DEF L-AXIS-C L24
;DEF L-MEDIDOR L25
;DEF L-HODROSTATIC L26
;DEF L-MOLETA L27
;DEF L-CONTRAPTO L28
;DEF L-COOLER L29
;DEF L-MODES L30
;DEF L-SCREEN L31
;DEF L-CENTRAL L32
;DEF L-MSG L33
;
;------------------------------MARKS AND REGISTERS----------------------------
;
;INIT MODULE
;
DEF M-WHEELVAR B1R213 ;VARIADOR DE VELOCIDAD EXT
DEF M-CHUCK-DETECTOR B3R211 ;DETECTOR DE PLATO
DEF M-FIRST-CYCLE M100 ;FIRST CYCLE
;
;EMERGENCY MODULE
DEF R-DRIVES-FAULT R15
;DEF R-EMER-AUX1 R16
DEF R-EMER-TIME R17
DEF R-PROTECTIONS-FAULT R18
DEF R-VARS-FAULT R19
DEF M-DRIVES-OK M150
DEF M-POW-OK M151
DEF M-POW-LOOP-OK M152
DEF M-POW-F0 M153
DEF M-DRVS-VARS-OK M154
DEF M-EMER-RETRACTING M155
DEF M-EMER-RETIRADA M156
DEF M-EMER-TERMICOS-OK M157
DEF M-VARS-OK M158
DEF M-EMER-PROBECRASH M159
DEF M-EMER-PRBST M160
DEF M-EMER-SECU-PROBE M161
DEF M-SUB-RUNNING M162 ;MARCA USADA EN SUBRUTINAS
;
;LUBRICATION MODULE
DEF R-LUB-DISTX R20
DEF R-LUB-DISTZ R21
DEF R-LUB-DISTB R22
DEF R-LUB-DISTZB R23
DEF R-LUB-GFUNCTION R24
DEF R-LUB-PRES R25
DEF M-EV-LUBRICATION M200
DEF M-LUBREQ M201
DEF M-LUB-PRES-CLAMPED M202
DEF M-LUB-PRES-ERROR M203
DEF M-LUB-CONFIR-PRES M204
DEF M-LUB-NO-LEVEL M205
;
;COOLING MODULE
DEF R-COOL-WHEEL R26 ;MARCA USADA EN SUBRUTINAS
DEF R-TRANSVASE R27
DEF M-COOL-ON M250
DEF M-COOL-ON-EXT M251
DEF M-COOL-ON-INT M252
DEF M-COOL-ON-FACE M253
DEF M-COOL-NO-M M254
;
;X AXIS MODULE
DEF R-XAXIS-PLANE R30
DEF R-P1196 R31
DEF R-PLCOFVISUX R32
;
;
;Z AXIS MODULE
DEF R-XZAXIS-FAST R35
DEF R-PLCOFVISUZ R36
DEF R-AUX R37
;
;SPINDLE MODULE
DEF R-SP-SETP R40
DEF R-MAX-SETP R41
DEF R-STEP-SETP R42
DEF R-SPINDLE-10 R43
DEF M-NMIN M400
DEF M-M19 M401
DEF M-M3 M402
DEF M-TURN-RQST M403
DEF M-SPINDLE-10-PERCENT M404
DEF M-SPINDLE-10-DOWN M405
DEF M-SPINDLE-INVERT M406
;
;A-AXIS MODULE
DEF C-LIMIT-A- -311000 ;LIMITE NEGATIVO DEL DIVISOR
DEF C-LIMIT-A+ 25051000 ;LIMITE POSITIVO DEL DIVISOR
DEF R-POSA R45
DEF M-M31 M450
DEF M-A-MOVING M451
DEF M-UNBLOCK-A-AXIS M452
DEF M-A-IN-EXTERNAL M453
DEF M-A-IN-INTERNAL M454
DEF M-A-IN-FACE M455
;
;VAIVEN MODULE
;DEF P-VAIVEN-TEMP GUP2050 ;PARAMETER USED UN CYCLES
DEF R-VAIVEN-TEMP R50
DEF M-VAIVEN M500
DEF M-VAIVEN-LIMIT+ M501
DEF M-VAIVEN-LIMIT- M502
;DEF M-VAIVEN-AUX1 M503
;DEF M-VAIVEN-AUX2 M504
DEF M-VAIVEN-STOP-WR M505 ;MARK USED IN CNC CYCLES
DEF M-VAIVEN-STOP-RD M506 ;MARK USED IN CNC CYCLES
DEF M-VAIVEN-STOP-PLC M507
;
;MAGNETIC CHUCK
;
DEF R-CHUCK-STATE R55
DEF M-CHUCK-MAGN-CYCLE M552
DEF M-CHUCK-DEMAGN-CYCLE M553
DEF M-CHUCK-SAFE-CONDITIONS M554
DEF M-CHUCK-STEP-TIME B0R55
DEF M-CHUCK-STEP-1 B1R55 ;OFF STATE
DEF M-CHUCK-STEP-2 B2R55 ;CLOSE STATE
DEF M-CHUCK-STEP-3 B3R55 ;OPEN STATE
DEF M-CHUCK-STEP-4 B4R55
DEF M-CHUCK-STEP-5 B5R55
DEF M-CHUCK-STEP-6 B6R55
DEF M-CHUCK-STEP-7 B7R55
;
;
;EXTERNAL WHEEL MODULE
DEF R-WHEEL-SETPOINT R60 ;REGISTER USED IN CNC CYCLES
DEF R-WHEEL-SETPOINT2 R61 ;REGISTER USED IN CNC CYCLES
DEF M-WHEEL-IN-MANUAL M602
DEF M-WHEEL-IN-AUTO M603
DEF M-WHEEL-TURNING M604
DEF M-WHEEL-RPM-OK M605
DEF M-WHEEL-STOPPED M606
;DEF M-WHEEL-AUX1 M607
DEF M-WHEEL-MSG1 M608 ;MARK USED IN CNC CYCLES
DEF M-WHEEL-MSG2 M609 ;MARK USED IN CNC CYCLES
DEF M-WHEEL-MSG3 M610 ;MARK USED IN CNC CYCLES
DEF M-WHEEL-MSG4 M611 ;MARK USED IN CNC CYCLES
DEF M-WHEEL-TURNING-5S M612
DEF M-WHEEL-ACCELERATION M613
;
;INTERNAL WHEEL MODULE
;DEF P-INTWHEEL-VELO GUP2065 ;PARAMETER USED UN CYCLES
;DEF P-INTWHEEL-DENO GUP2066 ;PARAMETER USED UN CYCLES
;DEF P-INTWHEEL-NUME GUP2067 ;PARAMETER USED UN CYCLES
;DEF R-INTWHEEL-AUX1 R65
;DEF R-INTWHEEL-AUX2 R66
;DEF R-INTWHEEL-AUX3 R67
DEF R-INTWHEEL-VISU R68 ;REGISTER USED UN CYCLES
DEF R-INTWHEEL-SETPOINT R69
;DEF R-INTWHEEL-AUX4 R71
DEF M-INTWHEEL-IN-MANUAL M650
DEF M-INTWHEEL-IN-AUTO M651
DEF M-INTWHEEL-TURNING M652
DEF M-INTWHEEL-RPM-OK M653
DEF M-INTWHEEL-STOPPED M654
;DEF M-INTWHEEL-AUX1 M655
DEF M-INTWHEEL-ACCELERATION M656
DEF M-INTWHEEL-TURNING-5S M657
DEF M-INTWHEEL-KEYPRESSED M658
;DEF M-INTWHEEL-AUX1 M663
;
;DRESSER MODULE
DEF R-DRESS-MODE R70 ;REGISTER USED IN CNC CYCLES
;DEF R-INTWHEEL-AUX4 R71 ;REGISTER USED IN PREVIOUS MODULE
DEF R-DRESS-REQUEST R72 ;REGISTER USED IN CNC CYCLES
DEF R-DRESS-AUX1 R73
DEF M-DRESS-DRESSING M700 ;MARK USED IN CNC CYCLES
DEF M-DRESS-FORW M701 ;MARK USED IN CNC CYCLES
DEF M-DRESS-BACK M702
DEF M-DRESS-CONDITIONS M703
DEF M-DRESS-MOVING M704
DEF M-DRESS-FAULT M705
DEF M-DRESS-REQUEST M706 ;MARK USED IN CYCLES
DEF M-DRESS-IN-BACK M707 ;MARK USED IN CYCLES
DEF M-DRESS-IN-FORW M708 ;MARK USED IN CYCLES
DEF M-DRESS-INSTALLED M709 ;MARK USED IN CYCLES
;
;GAP-CRASH MODULE
DEF M-CRASH-SITUATION M751
DEF M-GAP-START-CYCLE M752
DEF M-CRASH-MESSAGE M753
DEF M-BALANCE-PRG1 M754
DEF M-BALANCE-PRG2 M755
DEF M-BALANCE-RESTORE-LIMITS M756
DEF M-CRASH-ALLOWED M757
DEF M-BALANCE-AUX1 M758
DEF M-CRASH-ENABLED M759
DEF M-CRASH-WHEELS-STOPPED M760
;
;HYDRAULIC MODULE
;
;
;AXIAL-POSITIONER MODULE
DEF R-POSAX-USED-IN-CYCLES R85 ;REGISTER USED IN CNC CYCLES
DEF M-POSAX-FORW M850
DEF M-POSAX-ACTIVE M851
DEF M-POSAX-ERROR M852
DEF M-POSAX-POSITIONING M853
DEF M-POSAX-AUX1 M854
;
;PROTECTION MODULE
;
DEF M-PROT-OFF M900
DEF M-PROT-LOCKED M901
DEF M-PROT-OPEN M902
DEF M-PROT-SEMI M903
;
DEF M-PROT-POS-REACHED M919
DEF M-PROT-REDUCE-FEED M920
DEF M-PROT-KEY M921
DEF M-PROT-KEY-LONG M922
;DEF M-PROT-AUX-OPEN M923
;DEF M-PROT-AUX1 M924
;
;BALANCE MODULE
DEF M-BALANCE-DISABLED M953
DEF M-BALANCE-REQUEST M954
DEF M-BALANCE-RPM-ERROR M955
DEF M-BALANCE-ALARM M956
DEF M-BALANCE-REQUEST-AUTO M957 ;PARA EL E82
DEF M-BALANCE-REQUEST-MAN M958 ;PARA EL E82
;
;PLCOFFSET MODULE
;DEF R-CONE-AUX1 R100
;DEF R-CONE-AUX2 R101
;DEF R-CONE-AUX3 R102
;DEF R-CONE-AUX4 R103
;DEF R-CONE-AUX5 R104
;DEF R-CONE-AUX6 R105
;DEF R-CONE-AUX7 R106
DEF R-CONE-OFFSETVAL R107
DEF R-CONE-VAL1 R108 ;REGISTER USED IN CNC CYCLES
DEF R-CONE-VAL2 R109 ;REGISTER USED IN CNC CYCLES
DEF M-CONE-COMPENSATION-ACTIVE M1000 ;MARK USED IN CNC CYCLES
DEF M-CONE-CANCELLATION M1001
DEF M-CONE-CANCELLATE M1002
;DEF M-CONE-AUX1 M1003
;
; HANDWHEEL MODULE
;
DEF R-HAND-AXIS R110
DEF R-HAND-AUX1 R111
;DEF R-HAND-AUX2 R112
;DEF R-HAND-AUX3 R113
;DEF R-HAND-AUX4 R114
;DEF R-HAND-AUX5 R115
;DEF R-HAND-AUX6 R116
;DEF R-HAND-AUX7 R117
;DEF R-HAND-AUX8 R118
;DEF R-HAND-AUX9 R119
;DEF R-HAND-AUX10 R120
DEF M-HAND-ACTIVE M1100
DEF M-HAND-PLCOFFSET M1101
DEF M-HAND-X- M1102
DEF M-HAND-X+ M1103
DEF M-HAND-Z- M1104
DEF M-HAND-Z+ M1105
DEF M-HAND-A- M1106
DEF M-HAND-A+ M1107
DEF M-HAND-RAPID M1108
DEF M-HAND-FX1 M1109
DEF M-HAND-FX10 M1110
DEF M-HAND-FX100 M1111
DEF M-HAND-ADI-X1 M1112
DEF M-HAND-ADI-X10 M1113
DEF M-HAND-ELI-OFF M1114
DEF M-HAND-INTER M1115
DEF M-HAND-PLCOFF-COUNTING M1116
DEF M-HAND-HBEON M1117
DEF M-HAND-AUX1 M1118
DEF M-HAND-AUX2 M1119
DEF M-HAND-AUX3 M1120
DEF M-HAND-XSEL M1121
DEF M-HAND-ZSEL M1122
DEF M-HAND-ASEL M1123
DEF M-HAND-ENABLE M1124
DEF M-HAND-X1 M1125
DEF M-HAND-X10 M1126
DEF M-HAND-X100 M1127
DEF M-HAND-INC-SELECTED M1128
DEF M-HAND-HDWON M1129
DEF M-HAND-JOGON M1130
DEF M-HAND-CONTINUO M1131
;
; PROTECCION DE MUELA
DEF M-WHEEL-WAS-OPENED M1150 ;MARK USED IN CNC CYCLES
DEF M-BALANCE-NEUTRAL-RQ M1151
DEF M-WHEEL-OPEN M1152
;
;C AXIS
;
DEF R-CAXIS-SERCOSREG R125
DEF R-CAXIS-TABLA R126
DEF R-CAXIS-PLANO R127
;DEF R-CAXIS-AUX1 R128
;DEF R-CAXIS-AUX2 R129
;DEF R-CAXIS-AUX3 R124
;DEF R-CAXIS-AUX4 R123
DEF M-CAXIS-REQUEST M1250
DEF M-CAXIS-TABLE-CHANGED M1251
DEF M-CAXIS-CHANGE-TAB-REQ M1252
DEF M-CAXIS-END M1253
;
;MEDIDOR
;
DEF M-MEDIDOR-OUT M1300
DEF M-MEDIDOR-FAULT M1301
DEF M-MEDIDOR-NOAUTO M1302
DEF M-MEDIDOR-MOVING M1303
DEF M-MEDIDOR-AUX1 M1304
DEF M-MEDIDOR-REQ M1304
;
;HIDROSTATICO MODULE
;
;
; MOLETA CON VARIADOR
DEF R-MOLETA-SETPOINT R140 ;REGISTER USED IN CYCLES
DEF R-MOLETA-AUX1 R141
DEF M-MOLETA-INSTALLED M1400
;
;CONTRAPUNTO
;
DEF M-CTRPTO-SAFE-CONDITION M1450
DEF M-OPEN-AUT-CTRPTO M1451
DEF M-OPEN-MAN-CTRPTO M1452
DEF M-OPEN-CONTRAPTO M1453
;
;
;MODE MODULE
;DEF R-OPE R160
;DEF R-SWITCH R161
;DEF R-HOURS R162
;DEF R-HOURLIM R163
DEF M-PRGRUN M1600
DEF M-MODE-CONDITIONAL M1601
DEF M-MODE-UNPROTECTED M1602
DEF M-REFERENCED M1603
DEF M-VALOR-REAL M1604 ;REGISTER USED IN CYCLES
DEF M-ORDAINDU M1605
;
;SCREENS MODULE
;DEF R-PAN R170
;DEF R-DAT R171
;DEF R-SCREEN-AUX1 R172
;DEF R-CHISPEO R173
;
;CENTRAL MODULE
;DEF R-SPINDLE-STOP R180
;DEF R-FEEDHOLD R181
;DEF R-READIN-DISABLE R182
;DEF R-CYC-START-DIS R183
;DEF R-CYC-STOP R184
;DEF R-AUXEND-DISABLE R185
;DEF R-WHEEL-DISABLE R186
;DEF R-INTWHEEL-DISABLE R187
DEF M-WHEEL-STOP-CONDITIONS M1800
DEF M-INTWHEEL-STOP-CONDITIONS M1801
DEF M-SPINDLE-STOP-CONDITIONS M1802
;
;MSG MODULE
;
DEF R-MSG1-32 R190
DEF R-MSG32-64 R191
DEF R-MSG64-96 R192
;DEF R-MSG-AUX1 R193
;DEF R-MSG-AUX2 R194
;DEF R-MSG-AUX3 R195
;DEF R-MSG-AUX4 R196
;DEF R-MSG-AUX5 R197
;DEF R-MSG-AUX6 R198
;DEF R-MSG-AUX7 R199
;DEF R-MSG-AUX8 R200
;DEF R-MSG-AUX9 R201
;DEF M-MSG-AUX M1900
;
;
;GENERAL MARKS
DEF R-AXIS R210 ;options for axis
; b0=x, b1=z, b2=cab, b3=a, b4=c
DEF R-CHUCK R211 ;options for chuck
; b0=neumatic, b1=hydraulic, b2=magnetic, b3=detector, b6=contrapunto hid.
DEF R-HAND R212 ;options for hadwheel
; b0=manual, b1=portable
DEF R-WHEEL R213 ;options for wheel. Usado en ciclo 9000.
; b0=ext without var, b1=ext with var, b2=int without var, b3= int without var,
; b4=wheel protections, b5=face wheel, b6=grupo hidrostatico, b7:ext with fagor drive
DEF R-BALANCE R214 ;options for balance,gap,crash
; b0= balance, b1=gap ext, b2=crash ext, b3=gap int, b4=crash int,b5=gap face,
; b6=crash face, b7:balance system(0)/marposs(1)
DEF R-DEVICES R215 ;options of other devices.
; b0=pneumatic axial, b1=hydraulic dresser arm; b2:normal protec, b3:automatic protec,
; b4:baliza; b5:Enfriadora; b6:Divisor Aisiakin; b7:Engrase Intza
DEF R-OPTIONS R216
; b0=cone compensation; b1:seguridad sonda; b2: termicos prioridad 2; b3: Refrig. con transvase; b4: seguridad divisor
DEF R-MOREOPT R217
; b0=abatible interior; b1: abatible refentar; b2: parada intermedia puerta; b3:Apave; b4=inprocess measurer;
;
DEF R-FASTIN R230 ; REGISTER FOR FAST INPUT SELECTION
DEF R-LUBX R231 ; LEE CADA CUANTO DE DIST X HAY QUE ENGRASAR
DEF R-LUBZ R232 ; IDEM PARA Z
DEF R-CABINTER R233 ; CAB. PORTAPIEZAS EN INTERMITENTE
DEF R-FILTER R234 ; FILTRO PARA NO REBASAR PLC OFFSET
DEF R-ZERO R235 ; ZERO REGISTER
DEF R-OVERRIDE R236 ; VALOR DEL OVERRIDE DEL CANAL
DEF R-MINAUXEND R237 ; PARAMETER MINAUXEND
DEF M-TEMP M2000
DEF M-TIMER1 M2010 ; 200 MSEC
DEF M-TIMER2 M2011
DEF M-CUSTOM-MODE M5512 ; MARCA DE SISTEMA PARA INDICAR CONVERSACIONAL
;
;
;Ms'PROGRAMA CNC
;=================================
;
;M3 - ARRANQUE CABEZAL PORTAPIEZA
;M5 - PARADA CABEZAL
;M7 - REFRIGERANTE DE INTERIORES
;M8 - REFRIGERANTE DE EXTERIORES
;M9 - PARADA REFRIGERANTE
;M10 - ADELANTAR DRESSER
;M11 - ATRASAR DRESSER
;M12 - MARCHA MUELA INTERIORES
;M13 - PARO MUELA INTERIORES
;M14 - ARRANQUE MUELA
;M16 - PARO MUELA
;M17 - MARCHA DIAMANTADOR MOLETA
;M18 - PARADA DIAMANTADOR MOLETA
;M26 - ACTIVAR GRUPO HIDROSTATICO
;M27 -
;M28 - BAJAR ABATIBLE
;M29 - SUBIR ABATIBLE
;M31 - Eje-A vivo
;M32 - Eje-A muerto
;M35 - Activa variacion rpm cabezal
;M36 - Desactiva variacion rpm cabezal
;M37 - Activa inversion de giro cabezal
;M38 - Anula inversion de giro de cabezal
;M5O - EJECUTAR VAIVEN
;M51 - PARADA VAIVEN
;M55 - ABRIR CONTRAPUNTO
;M56 - CERRAR CONTRAPUNTO
;M72 -
;M73 -
;M75 - EQUILIBRAR MUELA SI ESTA DESEQUILIBRADA
;M76 - START CICLE GAP
;M77 - STOP CICLE GAP
;M78 - HABILITAR CRASH
;M79 - DESHABILITAR CRASH
;M80 - ACTIVAR SEGURIDAD SONDA
;M81 - ANULAR SEGURIDAD SONDA
;M84 - INHIBIR PLCOF
;M85 - RESET M84
;M90 - SALIDA POS. AXIAL
;M91 - RETIRADA POS. AXIAL
;M92 - ACTIVAR POS. AXIAL
;M93 - DESACTIVAR POS. AXIAL
;M94 - ANULAR EQUILIBRADOR
;M95 - ANULAR M94
;M98 - CERRAR MICRO SEGURIDAD (QUITAR TENSION A BOBINA)
;M99 - ABRIR MICRO DE SEGURIDAD
;
; PROGRAMA PLC
;==============
;-------------
;INITIAL CYCLE
;-------------
;
CY1
REA
()=CAL L2
END
;
;---------------
;CICLO PERIDODICO
;---------------
PE 10
REA
(B1R214 ;gap ext
OR B2R214 ;crash ext
OR B3R214 ;gap int
OR B4R214 ;crash int
OR B5R214 ;gap refren
OR B6R214) ;crash refren
AND NOT B7R214 ;no marposs
= CAL L15
;
(B1R214 ;gap ext
OR B2R214 ;crash ext
OR B3R214 ;gap int
OR B4R214 ;crash int
OR B5R214 ;gap refren
OR B6R214) ;crash refren
AND B7R214 ;marposs
= CAL L65
END
;---------------
;MAIN SCAN CYCLE
;---------------
PRG
REA