t6963.asm

用51系列单片机实现的LCD12864液晶的驱动程序

     ;  cd     equ   p3.4
CD    EQU   P3.5
         r   EQU   P3.3
      W    EQU   P3.4
      ;w    equ   p3.2
     ; ce   equ   p3.4
         ORG    0
main:
   ;      clr    ce
    ;     setb   r
         lcall  pr3
         lcall  pr4
;         lcall  pr5
         mov    r2,#00h
         mov    r3,#00h
         mov    r4,#24h
         lcall  pr1
         mov    r1,#16
lopp:         mov    r5,#80h
         mov    r3,#00h
         mov    r4,#0c0h
lop1:    lcall  pr11
         acall  t
         acall  t
         inc    r3
         djnz   r5,lop1
         djnz   r1,lopp
         acall  t1
         acall  t1
         acall  t1
         lcall  pr3
         lcall  pr4
         mov    r2,#00h
         mov    r3,#08h
         mov    r4,#24h
         lcall  pr1
;         mov    r5,#0ffh
         mov    r4,#0c0h
         lcall  pr12
         mov    dptr,#tab
         mov    r6,#128
lop5:    mov    r5,#30
lop4:    mov    a,#00h
         movc   a,@a+dptr
         mov    r3,a
         lcall  pr11
         lcall  t
         inc    dptr
         djnz   r5,lop4
         djnz   r6,lop5
;         mov    r4,#0b2h
;         lcall  pr12
         lcall  t1
         lcall  t1
         AJMP   main

pr5:     mov    r2,#00h
         mov    r3,#08h
         mov    r4,#42h
         acall  pr1
         mov    r2,#10h
         mov    r3,#00h
         mov    r4,#00h
         acall  pr1
         mov    r4,#88h
         acall  pr12
         mov    r4,#98h
         acall  pr12
         ret
pr3:     mov    r2,#00h
         mov    r3,#00h

         mov    r4,#24h
         acall  pr1
         mov    r4,#0b0h
         acall  pr12
         mov    r2,#1fh
pr31:    mov    r3,#0ffh
pr32:
;        acall  pr03
         clr    a
         acaLL  PR14
         DJNZ   r3,pr32
         DJNZ   r2,PR31
         MOV    R4,#0B2H
         ACALL  PR12
         RET
PR4:     MOV    R2,#00H
         MOV    R3,#00H
         MOV    R4,#40H
         ACALL  PR1
         MOV    R2,#1eH
         MOV    R3,#00H
         MOV    R4,#41H
         ACALL  PR1
         MOV    R2,#00H
         MOV    R3,#08H
         MOV    R4,#42H
         ACALL  PR1
;         MOV    R2,#10H
         mov    r2,#1eh
         MOV    R3,#00H
         MOV    R4,#43H
         ACALL  PR1
         MOV    R4,#80H
         ACALL  PR12
         MOV    R4,#9cH
         ACALL  PR12
         RET

pr1:
;         acall pr01
         mov   a,r2
         acall pr14
pr11:
;        acall pr01
         mov   a,r3
         acall pr14
pr12:
;         acall pr01
         mov   a,r4
         sjmp  pr15
pr14:    clr  cd
pr15:    clr   w
         mov   p1,a
         setb  w
         setb  cd
         ret
t:       mov   r2,#0ffh
lop2:    nop
         djnz  r2,lop2
         ret
t4:      mov   r4,#0ffh
lop3:    acall t
         djnz  r4,lop3
         ret
tab:
db 00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h
db 00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h,00h
DB 80H,01H,80H,00H,00H
DB 00H,00H,01H,00H,00H,00H,00H,40H,00H,00H,00H,80H,00H,00H,01H
DB 80H,00H,00H,08H,00H,00H,00H,00H,00H,00H,0C0H,00H,80H,3FH,0FEH
DB 0FH,0FCH,01H,80H,3FH,0FEH,03H,60H,3FH,0FEH,18H,0C0H,3FH,0FEH,00H
DB 0C0H,3FH,0FEH,0CH,0BEH,0FH,0FCH,00H,10H,00H,82H,00H,82H,20H,06H
DB 08H,08H,01H,80H,00H,08H,06H,20H,00H,06H,08H,80H,20H,06H,20H
DB 82H,00H,80H,08H,0F8H,08H,08H,3FH,0F8H,7FH,0FFH,7FH,0FFH,20H,36H
DB 08H,08H,3FH,0FCH,00H,38H,0EH,20H,00H,36H,0EH,80H,20H,36H,3FH
DB 0FFH,18H,8CH,0AH,80H,08H,08H,00H,00H,00H,80H,08H,08H,2FH,0FEH
DB 0FH,0F8H,31H,88H,00H,0C0H,0CH,30H,7FH,0FEH,04H,80H,2FH,0FEH,20H
DB 0CH,08H,98H,7FH,80H,0FH,0F8H,00H,00H,3FH,0FEH,0FH,0FCH,21H,86H
DB 08H,08H,31H,88H,00H,80H,08H,18H,00H,06H,3FH,0FEH,21H,86H,6FH
DB 0F8H,0EH,0B8H,08H,86H,08H,08H,00H,04H,32H,26H,08H,08H,21H,86H
DB 08H,08H,31H,88H,00H,80H,19H,0CH,10H,66H,01H,86H,21H,86H,03H
DB 08H,06H,0A0H,18H,0FEH,08H,08H,0FFH,0FEH,33H,76H,08H,08H,2FH,0F6H
DB 0FH,0F8H,3FH,0F8H,7FH,0FFH,31H,8FH,1FH,0E6H,01H,86H,2FH,0F6H,0FH
DB 9EH,04H,0A2H,3EH,0A6H,0FH,0F8H,01H,00H,31H,56H,08H,08H,21H,86H
DB 03H,0E4H,31H,88H,00H,80H,23H,02H,18H,66H,03H,46H,21H,86H,1BH
DB 0B0H,7FH,0FFH,2AH,0A6H,03H,0E4H,11H,40H,3FH,0FEH,0FH,0F8H,21H,0E6H
DB 33H,6EH,31H,88H,00H,80H,43H,00H,18H,66H,03H,66H,21H,0E6H,26H
DB 0E0H,00H,80H,6AH,0ACH,33H,6EH,1DH,30H,30H,86H,04H,80H,21H,0A6H
DB 1BH,6CH,3FH,0F8H,00H,80H,02H,20H,18H,66H,02H,36H,21H,0A6H,0CH
DB 0E0H,00H,80H,48H,0A8H,1BH,6CH,11H,18H,3FH,0FEH,0EH,0B8H,2FH,0FEH
DB 0BH,78H,31H,8AH,00H,80H,0EH,30H,1FH,0E6H,06H,26H,2FH,0FEH,3BH
DB 0D8H,00H,80H,89H,0B8H,0BH,78H,31H,1CH,30H,86H,08H,8CH,20H,06H
DB 0BH,70H,01H,82H,00H,80H,08H,18H,18H,66H,0CH,06H,20H,06H,02H
DB 0C8H,00H,80H,09H,38H,0BH,70H,61H,0CH,30H,86H,38H,86H,20H,06H
DB 0BH,62H,01H,83H,00H,80H,3FH,0FCH,10H,46H,18H,0EH,20H,06H,0EH
DB 0CFH,00H,80H,0BH,6EH,0BH,62H,41H,04H,30H,0BCH,27H,82H,3FH,0FEH
DB 7FH,0FFH,01H,0FFH,07H,80H,18H,0CH,00H,3EH,30H,7CH,3FH,0FEH,33H
DB 0C2H,00H,80H,0AH,87H,7FH,0FEH,8FH,00H,30H,8CH,43H,80H,20H,06H
DB 00H,00H,00H,0FEH,03H,80H,00H,08H,00H,0CH,60H,18H,20H,06H,61H
DB 80H,00H,80H,0FH,02H,00H,00H,07H,00H,00H,00H,00H,00H,08H,20H
DB 00H,80H,00H,00H,00H,80H,00H,80H,00H,00H,08H,20H,08H,00H,03H
DB 30H,08H,20H,00H,40H,00H,00H,00H,00H,00H,06H,0EH,0FEH,0CH,30H
DB 00H,0D8H,07H,0FFH,00H,0C0H,00H,0C0H,01H,80H,0EH,38H,0DH,0FEH,02H
DB 26H,0CH,0B8H,03H,60H,3FH,0FEH,00H,00H,3FH,0FEH,38H,86H,08H,20H
DB 00H,88H,7EH,0C8H,20H,82H,00H,80H,00H,0C0H,08H,20H,18H,0CH,3FH
DB 0FEH,08H,0F0H,06H,20H,00H,06H,00H,00H,00H,80H,08H,86H,0BH,0FFH
DB 00H,8CH,18H,0C8H,3FH,0FFH,20H,86H,04H,0E0H,2BH,22H,34H,18H,02H
DB 20H,2EH,0B0H,0EH,20H,00H,36H,00H,00H,00H,80H,0AH,86H,7EH,20H
DB 00H,82H,18H,0C8H,63H,22H,3FH,0FEH,06H,60H,3FH,0FFH,26H,30H,20H
DB 02H,2AH,0B6H,0CH,30H,7FH,0FEH,00H,00H,00H,80H,7EH,0FEH,08H,20H
DB 7FH,0FFH,36H,0C8H,6EH,3CH,30H,86H,06H,68H,23H,0C2H,7EH,78H,3FH
DB 0FFH,2BH,0FEH,08H,18H,00H,06H,00H,00H,00H,80H,18H,00H,08H,24H
DB 03H,0A0H,3EH,0C8H,0AH,0CH,30H,86H,06H,0CH,23H,82H,2CH,8EH,28H
DB 1AH,29H,30H,19H,0CH,10H,66H,00H,00H,00H,80H,1FH,0FFH,0FH,0FEH
DB 02H,0A0H,37H,0FFH,33H,8EH,30H,86H,26H,06H,23H,0A2H,09H,83H,6FH
DB 0F8H,6BH,30H,31H,8FH,1FH,0E6H,00H,00H,00H,80H,3AH,30H,38H,8CH
DB 06H,0A0H,76H,0C8H,03H,20H,30H,86H,26H,02H,3FH,22H,12H,01H,0CH
DB 18H,0AH,34H,23H,02H,18H,66H,00H,00H,00H,80H,2AH,30H,78H,88H
DB 0EH,0B8H,0F6H,0C8H,3FH,0F0H,3FH,0FEH,26H,0BH,23H,32H,7FH,0FEH,0FH
DB 0F8H,08H,0FEH,43H,00H,18H,66H,00H,00H,00H,80H,28H,36H,08H,88H
DB 08H,98H,36H,0C8H,03H,20H,20H,84H,66H,08H,23H,22H,20H,20H,00H
DB 00H,08H,30H,02H,20H,18H,66H,30H,00H,00H,80H,0C8H,0FEH,08H,78H
DB 38H,8EH,36H,0C8H,02H,22H,00H,80H,66H,08H,23H,02H,00H,20H,1FH
DB 0FEH,08H,30H,0EH,30H,1FH,0E6H,30H,00H,00H,80H,08H,30H,08H,30H
DB 20H,87H,3EH,88H,06H,22H,00H,80H,06H,08H,23H,02H,0EH,20H,18H
DB 0CH,08H,30H,08H,18H,18H,66H,00H,00H,7FH,0FFH,08H,32H,08H,0FCH
DB 40H,82H,37H,88H,0CH,22H,00H,80H,07H,0F8H,3FH,06H,78H,26H,18H
DB 0CH,08H,32H,3FH,0FCH,10H,46H,00H,00H,00H,00H,0BH,0FFH,78H,8EH