使用電腦控制家電(參考版)
2024-09-02 09:37本頁面
【正文】 ======================================================= 。======================================================= 。======================================================= 。======================================================= 。======================================================= 。讀一個字節(jié) Address地址 Data讀出的數(shù)據(jù)I2C_READ:nopI2C_READ_A: LCALL I2C_START MOV A,10100000B LCALL I2C_SEND8BIT LCALL I2C_ACK JC I2C_READ_A 。寫一個字節(jié) Address地址 I2CDatata寫入的數(shù)據(jù)I2C_WRITE: nopI2C_WRITE_A: LCALL I2C_START MOV A,10100000B LCALL I2C_SEND8BIT LCALL I2C_ACK JC I2C_WRITE_A 。MOV Address,00H LCALL I2C_READMOV I2CData,A。堆棧指針MOV Address,00H MOV I2CData,55H LCALL I2C_WRITE。 。SETB TR0RETMOV A,R1CJNE A,07EH,BISHI。將秒通過串口發(fā)送出去ZANTING1:NOPMOV A,5FHCPL AMOV P1,AMOV R0,92HMOV IE,R0RETIXIANGLING:CLR TR0MOV R1,070H。MOV Address,00H MOV 09H,R0LCALL I2C_WRITE。24存入的首地址L8:MOV SP,60H。要寫的個數(shù)MOV R0,070H。 FD3:。沒收到結(jié)束標(biāo)志ff，繼續(xù)接收MOV IE,000H顯示保存的數(shù)據(jù)MOV SBUF,AMOV R4,02HDA:MOV R5,10HDJNZ R5,$DJNZ R4,DAMOV A,R1INC R1INC R0MOV P1,0ffhCJNE A,077H,XIA。 SHOU:MOV R0,00HMOV IE,R0MOV R1,SBUF。 FAS:NOPRETI接收子程序 DELAY10:MOV R4,20HD8:MOV R5,48HDJNZ R5,$DJNZ R4,D8RET fasong:MOV R1,70HJBC TI,FAS。 FANHUI:RETI 。MOV P1,AACALL XIANGLINGMOV A,51HCJNE A,03CH,FANHUIMOV 51H,000HINC 50HACALL XIANGLINGMOV 52h,011H。 CPL ACJNE A,03BH,FANHUI。將分通過串口發(fā)送出去lcall DELAY10nopnop MOV A,52HMOV SBUF,A。將AF通過串口發(fā)送出去CJNE A,017H,FANHUIMOV 53H,000HMOV A,50HMOV SBUF,A。將AF通過串口發(fā)送出去CJNE A,0A1H,FANHUIMOV 54H,000HINC 53HMOV A,53H。 MOV A,54H。 XIAN:NOPAJMP XIANTIME:CLR clr 。 啟動定時器T1 MOV TL0,06HMOV TH0,06H。預(yù)置初值(按照波特率2400BPS預(yù)置初值)MOV TL1,0F4H。設(shè)置成串口1方式MOV PCON,80H。 XI1:CLR clr INC R1MOV A,R1。SETB TR0XI2:MOV IE,000HMOV R1,06FH預(yù)置初值(按照波特率2400BPS預(yù)置初值)SETB TR1。波特率翻倍為2400x2=4800BPSMOV TH1,0F4H。讀出數(shù)據(jù) MOV R0,AINC 08HINC R0DJNZ 59H,XI6MOV R0,92HMOV IE,R0MOV TMOD,22HMOV SCON,50H。 。24存入的首地址XI6:MOV SP,60H。要讀出的個數(shù)MOV R0,070H。 START:。串行中斷入口ORG 0030H定義24C02的串行時鐘線 SDA BIT 。Print k, l(1), End Sub單片機(jī)程序。39。39。39。39。39。39。HFF)) 39。 f)) 39。H amp。 s amp。 f)) = amp。H amp。50h = Chr$(Val(amp。5fh = Chr$(Val(amp。H7)) = Chr$(Val(amp。H3)) = Chr$(Val(amp。5ah = Chr$(Val(amp。H7)) = Chr$(Val(amp。H7)) = Chr$(Val(amp。H3)) = Chr$(Val(amp。H6)) = Chr$(Val(amp。77H不保存標(biāo)志39。If = 0 Then = amp。End IfIf l(1) = Val() And = 0 Then = 0 = + * 2 + * 4 + * 8 + * 16 + * 32 + * 64If = 1 Then = amp。39。39。39。HFF)) 39。 f)) 39。H amp。 s amp。 f)) = amp。H amp。50h = Chr$(Val(amp。5fh = Chr$(Val(amp。H7)) = Chr$(Val(amp。H3)) = Chr$(Val(amp。5ah = Chr$(Val(amp。H7)) = Chr$(Val(amp。H7)) = Chr$(Val(amp。H3)) = Chr$(Val(amp。H6)) = Chr$(Val(amp。77H不保存標(biāo)志39。If = 0 Then = amp。 更多內(nèi)容訪問 = Timek = k + 1If k = 60 Then l(1) = l(1) + 1: k = 57If l(1) = Val() And = 1 Then = 1 = + * 2 + * 4 + * 8 + * 16 + * 32 + * 64If = 1 Then = amp。 Val(a)End SubPrivate Sub Timer1_Timer() = Date amp。 = 0 =
研究報(bào)告相關(guān)推薦
鄂ICP備17016276號-1