1. ****成功，编译后和原来的******一样;

2. 程序和数据******分开，所有的程序******反成汇编，不会当做数据来处理;

3. 子程序之前用分段行分开;

4. 带寄存器名称,方便程序阅读;

5. 带PC地址和机器码，方便修改程序;

6. 中断和程序入口注释。

;============================================================================
;标号===============指令=====================================================
;============================================================================
                    GOTO     L001B                                           
;============================================================================
                    NOP                                                      
                    RETFIE                                                   
;============================================================================
                    NOP                                                      
                    NOP                                                      
                    NOP                                                      
                    NOP                                                      
                    NOP                                                      
                    GOTO     L0009                                           
;============================================================================
L0009:              BCR      INTEN,GIE_B                                     
                    BCR      INTFLAG,T0IF_B                                  
                    MOVAR    15H                                             
                    SWAPR    15H,R                                           
                    SWAPR    STATUS,A                                        
                    MOVAR    38H                                             
                    DECR     36H,R                                           
                    BTRSC    36H,7                                           
                    INCR     36H,R                                           
                    MOVR     20H,A                                           
                    SUBAR    TMR0,A                                          
                    BTRSS    7H,5                                            
                    MOVAR    20H                                             
                    BSR      7H,5                                            
                    SWAPR    38H,A                                           
                    MOVAR    STATUS                                          
                    SWAPR    15H,A                                           
                    RETFIE                                                   
;============================================================================
L001B:              MOVIA    10H                                             
                    MOVAR    FSR                                             
L001D:              CLRR     INDF                                            
                    INCR     FSR,R                                           
                    MOVIA    C0H                                             
                    XORAR    FSR,A                                           
                    BTRSS    STATUS,Z_B                                      
                    GOTO     L001D                                           
;============================================================================
                    CLRR     7H                                              
                    MOVIA    12H                                             
                    MOVAR    36H                                             
                    BSR      16H,0                                           
                    MOVIA    A0H                                             
                    MOVAR    PCON                                            
                    MOVIA    7H                                              
                    OPTION                                                   
                    MOVIA    1H                                              
                    MOVAR    INTEN                                           
                    CLRR     INTFLAG                                         
                    CLRR     ODCON                                           
                    MOVIA    FFH                                             
                    MOVAR    PDCON                                           
                    MOVIA    AAH                                             
                    MOVAR    PHCON                                           
                    MOVIA    0H                                              
                    IOST     PORTA                                           
                    MOVIA    FH                                              
                    MOVAR    PORTA                                           
                    MOVIA    5DH                                             
                    IOST     PORTB                                           
                    MOVIA    A0H                                             
                    MOVAR    PORTB                                           
                    BSR      INTEN,GIE_B                                     
L003C:              CALL     L008A                                           
                    BTRSS    7H,2                                            
                    CALL     L0055                                           
                    BTRSC    7H,2                                            
                    CALL     L01B6                                           
                    MOVR     36H,R                                           
                    BTRSS    STATUS,Z_B                                      
                    GOTO     L003C                                           
;============================================================================
                    MOVIA    12H                                             
                    MOVAR    36H                                             
                    BTRSS    7H,2                                            
                    GOTO     L004C                                           
;============================================================================
                    BTRSS    PORTB,IOB3_B                                    
                    GOTO     L004C                                           
;============================================================================
                    BSR      PORTB,IOB5_B                                    
                    GOTO     L004E                                           
;============================================================================
L004C:              MOVIA    20H                                             
                    XORAR    PORTB,R                                         
L004E:              MOVIA    25H                                             
                    BTRSC    7H,1                                            
                    MOVIA    9H                                              
                    BTRSC    7H,2                                            
                    MOVIA    20H                                             
                    MOVAR    36H                                             
                    GOTO     L003C                                           
;============================================================================
L0055:              BTRSC    7H,1                                            
                    GOTO     L0064                                           
;============================================================================
                    BTRSC    3CH,0                                           
                    BSR      7H,1                                            
                    MOVIA    1BH                                             
                    SUBAR    12H,A                                           
                    MOVIA    0H                                              
                    BTRSC    3AH,4                                           
                    MOVIA    1H                                              
                    MOVAR    1BH                                             
                    MOVIA    1H                                              
                    SBCAR    1BH,A                                           
                    BTRSC    STATUS,C_B                                      
                    BSR      7H,1                                            
                    RETURN                                                   
;============================================================================
L0064:              BTRSC    3CH,0                                           
                    GOTO     L007F                                           
;============================================================================
                    BTRSC    3AH,4                                           
                    GOTO     L007F                                           
;============================================================================
                    MOVIA    78H                                             
                    SUBAR    12H,A                                           
                    BTRSC    STATUS,C_B                                      
                    GOTO     L007F                                           
;============================================================================
                    INCR     10H,R                                           
                    MOVIA    5H                                              
                    SUBAR    10H,A                                           
                    BTRSS    STATUS,C_B                                      
                    RETURN                                                   
;============================================================================
                    MOVR     12H,A                                           
                    MOVAR    1EH                                             
                    MOVR     13H,A                                           
                    MOVAR    22H                                             
                    BCR      3CH,4                                           
                    BTRSC    3AH,6                                           
                    BSR      3CH,4                                           
                    MOVR     14H,A                                           
                    MOVAR    21H                                             
                    BCR      3CH,5                                           
                    BTRSC    3AH,7                                           
                    BSR      3CH,5                                           
                    BSR      7H,2                                            
                    RETURN                                                   
;============================================================================
L007F:              CLRR     10H                                             
                    RETURN                                                   
;============================================================================
L0081:              MOVIA    1H                                              
                    ADDAR    35H,R                                           
                    BTRSS    STATUS,C_B                                      
                    GOTO     L0094                                           
;============================================================================
                    MOVIA    FFH                                             
                    MOVAR    35H                                             
                    BSR      7H,0                                            
                    CLRR     25H                                             
                    GOTO     L0097                                           
;============================================================================
L008A:              MOVR     18H,A                                           
                    IORAR    19H,A                                           
                    BTRSS    STATUS,Z_B                                      
                    GOTO     L0093                                           
;============================================================================
                    MOVR     PORTB,A                                         
                    ANDIA    55H                                             
                    XORIA    55H                                             
                    BTRSC    STATUS,Z_B                                      
                    GOTO     L0081                                           
;============================================================================
L0093:              CLRR     35H                                             
L0094:              BCR      7H,0                                            
                    MOVIA    2H                                              
                    MOVAR    25H                                             
L0097:              MOVIA    15H                                             
                    BTRSC    1CH,0                                           
                    IORIA    20H                                             
                    BTRSC    1CH,1                                           
                    IORIA    40H                                             
                    BTRSC    1CH,2                                           
                    IORIA    80H                                             
                    MOVAR    16H                                             
                    MOVIA    7H                                              
                    ANDAR    1CH,A                                           
                    MOVAR    1BH                                             
                    RLR      1CH,A                                           
                    ANDIA    30H                                             
                    BTRSC    7H,7                                            
                    IORIA    40H                                             
                    IORAR    1BH,R                                           
                    SWAPR    1BH,A                                           
                    XORAR    1BH,R                                           
                    MOVIA    0H                                              
                    BTRSC    1CH,3                                           
                    IORIA    1H                                              
                    BTRSC    1CH,4                                           
                    IORIA    2H                                              
                    BTRSC    7H,7                                            
                    IORIA    4H                                              
                    BTRSC    1BH,0                                           
                    IORIA    8H                                              
                    BTRSC    1BH,1                                           
                    IORIA    10H                                             
                    BTRSC    1BH,2                                           
                    IORIA    20H                                             
                    BTRSC    PORTB,IOB0_B                                    
                    IORIA    80H                                             
                    BTRSC    PORTB,IOB6_B                                    
                    IORIA    40H                                             
                    MOVAR    17H                                             
                    MOVR     18H,A                                           
                    XORAR    19H,A                                           
                    MOVAR    1AH                                             
                    RLR      1DH,A                                           
                    MOVAR    1BH                                             
                    RLR      1BH,A                                           
                    ANDIA    30H                                             
                    MOVAR    1BH                                             
                    SWAPR    1DH,A                                           
                    XORAR    1BH,A                                           
                    ANDIA    30H                                             
                    IORAR    1DH,A                                           
                    BTRSC    PORTB,IOB4_B                                    
                    IORIA    40H                                             
                    BTRSC    PORTB,IOB2_B                                    
                    IORIA    80H                                             
                    MOVAR    1BH                                             
                    BCR      INTEN,GIE_B                                     
                    BTRSS    7H,5                                            
                    GOTO     L00D2                                           
;============================================================================
                    MOVR     20H,A                                           
                    ADDAR    TMR0,A                                          
                    GOTO     L00D4                                           
;============================================================================
L00D2:              MOVR     20H,A                                           
                    SUBAR    TMR0,A                                          
L00D4:              BSR      INTEN,GIE_B                                     
                    SUBIA    1FH                                             
                    BTRSC    STATUS,Z_B                                      
                    GOTO     L00DE                                           
;============================================================================
                    BTRSS    STATUS,C_B                                      
                    GOTO     L00DE                                           
;============================================================================
                    MOVAR    30H                                             
L00DB:              CALL     L02D3                                           
                    DECRSZ   30H,R                                           
                    GOTO     L00DB                                           
;============================================================================
L00DE:              MOVIA    1H                                              
                    MOVAR    3BH                                             
                    BCR      7H,3                                            
                    MOVIA    16H                                             
                    MOVAR    FSR                                             
L00E3:              MOVIA    8H                                              
                    MOVAR    33H                                             
                    MOVR     INDF,A                                          
                    MOVAR    34H                                             
                    GOTO     L00F1                                           
;============================================================================
L00E8:              INCR     FSR,R                                           
                    MOVIA    DCH                                             
                    XORAR    FSR,A                                           
                    BTRSS    STATUS,Z_B                                      
                    GOTO     L00E3                                           
;============================================================================
                    MOVR     TMR0,A                                          
                    MOVAR    20H                                             
                    BCR      7H,5                                            
                    RETURN                                                   
;============================================================================
L00F1:              MOVIA    1H                                              
                    SUBAR    33H,R                                           
                    BTRSS    STATUS,C_B                                      
                    GOTO     L00E8                                           
;============================================================================
                    RRR      34H,R                                           
                    BTRSC    STATUS,C_B                                      
                    GOTO     L00FE                                           
;============================================================================
                    MOVIA    3EH                                             
                    MOVAR    32H                                             
                    MOVIA    3EH                                             
                    MOVAR    37H                                             
                    BCR      3AH,2                                           
                    GOTO     L0103