;=============================================================================== ; SD2098系列SRAM/EEPROM功能测试程序 ; VER1。00 ; 本程序功能如下： ; ;（1） 电源上电，LED显示"TS98V1.00"版本号 ;（2） 按K44键清LED2、LED1显示为"--",重置时间。 ;（3） 按K33键显示从SD2098芯片中读到的时间"年、月、日、星期",/INT1脚输出1HZ, ; /INT2脚输出32768HZ。 ;（4） 按K22键显示从SD2098芯片中读到的时间" 小时、分钟、秒"，秒数随时间不断 ; 变化,禁止/INT1和/INT2输出。此时只响应K22键. ; 重按K22键停止读取" 小时、分钟、秒"，此时可响应键K55、K44、K33、K22、 ; K11. ; (5) 按K11键功能复位，从第一条操作重新执行。 ; ; 注: 单片机是AT89C51，外晶振为12Mhz,在兴威帆公司的SD7218评估板(ver2.00)上 ; 运行,原理图及PCB图请从网上下载. ; Last update:2004/07/28 ; 本程序仅供参考，如有问题请联系：陈工 0755-83246178,fax:83225561 ; 13922865036 chendw@whwave.com.cn http://www.whwave.com.cn ;=============================================================================== ;define the general register ;LED寄存器 DIG1 EQU 20H ;LED第一位缓冲器 DIG2 EQU 21H ; DIG3 EQU 22H ; DIG4 EQU 23H ; DIG5 EQU 24H ; DIG6 EQU 25H ; DIG7 EQU 26H ; DIG8 EQU 27H FLAG EQU 28H ;通用标志寄存器 ;BIT0=1, ACK ERR ;BIT0=0 ,ACK OK YEAR EQU 30H ;年 MONTH EQU 31H ;月 DAY EQU 32H ;日 WEEK EQU 33H ;星期 HOUR EQU 34H ;小时 MINUTE EQU 35H ;分钟 SECOND EQU 36H ;秒 ;单片机与实时时钟间通信寄存器 TIMETEMP EQU 2EH ;时间数据缓存器 TIMETX EQU 43H ;时间数据发送寄存器 TIMERX EQU 44H ;时间数据接收寄存器 ;单片机与IIC通信寄存器 IICTEMP EQU 2FH ;IIC标志寄存器 SLAVE_ADD EQU 40H ;SD7218地址寄存器 DATAI1 EQU 41H DATAI2 EQU 42H TXBUF EQU 47H ;IIC数据发送寄存器 RXBUF EQU 48H ;IIC数据接收寄存器 KEYBUF EQU 49H ;键盘数据缓冲器 TEMP EQU 4AH READDATA EQU 4FH ;-------------------------------------------------------------------------- ;define time device address SD2098_R EQU 65H ;SD2098的器件地址(读) SD2098_W EQU 64H ;SD2098的器件地址(写) ;--------------------------------------------------------------------------- ;define port bit ;各通信口位代号 SDA EQU P3.1 ;IIC的SDA口线 SCL EQU P3.2 ;IIC的SCL口线 KEY EQU P3.0 ;键盘中断信号线 T_SDA EQU P3.4 ;SD2098的SDA口线 T_SCL EQU P3.5 ;SD2098的SCL口线 ;=========================================================================== ; *** IIC命令定义 *** ;=========================================================================== COMMAND_RESET EQU 68H COMMAND_TEST EQU 6AH COMMAND_SHIFT_LEFT EQU 61H COMMAND_SHIFT_RIGHT EQU 62H COMMAND_SHIFT_ROUND_LEFT EQU 63H COMMAND_SHIFT_ROUND_RIGHT EQU 64H COMMAND_UPDATE_DISP_DECODE EQU 40H COMMAND_UPDATE_DISP EQU 50H COMMAND_FLASH_CONTROL EQU 78H COMMAND_HIDE_CONTROL EQU 79H COMMAND_SEGMENT_ON EQU 08H COMMAND_SEGMENT_OFF EQU 09H COMMAND_READ_KEY_VALUE EQU 10H COMMAND_RW_RAM_VALUE EQU 80H COMMAND_LED_HEXS_WR EQU 40H ;=========================================================================== ; *** 常数定义 *** ;=========================================================================== SLAVE2_RD EQU 51H ;SD7218 ver2.0 SLAVE2_WR EQU 50H ;=========================================================================== ORG 0000H ;RESET LJMP START ;--------------------------------------------------------------------------- ORG 0100H START: CLR A ;开始初始化各寄存器 MOV IE,A ;关中断 MOV SP,#60H ;定义堆栈 CLR FLAG ;清除标志位 LCALL INIT_LEDBUF ;初始化LED数据缓冲器,"TS98V1.00" LCALL LONGDELAY LCALL LONGDELAY MOV SLAVE_ADD,#SLAVE2_WR LCALL WRITE_LED8 WAIT_KEY: ;----------------------------------------------------------------- GET_KEY: SETB KEY NOP JB KEY,$ ;等待SD7218的键盘输入信号 ;----------------------------------------------------------------- MOV SLAVE_ADD,#SLAVE2_RD LCALL READ_KEY ;读SD7218内的键值 MOV A,KEYBUF CJNE A,#44H,DISP_TIME_YEARWEEK LCALL WRITE_TIME LCALL READ_TIME LCALL BCD_LEDYEARWEEK MOV SLAVE_ADD,#SLAVE2_WR LCALL WRITE_LED8_DECODE JMP WAIT_KEY_RELEASE1 DISP_TIME_YEARWEEK: CJNE A,#33H,DISP_TIME_HOURSECOND LCALL TIMESTATUS_INT12ON LCALL READ_TIME LCALL BCD_LEDYEARWEEK MOV SLAVE_ADD,#SLAVE2_WR LCALL WRITE_LED8_DECODE JMP WAIT_KEY_RELEASE1 DISP_TIME_HOURSECOND: CJNE A,#22H,RAM_TEST_RESET_KEY LCALL TIMESTATUS_INT12OFF DISP_HOURSECOND_LOOP: SETB KEY DISP_KEY_RELEASE1: JNB KEY,$ LCALL READ_TIME LCALL BCD_LEDHOURSECOND ; MOV DIG7,#0 MOV DIG8,#0 ;HIGH BIT DISPLAY "00",NO USED MOV SLAVE_ADD,#SLAVE2_WR LCALL WRITE_LED8_DECODE MOV SLAVE_ADD,#SLAVE2_RD LCALL READ_KEY ;读SD7218内的键值 MOV A,KEYBUF CJNE A,#22H,DISP_HOURSECOND_LOOP JMP WAIT_KEY_RELEASE1 RAM_TEST_RESET_KEY: CJNE A,#11H,WAIT_KEY_RELEASE1 JMP START ;RESET SHIFT_ROUND_LEFT_KEY: WAIT_KEY_RELEASE: MOV SLAVE_ADD,#SLAVE2_WR LCALL WRITE_LED8 WAIT_KEY_RELEASE1: JNB KEY,$ JMP GET_KEY ;==================读键值子程序=========================================== ;功能： | ;入口：NONE | ;出口： | ;影响资源： | ;========================================================================== READ_KEY: LCALL IICSTART JB FLAG.1,ERR_IICSTOP ;如SDA线被箝位为低电平则退出 MOV A,SLAVE_ADD MOV TXBUF,A ;送SD7218地址 LCALL SENDH_L JB FLAG.0,ERR_IICSTOP ;ACK信号不正常则退出. MOV TXBUF,#COMMAND_READ_KEY_VALUE LCALL SENDH_L ;送读键命令 RD_KEY1: LCALL RXH_L MOV A,RXBUF MOV KEYBUF,A RD_KEY2: CALL NOACK LCALL IICSTOP RD_KEY_RET: RET ERR_IICSTOP: LCALL IICSTOP RET ;======================写8个LED8数据程序==================================== ;功能： | ;入口： | ;出口：NONE | ;影响资源： | ;=========================================================================== WRITE_LED8: LCALL IICSTART JNB FLAG.1,LED8_WRITE_1 LJMP ERR_IICSTOP ;SDA线被箝位为低电平则退出 LED8_WRITE_1: MOV A,SLAVE_ADD MOV TXBUF,A ;送SD7218地址 LCALL SENDH_L JNB FLAG.0,LED8_WRITE_2 LJMP ERR_IICSTOP ;ACK信号不正常则退出? LED8_WRITE_2: MOV TXBUF,#COMMAND_UPDATE_DISP LCALL SENDH_L ;送多字节下载数据但不译码命令 MOV R0,#DIG1 MOV R1,#08H LED8_WRITE_3: MOV A,@R0 MOV TXBUF,A LCALL SENDH_L INC R0 DJNZ R1,LED8_WRITE_3 LCALL IICSTOP RET ;======================写8个LED8数据程序==================================== ;功能： | ;入口： | ;出口：NONE | ;影响资源： | ;=========================================================================== WRITE_LED8_DECODE: LCALL IICSTART JNB FLAG.1,LED8_WRITE_1D LJMP ERR_IICSTOP ;SDA线被箝位为低电平则退出 LED8_WRITE_1D: MOV A,SLAVE_ADD MOV TXBUF,A ;送SD7218地址 LCALL SENDH_L JNB FLAG.0,LED8_WRITE_2D LJMP ERR_IICSTOP ;ACK信号不正常则退出? LED8_WRITE_2D: MOV TXBUF,#COMMAND_UPDATE_DISP_DECODE LCALL SENDH_L ;送多字节下载数据但不译码命令 MOV R0,#DIG1 MOV R1,#08H LED8_WRITE_3D: MOV A,@R0 MOV TXBUF,A LCALL SENDH_L INC R0 DJNZ R1,LED8_WRITE_3D LCALL IICSTOP RET ;====================== LED FLASH ======================================= ;功能： | ;入口： | ;出口：NONE | ;影响资源： | ;=========================================================================== LED_FLASH: LCALL IICSTART LED_FLASH_1: MOV A,SLAVE_ADD MOV TXBUF,A ;送SD7218地址 LCALL SENDH_L LED8_FLASH_2: MOV TXBUF,#COMMAND_FLASH_CONTROL LCALL SENDH_L ;送闪烁命令 MOV A,TEMP ;FLASH DATA MOV TXBUF,A LCALL SENDH_L LCALL IICSTOP RET ;======================写单个BYTE数据程序================================= ;功能： | ;入口： | ;出口：NONE | ;影响资源： | ;========================================================================= WRITE_BYTE: LCALL IICSTART JNB FLAG.1,BYTE_WRITE_1 LJMP ERR_IICSTOP ;SDA线被箝位为低电平则退出 BYTE_WRITE_1: MOV A,SLAVE_ADD MOV TXBUF,A ;送SD7218地址 LCALL SENDH_L JNB FLAG.0,BYTE_WRITE_2 LJMP ERR_IICSTOP ;ACK信号不正常则退出? BYTE_WRITE_2: MOV A,DATAI1 MOV TXBUF,A LCALL SENDH_L ;送单字节命令 MOV A,DATAI2 MOV TXBUF,A LCALL SENDH_L ;送单字节命令 LCALL IICSTOP RET ;============================ACK=========================================== ;功能：延时 入口：NONE 出口：NONE | ;影响资源： | ;========================================================================== ACK: CLR IICTEMP.1 LCALL BITOUT RET ;============================ACK=========================================== ;功能：延时 入口：NONE 出口：NONE | ;影响资源： | ;========================================================================== NOACK: SETB IICTEMP.1 LCALL BITOUT RET ;===============================保存错误代码=============================== ;功能：保存MCU与IIC接口通信时的错误状态 | ;入口：IICTEMP.0=ACK位值? | ;出口：FLAG.0 =错误代码 | ;========================================================================== ACK_ERR: JNB IICTEMP.0,ACK_ERR_RET ;检查ACK信号是否正常 SETB FLAG.0 ;置ACK出错标志位 ACK_ERR_RET: RET ;===============================启用IIC总线================================ ;功能：开启7218的IIC总线 ;入口：NONE 出口：NONE ;影响资源：NONE ;========================================================================== IICSTART: CLR FLAG.1 SETB SDA SETB SCL LCALL DELAY_7218 JB SDA,IIC_SDAHI SETB FLAG.1 IIC_SDAHI: CLR SDA LCALL DELAY_7218 CLR SCL LCALL DELAY_7218 RET ;===============================关闭IIC总线================================ ;功能：关闭7218IIC总线 ;入口：NONE 出口：NONE ;影响资源：NONE ;========================================================================== IICSTOP:CLR SDA SETB SCL LCALL DELAY_7218 SETB SDA LCALL DELAY_7218 RET ;============================发送一个字节，由高位到低位发送================ ;功能：从MCU发送一个字节给7218,由高位到低位发送 | ;入口：发送数据放在TXBUF 出口：NONE | ;影响资源：A，R2，TXBUF | ;========================================================================== SENDH_L:MOV A,TXBUF MOV R2,#08H CLR FLAG.0 SENDH_L1: MOV C,ACC.7 MOV IICTEMP.1,C LCALL BITOUT RL A DJNZ R2,SENDH_L1 LCALL BITIN LCALL ACK_ERR RET ;=================================接收一个字节============================= ;功能：MCU从IIC总线接收一个字节,MSB在前,LSB在后 | ;入口：NONE 出口：接收数据放在RXBUF中 | ;影响资源：A，R2，TIMEBIT，RXBUF | ;========================================================================== RXH_L: MOV R2,#08H RXH_L1: LCALL BITIN MOV C,IICTEMP.0 MOV ACC.7,C RLC A DJNZ R2,RXH_L1 MOV RXBUF ,A RET ;=================================接收一个字节============================= ;功能：MCU从IIC总线接收一个字节,LSB在前,MSB在后 | ;入口：NONE 出口：接收数据放在RXBUF中 | ;影响资源：A，R2，TIMEBIT，RXBUF | ;========================================================================== RXL_H: MOV R2,#08H RXL_H1: LCALL BITIN MOV C,IICTEMP.0 RRC A DJNZ R2,RXL_H1 MOV RXBUF ,A RET ;================================送出一位数================================ ;功能：从MCU发送一位数给7218 | ;入口：发送位数放在EEPREM.1 出口：NONE | ;影响资源：A，IICTEMP | ;========================================================================== BITOUT: MOV C,IICTEMP.1 MOV SDA,C LCALL DELAY_7218 SETB SCL LCALL DELAY_7218 CLR SCL LCALL DELAY_7218 RET ;=================================读入一位数=============================== ;功能：MCU从7218接收一位数 | ;入口：NONE 出口：接收位数放在IICTEMP.0 | ;影响资源：A，IICTEMP | ;========================================================================== BITIN: SETB SDA SETB SCL LCALL DELAY_7218 MOV C,SDA MOV IICTEMP.0,C CLR SCL CLR SDA LCALL DELAY_7218 RET ;============================短延时子程序================================== ;功能：延时 入口：NONE 出口：NONE | ;影响资源：R7,PSW | ;========================================================================== DELAY: MOV R7,#2 DELAY1: NOP DJNZ R7,DELAY1 RET ;-------- DELAY_7218: MOV R7,#10 DELAY1_7218: NOP DJNZ R7,DELAY1_7218 RET LONGDELAY: ;DELAY 300MS MOV R6,#240 LD0: MOV R7,#250 ;5*250*240 LD1: NOP NOP NOP DJNZ R7,LD1 DJNZ R6,LD0 RET DELAY10MS: ;DELAY >10MS MOV R6,#11 LD00: MOV R7,#250 ;5*250*11 LD10: NOP NOP NOP DJNZ R7,LD10 DJNZ R6,LD00 RET ;============================写八位LED数据缓冲器程序======================= ;功能：写八位LED数据缓冲器 | ;入口：NONE 出口：NONE | ;影响资源： A | ;========================================================================== INIT_LEDBUF: MOV R0,#DIG8 MOV R3,#8 INIT_LEDBUF_LOOP: MOV A,R3 DEC A MOV DPTR,#TABLE MOVC A,@A+DPTR ;查表取LED显示数据 MOV @R0,A DEC R0 DJNZ R3,INIT_LEDBUF_LOOP ;赋值完八个LED数据? RET TABLE: DB 3FH,3FH,86H,3EH,7FH,6FH,6DH,31H ;"TS98 V1.00" ;==================读实时时钟实时数据寄存器子程序========================== ;功能：从实时时钟读入当前时间数据 | ;入口：NONE | ;出口：接收数据放在年、月、日、星期、时、分、秒各寄存器 | ;影响资源：A，R0,R3,TIMETX,TIMERX,YEAR,MONTH,DAY,WEEK,HOUR,MINUTE,SECOND | ;========================================================================== READ_TIME: RDTIME_LOOP: LCALL T_IICSTART LCALL T_IICSTOP LCALL T_IICSTART JB FLAG.1,T_ERR_IICSTOP ;如SDA线被箝位为低电平则退出 MOV TIMETX,#SD2098_W ;发送写时钟SD2098的数据命令 LCALL T_SENDH_L JB FLAG.0,T_ERR_IICSTOP ;ACK信号不正常则退出. MOV TIMETX,#00H ;读时间内部的起始地址 LCALL T_SENDH_L LCALL T_IICSTART ;重新开始信号 MOV TIMETX,#SD2098_R ;发送读时钟SD2098的数据命令 LCALL T_SENDH_L MOV R0,#SECOND MOV R3,#07H RDTIME1: LCALL T_RXH_L MOV A,TIMERX MOV @R0,A DEC R0 DJNZ R3,RDTIME2 ;读完一个字节数据后确认数据传输 JMP RDTIME3 ;若为最后一个字节数据则为NOACK RDTIME2: CALL T_ACK JMP RDTIME1 RDTIME3: CALL T_NOACK LCALL T_IICSTOP RDTIME_RET: RET T_ERR_IICSTOP: LCALL T_IICSTOP RET ;============================ACK=========================================== ;功能：延时 入口：NONE 出口：NONE | ;影响资源： | ;========================================================================== T_ACK: CLR TIMETEMP.1 LCALL T_BITOUT RET ;============================ACK=========================================== ;功能：延时 入口：NONE 出口：NONE | ;影响资源： | ;========================================================================== T_NOACK: SETB TIMETEMP.1 LCALL T_BITOUT RET ;===============================保存错误代码=============================== ;功能：保存MCU与IIC接口通信时的错误状态 | ;入口：TIMETEMP.0=ACK位缙? | ;出口：FLAG.0 =错误代码 | ;========================================================================== T_ACK_ERR: JNB TIMETEMP.0,T_ACK_ERR_RET ;检查ACK信号是否正常 SETB FLAG.0 ;置ACK出错标志位 T_ACK_ERR_RET: RET ;===============================启用IIC总线================================ ;功能：开启实时时钟的IIC总线 ;入口：NONE 出口：NONE ;影响资源：NONE ;========================================================================== T_IICSTART: CLR FLAG.1 SETB T_SDA SETB T_SCL LCALL DELAY JB T_SDA,T_IIC_SDAHI SETB FLAG.1 T_IIC_SDAHI: CLR T_SDA LCALL DELAY CLR T_SCL LCALL DELAY RET ;===============================关闭IIC总线================================ ;功能：关闭实时时钟IIC总线 ;入口：NONE 出口：NONE ;影响资源：NONE ;========================================================================== T_IICSTOP:CLR T_SDA SETB T_SCL LCALL DELAY SETB T_SDA LCALL DELAY RET ;============================发送一个字节，由高位到低位发送================ ;功能：从MCU发送一个字节给实时时钟,由高位到低位发送 | ;入口：发送数据放在TIMETX 出口：NONE | ;影响资源：A，R2，TIMETX | ;========================================================================== T_SENDH_L:MOV A,TIMETX MOV R2,#08H CLR FLAG.0 T_SENDH_L1: MOV C,ACC.7 MOV TIMETEMP.1,C LCALL T_BITOUT RL A DJNZ R2,T_SENDH_L1 LCALL T_BITIN LCALL T_ACK_ERR RET ;=================================接收一个字节============================= ;功能：MCU从IIC总线接收一个字节,MSB在前,LSB在后 | ;入口：NONE 出口：接收数据放在RXBUF中 | ;影响资源：A，R2，TIMEBIT，RXBUF | ;========================================================================== T_RXH_L:MOV R2,#08H T_RXH_L1: LCALL T_BITIN MOV C,TIMETEMP.0 MOV ACC.7,C RLC A DJNZ R2,T_RXH_L1 MOV TIMERX,A RET ;================================送出一位数================================ ;功能：从MCU发送一位数给实时时钟 | ;入口：发送位数放在EEPREM.1 出口：NONE | ;影响资源：A，TIMETEMP | ;========================================================================== T_BITOUT: MOV C,TIMETEMP.1 MOV T_SDA,C LCALL DELAY SETB T_SCL LCALL DELAY CLR T_SCL LCALL DELAY RET ;=================================读入一位数=============================== ;功能：MCU从实时时钟接收一位数 | ;入口：NONE 出口：接收位数放在TIMETEMP.0 | ;影响资源：A，TIMETEMP | ;========================================================================== T_BITIN: SETB T_SDA SETB T_SCL LCALL DELAY MOV C,T_SDA MOV TIMETEMP.0,C CLR T_SCL CLR T_SDA LCALL DELAY RET ;============================写状态寄存器程序============================== ;功能：读/写实时时钟状态寄存器，对其进行设置 | ;入口：NONE 出口：NONE | ;影响资源： A，TIMETX | ;========================================================================== TIMESTATUS_INT12ON: LCALL T_IICSTART LCALL T_IICSTOP LCALL T_IICSTART JNB FLAG.1,TIME_SETMODE_1 LJMP T_ERR_IICSTOP ;SDA线被箝位为低电平则退出 TIME_SETMODE_1: MOV TIMETX,#SD2098_W ;发送时钟SD2098的器件地址(写) LCALL T_SENDH_L JNB FLAG.0,TIME_SETMODE_2 LJMP T_ERR_IICSTOP ;ACK信号不正常则退出? TIME_SETMODE_2: MOV TIMETX,#0E0H ;设置时钟数据的内部起始地址为0EH LCALL T_SENDH_L ; MOV TIMETX,#11010011B ;向0EH寄存器写数据,INTA OUTPUT 1HZ LCALL T_SENDH_L MOV TIMETX,#00100100B ;向0FH寄存器写数据,INTB OUTPUT 32768HZ LCALL T_SENDH_L LCALL T_IICSTOP ; RET ;----------------------------------- TIMESTATUS_INT12OFF: LCALL T_IICSTART LCALL T_IICSTOP LCALL T_IICSTART MOV TIMETX,#SD2098_W ;发送时钟SD2098的器件地址(写) LCALL T_SENDH_L MOV TIMETX,#0E0H ;设置时钟数据的内部起始地址为0EH LCALL T_SENDH_L MOV TIMETX,#00000000B ;向0EH寄存器写数据,TURN OFF INTA/INTB LCALL T_SENDH_L LCALL T_IICSTOP RET ;----------------------------------- WRITE_TIME: LCALL T_IICSTART LCALL T_IICSTOP LCALL T_IICSTART MOV TIMETX,#SD2098_W ;发送时钟SD2098的器件地址(写) LCALL T_SENDH_L MOV TIMETX,#0E0H ;设置时钟数据的内部起始地址为0EH LCALL T_SENDH_L ; MOV TIMETX,#11000000B ;向0EH寄存器写数据,INTB OUTPUT 32768HZ LCALL T_SENDH_L MOV TIMETX,#00100000B ;向0FH寄存器写数据 LCALL T_SENDH_L MOV TIMETX,#55H ;00H,SECOND LCALL T_SENDH_L MOV TIMETX,#59H LCALL T_SENDH_L ;00H,MINUTE MOV TIMETX,#23H LCALL T_SENDH_L MOV TIMETX,#1H ; LCALL T_SENDH_L MOV TIMETX,#12H LCALL T_SENDH_L MOV TIMETX,#07H LCALL T_SENDH_L MOV TIMETX,#04H LCALL T_SENDH_L ;24小时制 MOV TIMETX,#00H LCALL T_SENDH_L ;清零7H寄存器 LCALL T_IICSTOP RET ;---------------------------------------------------- BCD_LEDHOURSECOND: MOV A,HOUR SWAP A ANL A,#0FH MOV DIG6,A MOV A,HOUR ANL A,#0FH MOV DIG5,A MOV A,MINUTE SWAP A ANL A,#0FH MOV DIG4,A MOV A,MINUTE ANL A,#0FH MOV DIG3,A MOV A,SECOND SWAP A ANL A,#0FH MOV DIG2,A ; MOV A,SECOND ANL A,#0FH MOV DIG1,A RET BCD_LEDYEARWEEK: MOV A,YEAR SWAP A ANL A,#0FH MOV DIG8,A MOV A,YEAR ANL A,#0FH MOV DIG7,A MOV A,MONTH SWAP A ANL A,#0FH MOV DIG6,A MOV A,MONTH ANL A,#0FH MOV DIG5,A MOV A,DAY SWAP A ANL A,#0FH MOV DIG4,A MOV A,DAY ANL A,#0FH MOV DIG3,A MOV A,WEEK SWAP A ANL A,#0FH MOV DIG2,A ; MOV A,WEEK ANL A,#0FH MOV DIG1,A RET ;============================写八位LED数据缓冲器程序======================= ;功能：写八位LED数据缓冲器 | ;入口：NONE 出口：NONE | ;影响资源： A | ;========================================================================== BIN_BCD: CLR DATAI1 CLR DATAI2 MOV A,TEMP MOV B,#10 DIV AB MOV DATAI1,A MOV DATAI2,B RET ;============================写八位LED数据缓冲器程序======================= ;功能：写八位LED数据缓冲器 | ;入口：NONE 出口：NONE | ;影响资源： A | ;========================================================================== TEST_LEDBUF: MOV DIG1,#40H MOV DIG2,#40H RET ;====================== RESER LED ======================================= ;功能： | ;入口： | ;出口：NONE | ;影响资源： | ;=========================================================================== LED_RESET: LCALL IICSTART MOV A,SLAVE_ADD MOV TXBUF,A ;送SD7218地址 LCALL SENDH_L MOV TXBUF,#79H ;COMMAND_RESET LCALL SENDH_L ;送RESET命令 MOV A,#0H ;RESET DATA MOV TXBUF,A LCALL SENDH_L LCALL IICSTOP RET END