單片機(jī)多路數(shù)據(jù)采集源程序

1、程序在下面源程序：?jiǎn)温凡杉绦颍篗OV DPTR,#0F8FFHMOV R0,#00H ;將存儲(chǔ)器的首地址存在 R0,R1兩個(gè)寄存器中MOV R1,#00HMOV R2,#200D ;設(shè)置循環(huán)MOV R3,#4MOV R4,#8DMAIN:CLR P1.1 ;選中 ADC0809PUSH DPL ;DPTR 入棧PUSH DPHMOVX DPTR,A ;啟動(dòng) AD 轉(zhuǎn)換ACALL DELAY ;延時(shí)5ms保證采集數(shù)據(jù)頻率為200HZMOVX A,DPTR ; 讀數(shù)據(jù)SETB P1.1 ;選中存儲(chǔ)器MOV DPL,R0 ;將存儲(chǔ)器的地址給DPTRMOV DPH,R1MOVX DPTR,A ;存數(shù)

2、據(jù)INC DPTR ;指向下一存儲(chǔ)單元MOV R0,DPL ;將該單元地址重新存入寄存器中MOV R1,DPHPOP DPH ;DPTR 出棧POP DPLDJNZ R2,MAINDJNZ R3,MAINDJNZ R4,MAINSJMP $DELAY:;延時(shí)程序延時(shí)5msMOV R5,#100DMOV R6,#24DLA:DJNZ R5,$DJNZ R6,LARETEND循環(huán)采集程序：MOV 30H,#00H ; 將八塊存儲(chǔ)器的首地址分別存在 30-3F共16個(gè)內(nèi)部存儲(chǔ)單 元MOV 31H,#00HMOV 32H,#00HMOV 33H,#20HMOV 30H,#00H ; 將八塊存儲(chǔ)器的首地

3、址分別存在 30-3F 共 16 個(gè)內(nèi)部 存儲(chǔ)單元MOV 31H,#00HMOV 32H,#00HMOV 33H,#20HMOV 34H,#00HMOV 35H,#40HMOV 36H,#00HMOV 37H,#60HMOV 38H,#00HMOV 39H,#80HMOV 3AH,#00HMOV 3BH,#0A0HMOV 3CH,#00HMOV 3DH,#0C0HMOV 3EH,#00HMOV 3FH,#0E0HMOV R2,#200D ; 設(shè)置外循環(huán) 200*40 共 8000 次MOV R3,#40DMAIN: MOV DPTR,#0F8FFH ;0 通道的地址MOV R0,#30H ;R

4、0,R1作為存儲(chǔ)器地址的中間變量MOV R1,#31HMOV R4,#8 ; 設(shè)置內(nèi)循環(huán)LOOP: CLR P1.1 ; 選中 ADC0809PUSH DPL ;DPTR 入棧PUSH DPHMOVX DPTR,A ; 輸入一個(gè)數(shù)啟動(dòng) AD 轉(zhuǎn)換ACALL DELAY ; 等待延時(shí)以達(dá)到每秒采集 200 個(gè)數(shù)據(jù)MOVX A,DPTR ; 讀數(shù)據(jù)SETB P1.1 ; 選中存儲(chǔ)器MOV DPL,R0 ; 將存儲(chǔ)器的地址給 DPTRMOV DPH,R1MOVX DPTR,A ; 存數(shù)據(jù)INC DPTR ; 指向下一存儲(chǔ)單元MOV R0,DPL ; 將該單元地址重新存入內(nèi)部數(shù)據(jù)存儲(chǔ)單元MOV R1,

5、DPHINC R0 ; 指向下一塊存儲(chǔ)器的地址INC R0INC R1INC R1POP DPH ;DPTR 出棧POP DPLINC DPH ; 指向下一通道地址DJNZ R4,LOOP ; 內(nèi)循環(huán)DJNZ R2,MAIN ; 外循環(huán)DJNZ R3,MAINSJMP $DELAY: ; 延時(shí)程序 延時(shí) 600usMOV R5,#100MOV R6,#3LA:DJNZ R5,$DJNZ R6,LARETEND基于單片機(jī)的萬(wàn)年歷匯編語(yǔ)言程序時(shí)間： 2011-03-27 22:19:52 來(lái)源： 作者：;=SUB_WNL= 萬(wàn)年歷; 真正的萬(wàn)年歷 : 84 bytes 的 51 ASMSJDATA

6、30H ;世紀(jì)BCD00TO99NHDATA31H ;年號(hào)BCD00TO990000 TO 9999 年YFDATA32H ;月份BCD01TO12Deng Miao2004-06-01GuangZhou *org 000hMOV SP, #40HMOV SJ, #21H ;2004-05MOV NH, #01HMOV YF, #4HACALL SUB_WNLSJMP $=SUB_WNL=; 入口：SJDATA30H ;世紀(jì)BCD00TO99NHDATA31H ;年號(hào)BCD00TO990000 TO 9999 年YFDATA32H ;月份BCD01TO12出口; ACC - 本月天數(shù) BCD

7、28 to 31本月 1 日的星期數(shù) 1 to 6星期 1 to 星期 60 - 星期日使用 :ACC, B, R5, R6STACK: 3 bytes ( 不包括調(diào)用)ORG 50HSUB_WNL:PUSH PSWMOV A,SJACALL BCD2BIN_MOD4; x 400 年 :（ 大周期 ）;=146097 天 =7 *20871 +; x 100 年 :; 000 年=7 * 0+ 0+1 -; 100 年=7 * 5217+ 7 +1- 2; 200 年=7 * 10435 +7 +1- 4; 300 年=7 * 15653 +7 +1- 6MOV A,R6; A=R6= SJ

8、_BIN MOD4RLC A;A=A*2+CA=XRL A,#B; A =87H-A ;MOV R5,AA =MOV A, NH0 天11= 0 * 2 + 1 *2 =1 * 24 =2 * 26 =3 * 21,2,4,61,2,4,6*邊界調(diào)整86H, 85H, 83H, 81H ; R5: 星期JZ WNL_1XCH A, R5SUBBA,R5 ;0 年;0ACALL BCD2BIN_MOD4MOV R5, A0 + 0 + 1 + (-1)WNL_1:MOV A, YFADD A, #(WNL_TAB-$-4)MOVC A, A+PCMOV R6, ASWAP AACALL WNL_

9、F0; 大年對(duì) >=3 月調(diào)整準(zhǔn)備ADDC A, R5 ; 月調(diào)整MOV B, #7DIV AB ; B = A MOD 7MOV A, R6ACALL WNL_F0; 大年調(diào)整準(zhǔn)備WNL_TAB:WNL_F0:ADDC A, #28POP PSWRETDB3*2+5 *32+0;1 BIT 0:"2 月 " 標(biāo)志DB0*2+1+1* 32+0 ;2* BIT 1.2:月大小DB3*2+1 *32+16;300： 28 天DB2*2+4 *32+16;401： DB3*2+6 *32+16;510: 30 天DB2*2+2 *32+16;611: 31 天DB3*2+

10、4 *32+16;7 BIT 3:0 DB3*2+7 *32+16;8 BIT 4:0: 1/2 月DB2*2+3 *32+16;91: >=3 月;6BYTES; 大年調(diào)整準(zhǔn)備RRCA;0AHANLA,#07H;0BH;0CHANLC,F0;0DH;0EHRET;0FHDB3*2+5 *32+16;10H BIT 5.7:星期調(diào)整數(shù)DB2*2+1 *32+16;11H0 ： -DB3*2+3 *32+16;12H1-7: 調(diào)整數(shù)BCD2BIN_MOD4:; 功能：A. 1BYTES BCD TOBIN;B. MOD 4;C. MUL 2; 入口：A: SJ OR NH;F0: 大世紀(jì);

11、 出口ACC- (BIN(A)4) *2 - (BIN(A)MOD 4) - F0;R6- BIN(A)MOD 4C- IIF(BIN(A)MOD 4)=0, 1,0 )使用:ACC, B, R6, PSWSTACK: 0 bytes ( 不包括調(diào)用 )MOV R6, AANL A, #0F0HSWAP AMOV B, #(256-6)BCD => BIN16X+Y => 10X+Y(256-6)*X + (16X+Y)MUL ABADD A, R6= 256X + (10X+Y)ANLA,#3XCHA,R6; R6= BIN MOD 4=0,1,2,3; X 4 年：3 * 36

12、5 +366 =7*209 + (-2)XRLA,R6; A =(BIN4)MOV R6, AMOD4RR A ; A = (BIN 4 ) * 2MOVC,F0 ;大世紀(jì)調(diào)整SUBBA,R6;X 1年;0 年0=0 +0 + 1 + (-1);1 年366 =7*52+1 + 1;2 年366 +365= 7*104 +2 +1;3 年366 +365+ 365 = 7*156+3 + 1;-1,1,2,3CJNER6,#1, $+ 3; C= IIF(R6>=1,0, 1)MOVF0,C; C=1 為大年 / 大世紀(jì)RETEND ;= END OF FILEFor personal use only in study and research; not for commercial use僅供個(gè)人用于學(xué)習(xí)、研究；不得用于商業(yè)用途For personal use only in study and research; not for commercial use.Nur f u r den pers?nlichen fuie StFdrschung, zu kommerziellen Zwecken verwendet werden.Po