PIC單片機(jī)控制時(shí)鐘芯片DS1302匯編程序

#INCLUDE
CBLOCK 20H
SEC ;秒
MIN ;分
HOU ;小時(shí)
DATE ;日期
MON ;月
DAY ;日
YERR ;年
DDD ;寫使能位
TIME_TX ;1302發(fā)送寄存器
TIME_RX ;1302接收寄存器
COUNT1 ;
COUNT2 ;
DELAY1
DELAY2
ENDC
*******************************
; ; 1302子程序說(shuō)明
; ;******************************
; DS1302INI ;1302初始化，先禁止RST,設(shè)定充電方式
; SET_TIME ;一次發(fā)送7個(gè)數(shù)據(jù)設(shè)定時(shí)間,包含寫使能寄存器，8個(gè)數(shù)據(jù)
; GET_TIME ;一次接收7個(gè)數(shù)據(jù)顯示時(shí)間
; TIME_WRITE_1;一次寫入1302一個(gè)字節(jié)
; TIME_READ_1 ;一次接收一個(gè)字節(jié)數(shù)據(jù)
; ;******* 1302定義**************
; ;******************************
#DEFINE I_O PORTC,7 ;1302I_O
#DEFINE SCLK PORTC,6 ;1302時(shí)鐘
#DEFINE RST PORTA,0 ;1302使能位
#DEFINE RX_ADD 40H ；保存接受的7個(gè)數(shù)據(jù)
#DEFINE TX_ADD 20H ；開(kāi)始保存7個(gè)要寫入的時(shí)間數(shù)據(jù)
BANK1 MACRO
BSF STATUS,RP0
ENDM
BANK0 MACRO
BCF STATUS,RP0
ENDM

ORG 000H
NOP
GOTO MAIN
MAIN

CALL CLR_RAM 清除RAN
CALL PORT_INI 端口定義
CALL DS1302_INI
CALL SET_TIME 一次寫入7個(gè)時(shí)間數(shù)據(jù)
CALL GET_TIME ; 一次讀回7個(gè)時(shí)間數(shù)據(jù)
GOTO $

;; 寫入秒，可以寫任意的7個(gè)時(shí)間數(shù)據(jù)，單字節(jié)
MOVLW B'10000000'
MOVWF TIME_TX
BSF RST
CALL TIME_WRITE_1
MOVLW B'00100101'
MOVWF TIME_TX
CALL TIME_WRITE_1
BCF RST

讀秒，可以讀任意7個(gè)時(shí)間，單字節(jié)

MOVLW B'10000001'
MOVWF TIME_TX
BSF RST
CALL TIME_WRITE_1
CALL TIME_READ_1
BCF RST

GOTO $

：子程序

**************************************************
; DS1302_INI
; 作用：初始化1302，先禁止RST,允許寫使能
;**************************************************
DS1302_INI
BCF SCLK
BCF RST ;先禁止
MOVLW B'10001110' ;寫使能寄存器
MOVWF TIME_TX
BSF RST
CALL TIME_WRITE_1
MOVLW B'0' ;允許寫使能
MOVWF TIME_TX
CALL TIME_WRITE_1;發(fā)送一個(gè)字節(jié)的數(shù)據(jù)
BCF RST

;設(shè)定充電方式

沒(méi)有設(shè)定
RETURN

;**************************************************
; SET_TIME
; 作用：一次輸入7個(gè)數(shù)據(jù)來(lái)一次性的設(shè)定時(shí)間，同時(shí)使能寫寄存器
; 突發(fā)模式寫入，必須寫入8個(gè)數(shù)據(jù)，不是7個(gè)
; INPUT:要設(shè)定的8個(gè)數(shù)據(jù)已經(jīng)寫入到TIME_TX_ADD開(kāi)始的8個(gè)字節(jié)里面
;**************************************************
SET_TIME
MOVLW B'10111110' ;標(biāo)志位
MOVWF TIME_TX
BSF RST
CALL TIME_WRITE_1
;TIME_WRITE_8 ;發(fā)送8個(gè)數(shù)據(jù)
MOVLW TIME_TX_ADD ;發(fā)送數(shù)據(jù)的起始地址
MOVWF FSR
MOVLW D'8'
MOVWF COUNT2