電磁驅(qū)動微運動的測量與控制方法畢業(yè)設(shè)計-資料下載頁
2025-06-17 14:29本頁面
【正文】 DIN EQU DOUT EQU AD7705:MOV A,20HLCALL WRITE_7705MOV A,04HLCALL WRITE_7705MOV A,10HLCALL WRITE_7705MOV A,7CHLCALL WRITE_7705RETWRITE_7705:SETB CLKCLR CSMOV R7，08HWRITE_1:CLR CLKRLC AMOV DIN CSETB CLKDJNZ R7，WRITE_1RETMOV A,38HLCALL WRITE_7705SETB CLKCLR CSLACLL READMOV R0，ALCALL READMOV R1，ARETREAD:MOV R7,08HREAD_1:CLR CLKMOV C,DOUTSETB CLRRLC ADJNZ R7，READ_1RET多字節(jié)二進(jìn)制數(shù)轉(zhuǎn)換為BCD數(shù)入口：（BINADDR）為二進(jìn)制數(shù)低位字節(jié)地址指針，（BCDADDR）為BCD數(shù)個位數(shù)地址指針，（BYTES）為二進(jìn)制數(shù)字節(jié)BINBCD2:MOV R1, 40HMOV R2, 2 ；R2 存放字節(jié)數(shù)INC R2CLR ABB0: MOV @R1, AINC R1DJNZ R2, BB0MOV A, 2MOV B, 8MUL ABMOV R3, A 。 R3存放二進(jìn)制數(shù)的位數(shù)BB3: MOV R0,40HACALL CLR1MOV R2, 2CLR CBB1: MOV A, @R0RLC AMOV @R0, AINC R0DJNZ R2, BB1 。 二進(jìn)制循環(huán)左移MOV R2, 2INC R2MOV R1, BCDADDRBB2: MOV A, @R1ADDC A, @R1DA AMOV @R1, AINC R1DJNZ R2, BB2DJNZ R3, BB3RET。函數(shù)名稱：Div2Byte。功能描述：無符號數(shù)雙字節(jié)除法。傳入?yún)?shù)：R0R1被除數(shù) R2R3除數(shù)。返回數(shù)據(jù)：R4R5商 R6R7余數(shù)。其他說明：比如雙字節(jié)數(shù)R0R1，R0高字節(jié) R1低字節(jié)Div2Byte:MOV R4,0MOV R5,0 。商賦初值零MOV A,R0MOV R6,AMOV A,R1MOV R7,A 。余數(shù)賦初值，保證商為零時余數(shù)正常Div2Byte_1:MOV A,R1CLR CSUBB A,R3 。低字節(jié)相減MOV R1,AMOV A,R0SUBBA,R2 。高位相減MOV R0,AJC Div2Byte_3 。如果高字節(jié)都需要借位則退出循環(huán)CLR CMOVA,R5ADD A,1MOV R5,AINC Div2Byte_2INC R4 。商加一Div2Byte_2:MOV A,R1MOV R7,AMOV A,R0MOV R6,A 。更新余數(shù)LJMP Div2Byte_1Div2Byte_3:RET入口條件：被乘數(shù)在RR3中，乘數(shù)在RR7中。出口信息：乘積在RRRR5中。影響資源：PSW、A、B、R2～R7 堆棧需求： ２字節(jié)MULD: MOV A,R3 ；計算R3乘R7MOV B,R7MUL ABMOV R4,B ；暫存部分積MOV R5,AMOV A,R3 ；計算R3乘R6MOV B,R6MUL ABADD A,R4 ；累加部分積MOV R4,ACLR AADDC A,BMOV R3,AMOV A,R2 ；計算R2乘R7MOV B,R7MUL ABADD A,R4 ；累加部分積MOV R4,AMOV A,R3ADDC A,BMOV R3,ACLR ARLC AXCH A,R2 ；計算R2乘R6MOV B,R6MUL ABADD A,R3 ；累加部分積MOV R3,AMOV A,R2ADDC A,BMOV R2,ARET串口接收子程序START :MOV A , 20H 。 定時器初始化MOV TMOD , AMOV TH1 , 0E6HMOV TL1 , 0E6HMOV SCON , 0E0H 。 串口初始化CLR EA 。 清中斷CLR ESCLR ET1SETB TR1ACALL SUB1 。 調(diào)接收一組數(shù)據(jù)子程序AJMP ＄ 。 通信結(jié)束SUB1 :MOV SCON , 0E0HSETB SM2LOOP :ACALL RESUB 。 調(diào)接收子程序接收地址碼MOV A , R0CLR CSUBB A , 0F1H 。 是否為 0FHJNZ LOOP 。 否 , 重新接收地址MOV R7 , 0F1H 。 是 , 回送地址碼ACALL TRSUBCLR SM2CLR TB8LOOP1 :MOV DPTR , 0100HMOV 20H , 00H 。 累加和初值為 0MOV R3 , 100 。 一組個數(shù)為 100LOOP2 :ACALL RESUB 。 調(diào)接收子程序接收一字符MOV A , R0MOVX @DPTR , A 。 存內(nèi)存ADD A , 20H 。 累加INC DPTRDJNZ R3 , LOOP2ACALL RESUB 。 接收累加和MOV A , R0CJNE A , 20H , LOOP3 。 累加和是否相等MOV R7 , 00H 。 相等 , 回送 00HACALL TRSUBAJMP LOOP4 。 轉(zhuǎn)返回LOOP3 :MOV R7 , 0FFH 。 不相等 , 回送 FFHACALL TRSUBCLR CAJMP LOOP1 。 轉(zhuǎn)重新接收LOOP4 :RET 。 返回TRSUB : 。 發(fā)送一個數(shù)據(jù)子程序MOV A , R7MOV SBUF , AJNB TI , ＄CLR TIRETRESUB : 。 接收一個數(shù)據(jù)子程序SETB RENCLR RIJNB RI , ＄CLR RIMOV A , SBUFMOV R0 , ARET39
物理相關(guān)推薦
鄂ICP備17016276號-1