mcs-51單片機實用子程序庫(完整版)
【正文】 R AMOVC A,A+DPTRMOV R7,AINC DPTR ；指向下一個系數(shù)MOV C,1EH ；比較兩個數(shù)符RRC AXRL A,23HRLC AMOV F0,C ；保存比較結(jié)果LCALL AS1 ；進(jìn)行代數(shù)加法運算CLR A ；讀取下一個系數(shù)的第一個字節(jié)MOVC A,A+DPTRCJNE A,40H,PLN2；是結(jié)束標(biāo)志嗎？XCH A,R0 ；運算結(jié)束，恢復(fù)R0、R1原來的角色XCH A,R1XCH A,R0LCALL MOV0 ；將結(jié)果回傳到[R0]中CLR AINC DPTRJMP A+DPTR ；返回主程序PLN2: MOV A,R1 ；比較自變量和中間結(jié)果的符號XRL A,23HRLC AMOV 1FH,C ；保存比較結(jié)果LCALL MUL0 ；進(jìn)行乘法運算SJMP PLN1 ；繼續(xù)下一項運算（１９） 標(biāo)號： ＦＬＯＧ 功能：以１０為底的浮點對數(shù)函數(shù)入口條件：操作數(shù)在[R0]中。影響資源：DPTR、PSW、A、B、R2～R位1EH、1FH 堆棧需求：６字節(jié)FEXP: MOV R5,1 ；加權(quán)系數(shù)為１．４４２７２（Ｌｎｇ2ｅ）MOV R6,0B8HMOV R7,0ABHEXP: CLR 1EH ；加權(quán)系數(shù)為正數(shù)LCALL MVR0 ；將[R0]傳送到第一工作區(qū)LCALL MUL1 ；進(jìn)行加權(quán)運算SJMP E20 ；以２為底統(tǒng)一求冪（２３） 標(biāo)號： ＦＥ２ 功能：以２為底的浮點指數(shù)函數(shù)入口條件：操作數(shù)在[R0]中。影響資源：DPTR、PSW、A、B、R2～R位1EH、1FH 堆棧需求：６字節(jié)FE2: LCALL MVR0 ；將[R0]傳送到第一工作區(qū)E20: MOV A,R3ORL A,R4JZ EXP1 ；尾數(shù)為零MOV A,R2JB ,EXP2；階符為負(fù)？SETB CSUBB A,6 ；階碼大于６否？JC EXP2JB 1FH,EXP0；數(shù)符為負(fù)否？MOV R0,3FH；正指數(shù)過大，冪溢出INC R0MOV R0,0FFHINC R0MOV R0,0FFHDEC R0DEC R0SETB OVRETEXP0: MOV R0,41H；負(fù)指數(shù)過大，冪下溢，清零處理CLR AINC R0MOV R0,AINC R0MOV R0,ADEC R0DEC R0CLR OVRETEXP1: MOV R0,1 ；指數(shù)
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1