phatpsp.lst

Embedded camera control program.

03D7:  ADDWF  6B,F
03D8:  BTFSS  03.0
03D9:  GOTO   3F9
03DA:  INCF   6C,F
03DB:  BTFSS  03.2
03DC:  GOTO   3F9
03DD:  INCF   6D,F
03DE:  BTFSS  03.2
03DF:  GOTO   3F9
03E0:  INCF   6E,F
03E1:  GOTO   3F9
03E2:  MOVF   68,W
03E3:  IORLW  80
03E4:  SUBWF  6D,F
03E5:  BTFSC  03.0
03E6:  GOTO   3F8
03E7:  MOVLW  01
03E8:  SUBWF  6E,F
03E9:  BTFSC  03.0
03EA:  GOTO   3F8
03EB:  INCF   6E,F
03EC:  MOVF   68,W
03ED:  IORLW  80
03EE:  ADDWF  6D,F
03EF:  MOVF   69,W
03F0:  ADDWF  6C,F
03F1:  BTFSS  03.0
03F2:  GOTO   3D6
03F3:  INCF   6D,F
03F4:  BTFSS  03.2
03F5:  GOTO   3D6
03F6:  INCF   6E,F
03F7:  GOTO   3D6
03F8:  BSF    7A.0
03F9:  DECFSZ 6F,F
03FA:  GOTO   3FC
03FB:  GOTO   407
03FC:  BCF    03.0
03FD:  RLF    6B,F
03FE:  RLF    6C,F
03FF:  RLF    6D,F
0400:  RLF    6E,F
0401:  BCF    03.0
0402:  RLF    7A,F
0403:  RLF    79,F
0404:  RLF    78,F
0405:  RLF    70,F
0406:  GOTO   3B3
0407:  BTFSS  70.0
0408:  GOTO   40F
0409:  BCF    03.0
040A:  RRF    78,F
040B:  RRF    79,F
040C:  RRF    7A,F
040D:  RRF    70,F
040E:  GOTO   412
040F:  DECF   77,F
0410:  BTFSC  03.2
0411:  GOTO   454
0412:  BTFSC  70.7
0413:  GOTO   43B
0414:  BCF    03.0
0415:  RLF    6B,F
0416:  RLF    6C,F
0417:  RLF    6D,F
0418:  RLF    6E,F
0419:  MOVF   6A,W
041A:  SUBWF  6B,F
041B:  BTFSC  03.0
041C:  GOTO   427
041D:  MOVLW  01
041E:  SUBWF  6C,F
041F:  BTFSC  03.0
0420:  GOTO   427
0421:  SUBWF  6D,F
0422:  BTFSC  03.0
0423:  GOTO   427
0424:  SUBWF  6E,F
0425:  BTFSS  03.0
0426:  GOTO   44A
0427:  MOVF   69,W
0428:  SUBWF  6C,F
0429:  BTFSC  03.0
042A:  GOTO   432
042B:  MOVLW  01
042C:  SUBWF  6D,F
042D:  BTFSC  03.0
042E:  GOTO   432
042F:  SUBWF  6E,F
0430:  BTFSS  03.0
0431:  GOTO   44A
0432:  MOVF   68,W
0433:  IORLW  80
0434:  SUBWF  6D,F
0435:  BTFSC  03.0
0436:  GOTO   43B
0437:  MOVLW  01
0438:  SUBWF  6E,F
0439:  BTFSS  03.0
043A:  GOTO   44A
043B:  INCF   7A,F
043C:  BTFSS  03.2
043D:  GOTO   44A
043E:  INCF   79,F
043F:  BTFSS  03.2
0440:  GOTO   44A
0441:  INCF   78,F
0442:  BTFSS  03.2
0443:  GOTO   44A
0444:  INCF   77,F
0445:  BTFSC  03.2
0446:  GOTO   454
0447:  RRF    78,F
0448:  RRF    79,F
0449:  RRF    7A,F
044A:  MOVF   64,W
044B:  MOVWF  6F
044C:  MOVF   68,W
044D:  XORWF  6F,F
044E:  BTFSS  6F.7
044F:  GOTO   452
0450:  BSF    78.7
0451:  GOTO   458
0452:  BCF    78.7
0453:  GOTO   458
0454:  CLRF   77
0455:  CLRF   78
0456:  CLRF   79
0457:  CLRF   7A
0458:  NOP
0459:  RETLW  00
045A:  MOVF   60,W
045B:  MOVWF  67
045C:  MOVF   64,W
045D:  XORWF  67,F
045E:  BTFSS  67.7
045F:  GOTO   465
0460:  BCF    03.2
0461:  BCF    03.0
0462:  BTFSC  60.7
0463:  BSF    03.0
0464:  GOTO   498
0465:  MOVF   60,W
0466:  MOVWF  67
0467:  MOVF   63,W
0468:  MOVWF  68
0469:  MOVF   5F,W
046A:  SUBWF  68,F
046B:  BTFSC  03.2
046C:  GOTO   473
046D:  BTFSS  67.7
046E:  GOTO   498
046F:  MOVF   03,W
0470:  XORLW  01
0471:  MOVWF  03
0472:  GOTO   498
0473:  MOVF   64,W
0474:  MOVWF  68
0475:  MOVF   60,W
0476:  SUBWF  68,F
0477:  BTFSC  03.2
0478:  GOTO   47F
0479:  BTFSS  67.7
047A:  GOTO   498
047B:  MOVF   03,W
047C:  XORLW  01
047D:  MOVWF  03
047E:  GOTO   498
047F:  MOVF   65,W
0480:  MOVWF  68
0481:  MOVF   61,W
0482:  SUBWF  68,F
0483:  BTFSC  03.2
0484:  GOTO   48B
0485:  BTFSS  67.7
0486:  GOTO   498
0487:  MOVF   03,W
0488:  XORLW  01
0489:  MOVWF  03
048A:  GOTO   498
048B:  MOVF   66,W
048C:  MOVWF  68
048D:  MOVF   62,W
048E:  SUBWF  68,F
048F:  BTFSC  03.2
0490:  GOTO   497
0491:  BTFSS  67.7
0492:  GOTO   498
0493:  MOVF   03,W
0494:  XORLW  01
0495:  MOVWF  03
0496:  GOTO   498
0497:  BCF    03.0
0498:  RETLW  00
0499:  MOVLW  80
049A:  BTFSC  03.1
049B:  XORWF  6C,F
049C:  CLRF   71
049D:  CLRF   72
049E:  MOVF   68,W
049F:  MOVWF  70
04A0:  MOVF   6C,W
04A1:  XORWF  70,F
04A2:  MOVF   67,W
04A3:  BTFSC  03.2
04A4:  GOTO   589
04A5:  MOVWF  6F
04A6:  MOVWF  77
04A7:  MOVF   6B,W
04A8:  BTFSC  03.2
04A9:  GOTO   592
04AA:  SUBWF  6F,F
04AB:  BTFSC  03.2
04AC:  GOTO   52E
04AD:  BTFSS  03.0
04AE:  GOTO   4EC
04AF:  MOVF   6C,W
04B0:  MOVWF  75
04B1:  BSF    75.7
04B2:  MOVF   6D,W
04B3:  MOVWF  74
04B4:  MOVF   6E,W
04B5:  MOVWF  73
04B6:  CLRF   72
04B7:  BCF    03.0
04B8:  RRF    75,F
04B9:  RRF    74,F
04BA:  RRF    73,F
04BB:  RRF    72,F
04BC:  DECFSZ 6F,F
04BD:  GOTO   4B6
04BE:  BTFSS  70.7
04BF:  GOTO   4C3
04C0:  BSF    71.0
04C1:  GOTO   5A6
04C2:  BCF    71.0
04C3:  BCF    6F.0
04C4:  BSF    71.4
04C5:  MOVLW  6A
04C6:  MOVWF  04
04C7:  BCF    03.7
04C8:  GOTO   5BB
04C9:  BCF    71.4
04CA:  BTFSC  70.7
04CB:  GOTO   4D6
04CC:  BTFSS  6F.0
04CD:  GOTO   4E1
04CE:  RRF    75,F
04CF:  RRF    74,F
04D0:  RRF    73,F
04D1:  RRF    72,F
04D2:  INCF   77,F
04D3:  BTFSC  03.2
04D4:  GOTO   5A1
04D5:  GOTO   4E1
04D6:  BTFSC  75.7
04D7:  GOTO   4E4
04D8:  BCF    03.0
04D9:  RLF    72,F
04DA:  RLF    73,F
04DB:  RLF    74,F
04DC:  RLF    75,F
04DD:  DECF   77,F
04DE:  BTFSC  03.2
04DF:  GOTO   5A1
04E0:  GOTO   4D6
04E1:  BSF    71.6
04E2:  GOTO   54E
04E3:  BCF    71.6
04E4:  MOVF   68,W
04E5:  MOVWF  70
04E6:  BTFSS  68.7
04E7:  GOTO   4EA
04E8:  BSF    75.7
04E9:  GOTO   59A
04EA:  BCF    75.7
04EB:  GOTO   59A
04EC:  MOVF   6B,W
04ED:  MOVWF  6F
04EE:  MOVWF  77
04EF:  MOVF   67,W
04F0:  SUBWF  6F,F
04F1:  MOVF   68,W
04F2:  MOVWF  75
04F3:  BSF    75.7
04F4:  MOVF   69,W
04F5:  MOVWF  74
04F6:  MOVF   6A,W
04F7:  MOVWF  73
04F8:  CLRF   72
04F9:  BCF    03.0
04FA:  RRF    75,F
04FB:  RRF    74,F
04FC:  RRF    73,F
04FD:  RRF    72,F
04FE:  DECFSZ 6F,F
04FF:  GOTO   4F8
0500:  BTFSS  70.7
0501:  GOTO   505
0502:  BSF    71.1
0503:  GOTO   5A6
0504:  BCF    71.1
0505:  BCF    6F.0
0506:  BSF    71.5
0507:  MOVLW  6E
0508:  MOVWF  04
0509:  BCF    03.7
050A:  GOTO   5BB
050B:  BCF    71.5
050C:  BTFSC  70.7
050D:  GOTO   518
050E:  BTFSS  6F.0
050F:  GOTO   523
0510:  RRF    75,F
0511:  RRF    74,F
0512:  RRF    73,F
0513:  RRF    72,F
0514:  INCF   77,F
0515:  BTFSC  03.2
0516:  GOTO   5A1
0517:  GOTO   523
0518:  BTFSC  75.7
0519:  GOTO   526
051A:  BCF    03.0
051B:  RLF    72,F
051C:  RLF    73,F
051D:  RLF    74,F
051E:  RLF    75,F
051F:  DECF   77,F
0520:  BTFSC  03.2
0521:  GOTO   5A1
0522:  GOTO   518
0523:  BSF    71.7
0524:  GOTO   54E
0525:  BCF    71.7
0526:  MOVF   6C,W
0527:  MOVWF  70
0528:  BTFSS  6C.7
0529:  GOTO   52C
052A:  BSF    75.7
052B:  GOTO   59A
052C:  BCF    75.7
052D:  GOTO   59A
052E:  MOVF   6C,W
052F:  MOVWF  75
0530:  BSF    75.7
0531:  MOVF   6D,W
0532:  MOVWF  74
0533:  MOVF   6E,W
0534:  MOVWF  73
0535:  BTFSS  70.7
0536:  GOTO   53B
0537:  BCF    75.7
0538:  BSF    71.2
0539:  GOTO   5A6
053A:  BCF    71.2
053B:  CLRF   72
053C:  BCF    6F.0
053D:  MOVLW  6A
053E:  MOVWF  04
053F:  BCF    03.7
0540:  GOTO   5BB
0541:  BTFSC  70.7
0542:  GOTO   564
0543:  MOVF   68,W
0544:  MOVWF  70
0545:  BTFSS  6F.0
0546:  GOTO   54E
0547:  RRF    75,F
0548:  RRF    74,F
0549:  RRF    73,F
054A:  RRF    72,F
054B:  INCF   77,F
054C:  BTFSC  03.2
054D:  GOTO   5A1
054E:  BTFSS  72.7
054F:  GOTO   55F
0550:  INCF   73,F
0551:  BTFSS  03.2
0552:  GOTO   55F
0553:  INCF   74,F
0554:  BTFSS  03.2
0555:  GOTO   55F
0556:  INCF   75,F
0557:  BTFSS  03.2
0558:  GOTO   55F
0559:  RRF    75,F
055A:  RRF    74,F
055B:  RRF    73,F
055C:  INCF   77,F
055D:  BTFSC  03.2
055E:  GOTO   5A1
055F:  BTFSC  71.6
0560:  GOTO   4E3
0561:  BTFSC  71.7
0562:  GOTO   525
0563:  GOTO   583
0564:  MOVLW  80
0565:  XORWF  75,F
0566:  BTFSS  75.7
0567:  GOTO   56C
0568:  GOTO   5A6
0569:  MOVF   6C,W
056A:  MOVWF  70
056B:  GOTO   579
056C:  MOVF   68,W
056D:  MOVWF  70
056E:  MOVF   75,F
056F:  BTFSS  03.2
0570:  GOTO   579
0571:  MOVF   74,F
0572:  BTFSS  03.2
0573:  GOTO   579
0574:  MOVF   73,F
0575:  BTFSS  03.2
0576:  GOTO   579
0577:  CLRF   77
0578:  GOTO   59A
0579:  BTFSC  75.7
057A:  GOTO   583
057B:  BCF    03.0
057C:  RLF    72,F
057D:  RLF    73,F
057E:  RLF    74,F
057F:  RLF    75,F
0580:  DECFSZ 77,F
0581:  GOTO   579
0582:  GOTO   5A1
0583:  BTFSS  70.7
0584:  GOTO   587
0585:  BSF    75.7
0586:  GOTO   59A
0587:  BCF    75.7
0588:  GOTO   59A
0589:  MOVF   6B,W
058A:  MOVWF  77
058B:  MOVF   6C,W
058C:  MOVWF  75
058D:  MOVF   6D,W
058E:  MOVWF  74
058F:  MOVF   6E,W
0590:  MOVWF  73
0591:  GOTO   59A
0592:  MOVF   67,W
0593:  MOVWF  77
0594:  MOVF   68,W
0595:  MOVWF  75
0596:  MOVF   69,W
0597:  MOVWF  74
0598:  MOVF   6A,W
0599:  MOVWF  73
059A:  MOVF   75,W
059B:  MOVWF  78
059C:  MOVF   74,W
059D:  MOVWF  79
059E:  MOVF   73,W
059F:  MOVWF  7A
05A0:  GOTO   5D9
05A1:  CLRF   77
05A2:  CLRF   78
05A3:  CLRF   79
05A4:  CLRF   7A
05A5:  GOTO   5D9
05A6:  CLRF   72
05A7:  COMF   73,F
05A8:  COMF   74,F
05A9:  COMF   75,F
05AA:  COMF   72,F
05AB:  INCF   72,F
05AC:  BTFSS  03.2
05AD:  GOTO   5B4
05AE:  INCF   73,F
05AF:  BTFSS  03.2
05B0:  GOTO   5B4
05B1:  INCF   74,F
05B2:  BTFSC  03.2
05B3:  INCF   75,F