LCD驱动HT1621的PIC 单片机
STATUS EQU 3H
FSR EQU 4H
RB EQU 6H
RC EQU 7H
OPTIONA EQU 81H
TRISB EQU 86H
TRISC EQU 87H
GENR0 EQU 053H
GENR1 EQU 054H
WD_RG EQU 055H
DA_AG0 EQU 056H ;SEG0 SEG1
DA_AG8 EQU 05EH ;SEG16 SEG17
;.............................
C EQU 0
Z EQU 2
RP0 EQU 5
RP1 EQU 6
CS EQU 2
WDA EQU 5 ;RC,5数据线
WCLK EQU 1 ;RB,1写时钟线
RCLK EQU 4 ;RB,4读时钟线
;..............................
ORG 0H
GOTO START
;...............................
START BSF STATUS,RP0
MOV LW 00H
MOV WF TRISB
MOV LW 81H
MOV WF TRISC
BCF STATUS,RP0
MOV LW 12H
MOV WF RB
BSF RC,2
BSF RC,5
MOV LW 4
MOV WF OPTIONA
LOOP NOP
CALL X_QUAN
NOP
GOTO LOOP
;............................
X_QUAN
MOV LW 8H
CALL ON_LCD ;TRANSMIT TH1621 WORK MODE VALUE
MOV LW 9H ;显示9位LCD
CALL DIS_DATA
RETURN
;............................
ON_LCD MOV WF GENR1
BCF RC,2
MOV LW 80H ;HI_W3 BITS:100
MOV WF WD_RG
MOV LW 3 ;3位命令100
CALL TRAM_DATA
ON_LCD0 MOV F GENR1,0
CALL ON_VALUE ;查表初始化LCD
MOV WF WD_RG
MOV LW 8 ;送8位查表值
CALL TRAM_DATA
BCF RC,WDA
NOP
NOP
BCF RB,1
NOP
NOP
BSF RB,1
BSF RC,2
DECFSZ GENR1,1
GOTO ON_LCD+1
RETURN
;........................
ON_VALUE
ADDWF 2
NOP
RETLW 03H ;LCD ON
RETLW 01H ;SYS ON
RETLW 08H ;TONE OFF
RETLW 29H ;BISA1/3 4 COM
RETLW 18H ;256K
RETLW 05H ;WDT DISABLE
RETLW 80H ;/IRQ DISABLE *
RETLW 0E3H ;NORMAL MODE *
;................................
;TRANSMIT BITS SUBROUTINE
TRAM_DATA
BCF STATUS,0
MOV WF GENR0
BCF RB,1
RLF WD_RG
BTFSS 3,0
GOTO $+3
BSF RC,WDA
GOTO $+2
BCF RC,WDA
BSF RB,1
DECFSZ GENR0,1
GOTO TRAM_DATA+2
RETURN
;.......................
DIS_DATA
MOV WF GENR1 ;9位LCD
BCF RC,2
MOV LW 0A0H
MOV WF WD_RG ;WRITE CONTROL
MOV LW 3H ;3位写命令101
CALL TRAM_DATA
MOV LW 00
MOV WF WD_RG ;WRITE ADDRESS
MOV LW 6H ;6位地址
CALL TRAM_DATA ;
DIS_DATA0
MOV LW 0FFH
本文关键字：单片机 PIC单片机，单片机-工控设备 - PIC单片机
