芯海自帶筆段式LCD

;============================================
; filename: 自帶筆段式lcd.asm
; chip    : csu1181b
; author  :
; date    : 2012-07-27
;============================================
include csu1181b.inc
;============================================
; program start
;============================================
 
  org   000h
  goto  A1
  ORG   05H
;*******************************************
;   主程序段
;*******************************************  
A1:  BCF   LCDCH,5 ;設(shè)置SEG口位LCD輸出口

  MOVLW  10110111B ;設(shè)置LCDENR
  MOVWF  LCDENR
A2: 
  BSF   NETF,0 ;開(kāi)模擬電源
  
  MOVLW  LCD2 ;位
  MOVWF  FSR0 ;間接尋址地址
  
  MOVLW  4 ;位數(shù)
  MOVWF  90H ; 位數(shù)寄存器
  
  MOVLW  0 ;顯示內(nèi)容默認(rèn)值
  MOVWF  95H ; 顯示內(nèi)容控制寄存器
  
  MOVLW  10 ;加1循環(huán)次數(shù)
  MOVWF  9AH ;加1循環(huán)次數(shù)寄存器
  
A3: 
  MOVLW  Q1 ;數(shù)據(jù)表地址
  ADDWF  95H,0 ;顯示內(nèi)容
  MOVWF  EADRL ;選定后數(shù)據(jù)表地址
  MOVP ;查表并將數(shù)據(jù)存到（W）及（EDATH ）中

  MOVWF  IND0 ;將W中的數(shù)存到間接尋址內(nèi)的寄存器中
  INCF  FSR0,1 ;間接尋址地址位加1
 
  MOVFW  EDATH ;將EDATH中的數(shù)存w中
  MOVWF  IND0 ;將W中的數(shù)存到間接尋址內(nèi)的寄存器中
  INCF  FSR0,1 ;間接尋址地址位加1
  
  DECFSZ  90H,1 ;判斷是否顯示完4位
  GOTO  A3 ;沒(méi)顯示完則繼續(xù)顯示
  
  MOVLW  LCD2 ;LCD顯示位
  MOVWF  FSR0 ;間接尋址地址
  
  MOVLW  4 ;位數(shù)
  MOVWF  90H ; 位數(shù)寄存器
  
  INCF  95H,1 ;顯示內(nèi)容加1
  CALL  M001  ;延時(shí)
  DECFSZ  9AH,1 ;判斷是否將內(nèi)容顯示完
  GOTO  A3 ;沒(méi)顯示完則繼續(xù)顯示
  GOTO  A1 ;返回反復(fù)執(zhí)行
;*****************************************************
;   延時(shí)子程序段
;***************************************************** 
 
M001: MOVLW  1
  MOVWF  80H
M002: MOVLW  248
  MOVWF  81H
M003: MOVLW  250
  MOVWF  82H
M004: DECFSZ  82H,1
  GOTO  M004 
  DECFSZ  81H,1
  GOTO  M003
  DECFSZ  80H,1
  GOTO  M002
  RETURN
;******************************************* 
;   數(shù)據(jù)表
;******************************************* 
Q1:
  DW  070DH ;0
  DW  0600H ;1
  DW  030EH ;2
  DW  070AH ;3
  DW  0603H ;4
  DW  050BH ;5
  DW  050FH ;6
  DW  0700H ;7
  DW  070FH ;8
  DW  070BH ;9

  end