【正文】 R0 ANL A,0F0H JZ ZERO 。繼電器簡單的閉合和斷開,用D8指示燈表示JDQ BIT ORG 0000H AJMP START ORG 0030HSTART: SETB JDQ 。開繼電器 CLR 。定時器初值加載高字節(jié)變量TC EQU 42H 。音長指針高字節(jié)LLO EQU 3CH 。關閉蜂鳴器聲音,調(diào)試時候用 MOV TMOD,00H SETB EA SETB ET0 ACALL SOUND_ON 。 MOV R3,01H 。延時1S ACALL DELAY MOV DPTR,SONG1 。延時1S ACALL DELAY MOV DPTR,SONG2 。以0FFH作為一首音樂的結束標志 ACALL LED_BL RETJ1: MOV DPH,LHI MOV DPL,LLO MOV A,TC MOVC A,A+DPTR MOV R3,A ACALL PLAY INC TC AJMP J0 RET。喇叭發(fā)聲170m一拍 ACALL DELAY DJNZ R3,PP1 。PLAY_SONG。查表加載數(shù)據(jù) MOV R4,A 。查表加載數(shù)據(jù) MOV R3,A 。演奏下一音符 RET。啟動定時器0開始計時 CPL FLASHLED RET。LOAD_VALUE。T0中斷服務程序T0_INT: MOV TL0, LOW1 MOV TH0, HIR CPL FENGMING RETI。LED_BL。6MHz。12MHz DB 0,4,13,10,20,3,8,6 DB 2,23,5,26,1,4,3 DB 4,28,21,7,5,16,12。 DB 2,14,11,20,3,8,6。歌曲2音階音長數(shù)據(jù) SONG2: DB 19,20,1,2,3,5,5,6,5,3,3,2,1,1,1,20,20,1,2,19,20,1,2,3 DB 5,5,6,5,3,3,2,1,1,1,20,20,19,1,1,1,2,1,2,3,4,5,6,5,3,5 DB 6,6,6,5,3,2,1,2,19,20,1,2,3,5,5,6,3,3,2,1,1,1,20,20,19,1,0FFHLEN2: DB 2,2,6,2,4,2,2,6,2,4,2,2,6,2,1,1,1,1,12,2,2,6,2,4,2,2,6,2 DB 4,2,2,6,4,2,2,2,2,12,2,2,6,2,4,2,2,6,2,4,2,2,6,2,4,2,2,6 DB 2,4,2,2,6,2,4,2,2,6,2,4,2,2,6,2,2,2,2,2,16,0FFH。歌曲6音階音長數(shù)據(jù) SONG6: DB 1,3,5,7,6,5,5,5,3,3,0FFHLEN6: DB 1,1,1,1,1,1,1,1,1,1,0FFH。通過24C04統(tǒng)計開機或復位次數(shù)并在LED上顯示。被傳送數(shù)據(jù)的字節(jié)數(shù)存放單元MTD EQU 50H 。虛擬總線的數(shù)據(jù)線VSCL BIT 。讀出24C04在本次開機前的開機次數(shù) MOV A,MRD ACALL H_BCD MOV DPTR,DATA_7SEG1 MOV R1,GEWEI+3 MOV R6,06H 。指向的cpu內(nèi)RAM中,再將開機次數(shù)發(fā)送到EEPROM中LOOP: SJMP LOOP。延時等待EEPROM內(nèi)部數(shù)據(jù)處理,小容量的是否可以不要 RET。 MOV SLA,SLAW MOV NUMBYT,2 LCALL WRNBYT MOV SLA,SLAR MOV NUMBYT,01H 。*調(diào)用向被控器件發(fā)送N個字節(jié)數(shù)據(jù)WRNBYT子程序*。檢查應答位 JB F0,WRNBYT 。RDNBYT: MOV R3,NUMBYT LCALL STA 。非正常應答時重新開始RDN: MOV R1,MRD 。N個字節(jié)讀完發(fā)送非應答位 LCALL STOP 。指向下一個接收數(shù)據(jù)緩沖單元 SJMP RDN1 。停止（STOP）子程序STOP: CLR VSDA SETB VSCL NOP NOP SETB VSDA NOP NOP CLR VSDA CLR VSCL RET。發(fā)送應答位MACK子程序MACK: CLR VSDA SETB VSCL NOP NOP CLR VSCL SETB VSDA RET。CACK。使VSDA上數(shù)據(jù)有效 CLR F0 。無正常應答，F(xiàn)0=1CEND: CLR VSCL RET。該子程序是向虛擬I2C總線的數(shù)據(jù)線VSDA上發(fā)送一個字節(jié)數(shù)據(jù)的操作。8為數(shù)據(jù)長度送R0中WLP: RLC A 。8位是否發(fā)送完，未完轉WLP RET 。RDBYT。RDBYT: MOV R0,08H 。讀入VSDA引腳狀態(tài) MOV A,R2 。DEL5MS。入口參數(shù):AH_BCD: MOV B,100 。入口參數(shù):AWB_LED: CLR MN_TXD 。余數(shù)繼續(xù)分離十位和個位 XCH A,B DIV AB MOV SHI,A MOV GEWEI,B RET。H_BCD。使VSCL=0可繼續(xù)接收數(shù)據(jù)位 DJNZ R0,RLP 。置VSDA為輸入方式 SETB VSCL 。從VSDA上接收一個字節(jié)數(shù)據(jù)（RDBYT）子程序，該子程序用來從VSDA上讀取一個字節(jié)數(shù)據(jù)，執(zhí)行本程序后，從VSDA上讀取的一個字節(jié)存放在R2或A中。發(fā)送1程序段 SETB VSCL NOP NOP CLR VSCL CLR VSDA AJMP WLP1WR0: CLR VSDA 。判斷發(fā)送1還是0，發(fā)送1轉WR1 AJMP WR0 。占用資源：R0，C。I2C總線模擬的通用子程序。輸入VSDA引腳狀態(tài) JNC CEND 。CACK: SETB VSDA 。發(fā)送非應答位 MNACK子程序 *。*I2C總線典型信號的模擬子程序 *。STOP。STA。子程序結束ACK: LCALL MACK 。讀入一個字節(jié)到接收數(shù)據(jù)緩沖中 MOV R1,A DJNZ R3,ACK 。發(fā)送尋址字節(jié)（讀） LCALL WRBYT LCALL CACK 。RDNBYT。啟動I2C總線 MOV A,SLA 。并存放在以MRD(30H)為首地址的單元中 RET。讀出24C04在本次開機前的開機次數(shù)子程序RDIIC: MOV MTD,00H 。送數(shù)到24C04的子程序WRIIC: MOV MTD,00H MOV MTD1,00H MOV MTD+2,MRD MOV SLA,SLAW MOV NUMBYT,03H 。加上本次開機,總次數(shù)保存到發(fā)送區(qū)首地址 LCALL WRIIC 。IIC字節(jié)讀寫的節(jié)點地址暫存單元MN_RXD BIT MN_TXD BIT BAI DATA 40HSHI DATA 41HGEWEI DATA 42H ORG 0000H AJMP START ORG 0030HSTART: MOV SP,70H 。24C04低8位地址MRD EQU 30H 。AT24C04尋址字節(jié)寫的節(jié)點地址SLAR EQU 0A1H 。歌曲8音階音長數(shù)據(jù) SONG8: DB 11,13,15,17,16,15,15,15,13,13,0FFHLEN8: DB 1,1,1,1,1,1,1,1,1,1,0FFH。歌曲4音階音長數(shù)據(jù) SONG4: DB 10,9,8,7,6,5,4,3,2,1,0FFHLEN4: DB 1, 1,1,1,1,1,1,1,1,1,0FFH。==========================SONG: DB 1,2,3,4,5,6,7,8,9,10,0FFHLEN : DB 1,1,1,1,1,1,1,1,1,1,0FFH。 DB 0,2,23,5,26,2,4,3。 DB 248,249,250,250,252,251,252。************************************GI_LIST:。Fosc=6MHz時