可测量液体温度的数显温度计 (含原理图和PCB板、C语言源程序)

可测量液体温度的数显温度计 (含原理图和PCB板、C语言源程序)

;!!!本程序仅供个人用户学习使用，作者保留版权，!!!
;!!!任何形式的商业用途，必须经过作者书面同意。!!!

;----------------------------------------------------------
 LIST  P=16F84A
 #INCLUDE P16F84A.INC
 __CONFIG _XT_OSC & _PWRTE_OFF & _WDT_OFF & _CP_OFF

;----------------------------------------------------------
 
 C1 EQU 20H
 C2 EQU 21H
 C3 EQU 22H
 DD EQU 23H
 WD EQU 24H
 C4 EQU 25H
 TEPL EQU 26H
 TEPH EQU 27H
 TEP EQU 28H
 BAIWEI EQU 29H
 SHIWEI EQU 30H
 GEWEI EQU 31H
 SHIFEN EQU 32H
 BAIFEN EQU 33H
 QIANFEN EQU 34H
 WANGFEN EQU 35H
 ZL EQU 36H
 SHU EQU 37H
 TS EQU 38H
 TEPB EQU 39H
;-----------------------------------
 #DEFINE DQ PORTA,0
 #DEFINE DQI TRISA,0
;-----------------------------------
 ORG 2100H ;通过伪指令写EEPROM
 DE .25 ;00H单元的数据为25
;******************主程序**********************

  ORG 000H
  NOP
  BSF STATUS,5
  CLRF TRISA
  MOVLW 0EH
  MOVWF TRISB
  BCF STATUS,5
  CLRF PORTA
  CLRF PORTB
;-------------------------------------
  CALL YS30M ;LCD复位
  MOVLW 30H
  MOVWF ZL
  CALL XIEZL

  CALL YS30M
  MOVLW 30H
  MOVWF ZL
  CALL XIEZL

  CALL YS30M
  MOVLW 30H
  MOVWF ZL
  CALL XIEZL
 
;-----------------------------------
 
  CALL BF ;LCD初始化设置
  MOVLW 20H ;功能设置
  MOVWF ZL
  CALL XIEZL

  CALL BF 
  MOVLW 20H ;功能设置
  MOVWF ZL
  CALL XIEZL
  MOVLW 80H
  MOVWF ZL
  CALL XIEZL
  
  CALL BF ;显示关 
  MOVLW 00H
  MOVWF ZL
  CALL XIEZL
  MOVLW 80H
  MOVWF ZL
  CALL XIEZL

  CALL BF ;显示清除
  MOVLW 00H
  MOVWF ZL
  CALL XIEZL
  MOVLW 10H
  MOVWF ZL
  CALL XIEZL