FAVOUR:

MOV DATE,#0FFH

CLR RS

SETB RW

CLR E

NOP

SETB E

JB BF,FAVOUR

RET

;***************

DELAY:

MOV R0,#200

D1:MOV R1,#250

   DJNZ R1,$

   DJNZ R0,D1

RET

DELAY1:

MOV R0,#200

D3:MOV R1,#250

 D2:MOV R2,#250

   DJNZ R2,$

   DJNZ R1,$

   DJNZ R0,D3

RET

;****************

XIANSHI1:

MOV DATE,#11000000B

ACALL WRITES

RET

XIANSHI2:

MOV DATE,#00000001B

CALL WRITES

MOV DATE,#00000010B

CALL WRITES

MOV DATE,#00111000B

ACALL WRITES

MOV DATE,#00001111B

ACALL WRITES

MOV DATE,#00000110B

ACALL WRITES

MOV DATE,#10000000B

ACALL WRITES

MOV KEYCOUNT,#0

RET

;******************

OOO:

INC KEYCOUNT

MOV A,KEYCOUNT

SUBB A,#10H

JZ XIANSHI1

MOV A,KEYCOUNT

SUBB A,#21H

JZ XIANSHI2

RET

PPP: MOV TMOD,#20H    ;设定定时器1工作方式具有自动重装初值的8位定时器（见p52）

     MOV TL1,#0FDH

     MOV TH1,#0FDH

     MOV SCON,#70H     ;串行口控制器寄存器（8位通用异步属于方式1，且允许接收。见p64）

     SETB TR1

     MOV SBUF,A

WAIT: JNB TI,WAIT

      CLR TI

      CPL A

      DJNZ R3,PPP

      RET

TAB:

DB   4DH,30H,31H,4dH;M,0,1,M

DB   56H,32H,33H,56H;V,2,3,V

DB   50H,34H,35H,50H;P,4,5,P

DB   3DH,36h,37H,44h;*,6,7,D

DB   57H,45H,4CH,43H,4FH,4DH,45H

TAB2:

DB   4CH,00H,01H,52H;L,0,1,R

DB   4CH,02H,0FFH,52H;L,2,FF,R

DB   4CH,04H,0FH,52H;L,4,0F,R

DB   3DH,1Fh,2FH,44h;*,1F,2F,*

TAB3:

DB   4CH,00H,01H,30H;L,0,1,R    本表为了传送数据

DB   4CH,02H,0FFH,31H;L,2,FF,R

DB   4CH,04H,0FH,32H;L,4,0F,R

DB   3DH,1Fh,2FH,33h;*,1F,2F,*

END