Track the Arc Start of a mig weld into a weld counter running in BG Logic

Simple programm to save every weld into a weld counter runing in BG Logic

1: !******************************** ;

2: !Mig Weld Counter Routine ;

3: !******************************** ;

4: ;

5: !Interconnection Arc Start from ;

6: !the welder ;

7: IF (DI[522:Arc detect ]=ON),DO[450:Spare PLC]=PULSE ;

8: ;

9: !Stored the Pulse in a Register ;

10: R[55:Arc Start]=(DO[450:Spare PLC]) ;

11: ;

12: !Weld counter Register ;

13: R[56:Weld count]=R[55:Arc Start]+R[56:Weld count] ;

14: ;

15: !Weld count GO ;

16: GO[2:Ream Count]=R[56:Weld count] ;

17: ;