phatpspv1.lst

Embedded camera control program.

0428:  BTFSC  6D.7
0429:  GOTO   44B
042A:  MOVF   65,W
042B:  MOVWF  6D
042C:  BTFSS  6C.0
042D:  GOTO   435
042E:  RRF    72,F
042F:  RRF    71,F
0430:  RRF    70,F
0431:  RRF    6F,F
0432:  INCF   77,F
0433:  BTFSC  03.2
0434:  GOTO   488
0435:  BTFSS  6F.7
0436:  GOTO   446
0437:  INCF   70,F
0438:  BTFSS  03.2
0439:  GOTO   446
043A:  INCF   71,F
043B:  BTFSS  03.2
043C:  GOTO   446
043D:  INCF   72,F
043E:  BTFSS  03.2
043F:  GOTO   446
0440:  RRF    72,F
0441:  RRF    71,F
0442:  RRF    70,F
0443:  INCF   77,F
0444:  BTFSC  03.2
0445:  GOTO   488
0446:  BTFSC  6E.6
0447:  GOTO   3CA
0448:  BTFSC  6E.7
0449:  GOTO   40C
044A:  GOTO   46A
044B:  MOVLW  80
044C:  XORWF  72,F
044D:  BTFSS  72.7
044E:  GOTO   453
044F:  GOTO   48D
0450:  MOVF   69,W
0451:  MOVWF  6D
0452:  GOTO   460
0453:  MOVF   65,W
0454:  MOVWF  6D
0455:  MOVF   72,F
0456:  BTFSS  03.2
0457:  GOTO   460
0458:  MOVF   71,F
0459:  BTFSS  03.2
045A:  GOTO   460
045B:  MOVF   70,F
045C:  BTFSS  03.2
045D:  GOTO   460
045E:  CLRF   77
045F:  GOTO   481
0460:  BTFSC  72.7
0461:  GOTO   46A
0462:  BCF    03.0
0463:  RLF    6F,F
0464:  RLF    70,F
0465:  RLF    71,F
0466:  RLF    72,F
0467:  DECFSZ 77,F
0468:  GOTO   460
0469:  GOTO   488
046A:  BTFSS  6D.7
046B:  GOTO   46E
046C:  BSF    72.7
046D:  GOTO   481
046E:  BCF    72.7
046F:  GOTO   481
0470:  MOVF   68,W
0471:  MOVWF  77
0472:  MOVF   69,W
0473:  MOVWF  72
0474:  MOVF   6A,W
0475:  MOVWF  71
0476:  MOVF   6B,W
0477:  MOVWF  70
0478:  GOTO   481
0479:  MOVF   64,W
047A:  MOVWF  77
047B:  MOVF   65,W
047C:  MOVWF  72
047D:  MOVF   66,W
047E:  MOVWF  71
047F:  MOVF   67,W
0480:  MOVWF  70
0481:  MOVF   72,W
0482:  MOVWF  78
0483:  MOVF   71,W
0484:  MOVWF  79
0485:  MOVF   70,W
0486:  MOVWF  7A
0487:  GOTO   4C0
0488:  CLRF   77
0489:  CLRF   78
048A:  CLRF   79
048B:  CLRF   7A
048C:  GOTO   4C0
048D:  CLRF   6F
048E:  COMF   70,F
048F:  COMF   71,F
0490:  COMF   72,F
0491:  COMF   6F,F
0492:  INCF   6F,F
0493:  BTFSS  03.2
0494:  GOTO   49B
0495:  INCF   70,F
0496:  BTFSS  03.2
0497:  GOTO   49B
0498:  INCF   71,F
0499:  BTFSC  03.2
049A:  INCF   72,F
049B:  BTFSC  6E.0
049C:  GOTO   3A9
049D:  BTFSC  6E.1
049E:  GOTO   3EB
049F:  BTFSC  6E.2
04A0:  GOTO   421
04A1:  GOTO   450
04A2:  MOVF   00,W
04A3:  ADDWF  70,F
04A4:  BTFSS  03.0
04A5:  GOTO   4AC
04A6:  INCF   71,F
04A7:  BTFSS  03.2
04A8:  GOTO   4AC
04A9:  INCF   72,F
04AA:  BTFSC  03.2
04AB:  BSF    6C.0
04AC:  DECF   04,F
04AD:  MOVF   00,W
04AE:  ADDWF  71,F
04AF:  BTFSS  03.0
04B0:  GOTO   4B4
04B1:  INCF   72,F
04B2:  BTFSC  03.2
04B3:  BSF    6C.0
04B4:  DECF   04,F
04B5:  MOVF   00,W
04B6:  BTFSS  00.7
04B7:  XORLW  80
04B8:  ADDWF  72,F
04B9:  BTFSC  03.0
04BA:  BSF    6C.0
04BB:  BTFSC  6E.4
04BC:  GOTO   3B0
04BD:  BTFSC  6E.5
04BE:  GOTO   3F2
04BF:  GOTO   428
04C0:  NOP
04C1:  RETLW  00
04C2:  MOVF   60,W
04C3:  BTFSC  03.2
04C4:  GOTO   532
04C5:  MOVWF  68
04C6:  MOVF   64,W
04C7:  BTFSC  03.2
04C8:  GOTO   532
04C9:  ADDWF  68,F
04CA:  BTFSC  03.0
04CB:  GOTO   4D3
04CC:  MOVLW  7F
04CD:  SUBWF  68,F
04CE:  BTFSS  03.0
04CF:  GOTO   532
04D0:  BTFSC  03.2
04D1:  GOTO   532
04D2:  GOTO   4D7
04D3:  MOVLW  81
04D4:  ADDWF  68,F
04D5:  BTFSC  03.0
04D6:  GOTO   532
04D7:  MOVF   68,W
04D8:  MOVWF  77
04D9:  CLRF   78
04DA:  CLRF   79
04DB:  CLRF   7A
04DC:  MOVF   61,W
04DD:  MOVWF  6C
04DE:  BSF    6C.7
04DF:  MOVF   62,W
04E0:  MOVWF  6B
04E1:  MOVF   63,W
04E2:  MOVWF  6A
04E3:  MOVLW  18
04E4:  MOVWF  68
04E5:  CLRF   69
04E6:  BTFSS  6A.0
04E7:  GOTO   500
04E8:  MOVF   67,W
04E9:  ADDWF  7A,F
04EA:  BTFSS  03.0
04EB:  GOTO   4F2
04EC:  INCF   79,F
04ED:  BTFSS  03.2
04EE:  GOTO   4F2
04EF:  INCF   78,F
04F0:  BTFSC  03.2
04F1:  BSF    69.7
04F2:  MOVF   66,W
04F3:  ADDWF  79,F
04F4:  BTFSS  03.0
04F5:  GOTO   4F9
04F6:  INCF   78,F
04F7:  BTFSC  03.2
04F8:  BSF    69.7
04F9:  MOVF   65,W
04FA:  MOVWF  62
04FB:  BSF    62.7
04FC:  MOVF   62,W
04FD:  ADDWF  78,F
04FE:  BTFSC  03.0
04FF:  BSF    69.7
0500:  RLF    69,F
0501:  RRF    78,F
0502:  RRF    79,F
0503:  RRF    7A,F
0504:  RRF    6C,F
0505:  RRF    6B,F
0506:  RRF    6A,F
0507:  BCF    03.0
0508:  DECFSZ 68,F
0509:  GOTO   4E5
050A:  MOVLW  01
050B:  ADDWF  77,F
050C:  BTFSC  03.0
050D:  GOTO   532
050E:  BTFSC  78.7
050F:  GOTO   517
0510:  RLF    6C,F
0511:  RLF    7A,F
0512:  RLF    79,F
0513:  RLF    78,F
0514:  DECF   77,F
0515:  BTFSC  03.2
0516:  GOTO   532
0517:  BTFSS  6C.7
0518:  GOTO   528
0519:  INCF   7A,F
051A:  BTFSS  03.2
051B:  GOTO   528
051C:  INCF   79,F
051D:  BTFSS  03.2
051E:  GOTO   528
051F:  INCF   78,F
0520:  BTFSS  03.2
0521:  GOTO   528
0522:  RRF    78,F
0523:  RRF    79,F
0524:  RRF    7A,F
0525:  INCF   77,F
0526:  BTFSC  03.2
0527:  GOTO   532
0528:  MOVF   61,W
0529:  MOVWF  69
052A:  MOVF   65,W
052B:  XORWF  69,F
052C:  BTFSS  69.7
052D:  GOTO   530
052E:  BSF    78.7
052F:  GOTO   536
0530:  BCF    78.7
0531:  GOTO   536
0532:  CLRF   77
0533:  CLRF   78
0534:  CLRF   79
0535:  CLRF   7A
0536:  NOP
0537:  RETLW  00
0538:  MOVF   60,W
0539:  BTFSC  03.2
053A:  GOTO   5FD
053B:  MOVWF  6C
053C:  MOVF   64,W
053D:  BTFSC  03.2
053E:  GOTO   5FD
053F:  SUBWF  6C,F
0540:  BTFSS  03.0
0541:  GOTO   547
0542:  MOVLW  7F
0543:  ADDWF  6C,F
0544:  BTFSC  03.0
0545:  GOTO   5FD
0546:  GOTO   54D
0547:  MOVLW  81
0548:  SUBWF  6C,F
0549:  BTFSS  03.0
054A:  GOTO   5FD
054B:  BTFSC  03.2
054C:  GOTO   5FD
054D:  MOVF   6C,W
054E:  MOVWF  77
054F:  CLRF   78
0550:  CLRF   79
0551:  CLRF   7A
0552:  CLRF   6B
0553:  MOVF   61,W
0554:  MOVWF  6A
0555:  BSF    6A.7
0556:  MOVF   62,W
0557:  MOVWF  69
0558:  MOVF   63,W
0559:  MOVWF  68
055A:  MOVLW  19
055B:  MOVWF  6C
055C:  MOVF   67,W
055D:  SUBWF  68,F
055E:  BTFSC  03.0
055F:  GOTO   570
0560:  MOVLW  01
0561:  SUBWF  69,F
0562:  BTFSC  03.0
0563:  GOTO   570
0564:  SUBWF  6A,F
0565:  BTFSC  03.0
0566:  GOTO   570
0567:  SUBWF  6B,F
0568:  BTFSC  03.0
0569:  GOTO   570
056A:  INCF   6B,F
056B:  INCF   6A,F
056C:  INCF   69,F
056D:  MOVF   67,W
056E:  ADDWF  68,F
056F:  GOTO   5A2
0570:  MOVF   66,W
0571:  SUBWF  69,F
0572:  BTFSC  03.0
0573:  GOTO   58B
0574:  MOVLW  01
0575:  SUBWF  6A,F
0576:  BTFSC  03.0
0577:  GOTO   58B
0578:  SUBWF  6B,F
0579:  BTFSC  03.0
057A:  GOTO   58B
057B:  INCF   6B,F
057C:  INCF   6A,F
057D:  MOVF   66,W
057E:  ADDWF  69,F
057F:  MOVF   67,W
0580:  ADDWF  68,F
0581:  BTFSS  03.0
0582:  GOTO   5A2
0583:  INCF   69,F
0584:  BTFSS  03.2
0585:  GOTO   5A2
0586:  INCF   6A,F
0587:  BTFSS  03.2
0588:  GOTO   5A2
0589:  INCF   6B,F
058A:  GOTO   5A2
058B:  MOVF   65,W
058C:  IORLW  80
058D:  SUBWF  6A,F
058E:  BTFSC  03.0
058F:  GOTO   5A1
0590:  MOVLW  01
0591:  SUBWF  6B,F
0592:  BTFSC  03.0
0593:  GOTO   5A1
0594:  INCF   6B,F
0595:  MOVF   65,W
0596:  IORLW  80
0597:  ADDWF  6A,F
0598:  MOVF   66,W
0599:  ADDWF  69,F
059A:  BTFSS  03.0
059B:  GOTO   57F
059C:  INCF   6A,F
059D:  BTFSS  03.2
059E:  GOTO   57F
059F:  INCF   6B,F
05A0:  GOTO   57F
05A1:  BSF    7A.0
05A2:  DECFSZ 6C,F
05A3:  GOTO   5A5
05A4:  GOTO   5B0
05A5:  BCF    03.0
05A6:  RLF    68,F
05A7:  RLF    69,F
05A8:  RLF    6A,F
05A9:  RLF    6B,F
05AA:  BCF    03.0
05AB:  RLF    7A,F
05AC:  RLF    79,F
05AD:  RLF    78,F
05AE:  RLF    6D,F
05AF:  GOTO   55C
05B0:  BTFSS  6D.0
05B1:  GOTO   5B8
05B2:  BCF    03.0
05B3:  RRF    78,F
05B4:  RRF    79,F
05B5:  RRF    7A,F
05B6:  RRF    6D,F
05B7:  GOTO   5BB
05B8:  DECF   77,F
05B9:  BTFSC  03.2
05BA:  GOTO   5FD
05BB:  BTFSC  6D.7
05BC:  GOTO   5E4
05BD:  BCF    03.0
05BE:  RLF    68,F
05BF:  RLF    69,F
05C0:  RLF    6A,F
05C1:  RLF    6B,F
05C2:  MOVF   67,W
05C3:  SUBWF  68,F
05C4:  BTFSC  03.0
05C5:  GOTO   5D0
05C6:  MOVLW  01
05C7:  SUBWF  69,F
05C8:  BTFSC  03.0
05C9:  GOTO   5D0
05CA:  SUBWF  6A,F
05CB:  BTFSC  03.0
05CC:  GOTO   5D0
05CD:  SUBWF  6B,F
05CE:  BTFSS  03.0
05CF:  GOTO   5F3
05D0:  MOVF   66,W
05D1:  SUBWF  69,F
05D2:  BTFSC  03.0
05D3:  GOTO   5DB
05D4:  MOVLW  01
05D5:  SUBWF  6A,F
05D6:  BTFSC  03.0
05D7:  GOTO   5DB
05D8:  SUBWF  6B,F
05D9:  BTFSS  03.0
05DA:  GOTO   5F3
05DB:  MOVF   65,W
05DC:  IORLW  80
05DD:  SUBWF  6A,F
05DE:  BTFSC  03.0
05DF:  GOTO   5E4
05E0:  MOVLW  01
05E1:  SUBWF  6B,F
05E2:  BTFSS  03.0
05E3:  GOTO   5F3
05E4:  INCF   7A,F
05E5:  BTFSS  03.2
05E6:  GOTO   5F3
05E7:  INCF   79,F
05E8:  BTFSS  03.2
05E9:  GOTO   5F3
05EA:  INCF   78,F
05EB:  BTFSS  03.2
05EC:  GOTO   5F3
05ED:  INCF   77,F
05EE:  BTFSC  03.2
05EF:  GOTO   5FD
05F0:  RRF    78,F
05F1:  RRF    79,F
05F2:  RRF    7A,F
05F3:  MOVF   61,W
05F4:  MOVWF  6C
05F5:  MOVF   65,W
05F6:  XORWF  6C,F
05F7:  BTFSS  6C.7
05F8:  GOTO   5FB
05F9:  BSF    78.7
05FA:  GOTO   601
05FB:  BCF    78.7
05FC:  GOTO   601
05FD:  CLRF   77
05FE:  CLRF   78
05FF:  CLRF   79
0600:  CLRF   7A
0601:  NOP
0602:  RETLW  00
0603:  MOVF   5D,W
0604:  MOVWF  64
0605:  MOVF   61,W
0606:  XORWF  64,F