楼 主:qinr 2003年3月31日22:16

 大侠帮忙看看下面程序怎么写进片子相当于没用一样。。。。QQ:241248
这个是点亮12864的，用的是at89c51的单片机
下面是单片机与LCD模块接口图标 ，能教我的请加我qq241248,不胜感激
DI   P2.0
R/W  P2.1
E   P3.6 与P3.7用与门连接后接到E势能信号
DB0~7   P0.0~7    
左片选信号CS1  p2.7
右片选信号CS2  p2.6
;====================================
DI  BIT P2.0
RW  BIT P2.1
E1  BIT P3.6
E2  BIT P3.7
CS1 BIT P2.7
CS2 BIT P2.6
XPAGE EQU 40H
YADDR EQU 41H
TEMPY EQU 43H
    ORG 0000H
    LJMP MAIN_INIT
MAIN_INIT:
    MOV SP,#60H
    CLR RW
    NOP
    NOP
    LCALL CLRLCD
    MOV YADDR,#0
    mov xpage,#0
    MOV DPTR,#TXT3
    LCALL OUTWORD

    MOV YADDR,#32
    MOV XPAGE,#2
    MOV DPTR,#TXT1
    LCALL OUTWORD

    MOV YADDR,#80
    MOV XPAGE,#4
    MOV DPTR,#TXT2
    LCALL OUTWORD

CLRLCD:
    PUSH PSW
    PUSH ACC
    SETB RS0
    CLR RS1
    SETB CS1
    SETB CS2
    MOV A,#00111111B
    LCALL LCDA1
    MOV A,#11000000B
    LCALL LCDA1
    MOV A,#10111000B
    LCALL LCDA1
    MOV A,#01000000B
    LCALL LCDA1
    MOV R0,#08H

    MOV XPAGE,#10111000B
CLRPAGE:
    MOV A,XPAGE
    LCALL LCDA1
    MOV R1,#64
    MOV A,#00H
CLRADDR:
    LCALL LCDAD
    DJNZ R1,CLRADDR
    INC XPAGE
    DJNZ R0,CLRPAGE
    POP ACC
    POP PSW
    RET

LCD1D:SETB DI
      SETB CS1
      NOP
      NOP
      CLR CS2
      NOP
      NOP
      LJMP LCDW
LCD2D:SETB DI
      CLR CS1
      NOP
      NOP
      SETB CS2
      NOP
      NOP
      LJMP LCDW
LCDAD:SETB DI
      SETB CS1
      SETB CS2
      LJMP LCDW
LCD1: CLR DI
      SETB CS1
      NOP
      NOP
      CLR CS2
      NOP
      NOP
      LJMP LCDW
LCD21:CLR DI
      CLR CS1
      NOP
      NOP
      SETB CS2
      NOP
      NOP
      LJMP LCDW
LCDA1:CLR DI
      SETB CS1
      SETB CS2
LCDW: MOV P0,A
      SETB E1
      SETB E2
      NOP
      CLR E1
      CLR E2
      RET

OUTWORD:
      MOV A,YADDR
      ANL A,#01111111B
      MOV YADDR,A
      MOV R0,#2
OUTPAGE:
      MOV A,XPAGE
      ANL A,#00000111B
      ORL A,#10111000B
      LCALL LCDA1
      MOV R1,#16
      MOV A,YADDR
      MOV TEMPY,A
OUTADDR:
      CLR A
      MOVC A,@A+DPTR
      INC DPTR
      MOV B,A
      MOV A,TEMPY
      CJNE A,#128,OUTCS2
      MOV A,#01000000B
      LCALL LCD1
      MOV A,B
      LCALL LCD1D
      MOV TEMPY,#0H
      LJMP NEXTBYTE
OUTCS2:
      CJNE A,#64,CHKCS1CS2
      MOV A,#01000000B
      LCALL LCD21
      MOV A,B
      LCALL LCD2D
      LJMP NEXTBYTE
CHKCS1CS2:
      JC OUTCS1
      MOV A,TEMPY
      ANL A,#00111111B
      ORL A,#01000000B
      LCALL LCD21
      MOV A,B
      LCALL LCD2D
      LJMP NEXTBYTE
OUTCS1:
      MOV A,TEMPY
      ANL A,#00111111B
      ORL A,#01000000B
      LCALL LCD1
      MOV A,B
      LCALL LCD1D
NEXTBYTE:
      INC TEMPY
      DJNZ R1,OUTADDR
      INC XPAGE
      DJNZ R0,OUTPAGE
      RET
;TXT1:DB 10H,10H,10H,90H,10H,90H,10H,90H
;     DB 0FDH,08H,11H,08H,39H,04H,36H,42H
;     DB 54H,40H,50H,40H,90H,80H,10H,88H
;     DB 11H,04H,13H,0FCH,10H,04H,10H,00H       松  横排字模
;TXT2:DB 01H,00H,01H,00H,01H,00H,01H,00H        山
;     DB 41H,04H,41H,04H,41H,04H,41H,04H
;     DB 41H,04H,41H,04H,41H,04H,41H,04H
;     DB 41H,04H,7FH,0FCH,40H,04H,00H,00H

;txt1:db 10h,10h,0Dh,0FFh,50h,90h,80h,70h
;     db 0Eh,80h,00h,0Fh,30h,40h,80h,00h
;     db 04h,03h,00h,0FFh,00h,01h,20h,30h
;     db 2Ch,23h,20h,20h,28h,70h,00h,00h         松  竖模
;txt2:db 00h,0F0h,00h,00h,00h,00h,00h,0FFh       山
;     db 00h,00h,00h,00h,00h,0F0h,00h,00h
;     db 00h,07Fh,20h,20h,20h,20h,20h,3Fh
;     db 20h,20h,20h,20h,20h,7Fh,00h,00h
txt1:db 00h,00h,00h,0fch,0feh,82h,41h,41h
     db 41h,41h,41h,0c7h,86h,00h,00h,00h
     db 00h,00h,00h,0fh,1fh,30h,20h,20h
     db 20h,20h,20h,10h,1fh,0fh,00h,00h
txt2:db 00h,08h,0feh,0a8h,0a8h,0a8h,0feh,08h    ;日
     db 00h,0fch,24h,24h,24h,0feh,04h,00h       ;期  竖向字模
     db 44h,24h,1fh,04h,04h,0ch,57h,24h
     db 10h,0fh,02h,22h,42h,3fh,00h,00h
TXT3:DB 00H,00H,00H,0FCH,0FEH,82H,41H,41H
     DB 41H,41H,41H,0C7H,86H,00H,00H,00H
     DB 00H,00H,00H,0FH,1FH,30H,20H,20H
     DB 20H,20H,20H,10H,1FH,0FH,00H,00H
END

  
第2楼:qinr 2003年3月31日22:19

 哦，不对，是at89c52的单片机，at89c51和at89c52的程序可以通用吗?
x