LCD character ++ Key button display program

"FuncTIon : LCD character display + key key processing example program * ; MICroProcessor : HT48R50A-1/28SKDIP-A * ; Author: * ; Crystal : 4MHz * ; ******************************************** #INCLUDE HT48R50A-1.INC LCD_ DATA EQU PC LCD_ DATA_ CTRL EQU PCC LCD_ CTRL EQU PB LCD_ CTRL_ CTRL EQU PBC E EQU one RS EQU 0 ;------------------------------------------------------------ DATA . SECTION AT 60H & rsquo; DATA’ DELAY_ COUNTER_ one DB ? ;[ 60H] DELAY_ COUNTER_ two DB ? ;[ 61H] DELAY_ COUNTER_ three DB ? ;[ 62H] DATA DB ? ;[ 63H] COUNTER DB ? ;[ 64H] ;------------------------------------------------------------ CODE . SECTION AT 00H ’ CODE’ ORG 00H JMP START ORG 0CH JMP TIMER1 ORG 20H START: MOV A,01111111B MOV PAC,A CALL LCD_ RESET MOV A,OFFSET LCD_ MESSAGE_ one MOV TBLP,A CALL LCD_ DISPLAY MOV A,09H MOV INTC,A MOV A,80H MOV TMR1C,A FIRST_ TIME: MOV A,PA AND A,00010000B SUB A,00010000B SZ ACC JMP FIRST_ TIME PRESS_ ANY_ KEY: MOV A,OFFSET LCD_ MESSAGE_ two MOV TBLP,A CALL LCD_ DISPLAY ANY_ KEY: MOV A,PA AND A,00010000B SUB A,00010000B SZ ACC JMP ANY_ KEY MOV A,PA AND A,00001111B MOV DATA,A SUB A,09H 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_ three 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 ; MOV A,00110010B ; SETP one MOV DATA,A ; FUNCTION SET CALL TRANSFER ; MOV A,00001100B ; STEP two MOV DATA,A ; DISPLAY TURN ON CALL TRANSFER ; MOV A,00000001B ; STEP three MOV DATA,A ; DISPLAY CLEAN CALL TRANSFER ; CALL DELAY ; DELAY SOME TIME MOV A,00000110B ; STEP four MOV DATA,A ; ENTRY MODE SET CALL TRANSFER

Our other product:

Professional lightning protection system for Tower	Professional FM Radio Station Equipment Package	FMUSER FU-1000C 1000W FM Transmitter With USB Audio Input Interface
FMUSER 200W FM Radio Broadcasting Package	Hotel IPTV Solution	FMUSER FSN-1000T V5.0 1KW FM Radio Broadcast Transmitter