gdlcd.lst

51单片机实验例程

00DE 00              149               NOP                                                            
00DF C2A7            150               CLR   LCD_EN                                                   
00E1 22              151               RET                                                            
                     152     ;***************************************************************         
                     153     ;检测LCD控制器忙状态                                                     
                     154     ;读数据                                                                  
                     155     ;RS=L,RW=H,E=H,输出：D0-D7=数据                                          
                     156     ;***************************************************************         
00E2                 157     CHECKBUSY:                                                               
00E2 C0E0            158               PUSH  ACC                                                      
00E4 7580FF          159               MOV  P0,#0FFH                                                  
00E7 C2A6            160               CLR   LCD_RS                                                   
00E9 D2A5            161               SETB  LCD_RW                                                   
00EB D2A7            162               SETB  LCD_EN                                                   
00ED                 163     BUSYLOOP:                                                                
00ED 00              164               NOP                                                            
00EE 2087FC          165               JB P0.7,BUSYLOOP                                               
00F1 C2A7            166               CLR  LCD_EN                                                    
00F3 D0E0            167               POP  ACC                                                       
00F5 22              168               RET                                                            
                     169     ;***************************************************************         
                     170     ;闪烁子程序                                                              
                     171     ;***************************************************************         
00F6                 172     SHAN:                                                                    
00F6 7408            173               MOV A,#08H                ;关闭显示                            
00F8 11B4            174               ACALL LCD_CMD                                                  
00FA 3110            175               ACALL DELAY4                                                   
00FC 740C            176               MOV A,#0CH               ;开显示，关闭光标                     
00FE 11B4            177               ACALL LCD_CMD                                                  
0100 3110            178               ACALL DELAY4                                                   
0102 DCF2            179               DJNZ R4,SHAN                                                   
0104 7C02            180               MOV  R4,#02H            ;设置闪烁次数                          
0106 22              181               RET                                                            
                     182     ;***************************************************************         
                     183     ;延时120MS子程序                                                         
                     184     ;发送字符串时使用                                                        
                     185     ;***************************************************************         
0107                 186     DELAY:                                                                   
0107 7FF0            187                  MOV R7,#240                                                 
0109 7EFA            188      DL1:     MOV R6,#250                                                    
010B DEFE            189      DL2:     DJNZ R6,DL2                                                    
A51 MACRO ASSEMBLER  GDLCD                                                                03/29/2009 20:14:38 PAGE     4

010D DFFA            190                  DJNZ R7,DL1                                                 
010F 22              191                  RET                                                         
                     192     ;***************************************************************         
                     193     ;延时800MS子程序                                                         
                     194     ;闪烁时使用                                                              
                     195     ;***************************************************************         
0110                 196     DELAY4:                                                                  
0110 7828            197                  MOV R0,#40                                                  
0112 7964            198      DL3:     MOV R1,#100                                                    
0114 7A64            199      DL4:     MOV R2,#100                                                    
0116 DAFE            200      DL5:     DJNZ R2,DL5                                                    
0118 D9FA            201                  DJNZ R1,DL4                                                 
011A D8F6            202                  DJNZ R0,DL3                                                 
011C 22              203                  RET                                                         
                     204     ;***************************************************************         
                     205     ;延时5MS子程序                                                           
                     206     ;LCD初始化使用                                                           
                     207     ;***************************************************************         
011D                 208     DELAY5MS:                                                                
011D 790A            209                  MOV  R1,#10                                                 
011F 7AF9            210      DL6:     MOV  R2,#249                                                   
0121 DAFE            211      DL7:     DJNZ R2,DL7                                                    
0123 D9FA            212                  DJNZ R1,DL6                                                 
0125 22              213                  RET                                                         
                     214     ;***************************************************************         
                     215     ;延时1MS子程序                                                           
                     216     ;***************************************************************         
0126                 217     DELAY1MS:                                                                
0126 7E14            218                  MOV  R6,#14H        ;20                                     
0128 7F19            219      DL8:     MOV  R7,#19H        ;25                                        
012A DFFE            220      DL9:     DJNZ  R7,DL9                                                   
012C DEFA            221                  DJNZ  R6,DL8                                                
012E 22              222                  RET                                                         
                     223     ;***************************************************************         
012F                 224     CHAR1:                                                                   
012F 20202057        225     DB  "   WELCOME TO   "                                                   
0133 454C434F                
0137 4D452054                
013B 4F202020                
                     226                                                                              
013F                 227     CHAR2:                                                                   
013F 20575757        228     DB  " WWW.PRECHIN.COM "                                                   
0143 2E505245                
0147 4348494E                
014B 2E434F4D                
014F 20                      
                     229                                                                              
0150                 230     CHAR3:                                                                   
0150 2020204F        231     DB  "   OT EMOCLEW   "                                                   
0154 5420454D                
0158 4F434C45                
015C 57202020                
                     232                                                                              
0160                 233     CHAR4:                                                                   
0160 204D4F43        234     DB  " MOC.NIHCERP.WWW "                                                   
0164 2E4E4948                
0168 43455250                
016C 2E575757                
0170 20                      
                     235                                                                              
                     236     ;***************************************************************         
                     237            END                                                               
                                                                                                      
                                                                                                      
                                                                                                      
                                                                                      
A51 MACRO ASSEMBLER  GDLCD                                                                03/29/2009 20:14:38 PAGE     5

SYMBOL TABLE LISTING
------ ----- -------


N A M E             T Y P E  V A L U E   ATTRIBUTES

ACC. . . . . . . .  D ADDR   00E0H   A   
BUSYLOOP . . . . .  C ADDR   00EDH   A   
CHAR1. . . . . . .  C ADDR   012FH   A   
CHAR2. . . . . . .  C ADDR   013FH   A   
CHAR3. . . . . . .  C ADDR   0150H   A   
CHAR4. . . . . . .  C ADDR   0160H   A   
CHECKBUSY. . . . .  C ADDR   00E2H   A   
DELAY. . . . . . .  C ADDR   0107H   A   
DELAY1MS . . . . .  C ADDR   0126H   A   
DELAY4 . . . . . .  C ADDR   0110H   A   
DELAY5MS . . . . .  C ADDR   011DH   A   
DL1. . . . . . . .  C ADDR   0109H   A   
DL2. . . . . . . .  C ADDR   010BH   A   
DL3. . . . . . . .  C ADDR   0112H   A   
DL4. . . . . . . .  C ADDR   0114H   A   
DL5. . . . . . . .  C ADDR   0116H   A   
DL6. . . . . . . .  C ADDR   011FH   A   
DL7. . . . . . . .  C ADDR   0121H   A   
DL8. . . . . . . .  C ADDR   0128H   A   
DL9. . . . . . . .  C ADDR   012AH   A   
LCDSET1. . . . . .  C ADDR   008EH   A   
LCDSET2. . . . . .  C ADDR   00A1H   A   
LCD_CMD. . . . . .  C ADDR   00B4H   A   
LCD_CMD_NC . . . .  C ADDR   00B6H   A   
LCD_EN . . . . . .  B ADDR   00A0H.7 A   
LCD_INIT . . . . .  C ADDR   0065H   A   
LCD_RS . . . . . .  B ADDR   00A0H.6 A   
LCD_RW . . . . . .  B ADDR   00A0H.5 A   
LCD_WDATA. . . . .  C ADDR   00D1H   A   
MAIN . . . . . . .  C ADDR   0030H   A   
MAIN1. . . . . . .  C ADDR   0037H   A   
P0 . . . . . . . .  D ADDR   0080H   A   
P2 . . . . . . . .  D ADDR   00A0H   A   
SHAN . . . . . . .  C ADDR   00F6H   A   
SP . . . . . . . .  D ADDR   0081H   A   
WRITE0 . . . . . .  C ADDR   00C7H   A   
WRITE1 . . . . . .  C ADDR   00C5H   A   


REGISTER BANK(S) USED: 0 


ASSEMBLY COMPLETE.  0 WARNING(S), 0 ERROR(S)