HT48R50A的 LCD字符显示+KEY按键处理示例程序

                SZ      ACC
                JMP     NEXT_CHECK
                JMP     START
NEXT_CHECK:
                 MOV      A,DATA
                SUB     A,08H
                SZ      ACC
                JMP     PLAY_MONOTONY
                JMP     PLAY_A_SONG
PLAY_MONOTONY:
                CALL    MONOTONY
                JMP     ANY_KEY
PLAY_A_SONG:
                 MOV      A,OFFSET LCD_MESSAGE_3
                 MOV      TBLP,A
                CALL    LCD_DISPLAY
                CLR     COUNTER
PLAY_LOOP:
                 MOV      A,OFFSET SONG_DATA
                ADD     A,COUNTER
                 MOV      TBLP,A
                TABRDL  DATA
                DEC     DATA
                CALL    MONOTONY
                INC     COUNTER
                 MOV      A,COUNTER
                SUB     A,4BH
                SZ      ACC
                JMP     PLAY_LOOP
                JMP     PRESS_ANY_KEY
                RET
;------------------------------------------------------------
TIMER1:
                CPL     PA
                RETI
;------------------------------------------------------------
MONOTONY        PROC
                 MOV      A,OFFSET MUSIC_DATA
                ADD     A,DATA
                 MOV      TBLP,A
                TABRDL  DATA
                 MOV      A,DATA
                 MOV      TMR1L,A
                 MOV      A,TBLP
                ADD     A,08H
                 MOV      TBLP,A
                TABRDL  DATA
                 MOV      A,DATA
                 MOV      TMR1H,A
                SET     TMR1C.4
                CALL    DELAY_LONG
                CLR     TMR1C.4
                RET
MONOTONY        ENDP
;------------------------------------------------------------
LCD_RESET       PROC
                CLR     LCD_DATA_CTRL
                CLR     LCD_CTRL_CTRL
                CLR     LCD_DATA
                CLR     LCD_CTRL
                 MOV      A,00110011B     ;STEP 0
                 MOV      DATA,A          ;LCD RESET
                CALL    TRANSFER        ;

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

本文关键字：程序  合泰单片机，单片机-工控设备 - 合泰单片机