;****************************************************************
;*      ★★★          1602液晶模塊測試程序           ★★★   *
;* 『電子驛站單片機(jī)實(shí)驗(yàn)板、開發(fā)板配套例程，程序轉(zhuǎn)載請(qǐng)著明出處』 *
;*  E-mail: support@ourmpu.com     QQ留言：451338254 476485321  *
;*  編程：ourmpu  http://www.ourmpu.com/ 更多例程請(qǐng)登陸網(wǎng)站     *
;****************************************************************
;*          1602液晶模塊顯示電子驛站域名和客服電話號(hào)碼          *
;*       液晶模塊第一行顯示的是本站域名“www.ourmpu.com”         *
;*       液晶模塊第二行顯示的是本站聯(lián)系電話“13376781108”        *
;****************************************************************

RS 	EQU 	P2.0 
RW 	EQU 	P2.1 
E  	EQU 	P2.2
LCD 	EQU 	P0

org	00h
ajmp main

org 030h
main:
mov sp,#60h
main1:

lcall delay			;延時(shí)一段時(shí)間                      
MOV LCD,#38H			;                                  
ACALL ENABLE                    ;寫指令38H                         
MOV LCD,#38H			;                                  
ACALL ENABLE                    ;寫指令38H                         
MOV LCD,#38H			;                                  
ACALL ENABLE                    ;寫指令38H                         
MOV LCD,#38H			;                                  
ACALL ENABLE                    ;寫指令38H                         
MOV LCD,#08H			;                                  
ACALL ENABLE                    ;寫指令08H                         
MOV LCD,#01H			;                                  
ACALL ENABLE                    ;寫指令01H                         
MOV LCD,#06H			;                                  
ACALL ENABLE                    ;寫指令06H                         
MOV LCD,#0cH			;                                  
ACALL ENABLE                    ;寫指令0CH                         

MOV LCD,#80H			;第一行顯示第一個(gè)字符的位置            
ACALL ENABLE                    ;調(diào)用寫指令                            
mov dptr,#table3                ;第一行表頭位置                        
call write1                     ;調(diào)用第一行寫子程序                    
mov LCD,#0c0h			;第二行位置                            
call enable                     ;調(diào)用寫指令                            
mov dptr,#table2                ;第二行表頭位置                        
call write1                     ;調(diào)用第二行寫子程序
jmp main1                       ;返回主程序不斷的循環(huán)                  

ENABLE:				;寫命令時(shí)序(參照1602LCD使用說明書）
CLR RS
CLR RW 
CLR E 
ACALL DELAY 
SETB E 
RET

write1:				;寫字符串				   		
mov r1,#00h                     ;將R1清0                                      
a1:mov a,r1                     ;把R1的值送到ACC                              
movc a,@a+dptr                  ;查表取將顯示的數(shù)據(jù)并把要顯示的數(shù)送入ACC      
call write2                     ;調(diào)用寫程序?qū)懭雴蝹€(gè)字節(jié)                       
inc r1                          ;將工作寄存器指針加一                         
cjne r1,#10h,a1                 ;R1的內(nèi)容加到16后就返回到a1處                  
ret                             ;
                                                                              
write2:                         ;寫單個(gè)字符                                                                             
mov LCD,a                        ;寫數(shù)據(jù)到顯示端口                            
setb rs                         ;寫數(shù)據(jù)時(shí)序(請(qǐng)參照1602LCD使用說明書）         
clr rw                          
clr e
call delay
setb e
ret 

delay:
mov r7,#255
d1:mov r6,#255
d2:djnz r6,d2
djnz r7,d1
ret

table3: db 20H,77H,77H,77H,2EH,6FH,75H,72H,6DH,70H,75H,2EH,63H,6FH,6DH,20H
table2: db 20H,54H,45H,4CH,3AH,31H,33H,33H,37H,36H,37H,38H,31H,31H,30H,38H

end