📄 24cxx.asm
字号:
;实验名称：读写AT24C02实验
; 功能：用串口发送指令读出或写入00-7FH单无的内容,显示结果在LCD上显示
; 读出(16进制数):AA 地址
; 写入(16进制数):BB 地址 内容
; 作者：http://www.mcuyjf.com.cn
; 05-02-01
SCK BIT P2.6 ;I2C的时钟线
SDA BIT P2.7 ;I2C的数据线
;读写I2C总线器件要用到的寄存器
ERRFLAG BIT 00H
TEMP1 EQU 1AH
DELAYCOUNT EQU 1BH
ADDREHI EQU 1CH ;读写的地址
ADDRELO EQU 1DH
WRITE_DATA EQU 1EH ;单字节写入的数据
READ_DATA EQU 1FH ;单字节读出的数据
E BIT P3.5
RW BIT P3.6
RS BIT P3.7
LCDPORT EQU P0
CMD_BYTE EQU 30H
DAT_BYTE EQU 31H
READBIT BIT 01H ;读某个单元
WRITEBIT BIT 02H ;写某个单元
RS232OKBIT BIT 03H ;一个完整的串口指令完
RECSUM EQU 32H ;要从232收的字字数
ORG 0000H
AJMP MAIN
ORG 000BH
AJMP TIME0_1
ORG 0023H
RS232: CLR RI
MOV A,SBUF
CJNE A,#0AAH,RS232_1
MOV RECSUM,#01H ;是读EEP后面只要一个地址就可
MOV R0,#40H
SETB READBIT
AJMP RS232_RE
RS232_1: CJNE A,#0BBH,RS232_2
MOV RECSUM,#02H ;是写后要要一个地址一个写的内容
MOV R0,#40H
SETB WRITEBIT
AJMP RS232_RE
RS232_2: MOV @R0,A
INC R0
DJNZ RECSUM,RS232_RE
SETB RS232OKBIT
RS232_RE: RETI
ORG 0100H
MAIN: MOV R0,#20H
CLR0: MOV @R0,#00H
INC R0
CJNE R0,#70H,CLR0
MOV ADDRELO,#00H
LCALL READ_BYTE
LCALL INITLCD
MOV CMD_BYTE,#80H //设置DDRAM的地址
LCALL WRITE_CMD
LCALL DELAY0
MOV DAT_BYTE,#"A"
LCALL WRITE_DAT
MOV DAT_BYTE,#"D"
LCALL WRITE_DAT
MOV DAT_BYTE,#"D"
LCALL WRITE_DAT
MOV DAT_BYTE,#"R"
LCALL WRITE_DAT
MOV DAT_BYTE,#"E"
LCALL WRITE_DAT
MOV DAT_BYTE,#":"
LCALL WRITE_DAT
LCALL DISPEEPAD
MOV CMD_BYTE,#0C0H //设置DDRAM的地址
LCALL WRITE_CMD
MOV DAT_BYTE,#"M"
LCALL WRITE_DAT
MOV DAT_BYTE,#"E"
LCALL WRITE_DAT
MOV DAT_BYTE,#"M"
LCALL WRITE_DAT
MOV DAT_BYTE,#"O"
LCALL WRITE_DAT
MOV DAT_BYTE,#"R"
LCALL WRITE_DAT
MOV DAT_BYTE,#"Y"
LCALL WRITE_DAT
MOV DAT_BYTE,#":"
LCALL WRITE_DAT
LCALL DISPEEPMO
MOV TH0,#0FCH ;1MS
MOV TL0,#67H
MOV TH1,#0FDH ;9600波特
MOV TL1,#0FDH
MOV TMOD,#21H
MOV SCON,#50H
SETB TR0
SETB TR1
MOV IE,#92H
SETB REN
MAIN1: ORL PCON,#01H
AJMP MAIN1
ORG 0200H
TIME0_1: MOV TH0,#0FCH
MOV TL0,#67H
JBC RS232OKBIT,TODP
AJMP TIME0_RE
TODP: JBC READBIT,READ_EEP
JBC WRITEBIT,WRITE_EEP
AJMP TIME0_RE
TIME0_RE: RETI
READ_EEP: MOV ADDRELO,40H
LCALL READ_BYTE
LCALL DISPEEPAD
LCALL DISPEEPMO
AJMP TIME0_RE
WRITE_EEP: MOV ADDRELO,40H
MOV WRITE_DATA,41H
MOV READ_DATA,41H
LCALL WRITE_BYTE
LCALL DISPEEPAD
LCALL DISPEEPMO
AJMP TIME0_RE
;显示EEP地址
DISPEEPAD: MOV CMD_BYTE,#87H //设置DDRAM的地址
LCALL WRITE_CMD
MOV A,ADDRELO
ANL A,#0F0H
SWAP A
CJNE A,#0AH,DPEEPAD_1
DPEEPAD_1: JNC DPEEPAD_2
ADD A,#30H
MOV DAT_BYTE,A
AJMP DPEEPAD_3
DPEEPAD_2: ADD A,#37H
MOV DAT_BYTE,A
DPEEPAD_3: LCALL WRITE_DAT
MOV A,ADDRELO
ANL A,#0FH
CJNE A,#0AH,DPEEPAD_4
DPEEPAD_4: JNC DPEEPAD_5
ADD A,#30H
MOV DAT_BYTE,A
SJMP DPEEPAD_6
DPEEPAD_5: ADD A,#37H
MOV DAT_BYTE,A
DPEEPAD_6: LCALL WRITE_DAT
RET
DISPEEPMO: MOV CMD_BYTE,#0C7H //设置DDRAM的地址
LCALL WRITE_CMD
MOV A,READ_DATA
ANL A,#0F0H
SWAP A
CJNE A,#0AH,DPEEPMO_1
DPEEPMO_1: JNC DPEEPMO_2
ADD A,#30H
MOV DAT_BYTE,A
AJMP DPEEPMO_3
DPEEPMO_2: ADD A,#37H
MOV DAT_BYTE,A
DPEEPMO_3: LCALL WRITE_DAT
MOV A,READ_DATA
ANL A,#0FH
CJNE A,#0AH,DPEEPMO_4
DPEEPMO_4: JNC DPEEPMO_5
ADD A,#30H
MOV DAT_BYTE,A
SJMP DPEEPMO_6
DPEEPMO_5: ADD A,#37H
MOV DAT_BYTE,A
DPEEPMO_6: LCALL WRITE_DAT
RET
;LCD1602要用到的一些子程序
;写命令(入口参数CMD_BYTE)
WRITE_CMD: CLR RS
CLR RW
MOV A,CMD_BYTE
MOV LCDPORT,A
SETB E
NOP
NOP
CLR E
LCALL DELAY0
RET
;写显示数据(入口参数DAT_BYTE)
WRITE_DAT: SETB RS
CLR RW
MOV A,DAT_BYTE
MOV LCDPORT,A
SETB E
NOP
NOP
CLR E
LCALL DELAY0
RET
;LCD显示初始化
INITLCD: MOV CMD_BYTE,#30H
LCALL WRITE_CMD
MOV CMD_BYTE,#30H
LCALL WRITE_CMD
MOV CMD_BYTE,#30H
LCALL WRITE_CMD
MOV CMD_BYTE,#38H ;设定工作方式
LCALL WRITE_CMD
MOV CMD_BYTE,#0CH ;显示状态设置
LCALL WRITE_CMD
MOV CMD_BYTE,#01H ;清屏
LCALL WRITE_CMD
MOV CMD_BYTE,#06H ;输入方式设置
LCALL WRITE_CMD
RET
;延时子程序
DELAY0: MOV R5,#0A0H
DELAY1: NOP
DJNZ R5,DELAY1
RET
;延时子程序
DELAY: MOV A,DELAYCOUNT
JZ DELAY_RE
DEC DELAYCOUNT
MOV R7,#0C8H
DELAY_1: NOP
NOP
NOP
DJNZ R7,DELAY_1
LJMP DELAY
DELAY_RE: RET
;---------------读写8563要用到的子程序----------------
;写8563(ADDRELO,WRITE_DATA)
WRITE_8563: LCALL STARTI2C
JB ERRFLAG,WRITE_8_RE
MOV A,#0A2H
LCALL SHOUT_DATA
JB ERRFLAG,WRITE_8_STOP
MOV A,ADDRELO
LCALL SHOUT_DATA
JB ERRFLAG,WRITE_8_STOP
MOV A,WRITE_DATA
LCALL SHOUT_DATA
JB ERRFLAG,WRITE_8_STOP
CLR ERRFLAG
WRITE_8_STOP: LCALL STOPI2C
MOV DELAYCOUNT,#0AH
LCALL DELAY
WRITE_8_RE: RET
;读8563(ADDRELO,出口为READ_DATA
READ_8563: LCALL STARTI2C
JB ERRFLAG,READ_8_RE
MOV A,#0A2H
LCALL SHOUT_DATA
JB ERRFLAG,READ_8_STOP
MOV A,ADDRELO
LCALL SHOUT_DATA
JB ERRFLAG,READ_8_STOP
LCALL READ_8_CUR
LJMP READ_8_RE
READ_8_STOP: LCALL STOPI2C
READ_8_RE: RET
READ_8_CUR: LCALL STARTI2C
JB ERRFLAG,RE_8_CUR_RE
MOV A,#0A3H
LCALL SHOUT_DATA
JB ERRFLAG,RE_8_CUR_ST
LCALL SHIN_DATA
LCALL NAK
CLR ERRFLAG
RE_8_CUR_ST: LCALL STOPI2C
RE_8_CUR_RE: RET
;****读出的内容依次为“秒，分钟，小时，日，星期，月/世纪，年********************
GET8583: LCALL STARTI2C
JB ERRFLAG,GET_8_RE
MOV A,#0A2H
LCALL SHOUT_DATA
JB ERRFLAG,GET_8_STOP
MOV A,#02H
LCALL
SHOUT_DATA: MOV R6,#08H
SHOUT_DATA1: RLC A
MOV SDA,C
NOP
SETB SCK
NOP
NOP
NOP
NOP
CLR SCK
DJNZ R6,SHOUT_DATA1
SETB SDA
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
MOV C,SDA
MOV ERRFLAG,C
CLR SCK
RET
SHIN_DATA: SETB SDA
MOV R6,#08H
SHIN_DATA1: NOP
NOP
NOP
SETB SCK
NOP
NOP
MOV C,SDA
RLC A
NOP
CLR SCK
DJNZ R6,SHIN_DATA1
MOV READ_DATA,A
RET
STARTI2C: SETB SDA
SETB SCK
NOP
JNB SDA,STARTI2C_ERR
JNB SCK,STARTI2C_ERR
NOP
CLR SDA
NOP
NOP
NOP
NOP
CLR SCK
CLR ERRFLAG
LJMP STARTI2C_RE
STARTI2C_ERR: SETB ERRFLAG
STARTI2C_RE: RET
STOPI2C: CLR SDA
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
SETB SDA
RET
ACK: CLR SDA
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
CLR SCK
RET
NAK: SETB SDA
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
CLR SCK
RET
END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -