从机1程序.asm

基于Proteus的51系列单片机设计与仿真

       RS     BIT    P1.7
       RW     BIT    P1.6
       E      BIT    P1.5
       KOU    EQU    P2
       ORG    0030H
LOP:   MOV    SP,#5fH
       MOV    TMOD,#20H
       MOV    40H,#00H
       MOV    TH1,#0FFH
       MOV    TL1,#0FFH
       MOV    SCON,#50H
       MOV    PCON,#80H
       SETB   TR1 
       ACALL  LCD_MODEL         ;初始化的模块
       MOV    KOU,#81H
       ACALL  READY
       MOV    DPTR,#TAB
       ACALL  WRITE             ;显示的模块
       MOV    P2,#0C1H
       ACALL  READY
       MOV    DPTR,#TAB1
       ACALL  WRITE
   xt: jnb    RI,$
       CLR    RI
   x:  MOV    A,SBUF
       CJNE   A,#11H,rel  
       INC    40H 
       MOV    A,40H
       CJNE   A,#10,XTG
       MOV    40H,#0
XTG:   MOV    P2,#0C9H
       ACALL  READY
       MOV    DPTR,#TAB2
       ACALL  WRITEx
       AJMP   xt
 rel:  ajmp   xt 
 WRITEx:MOV   A,40H
       MOVC   A,@A+DPTR
       MOV    KOU,A
       ACALL  WRITE1
       RET
WRITE: MOV    A,#00H
       MOVC   A,@A+DPTR
       CJNE   A,#0FFH,s
       AJMP   EXIT
 S:    MOV    KOU,A
       ACALL  WRITE1
       INC    DPTR
       AJMP   WRITE
 EXIT: RET
WRITE1:SETB   RS
       CLR    RW
       CLR    E
       ACALL  DELAY
       SETB   E
       RET
LCD_MODEL: MOV     KOU,#01H
       ACALL  READY
       MOV    KOU,#03H
       ACALL  READY
       MOV    KOU,#00000110B
       ACALL  READY
       MOV    KOU,#00001100B
       ACALL  READY
       MOV    KOU,#38H
       ACALL  READY
       RET
READY: CLR   RS
       CLR   RW
       CLR   E
       ACALL DELAY
       SETB  E
       RET
DELAY: MOV   KOU,#0FFH            
       CLR   RS
       SETB  RW
       CLR   E
       NOP   
       SETB  E
       JB    KOU.7,DELAY
       RET 
TAB:   DB    "Proteus   7.1" ,0FFH       ;显示字库
TAB1:  DB    "Count:" ,0FFH
TAB2:  DB   "0123456789"
       END