液晶测试显示.asm

来自「讲述GPS的简单应用」· 汇编 代码 · 共 67 行

        RS BIT P3.4
        RW BIT P3.5
         E BIT P3.7
       DAT EQU P1
           ORG 0000H
MAIN:      MOV DAT,#01H
           LCALL ENABLE
           MOV DAT,#38H
           LCALL ENABLE
           MOV DAT,#0CH
           LCALL ENABLE
           MOV DAT,#06H
           LCALL ENABLE
           MOV DAT,#80H
           LCALL ENABLE
           MOV A,#0
           MOV R1,#0
           MOV R2,#16
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   LOOP1:  MOV R1,A
           MOV DPTR,#TAB
           MOVC A,@A+DPTR
           MOV DAT,A
           LCALL WRITE
           MOV A,R1
           INC A
           DJNZ R2,LOOP1
           MOV DAT,#0C0H
           LCALL ENABLE
           MOV A,#0
           MOV R1,#0
           MOV R2,#16
   LOOP2:  MOV R1,A
           MOV DPTR,#TAB1
           MOVC A,@A+DPTR
           MOV DAT,A
           LCALL WRITE
           MOV A,R1
           INC A
           DJNZ R2,LOOP2
           LJMP $
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ENABLE:    CLR RS
           CLR RW
           CLR E
           LCALL DELAY1
           SETB E
           RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
WRITE:     SETB RS
           CLR RW
           CLR E
           CALL DELAY1
           SETB E
           RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
DELAY1:    MOV R7,#255
        D1:MOV R6,#50
        D2:DJNZ R6,D2
           DJNZ R7,D1
           RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
TAB:  DB 0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H
TAB1: DB 0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H,0B0H
      END