lcd12887.asm

DS12887的一个应用例子

ADDR818  EQU  0FE00H
XRMONTH  EQU  20H
;;;;for   the last  big ping  and  small  ping

IO574      EQU   21H
DISPCP     EQU P1.3
DISPDS     EQU P1.2

DISPST     EQU P1.7


DCP     EQU   P1.2       ;;;;da ping line 
DDS     EQU   P1.3

SDCP    EQU   P1.4       ;;;;;xiao  ping   line
SDDS    EQU   P1.2

DST     EQU   P1.3
CP00    EQU   P1.0


DISLK   EQU  30H
DANJR   EQU  30H
DISMN   EQU  30H
DISAPEAR EQU  02H

HC574   EQU   17H

     ORG 0
     SJMP IIII
     NOP
     RETI

;;DANJR         2BYTE:  X.XX     ;LOW
;;DISLK         3BYTE  XXXX.XX   ;HIGH
;;DISMN         3BYTE  XXXX.XX   ;MID
	ORG 50H
IIII:        

	      MOV A,#00H
	      MOV PSW,A
	      MOV SP,#90H        ;
	      NOP
;;;;	      LCALL INIT8250
	      
;	      MOV R0,#20H;
;	      MOV R7,#64;
;LOOPINIT:     MOV A,#66H
;	      MOV @R0,A
;	      INC R0
;	      DJNZ R7,LOOPINIT
	      NOP
			      NOP
	     
	      ;;SETB EA
;;;;        11111111 10111111

BEGIN:

          NOP
          NOP 
          MOV   DPTR,#0FBFFH
          MOV   A,#00H
          MOVX  @DPTR,A
          NOP
          NOP
          MOV   DPTR,#0000H
          MOV   A,#0FFH
          MOVX  @DPTR,A
          NOP
          NOP                      
;;        NOP
;        MOV   A,#44H
;        LCALL DISPB00
;;        NOP
;;        MOV  A,#40H
;;        LCALL DISPBdd
;;        NOP
;;        MOV  A,#55H
;;        LCALL DISPBss
         NOP
         NOP
         NOP
         MOV    A,#5EH
         NOP
         LCALL  PBDDDA   ;;;;;;;FOR   BIG
         NOP
         NOP
         NOP
         MOV    DPH,#0FEH
         MOV    DPL,#02H
         MOVX   A,@DPTR
         NOP
         NOP
         MOV    A,#11H
         NOP
         LCALL  PFDDDA   ;;;;;;;FOR   BIG
         NOP
         NOP
         MOV    A,#00H
         NOP
         LCALL  PBDDXI    ;;;;;;FOR  SMALL
         NOP
         NOP
         LCALL  SETDLD
         NOP
         NOP
         LCALL  CLRDLD
         NOP
         NOP
         LCALL  SETDCP
         NOP
         NOP
         LCALL  CLRDCP
         NOP
         NOP
         LCALL  SETD
         NOP
         NOP
         LCALL  CLRD
         NOP
         NOP
         JMP BEGIN


;GE-1 SUBROUTINE OF SCREEN LCD DISPLAY -0HF
;GE ENTRY HF : A -- WINDOW (2=LEFT,1=MIDIUM,0=RIGHT)
;          R0 -- HEAD OF BUFFER
;          F0 -- DECIMAL POINT CONTROL ( 0 - LEFT , 1 - RIGHT)
;    DISFLSHL -- (BIT) LEFT & MIDIUM WINDOWS FLASH
;    DISFLSHR -- (BIT) RIGHT WINDOW FLASH       (1 -- FLASH)
;
;GE ASSIGNMENT OF SCREEN BOARD SIGNALS HF
;
SDDISP: CLR DISAPEAR
        MOV R2,A
        MOV R1,A
        ;;;;;ADD A,#SDDISPT - $ - 3
        MOVC A,@A+PC    ;CALCULATE THE POSITION
        XCH A,R2        ;ROUTE