用VB实现微机控制字符型液晶显示

             LCALL  LCD                ; 液晶显示接收的字符

    WAIT:    SJMP   START               ;  返回

　　;串行通讯中断子程序

   UART1:    PUSH   PSW                                

              PUSH   ACC

              CLR    RI

              MOV   A,   SBUF         ;接收串行数据

              MOV   @R0,  A           ;存放到40H

              INC    R0

              CJNE   A,  #23H,  UART2  ;是否为结束字符＃，23H为#的ASCⅡ码

              SETB   00H                ;置位结束标志　

              SJMP   UART4

   UART2:    MOV   SBUF,  A           ;回传所收数据

   UART3:    JNB    TI,    UART3        ;等待发送完毕

              CLR    TI

   UART4:    POP     ACC

              POP     PSW

              RETI

　　　;LCD显示字符子程序

           　ORG  0100H

     LCD:   MOV     SP,    #60H        

             CALL    Initial

             CALL    CLS

             MOV    A,    #80H         ;设显示行为第一行

             CALL   Write

             MOV    R1,   #40h          ;取数据地址送R1

             CALL   STRING             ;调显示字符子程序

             RET

　　　;启动LCM显示子程序

    Initial:    ACALL   DELAY             

              MOV    A,    #38H

              CALL   Write

              MOV    A,   #0EH

              CALL   Write

              MOV    A,  #06H

              CALL   Write

              RET

　　　;查忙子程序

     Busy:    PUSH   ACC                

 BusyLoop:   CLR     ENABLE

                SETB    R_W

                CLR     RS

             SETB    ENABLE

             MOV    A,    DB0_DB7

             CLR    ENABLE

             JB      ACC.7,  BusyLoop

             POP    ACC

上一页  [1] [2] [3] [4]  下一页

本文关键字：暂无联系方式自动控制-单片机，电子制作 - 自动控制-单片机