單片機匯編實(shí)驗六：I2C串行總線(xiàn)存儲器讀寫(xiě)實(shí)驗

//This is the sixthprogramof the homework;
//Name :Wang Qi Date:2013/3/11 北京化工大學(xué) 自實(shí)1001
SDA EQU P2.0
SCL EQU P2.1
ORG 0000H //主函數入口
SJMP MAIN
ORG 0013H //外部中斷1入口
LJMP WZD0
ORG 001BH //計時(shí)器1入口
LJMP WT1
ORG 0050H
MAIN: MOV SP,#60H
MOV TMOD,#10H //設置T1工作方式
MOV TH1,#4CH //設初值
MOV TL1,#00H
MOV R7,#10 //計數器
SETB EA //全局中斷
SETB ET1 //允許定時(shí)器1
SETB TR1 //啟動(dòng)定時(shí)器1
SETB IT1 //外部中斷跳變觸發(fā)方式
SETB EX1 //允許外部中斷1
OK: MOV C,P3.4 //掃描鍵盤(pán)
JNC OK1
MOV C,P3.5
JNC OK1
MOV C,P3.6
JNC OK1
MOV C,P3.7
JNC OK1
SJMP OK
OK1: CLR P3.3 //中斷信號
SETB P3.3
SJMP OK
WZD0:
SETB P3.3 //中斷程序
PUSH TH1 //保護現場(chǎng)
PUSH TL1
CLR TR1 //停止T1計數
MOV R2,#01H
CALL DU
MOV P1,R3
POP TL1
POP TH1
SETB TR1
RETI
WT1: MOV TH1,#4CH //定時(shí)函數
MOV TL1,#00H
DJNZ R7,RET0
MOV R7,#10 //1秒到來(lái)了
INC 30H
INC 30H
mov R2,#01H
MOV R3,30H
CALL XIE
RET0: RETI

//////////////I2C協(xié)議摘自網(wǎng)絡(luò ) Thanks to the author
XIE: //寫(xiě)數據子程序，R2是要寫(xiě)入的24c02的字節位置地址，R3是要寫(xiě)入的內容
LCALL STAR;起始條件
MOV A,#10100000B //尋址24C02的總線(xiàn)硬件地址并使用寫(xiě)入命令
LCALL SDATA //傳輸數據A給24C02
MOV A,R2 //確定要寫(xiě)入的字節位置地址
LCALL SDATA //傳輸數據A給24C02
MOV A,R3 //把數據R3寫(xiě)入剛指定的字節地址
LCALL SDATA //傳輸數據A給24C02
LCALL STOP //寫(xiě)入結束
LCALL CHULI //提供2ms給24C02內部處理剛寫(xiě)入的數據
RET
DU: ;讀數據子程序，R2是要讀的24c02的字節位置地址，讀完后A傳給R3
LCALL STAR;起始條件
MOV A,#10100000B//尋址24C02的總線(xiàn)硬件地址并使用寫(xiě)入命令
LCALL SDATA //傳輸數據A給24C02
MOV A,R2 //注意，這里是使24C02的字節地址指針變成R2的值，也就是確定要讀取的字節位置地址
LCALL SDATA //傳輸數據A給24C02
LCALL STAR //重復起始條件
MOV A,#10100001B//尋址24C02的總線(xiàn)硬件地址并使用讀出命令(這里正式發(fā)起讀命令)
LCALL SDATA//傳輸數據A給24C02
LCALL RDATA//從之前指定的字節地址中讀出字節內容到A
LCALL STOP //讀取完畢(這里并沒(méi)有連續讀取，只能讀一個(gè)字節，要多個(gè)字節連續讀取，請自己在R2上做變址讀取循環(huán))