源程序.asm

pt2272与2262完全仿真程序

           JZ    L0084                        
           ADD   A,#0F8H                      
           JZ    L0085                        
           ADD   A,#0F8H                      
           JZ    L0086                        
           ADD   A,#28H                       
           JNZ   L0087                        
           MOV   29H,2CH                      
           SJMP  L0087                        
L0082:     MOV   2AH,2CH                      
           SJMP  L0087                        
L0083:     MOV   2BH,2CH                      
           CLR   21H.2                        
           SJMP  L0087                        
L0084:     MOV   22H,2CH                      
           SJMP  L0087                        
L0085:     MOV   23H,2CH                      
           SJMP  L0087                        
L0086:     MOV   24H,2CH                      
           CLR   A                            
           MOV   2DH,A                        
           SETB  21H.2                        
           SETB  21H.7                        
L0087:     JNB   21H.7,L0089                  
           MOV   A,29H                        
           CJNE  A,22H,L0088                  
           MOV   A,2AH                        
           CJNE  A,23H,L0088                  
           MOV   A,2BH                        
           CJNE  A,24H,L0088                  
           SETB  21H.0                        
           CLR   21H.7                        
           RET                                
L0088:     CLR   21H.2                        
           CLR   21H.0                        
L0089:     RET                                
L0090:     MOV   R7,#06H                      
           ACALL L0167                        
           CLR   A                            
           MOV   R7,A                         
           ACALL L0171                        
           CLR   A                            
           MOV   R6,A                         
L0091:     MOV   A,#33H                       
           ADD   A,R6                         
           MOV   R0,A                         
           MOV   A,@R0                        
           MOV   R5,A                         
           CJNE  A,#8EH,L0092                 
           MOV   R7,#66H                      
           ACALL L0172                        
           SJMP  L0094                        
L0092:     MOV   A,R5                         
           CJNE  A,#0EEH,L0093                
           MOV   R7,#31H                      
           ACALL L0172                        
           SJMP  L0094                        
L0093:     MOV   R7,#30H                      
           ACALL L0172                        
L0094:     INC   R6                           
           CJNE  R6,#0CH,L0091                
           MOV   R7,#0CH                      
           ACALL L0171                        
           MOV   C,21H.4                      
           CLR   A                            
           RLC   A                            
           ORL   A,#7EH                       
           MOV   R7,A                         
           ACALL L0172                        
           MOV   R7,#0DH                      
           ACALL L0171                        
           MOV   R6,#0DH                      
L0095:     MOV   A,#32H                       
           ADD   A,R6                         
           MOV   R0,A                         
           MOV   A,@R0                        
           ADD   A,#30H                       
           MOV   R7,A                         
           ACALL L0172                        
           INC   R6                           
           CJNE  R6,#10H,L0095                
           MOV   R7,#4EH                      
           ACALL L0171                        
           JNB   21H.6,L0096                  
           MOV   R7,#40H                      
           ACALL L0172                        
           SJMP  L0097                        
L0096:     MOV   R7,#2AH                      
           ACALL L0172                        
L0097:     MOV   R7,#4FH                      
           ACALL L0171                        
           MOV   A,30H                        
           ADD   A,#30H                       
           MOV   R7,A                         
           AJMP  L0172                        
L0098:     MOV   C,21H.1                      
           JNB   P1.0,L0099                   
           CPL   C                            
L0099:     JNC   L0103                        
           MOV   C,P1.0                       
           MOV   21H.1,C                      
           JB    21H.1,L0100                  
           CLR   A                            
           MOV   TH0,A                        
           MOV   TL0,A                        
           SETB  TR0                          
           RET                                
L0100:     CLR   TR0                          
           MOV   A,TH0                        
           CLR   C                            
           SUBB  A,#05H                       
           JC    L0102                        
           MOV   R5,TH0                       
           MOV   R4,TL0                       
           CLR   A                            
           MOV   TH0,A                        
           MOV   TL0,A                        
           SETB  TR0                          
           SETB  21H.2                        
           MOV   A,R5                         
           MOV   R3,#00H                      
           MOV   R2,A                         
           MOV   R7,04H                       
           MOV   A,R3                         
           ADD   A,R4                         
           MOV   R3,A                         
           CLR   A                            
           ADDC  A,R2                         
           MOV   R2,A                         
           MOV   A,R5                         
           CLR   C                            
           RRC   A                            
           MOV   26H,A                        
           MOV   A,R5                         
           ADD   A,ACC                        
           MOV   27H,A                        
           ADD   A,26H                        
           ADD   A,R5                         
           MOV   28H,A                        
           MOV   A,R2                         
           RRC   A                            
           RRC   A                            
           ANL   A,#3FH                       
           MOV   R5,A                         
           MOV   R4,#00H                      
           MOV   A,R3                         
           MOV   R6,02H                       
           MOV   R0,#05H                      
L0101:     XCH   A,R6                         
           CLR   C                            
           RRC   A                            
           XCH   A,R6                         
           RRC   A                            
           DJNZ  R0,L0101                     
           ADD   A,R5                         
           MOV   2FH,A                        
           MOV   A,R6                         
           ADDC  A,R4                         
           MOV   2EH,A                        
           RET                                
L0102:     CLR   21H.2                        
L0103:     RET                                
L0104:     MOV   R7,32H                       
           ACALL L0171                        
           MOV   A,32H                        
           CLR   C                            
           SUBB  A,#0CH                       
           JNC   L0105                        
           MOV   A,#33H                       
           ADD   A,32H                        
           MOV   R0,A                         
           MOV   A,@R0                        
           MOV   R7,A                         
           ACALL L0158                        
           MOV   A,#33H                       
           ADD   A,32H                        
           MOV   R0,A                         
           MOV   @R0,07H                      
           SJMP  L0107                        
L0105:     MOV   A,32H                        
           CLR   C                            
           SUBB  A,#0DH                       
           JC    L0107                        
           MOV   A,#32H                       
           ADD   A,32H                        
           MOV   R0,A                         
           INC   @R0                          
           MOV   A,@R0                        
           CJNE  A,#0AH,L0106                 
           MOV   A,#32H                       
           ADD   A,32H                        
           MOV   R0,A                         
           CLR   A                            
           MOV   @R0,A                        
           SJMP  L0107                        
L0106:     MOV   A,32H                        
           CJNE  A,#4FH,L0107                 
           INC   30H                          
           MOV   A,30H                        
           CJNE  A,#08H,L0107                 
           CLR   A                            
           MOV   30H,A                        
L0107:     MOV   A,32H                        
           CJNE  A,#0CH,L0108                 
           CPL   21H.4                        
L0108:     MOV   A,32H                        
           CJNE  A,#4EH,L0109                 
           CPL   21H.6                        
L0109:     ACALL L0090                        
           MOV   R7,32H                       
           AJMP  L0171                        
L0110:     MOV   R7,#40H                      
           ACALL L0171                        
           MOV   R3,#0FFH                     
           MOV   R2,#06H                      
           MOV   R1,#03H                      
           ACALL L0148                        
           CLR   A                            
           MOV   32H,A                        
           MOV   P3,#0FFH                     
           MOV   R7,32H                       
           ACALL L0171                        
L0111:     MOV   A,25H                        
           XRL   A,#01H                       
           JNZ   L0114                        
           ACALL L0151                        
           MOV   08H,R7                       
           MOV   A,08H                        
           JZ    L0111                        
           MOV   A,08H                        
           CJNE  A,#0EH,L0112                 
           ACALL L0137                        
           SJMP  L0111                        
L0112:     MOV   A,08H                        
           CJNE  A,#0DH,L0113                 
           ACALL L0104                        
           SJMP  L0111                        
L0113:     MOV   A,08H                        
           CJNE  A,#07H,L0111                 
           ACALL L0076                        
           SJMP  L0111                        
L0114:     RET                                
L0115:     CLR   TR0                          
           MOV   A,TH0                        
           SWAP  A                            
           RLC   A                            
           ANL   A,#0E0H                      
           MOV   R7,A                         
           MOV   A,TL0                        
           RRC   A                            
           RRC   A                            
           RRC   A                            
           ANL   A,#1FH                       
           ORL   07H,A                        
           MOV   A,R7                         
           SETB  C                            
           SUBB  A,28H                        
           JNC   L0118                        
           MOV   A,R7                         
           CLR   C                            
           SUBB  A,27H                        
           JC    L0116                        
           MOV   A,2CH                        
           ADD   A,ACC                        
           MOV   2CH,A                        
           ORL   2CH,#01H                     
           SETB  21H.3                        
           RET                                
L0116:     MOV   A,R7