;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                        ;;
;;      LCDÏÔʾʵÑé
;;                        ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;

ORG     0000H
LJMP    PMAIN
ORG     0100H
RSDIS   BIT  P2.0
RWDIS   BIT  P2.1
ENDIS   BIT  P2.2
LED1    BIT  P3.2
LED2    BIT  P3.3
LED3    BIT  P3.4
WDOG    BIT  P3.5


DISDATA EQU  30H
DELBUF  EQU  31H
DISLOOP EQU  32H


PMAIN:  MOV     SP,     #68H
        LCALL   LCDSETUP
        MOV     DISDATA,        #80H
        LCALL   DISPLAY
        MOV     DPTR,  #TAB1
        MOV     DISLOOP,     #16D
        LCALL   DISROM
        MOV     DISDATA,      #0C0H
        LCALL   DISPLAY
        MOV     DPTR,  #TAB2
        MOV     DISLOOP,     #16D
        LCALL   DISROM

LOOP:   CPL     WDOG
        CLR     LED1
        SETB    LED2
        SETB    LED3
        LCALL   DELAY100MS
        SETB    LED1
        CLR     LED2
        SETB    LED3
        LCALL   DELAY100MS
        SETB    LED1
        SETB    LED2
        CLR     LED3
        LCALL   DELAY100MS
        MOV     DPTR,  #TAB0
        MOV     DISLOOP,     #16D
        LCALL   DISROM
        MOV     DISDATA,      #0C0H
        LCALL   DISPLAY
        MOV     DPTR,  #TAB2
        MOV     DISLOOP,     #16D
        LCALL   DISROM
        CLR     LED1
        SETB    LED2
        SETB    LED3
        LCALL   DELAY100MS
        SETB    LED1
        CLR     LED2
        SETB    LED3
        LCALL   DELAY100MS
        SETB    LED1
        SETB    LED2
        CLR     LED3
        LCALL   DELAY100MS
        MOV     DPTR,  #TAB1
        MOV     DISLOOP,     #16D
        LCALL   DISROM
        MOV     DISDATA,      #0C0H
        LCALL   DISPLAY
        MOV     DPTR,  #TAB2
        MOV     DISLOOP,     #16D
        LCALL   DISROM

        SJMP    LOOP

DELAY100MS:      MOV     R6,     #0E0H
D100MS1:         LCALL   DELAY
                 DJNZ    R6,  D100MS1
                 RET

DELAY:           MOV  R7,     #90H
DLY1:            NOP
                 NOP
                 DJNZ R7,     DLY1
                 CPL  WDOG
                 RET


SDELAY:         MOV       DELBUF,     #18D
SDEL1:          NOP
                NOP
                DJNZ      DELBUF,     SDEL1
                CPL       WDOG
                RET

DISPLAY:        CLR       ENDIS
                CLR       RSDIS
                CLR       RWDIS
                MOV       A,            DISDATA
                MOV       P0,           A
                SETB      ENDIS
                LCALL     SDELAY
                CLR       ENDIS
                LCALL     SDELAY
                RET

LCDSETUP:       MOV       DISDATA,      #38H
                LCALL     DISPLAY
                MOV       DISDATA,      #0EH
                LCALL     DISPLAY
                MOV       DISDATA,      #06H
                LCALL     DISPLAY
                MOV       DISDATA,      #01H
                LCALL     DISPLAY
                MOV       DISDATA,      #02H
                LCALL     DISPLAY
                MOV       DISDATA,      #38H
                LCALL     DISPLAY
                MOV       DISDATA,      #0EH
                LCALL     DISPLAY
                MOV       DISDATA,      #06H
                LCALL     DISPLAY
                MOV       DISDATA,      #80H
                LCALL     DISPLAY
                MOV       DISDATA,      #0CH
                LCALL     DISPLAY
                MOV       DISDATA,      #80H
                LCALL     DISPLAY
                RET



DISROM:         NOP
DISR1:          CLR     A
                MOVC    A,      @A+DPTR
                MOV     DISDATA,       A
                LCALL   DISPLAYDATA
                INC     DPTR
                DJNZ    DISLOOP,        DISR1
                RET
TAB0:           DB '                '
TAB1:           DB '       :        '
TAB2:           DB ' ZZM-1000 V1.0  '
TAB3:           DB '2. Reset  System'
TAB4:           DB '3. About!  V1.1 '
TAB5:           DB '4. Logo: CREATOR'
TAB6:           DB '5. DATE:07.2003 '
TAB7:           DB '6. Auto Test... '
TAB8:           DB '------MENU------'
TAB9:           DB '7. ECHO:  MID   '
TAB10:          DB '8. DELAY: MID   '
TAB11:          DB '9.MasterVol:    '
TAB12:          DB '10.MIC VOL:     '
TAB13:          DB '11.BASS:  MID   '
TAB14:          DB '12.TREBLE: MID  '
TAB15:          DB '13.Download IR..'
TAB16:          DB '14.Read IR.data '
TAB17:          DB '15.Return!      '
TAB18:          DB '16.Clear Data   '
TAB19:          DB 'Writeing.....   '


DISPLAYDATA:    CLR     ENDIS
                SETB    RSDIS
                CLR     RWDIS
                MOV     A,   DISDATA
                MOV     P0,  A
                SETB    ENDIS
                LCALL   SDELAY
                CLR     ENDIS
                LCALL   SDELAY
                RET