weldrobotold.lst

Welding Robot controller C Embedded Program on micro-controller.

0797:  CLRF   7A
0798:  MOVF   21,W
0799:  MOVWF  24
079A:  BSF    21.7
079B:  BCF    03.0
079C:  RRF    21,F
079D:  RRF    22,F
079E:  RRF    23,F
079F:  RRF    7A,F
07A0:  RRF    79,F
07A1:  RRF    78,F
07A2:  RRF    77,F
07A3:  DECFSZ 20,F
07A4:  GOTO   79B
07A5:  BTFSS  24.7
07A6:  GOTO   7B2
07A7:  COMF   77,F
07A8:  COMF   78,F
07A9:  COMF   79,F
07AA:  COMF   7A,F
07AB:  INCF   77,F
07AC:  BTFSC  03.2
07AD:  INCF   78,F
07AE:  BTFSC  03.2
07AF:  INCF   79,F
07B0:  BTFSC  03.2
07B1:  INCF   7A,F
07B2:  BCF    03.5
07B3:  RETLW  00
07B4:  MOVLW  8E
07B5:  MOVWF  77
07B6:  MOVF   68,W
07B7:  SUBWF  77,F
07B8:  MOVF   69,W
07B9:  MOVWF  79
07BA:  MOVF   6A,W
07BB:  MOVWF  78
07BC:  BSF    79.7
07BD:  MOVF   77,F
07BE:  BTFSC  03.2
07BF:  GOTO   7CB
07C0:  BCF    03.0
07C1:  MOVF   79,F
07C2:  BTFSS  03.2
07C3:  GOTO   7C7
07C4:  MOVF   78,F
07C5:  BTFSC  03.2
07C6:  GOTO   7CB
07C7:  RRF    79,F
07C8:  RRF    78,F
07C9:  DECFSZ 77,F
07CA:  GOTO   7C0
07CB:  BTFSS  69.7
07CC:  GOTO   7D2
07CD:  COMF   78,F
07CE:  COMF   79,F
07CF:  INCF   78,F
07D0:  BTFSC  03.2
07D1:  INCF   79,F
07D2:  NOP
07D3:  BSF    0A.3
07D4:  BCF    0A.4
07D5:  GOTO   3F3 (RETURN)
*
089F:  MOVLW  80
08A0:  BTFSC  03.1
08A1:  XORWF  71,F
08A2:  BSF    03.5
08A3:  CLRF   22
08A4:  CLRF   23
08A5:  BCF    03.5
08A6:  MOVF   6D,W
08A7:  BSF    03.5
08A8:  MOVWF  21
08A9:  MOVF   71,W
08AA:  XORWF  21,F
08AB:  BCF    03.5
08AC:  MOVF   6C,W
08AD:  BTFSC  03.2
08AE:  GOTO   1A3
08AF:  BSF    03.5
08B0:  MOVWF  20
08B1:  MOVWF  77
08B2:  MOVF   70,W
08B3:  BTFSC  03.2
08B4:  GOTO   1AD
08B5:  SUBWF  20,F
08B6:  BTFSC  03.2
08B7:  GOTO   143
08B8:  BTFSS  03.0
08B9:  GOTO   0F9
08BA:  MOVF   71,W
08BB:  MOVWF  26
08BC:  BSF    26.7
08BD:  MOVF   72,W
08BE:  MOVWF  25
08BF:  MOVF   73,W
08C0:  MOVWF  24
08C1:  CLRF   23
08C2:  BCF    03.0
08C3:  RRF    26,F
08C4:  RRF    25,F
08C5:  RRF    24,F
08C6:  RRF    23,F
08C7:  DECFSZ 20,F
08C8:  GOTO   0C1
08C9:  BTFSS  21.7
08CA:  GOTO   0CE
08CB:  BSF    22.0
08CC:  GOTO   1C7
08CD:  BCF    22.0
08CE:  BCF    20.0
08CF:  BSF    22.4
08D0:  MOVLW  6F
08D1:  MOVWF  04
08D2:  BCF    03.7
08D3:  GOTO   1DC
08D4:  BCF    22.4
08D5:  BTFSC  21.7
08D6:  GOTO   0E1
08D7:  BTFSS  20.0
08D8:  GOTO   0EC
08D9:  RRF    26,F
08DA:  RRF    25,F
08DB:  RRF    24,F
08DC:  RRF    23,F
08DD:  INCF   77,F
08DE:  BTFSC  03.2
08DF:  GOTO   1C2
08E0:  GOTO   0EC
08E1:  BTFSC  26.7
08E2:  GOTO   0EF
08E3:  BCF    03.0
08E4:  RLF    23,F
08E5:  RLF    24,F
08E6:  RLF    25,F
08E7:  RLF    26,F
08E8:  DECF   77,F
08E9:  BTFSC  03.2
08EA:  GOTO   1C2
08EB:  GOTO   0E1
08EC:  BSF    22.6
08ED:  GOTO   165
08EE:  BCF    22.6
08EF:  BCF    03.5
08F0:  MOVF   6D,W
08F1:  BSF    03.5
08F2:  MOVWF  21
08F3:  BTFSS  21.7
08F4:  GOTO   0F7
08F5:  BSF    26.7
08F6:  GOTO   1BB
08F7:  BCF    26.7
08F8:  GOTO   1BB
08F9:  MOVF   70,W
08FA:  MOVWF  20
08FB:  MOVWF  77
08FC:  BCF    03.5
08FD:  MOVF   6C,W
08FE:  BSF    03.5
08FF:  SUBWF  20,F
0900:  BCF    03.5
0901:  MOVF   6D,W
0902:  BSF    03.5
0903:  MOVWF  26
0904:  BSF    26.7
0905:  BCF    03.5
0906:  MOVF   6E,W
0907:  BSF    03.5
0908:  MOVWF  25
0909:  BCF    03.5
090A:  MOVF   6F,W
090B:  BSF    03.5
090C:  MOVWF  24
090D:  CLRF   23
090E:  BCF    03.0
090F:  RRF    26,F
0910:  RRF    25,F
0911:  RRF    24,F
0912:  RRF    23,F
0913:  DECFSZ 20,F
0914:  GOTO   10D
0915:  BTFSS  21.7
0916:  GOTO   11A
0917:  BSF    22.1
0918:  GOTO   1C7
0919:  BCF    22.1
091A:  BCF    20.0
091B:  BSF    22.5
091C:  MOVLW  73
091D:  MOVWF  04
091E:  BCF    03.7
091F:  GOTO   1DC
0920:  BCF    22.5
0921:  BTFSC  21.7
0922:  GOTO   12D
0923:  BTFSS  20.0
0924:  GOTO   138
0925:  RRF    26,F
0926:  RRF    25,F
0927:  RRF    24,F
0928:  RRF    23,F
0929:  INCF   77,F
092A:  BTFSC  03.2
092B:  GOTO   1C2
092C:  GOTO   138
092D:  BTFSC  26.7
092E:  GOTO   13B
092F:  BCF    03.0
0930:  RLF    23,F
0931:  RLF    24,F
0932:  RLF    25,F
0933:  RLF    26,F
0934:  DECF   77,F
0935:  BTFSC  03.2
0936:  GOTO   1C2
0937:  GOTO   12D
0938:  BSF    22.7
0939:  GOTO   165
093A:  BCF    22.7
093B:  MOVF   71,W
093C:  MOVWF  21
093D:  BTFSS  21.7
093E:  GOTO   141
093F:  BSF    26.7
0940:  GOTO   1BB
0941:  BCF    26.7
0942:  GOTO   1BB
0943:  MOVF   71,W
0944:  MOVWF  26
0945:  BSF    26.7
0946:  MOVF   72,W
0947:  MOVWF  25
0948:  MOVF   73,W
0949:  MOVWF  24
094A:  BTFSS  21.7
094B:  GOTO   150
094C:  BCF    26.7
094D:  BSF    22.2
094E:  GOTO   1C7
094F:  BCF    22.2
0950:  CLRF   23
0951:  BCF    20.0
0952:  MOVLW  6F
0953:  MOVWF  04
0954:  BCF    03.7
0955:  GOTO   1DC
0956:  BTFSC  21.7
0957:  GOTO   17B
0958:  BCF    03.5
0959:  MOVF   6D,W
095A:  BSF    03.5
095B:  MOVWF  21
095C:  BTFSS  20.0
095D:  GOTO   165
095E:  RRF    26,F
095F:  RRF    25,F
0960:  RRF    24,F
0961:  RRF    23,F
0962:  INCF   77,F
0963:  BTFSC  03.2
0964:  GOTO   1C2
0965:  BTFSS  23.7
0966:  GOTO   176
0967:  INCF   24,F
0968:  BTFSS  03.2
0969:  GOTO   176
096A:  INCF   25,F
096B:  BTFSS  03.2
096C:  GOTO   176
096D:  INCF   26,F
096E:  BTFSS  03.2
096F:  GOTO   176
0970:  RRF    26,F
0971:  RRF    25,F
0972:  RRF    24,F
0973:  INCF   77,F
0974:  BTFSC  03.2
0975:  GOTO   1C2
0976:  BTFSC  22.6
0977:  GOTO   0EE
0978:  BTFSC  22.7
0979:  GOTO   13A
097A:  GOTO   19C
097B:  MOVLW  80
097C:  XORWF  26,F
097D:  BTFSS  26.7
097E:  GOTO   183
097F:  GOTO   1C7
0980:  MOVF   71,W
0981:  MOVWF  21
0982:  GOTO   192
0983:  BCF    03.5
0984:  MOVF   6D,W
0985:  BSF    03.5
0986:  MOVWF  21
0987:  MOVF   26,F
0988:  BTFSS  03.2
0989:  GOTO   192
098A:  MOVF   25,F
098B:  BTFSS  03.2
098C:  GOTO   192
098D:  MOVF   24,F
098E:  BTFSS  03.2
098F:  GOTO   192
0990:  CLRF   77
0991:  GOTO   1BB
0992:  BTFSC  26.7
0993:  GOTO   19C
0994:  BCF    03.0
0995:  RLF    23,F
0996:  RLF    24,F
0997:  RLF    25,F
0998:  RLF    26,F
0999:  DECFSZ 77,F
099A:  GOTO   192
099B:  GOTO   1C2
099C:  BTFSS  21.7
099D:  GOTO   1A0
099E:  BSF    26.7
099F:  GOTO   1BB
09A0:  BCF    26.7
09A1:  GOTO   1BB
09A2:  BCF    03.5
09A3:  MOVF   70,W
09A4:  MOVWF  77
09A5:  MOVF   71,W
09A6:  BSF    03.5
09A7:  MOVWF  26
09A8:  MOVF   72,W
09A9:  MOVWF  25
09AA:  MOVF   73,W
09AB:  MOVWF  24
09AC:  GOTO   1BB
09AD:  BCF    03.5
09AE:  MOVF   6C,W
09AF:  MOVWF  77
09B0:  MOVF   6D,W
09B1:  BSF    03.5
09B2:  MOVWF  26
09B3:  BCF    03.5
09B4:  MOVF   6E,W
09B5:  BSF    03.5
09B6:  MOVWF  25
09B7:  BCF    03.5
09B8:  MOVF   6F,W
09B9:  BSF    03.5
09BA:  MOVWF  24
09BB:  MOVF   26,W
09BC:  MOVWF  78
09BD:  MOVF   25,W
09BE:  MOVWF  79
09BF:  MOVF   24,W
09C0:  MOVWF  7A
09C1:  GOTO   1FA
09C2:  CLRF   77
09C3:  CLRF   78
09C4:  CLRF   79
09C5:  CLRF   7A
09C6:  GOTO   1FA
09C7:  CLRF   23
09C8:  COMF   24,F
09C9:  COMF   25,F
09CA:  COMF   26,F
09CB:  COMF   23,F
09CC:  INCF   23,F
09CD:  BTFSS  03.2
09CE:  GOTO   1D5
09CF:  INCF   24,F
09D0:  BTFSS  03.2
09D1:  GOTO   1D5
09D2:  INCF   25,F
09D3:  BTFSC  03.2
09D4:  INCF   26,F
09D5:  BTFSC  22.0
09D6:  GOTO   0CD
09D7:  BTFSC  22.1
09D8:  GOTO   119
09D9:  BTFSC  22.2
09DA:  GOTO   14F
09DB:  GOTO   180
09DC:  MOVF   00,W
09DD:  ADDWF  24,F
09DE:  BTFSS  03.0
09DF:  GOTO   1E6
09E0:  INCF   25,F
09E1:  BTFSS  03.2
09E2:  GOTO   1E6
09E3:  INCF   26,F
09E4:  BTFSC  03.2
09E5:  BSF    20.0
09E6:  DECF   04,F
09E7:  MOVF   00,W
09E8:  ADDWF  25,F
09E9:  BTFSS  03.0
09EA:  GOTO   1EE
09EB:  INCF   26,F
09EC:  BTFSC  03.2
09ED:  BSF    20.0
09EE:  DECF   04,F
09EF:  MOVF   00,W
09F0:  BTFSS  00.7
09F1:  XORLW  80
09F2:  ADDWF  26,F
09F3:  BTFSC  03.0
09F4:  BSF    20.0
09F5:  BTFSC  22.4
09F6:  GOTO   0D4
09F7:  BTFSC  22.5
09F8:  GOTO   120
09F9:  GOTO   156
09FA:  NOP
09FB:  BCF    03.5
09FC:  RETLW  00
09FD:  MOVF   04,W
09FE:  MOVWF  6E
09FF:  MOVF   6D,W
0A00:  MOVWF  70
0A01:  BTFSC  03.2
0A02:  GOTO   22C
0A03:  CLRF   28
0A04:  BTFSC  0B.7
0A05:  BSF    28.7
0A06:  BCF    0B.7
0A07:  MOVF   6C,W
0A08:  BSF    03.5
0A09:  MOVWF  5A
0A0A:  BCF    03.5
0A0B:  MOVF   6B,W
0A0C:  BSF    03.5
0A0D:  MOVWF  59
0A0E:  BCF    03.5
0A0F:  MOVF   6A,W
0A10:  BSF    03.5
0A11:  MOVWF  58
0A12:  BCF    03.5
0A13:  MOVF   69,W
0A14:  BSF    03.5
0A15:  MOVWF  57
0A16:  CLRF   5E
0A17:  CLRF   5D
0A18:  MOVLW  20
0A19:  MOVWF  5C
0A1A:  MOVLW  82
0A1B:  MOVWF  5B
0A1C:  BCF    0A.3
0A1D:  BCF    03.5
0A1E:  CALL   43C
0A1F:  BSF    0A.3
0A20:  BTFSC  28.7
0A21:  BSF    0B.7
0A22:  MOVF   7A,W
0A23:  MOVWF  6C
0A24:  MOVF   79,W
0A25:  MOVWF  6B
0A26:  MOVF   78,W
0A27:  MOVWF  6A
0A28:  MOVF   77,W
0A29:  MOVWF  69
0A2A:  DECFSZ 70,F