历史上的今天
今天是：2025年01月25日（星期六）
2018年01月25日 | HT1380实时时钟程序
2018-01-25 来源：eefocus
HT1380 EQU 0X06
COUNT0 EQU 0X10
TXBUF EQU 0X11
RXBUF EQU 0X12
DATABUF EQU 0X13
ADDRPOINT EQU 0X14
HT_SDA_IN EQU 0B01001000
HD_SDA_OUT EQU 0B00001000
HT_SCL EQU 0
HT_RST EQU 1
Ht_SDA EQU 2
;
TX_1380: MOV A,@HT_SDA_OUT
IOW HT1380
BC HT1380,HT_SCL
MOV A,@8
MOV COUNT0,A
TX_1380_LP:
BC HT1380,HT_SDA
JBC TXBUF,0
BS HT1380,HT_SDA
BS HT1380,HT_SCL
RRC TXBUF
BC HT1380,HT_SCL
DJZ COUNT0
JMP TX_1380_LP
RET
;读HT1380子程序
READ_HT:
MOV TXBUF,A
BC HT1380,HT_SCL
BS HT1380,HT_RST
MOV A,@HT_SDA_OUT
IOW HT1380
MOV A,@8
MOV COUNT0,A
TX_1_LP:
BC HT1380,HT_SDA
JBC TXBUF,0
BS HT1380,HT_SDA
BS HT1380,HT_SCL
RRC TXBUF
BC HT1380,HT_SCL
DJZ COUNT0
JMP TX_1_LP
MOV A,@HT_SDA_IN
IOW HT1380
MOV A,@8
MOV COUNT0,A
RX_1380_LP:
RRC RXBUF
BC RXBUF,7
JBC HT1380,HT_SDA
BS RXBUF,7
BS HT1380,HT_SCL
BC HT1380,HT_SCL
DJZ COUNT0
JMP RX_1380_LP
BC HT1380,HT_RST
RET
;写HT1380子程序
WRITE_HT:
MOV ADDRPOINT,A
BC HT1380,HT_SCL
BS HT1380,HT_RST
MOV A,@0B1000110
MOV TXBUF,A
CALL TX_1380
CLR TXBUF
CALL TX_1380
BC HT1380,HT_RST
NOP
BS HT1380,HT_RST
MOV A,ADDRPOINT
MOV TXBUF,A
CALL TX_1380
MOV A,DATABUF
MOV TXBUF,A
CALL TX_1380
BC HT1380,HT_RST
NOP
BS HT1380,HT_RST
MOV A,@0B10001110
MOV TXBUF,A
CALL TX_1380
MOV A,@0B10000000
MOV TXBUF,A
CALL TX_1380
BC HT1380,HT_RST
MOV A,HT_SDA_IN
IOW HT1380
RET
END
下一篇:合泰单片机矩阵键盘程序
史海拾趣
|
老是看到好多新同学打听这个专业，N多人还在比较电力系统和电力电子与电力传动，哪个更好？哪个更有前(钱)途？马上就过年了，今天有点空，也想冒下泡，想跟对这一方向有点兴趣的兄弟姐妹简单聊一下总体情况。我也只是一名研发工程师，说得不对不全 ...… 查看全部问答＞ |
|
香港政府《2008年食物及药物(成分组合及标签)（修订：关于营养标签及营养声称的规定）规例》将于2010年7月1日起实施。届时所有在香港销售的预包装食品（规例规定可豁免的食品除外）须标注营养标签，该营养标签必须标示能量和七种核心 ...… 查看全部问答＞ |
|
www.kingofcoder.com 100MB 免費空間 + 100MB mysql 空間 www.kingofcoder.com 100MB 免費空間 + 100MB mysql 空間 大家快點來呀 JSP, PHP, oracle空間, 很快就會開通, 大家快點登記吧 http://www.kingofcoder.com匯集大量各種編程語言文章、提供免費asp、php、jsp空間、免費mysql、oracle數據庫空間 ...… 查看全部问答＞ |
|
接触LM3S快一周了，这是我第一次接触ARM微处理器，没想到很快就上手啦，激动之余觉得里面那么多的寄存器，设置起来确实是十分的复杂，虽然提供了库函数，但是里面的函数及常量实在是多，如果不用去记忆这些函数就好了，为此，我编写了一个初始化配 ...… 查看全部问答＞ |