|
|||||||||||
| 技術(shù)交流 | 電路欣賞 | 工控天地 | 數(shù)字廣電 | 通信技術(shù) | 電源技術(shù) | 測(cè)控之家 | EMC技術(shù) | ARM技術(shù) | EDA技術(shù) | PCB技術(shù) | 嵌入式系統(tǒng) 驅(qū)動(dòng)編程 | 集成電路 | 器件替換 | 模擬技術(shù) | 新手園地 | 單 片 機(jī) | DSP技術(shù) | MCU技術(shù) | IC 設(shè)計(jì) | IC 產(chǎn)業(yè) | CAN-bus/DeviceNe |
幾個(gè)常用的pic程序 |
| 作者：whyjj 欄目：單片機(jī) |
時(shí)鐘DS1302的程序.ASM ;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% ;發(fā)送數(shù)據(jù)程序 SEND—BYTE ;功能：發(fā)送1個(gè)字節(jié)給DS1302 ;命令字節(jié)地址在Command中 ;所發(fā)送數(shù)據(jù)的字節(jié)在ByteCnt中，發(fā)送的數(shù)據(jù)在XmtDat緩沖區(qū)中 ;register : BitCnt equ xx ;數(shù)據(jù)位計(jì)數(shù)器 ; Command equ xx ；命令字節(jié)地址 ; RcvDat equ xx ；接受數(shù)據(jù)緩沖區(qū) ; XmtDat equ xx ；發(fā)送數(shù)據(jù)緩沖區(qū) ;#define io_data rc,7 ;#define sclk rc,6 ;#define rst rc,4 ;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Send_Byte NOP CLRWDT RST_L ;所有數(shù)據(jù)傳送終止 NOP SCLK_L ;請(qǐng)時(shí)鐘總線 NOP RST_H ;復(fù)位引腳為高電平，邏輯控制有效 NOP MOVLW 08 ;傳送位數(shù)為8 MOVWF BitCnt S_Byte0 NOP RRF Command,1 ;將最低位傳送給進(jìn)位C BTFSS STATUS,C ;IF C=1 THEN 1--》IO—DATA GOTO S_Byte3 ;IF C=0 THEN 1--》IO—DATA IO_H GOTO S_Byte4 S_Byte3 IO_L S_Byte4 NOP SCLK_H NOP SCLK_L DECFSZ BitCnt,1 ;位傳送未完則繼續(xù) GOTO S_Byte0 NOP ;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx S_Byte1 MOVLW 08 MOVWF BitCnt S_Byte2 NOP RRF XmtDat ;發(fā)送數(shù)據(jù) BTFSS STATUS,C GOTO S_Byte5 IO_H GOTO S_Byte6 S_Byte5 IO_L S_Byte6 NOP SCLK_H NOP SCLK_L DECFSZ BitCnt,1 GOTO S_Byte2 NOP RST_L RETURN ;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& ;接受數(shù)據(jù)程序 RECEIVE_BYTE ;功能：從被控器DS1302接受1個(gè)字節(jié)數(shù)據(jù) ;命令字節(jié)地址在Command中 ;接受的數(shù)據(jù)在RcvDat緩沖區(qū)中 ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& Receive_Byte NOP CLRWDT RST_L ;所有數(shù)據(jù)傳送終止 NOP SCLK_L ;請(qǐng)時(shí)鐘總線 NOP RST_H ;復(fù)位引腳為高電平，邏輯控制有效 NOP MOVLW 08 ;傳送位數(shù)為8 MOVWF BitCnt R_Byte0 NOP RRF Command,1 ;將最低位傳送給進(jìn)位C BTFSS STATUS,C ;IF C=1 THEN 1--》IO—DATA GOTO R_Byte3 ;IF C=0 THEN 1--》IO—DATA IO_H GOTO R_Byte4 R_Byte3 IO_L R_Byte4 NOP &nb |
| 2樓： | >>參與討論 |
| 作者： HotPower 于 2004/1/30 23:30:00 發(fā)布：
頂 |
|
| 3樓： | >>參與討論 |
| 作者： CECLM 于 2004/1/31 12:42:00 發(fā)布：
頂！ |
|
| 4樓： | >>參與討論 |
| 作者： dmcz 于 2004/1/31 20:37:00 發(fā)布：
ding! |
|
|
|
| 免費(fèi)注冊(cè)為維庫電子開發(fā)網(wǎng)會(huì)員，參與電子工程師社區(qū)討論，點(diǎn)此進(jìn)入 |
Copyright © 1998-2006 m.58mhw.cn 浙ICP證030469號(hào) |