24CXX系列讀寫程序（EMC指令版）大話篇

話說(shuō)程序匠人，自進(jìn)論壇以來(lái)，天天勤練，日日苦修（花了我東家的不少上網(wǎng)費(fèi)！！），以《大話篇》系列，嬴得了無(wú)數(shù)MM得芳心……終于將積分修到500分以上（呵呵，以后可以貼圖片了，如果那位MM想一睹匠人的“浴”照，說(shuō)一聲，小匠一定滿足）……

—— 身后突然傳來(lái)一聲呵斥：“休不休啊你？”
—— 匠人心頭一驚，驀然回首，那人（不是MM，是斑竹）正在燈火闌珊處（手中正握著那把失而復(fù)得的大砍刀）……
—— 匠人暗自慶幸還沒(méi)有把對(duì)斑竹不敬的話語(yǔ)說(shuō)出來(lái)……

……在論壇中，小匠結(jié)識(shí)了許多高手好友，并得到不少幫助，感激不盡。但也有一些MM好報(bào)打不平，覺(jué)得小匠在《大話篇》中老是受斑竹的欺負(fù)……

—— 一道寒光映入眼簾，匠人發(fā)現(xiàn)自己好象說(shuō)漏了嘴……
—— 再看斑竹手中的刀，已經(jīng)從刀鞘中抽出了兩公分……

……其實(shí)，那都是大伙的誤解……其實(shí)，小匠一直非常感謝斑竹的厚道和寬容，沒(méi)有將小匠的一些大話帖子DELETE掉……

—— 匠人好象聽(tīng)到了砍刀緩緩入鞘的金屬聲……
—— 暗呼：“好險(xiǎn)！”
—— 匠人再次悄悄回頭，只見(jiàn)斑竹大人已經(jīng)遠(yuǎn)遠(yuǎn)去了（頭上頂著一頂精致的蘭花大高帽）

……最近，連續(xù)看到好幾篇討論24CXX系列應(yīng)用的帖子。正好，小匠最近用EMC的指令也做了一段程序。不如無(wú)私奉獻(xiàn)一下（如果哪位MM有疑問(wèn)，可來(lái)函、來(lái)電、來(lái)EMAIL、來(lái)FAX、來(lái)人，或者約下第一次親密約會(huì)，探討探討……）

?

;=====================寫EEPROM程序 ========================================
;功能：從KEY_BUF取數(shù)據(jù)，寫入EEPROM中SUB_ADR,連續(xù)寫B(tài)YTE_CNT個(gè)字節(jié)
;入口：SUB_ADR??????? 出口：NONE???????????????????
;影響資源：A，DATA_BUF，P6，STU,BIT_CNT,BYTE_CNT,SUB_ADR?????????????????????????????????????????????
;===============================================
WR_UEE:??????????????????????????? ;將KEY_BUF中客密碼寫EEPROM
??????? MOV???? SUB_ADR,@U_EE
??????? MOV???? BYTE_CNT,@0X06??????????? ;設(shè)置字節(jié)計(jì)數(shù)器為6
??????? JMP???? WR_EE
;------------------------------------------------------------------------???????
WR_SEE:??????????????????????????? ;將KEY_BUF中主密碼寫EEPROM
??????? MOV???? SUB_ADR,@S_EE
??????? MOV???? BYTE_CNT,@0X07??????????? ;設(shè)置字節(jié)計(jì)數(shù)器為7
;------------------------------------------------------------------------???????
WR_EE:
??????? MOV???? EEP6_BUF,EE??? ;保護(hù)EE口
??????? BS????? EE,PW????????? ;EEPROM上電
??????? BC????? EE,WP????????? ;清除EEPROM的寫保護(hù)???????
??????? CALL??? BSTART???????? ;啟動(dòng)IIC
??????? MOV???? A,@WREE??????? ;發(fā)送寫器件地址
??????? MOV???? DATA_BUF,A
??????? CALL??? SENDBYTE
??????? JBC???? STU,GP????????
??????? JMP???? WR_RET??????? ;無(wú)應(yīng)答返回
??????? MOV???? A,SUB_ADR???? ;發(fā)送寫單元地址
??????? MOV???? DATA_BUF,A
??????? CALL??? SENDBYTE
??????? JBC???? STU,GP
??????? JMP???? WR_RET??????? ;無(wú)應(yīng)答返回
??????? MOV???? A,@KEY_BUF??? ;設(shè)置待寫數(shù)據(jù)區(qū)首址
??????? MOV???? R4,A
WR_NEXT:
??????? MOV???? A,R0
??????? MOV???? DATA_BUF,A??? ;取待寫數(shù)據(jù)
??????? CALL??? SENDBYTE
??????? JBC???? STU,GP
??????? JMP???? WR_RET??????? ;無(wú)應(yīng)答返回
??????? INC???? R4
??????? DJZ???? BYTE_CNT
??????? JMP???? WR_NEXT
???????
??????? CALL??? BSTOP???????? ;停止IIC
??????? CALL??? DELAY10?????? ;延時(shí)10MS,等待數(shù)據(jù)寫完
WR_RET:
??????? BC????? EE,PW????????? ;EEPROM下電
;---------------------------------------------------------???????
??????? IOR???? EE???????????? ;設(shè)置SDA為輸出
??????? AND???? A,@0B11110111? ;**************************
??????? IOW???? EE
;---------------------------------------------------------
??????? MOV???? EE,EEP6_BUF??? ;恢復(fù)EE口現(xiàn)場(chǎng)
??????? RET
;=====================讀EEPROM程序 ========================================
;功能：讀EEPROM,寫入PSW_BUF,連續(xù)寫B(tài)YTE_CNT個(gè)字節(jié)
;入口：SUB_ADR?????? 出口：NONE???????????????????
;影響資源：A，DATA_BUF，P6，STU,BIT_CNT,BYTE_CNT,SUB_ADR?????????????????????????????????????????????
;==============================================
RD_UEE:??????????????????????????? ;讀6位客密碼到PSW_BUF
??????? MOV???? SUB_ADR,@U_EE
??????? MOV???? BYTE_CNT,@0X05??????????? ;設(shè)置字節(jié)計(jì)數(shù)器為6-1
??????? JMP???? RD_EE
;------------------------------------------------------------------------???????
RD_SEE:??????????????????????????? ;讀7位密碼到PSW_BUF
??????? MOV???? SUB_ADR,@S_EE
??????? MOV???? BYTE_CNT,@0X06??????????? ;設(shè)置字節(jié)計(jì)數(shù)器為7-1
;------------------------------------------------------------------------???????
RD_EE:???
??????? MOV???? EEP6_BUF,EE??? ;保護(hù)EE口???
??????? BS????? EE,PW????????? ;EEPROM上電
??????? BS????? EE,WP????????? ;設(shè)置EEPROM的寫保護(hù)???????
??????? CALL??? BSTART???????? ;啟動(dòng)IIC
??????? MOV???? A,@WREE??????? ;發(fā)送寫器件地址
??????? MOV???? DATA_BUF,A
??????? CALL??? SENDBYTE
??????? JBC???? STU,GP????????
??????? JMP???? RD_RET???????? ;無(wú)應(yīng)答返回
??????? MOV???? A,SUB_ADR????? ;發(fā)送寫單元地址
??????? MOV???? DATA_BUF,A
??????? CALL??? SENDBYTE
??????? JBC???? STU,GP
??????? JMP???? RD_RET???????? ;無(wú)應(yīng)答返回
??????? CALL??? BSTART???????? ;重新啟動(dòng)IIC
??????? MOV???? A,@RDEE??????? ;發(fā)送讀器件地址
??????? MOV???? DATA_BUF,A
??????? CALL??? SENDBYTE
??????? JBC????? STU,GP????????
??????? JMP???? RD_RET???????? ;無(wú)應(yīng)答返回
???????
??????? MOV???? A,@PSW_BUF???? ;設(shè)置讀出數(shù)據(jù)存放首址
??????? MOV???? R4,A
RD_NEXT:
??????? BC????? STU,GP???????? ;連續(xù)接收BYTE_CNT-1字節(jié)數(shù)據(jù)
??????? CALL??? RCVBYTE??????? ;并發(fā)送應(yīng)答信號(hào)
??????? MOV???? A,DATA_BUF
??????? MOV???? R0,A
??????? INC???? R4
??????? DJZ???? BYTE_CNT
??????? JMP???? RD_NEXT
???????
??????? BS????? STU,GP???????? ;接收最后一個(gè)字節(jié)數(shù)據(jù)
??????? CALL??? RCVBYTE??????? ;并發(fā)送非應(yīng)答信號(hào)
??????? MOV???? A,DATA_BUF
??????? MOV???? R0,A
??????? CALL??? BSTOP????????? ;停止IIC
???????
RD_RET:
??????? BC????? EE,PW?????????? ;EEPROM下電
;---------------------------------------------------------???????
??????? IOR???? EE???????????? ;設(shè)置SDA為輸出
??????? AND???? A,@0B11110111? ;**************************
??????? IOW???? EE
;---------------------------------------------------------????????
??????? MOV???? EE,EEP6_BUF???? ;恢復(fù)EE現(xiàn)場(chǎng)
??????? RET
???????
;============================延時(shí)子程序====================================
;功能：短延時(shí)???????? 入口：NONE???????????? 出口：NONE????????????????????
;影響資源：A，TEMP ，STATUS?????????????????????????????????????????????????????
;==================================================
DELAY:????????????????????????
??????? MOV???????? A,@0X01
??????? MOV???????? TEMP,A
??????? DJZ???????? TEMP
??????? JMP???????? $-1
??????? RET???????????
;============================延時(shí)子程序10MS================================
;功能：延時(shí)???????? 入口：NONE???????????? 出口：NONE????????????????????
;影響資源：A，TEMP ，STATUS?????????????????????????????????????????????????????
;=================================================
DELAY10:????????????????????????
??????? MOV???????? A,@0X20
??????? MOV???????? TEMP,A
??????? MOV???????? A,@250
??????? MOV???????? TEMP1,A
??????? DJZ???????? TEMP1
??????? JMP???????? $-1
??????? DJZ???????? TEMP
??????? JMP???????? $-5
??????? RET???????????????????
;===============================啟用IIC總線================================
;功能：開(kāi)啟IIC總線???????????????????????????????????????????????????????
;入口：NONE?????? 出口：NONE?? SCL=0,SDA=0
;影響資源：A，P6，STU??????????????????????????????????????????????????????
;==============================================
BSTART:
??????? BS????? EE,SDA??????? ;拉高SDA和SCL
??????? BS????? EE,SCL
??????? CALL??? DELAY
??????? BC????? EE,SDA??????? ;拉低SDA,啟動(dòng)IIC
??????? CALL??? DELAY
??????? BC????? EE,SCL??????? ;拉低SCL
??????? RET
;===============================關(guān)閉IIC總線================================
;功能：關(guān)閉IIC總線???????????????????????????????????????????????????????
;入口：NONE?????? 出口：NONE? ,SCL=1,SDA=1?????????????????????????????????????????????
;影響資源：A，P6,STU??????????????????????????????????????????????????????
;====================================================
BSTOP:???????????
??????? BC????? EE,SDA??????? ;拉低SDA
??????? BS????? EE,SCL??????? ;拉高SCL
??????? CALL??? DELAY
??????? BS????? EE,SDA??????? ;拉高SDA,停止IIC
??????? CALL??? DELAY????
??????? RET
;======================送出一個(gè)字節(jié)數(shù)據(jù),高位在前===========================
;功能：從MCU發(fā)送一個(gè)字節(jié)給EEPROM，并接收應(yīng)答信號(hào)?????????????????????????????????????
;入口：發(fā)送位數(shù)放在DATA_BUF?????? 出口：GP=0 表應(yīng)答正確 GP=1 表應(yīng)答錯(cuò)誤?????????????????????????
;影響資源：A，DATA_BUF，P6，STU,BIT_CNT?????????????????????????????????????????????
;=============================================
SENDBYTE:???????????????
??????? MOV???? A,@0X08??????? ;準(zhǔn)備位計(jì)數(shù)器為8
??????? MOV???? BIT_CNT,A
SEND_B:???????
??????? RLC???? DATA_BUF?????? ;從DATA_BUF取數(shù)據(jù)送C
??????? JBC???? STU,C????????? ;C->SDA
??????? BS????? EE,SDA
??????? JBS???? STU,C?????????
??????? BC????? EE,SDA
??????? CALL??? DELAY
??????? BS????? EE,SCL???????? ;拉高SCL,通知接受數(shù)據(jù)
??????? CALL??? DELAY
??????? BC????? EE,SCL???????? ;拉低SCL,鉗住總線
??????? DJZ???? BIT_CNT
??????? JMP???? SEND_B???????? ;8位未發(fā)送完，繼續(xù)發(fā)送
???????
??????? BS????? EE,SDA???????? ;拉高SDA
;---------------------------------------------------------???????
??????? IOR???? EE???????????? ;設(shè)置SDA為輸入
??????? OR????? A,@0B00001000? ;**************************
??????? IOW???? EE
;---------------------------------------------------------???????
??????? BS????? EE,SCL???????? ;拉高SCL,接收應(yīng)答信號(hào)
??????? CALL??? DELAY
??????? JBC???? EE,SDA???????? ;SDA->GP:=0,OK,=1,ERR
??????? BS????? STU,GP
??????? JBS???? EE,SDA?
??????? BC????? STU,GP
;---------------------------------------------------------???????
??????? IOR???? EE???????????? ;設(shè)置SDA為輸出
??????? AND???? A,@0B11110111? ;**************************
??????? IOW???? EE
;---------------------------------------------------------???????
??????? BC????? EE,SCL???????? ;拉低SCL
??????? BC????? EE,SDA???????? ;拉低SDA
??????? RET
;=====================接收一個(gè)字節(jié)數(shù)據(jù),高位在前===========================
;功能：接收一個(gè)字節(jié)從EEPROM，并發(fā)送應(yīng)答信號(hào)
;入口：接收數(shù)據(jù)放在DATA_BUF?????? 出口：NONE???????????????????
;影響資源：A，DATA_BUF，P6，STU,BIT_CNT?????????????????????????????????????????????
;=============================================
RCVBYTE:???????????????
??????? MOV???? A,@0X08??????? ;準(zhǔn)備位計(jì)數(shù)器為8
??????? MOV???? BIT_CNT,A
??????? BS????? EE,SDA
;---------------------------------------------------------???????
??????? IOR???? EE???????????? ;設(shè)置SDA為輸入
??????? OR????? A,@0B00001000? ;**************************
??????? IOW???? EE
;---------------------------------------------------------???????
RCV_B:?
??????? BC????? EE,SCL???????? ;拉低SCL
??????? CALL??? DELAY
??????? BS????? EE,SCL???????? ;拉高SCL
??????? CALL??? DELAY
??????? JBC???? EE,SDA????????? ;SDA->C
??????? BS????? STU,C
??????? JBS???? EE,SDA?????????
??????? BC????? STU,C
??????? RLC???? DATA_BUF?????? ;DATA_BUF<-C
??????? DJZ???? BIT_CNT
??????? JMP???? RCV_B????????? ;8位未接收完，繼續(xù)接收
???????
??????? BC????? EE,SCL???????? ;拉低SCL,準(zhǔn)備發(fā)送應(yīng)答信號(hào)
??????? JBC???? STU,GP???????? ;GP->SDA,0發(fā)應(yīng)答信號(hào)，1發(fā)非應(yīng)答信號(hào)
??????? BS????? EE,SDA
??????? JBS???? STU,GP?
??????? BC????? EE,SDA
;---------------------------------------------------------???????
??????? IOR???? EE???????????? ;設(shè)置SDA為輸出
??????? AND???? A,@0B11110111? ;**************************
??????? IOW???? EE
;---------------------------------------------------------???????
??????? BS????? EE,SCL???????? ;拉高SCL，送出應(yīng)答信號(hào)
??????? CALL??? DELAY
??????? BC????? EE,SCL???????? ;拉低SCL,鉗住總線，等待后續(xù)操作
??????? BC????? EE,SDA
??????? RET????????
?