国产精品无码一区二区三区A片_无码狠狠躁久久久久久久91_国产精品久久久久久久_国产99九九久久无码熟妇_国产人妻精品久久久久野外_久久夜色精品国产欧美乱极品_91精品国产色综合久久不卡98口_精品人妻系列无码人妻免费视频

技術(shù)熱線: 4007-888-234
設(shè)計開發(fā)

專注差異化嵌入式產(chǎn)品解決方案 給智能產(chǎn)品定制注入靈魂給予生命

開發(fā)工具

提供開發(fā)工具、應(yīng)用測試 完善的開發(fā)代碼案例庫分享

技術(shù)支持

從全面的產(chǎn)品導(dǎo)入到強大技術(shù)支援服務(wù) 全程貼心伴隨服務(wù),創(chuàng)造無限潛能!

新品推廣

提供新的芯片及解決方案,提升客戶產(chǎn)品競爭力

新聞中心

提供最新的單片機資訊,行業(yè)消息以及公司新聞動態(tài)

LCD驅(qū)動HT1621的PIC單片機源代碼

更新時間: 2019-03-22
閱讀量:3061

專注單片機方案開發(fā)的深圳英銳恩分享LCD驅(qū)動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數(shù)據(jù)線
WCLK    EQU     1     ;RB,1寫時鐘線
RCLK    EQU     4     ;RB,4讀時鐘線
;..............................
 ORG     0H
 GOTO    START
;...............................
START   BSF     STATUS,RP0
        MOVLW   00H
        MOVWF   TRISB
        MOVLW   81H
        MOVWF   TRISC
        BCF     STATUS,RP0
        MOVLW   12H
        MOVWF   RB
        BSF     RC,2
        BSF     RC,5
        MOVLW   4
        MOVWF   OPTIONA
LOOP    NOP
        CALL  X_QUAN
        NOP
        GOTO   LOOP

;............................
X_QUAN     
        MOVLW   8H    
        CALL    ON_LCD   ;TRANSMIT TH1621 WORK MODE VALUE         
                 
        MOVLW   9H       ;顯示9位LCD 
        CALL    DIS_DATA
      
        RETURN
;............................
ON_LCD  MOVWF GENR1
        BCF     RC,2
 MOVLW 80H  ;HI_W3 BITS:100
 MOVWF WD_RG       
 MOVLW 3        ;3位命令100
 CALL TRAM_DATA      
ON_LCD0 MOVF GENR1,0
 CALL ON_VALUE ;查表初始化LCD
 MOVWF WD_RG

 MOVLW 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    
 MOVWF GENR0      
 BCF RB,1       
 RLF WD_RG       
 BTFSS 3,0
 GOTO