?? avr32fp.inc.asm
字號(hào):
INT2FP: ; 16位整數(shù)轉(zhuǎn)換成四字節(jié)浮點(diǎn)數(shù)運(yùn)算子程
CLR R18
SBRC R17,7 ; R17:R16為待轉(zhuǎn)換的整數(shù)
COM R18
CLR R19 ; 16位整數(shù)按數(shù)符位擴(kuò)展成32位長(zhǎng)整數(shù)
SBRC R18,7 ; 為正，R19,R18清零
COM R19 ; 為負(fù)，R19,R18置為$FFFF
LONG2FP: ; 32位長(zhǎng)整數(shù)轉(zhuǎn)換成四字節(jié)浮點(diǎn)數(shù)運(yùn)算子程
CLR R20 ; 清符號(hào)位R20
AND R19,R19 ; 先判+/-
BRPL LONG2FP_1 ; 為正，跳至LONG2FP_1
RCALL QUBU ; 為負(fù)，調(diào)QUBU子程--取補(bǔ)
COM R20 ; 符號(hào)位R20取反
LONG2FP_1:
MOV R26,R16 ; 再判R19:R18:R17:R16是否全零
OR R26,R17
OR R26,R18
OR R26,R19
BRNE LONG2FP_2 ; 不為零跳至LONG2FP_2
RJMP JGW0 ; 為零跳至JGW0-結(jié)果為零
LONG2FP_2:
LDI R26,$16 ; 令R26 = 22
RJMP LONG2FP_4
LONG2FP_3:
INC R26
LSR R19
ROR R18
ROR R17
ROR R16
LONG2FP_4:
AND R19,R19 ; 判高位是否為零
BRNE LONG2FP_3 ; 不為零，右移一位，階碼加 1
LONG2FP_5:
AND R18,R18 ; 判次高位是否為零
BRNE LONG2FP_7
SUBI R26,$08 ; 為零，階碼減 8
MOV R18,R17 ;數(shù)左移 8 位
MOV R17,R16
LDI R16,$00 ; 低位以 $00 填充
RJMP LONG2FP_5
LONG2FP_6:
DEC R26
ADD R16,R16
ADC R17,R17
ADC R18,R18
LONG2FP_7:
BRPL LONG2FP_6 ; R18第7為0，再左移一位
MOV R19,R26 ; 階碼減 1 ，直到R18第7為1
RJMP GGH
FP2INT: ; 四字節(jié)浮點(diǎn)數(shù)轉(zhuǎn)換成16位整數(shù)運(yùn)算子程
LDI R26,$0E ; 令R26 = 14
RJMP FP2LONG_1 ; 跳至FP2LONG_1
FP2LONG: ; 四字節(jié)浮點(diǎn)數(shù)轉(zhuǎn)換成32位長(zhǎng)整數(shù)運(yùn)算子程
LDI R26,$1E ; 令R26 = 30
FP2LONG_1:
RCALL FP2LONG_11 ; 調(diào)FP2LONG_11子程
BREQ FP2LONG_4 ;相等，即階碼為 0 ，按 0 處理
SUB R26,R19 ;R26(14)-階碼差值
BREQ FP2LONG_2 ;為 0 ，則跳至FP2LONG_2
BRPL FP2LONG_5 ;為正， 則跳至FP2LONG_5-無(wú)溢出
FP2LONG_2: ;有溢出
AND R20,R20 ;符號(hào)為正，
BRMI FP2LONG_3 ;符號(hào)為負(fù)，則跳至FP2LONG_3
LDI R16,$FF
LDI R17,$FF
LDI R18,$FF
LDI R19,$7F
RET ;正向溢出，結(jié)果置為 $7F FF FF FF
FP2LONG_3:
LDI R16,$00
LDI R17,$00
LDI R18,$00
LDI R19,$80
RET ; 負(fù)向溢出，結(jié)果置為 $80 00 00 00
FP2LONG_4:
LDI R16,$00
LDI R17,$00
LDI R18,$00
LDI R19,$00
RET ;結(jié)果為 0 ，置為 $00 00 00 00
FP2LONG_5: ;無(wú)溢出
INC R19 ;階碼差值 + 1
BRMI FP2LONG_4 ;為負(fù)，即(階碼 < $7E)按零處理
LDI R19,$00 ;清R19
SUBI R26,$08 ;R26(14-階碼差值) -8
BRPL FP2LONG_7 ;為正轉(zhuǎn)FP2LONG_7
SUBI R26,$F8 ;不夠減則加 8
MOV R19,R18 ;左移 8 位
MOV R18,R17
MOV R17,R16
LDI R16,$7F ;低位以 $7F 填充
RJMP FP2LONG_8 ;跳至 FP2LONG_8
FP2LONG_6:
MOV R16,R17 ;右移 8 位
MOV R17,R18
LDI R18,$00 ;高位以 $00 填充
SUBI R26,$08 ;R26-8
FP2LONG_7:
CPI R26,$08 ;R26值與 8 相比較
BRCC FP2LONG_6 ;有借位，跳至FP2LONG_6
FP2LONG_8: ;無(wú)借位
AND R26,R26
BREQ FP2LONG_10
FP2LONG_9:
LSR R19 ;右移一位
ROR R18
ROR R17
ROR R16
DEC R26 ;R26-1,不為 0 跳至FP2LONG_9
BRNE FP2LONG_9 ;直到R26為 0 為止
FP2LONG_10: ;考慮符號(hào)位
SBRC R20,7
RJMP QUBU ;為負(fù)，則跳至QUBU-取補(bǔ) 返回
RET ;為正，返回
FP2LONG_11:
MOV R20,R19 ; 取浮點(diǎn)數(shù)數(shù)符存于R20最高位
ANDI R20,$80
ADD R18,R18 ; 將階碼移至R19
ADC R19,R19
SUBI R19,$80 ; 階碼減 $80 存于R19
SEC
ROR R18 ; 恢復(fù)尾數(shù)最高位 1
CPI R19,$80 ; 階碼差值與 $80 相比較
RET
ADD32F_1: ; 存儲(chǔ)結(jié)果
MOV R20,R25
MOV R19,R24
MOV R18,R23
MOV R17,R22
MOV R16,R21
ADD32F_2:
RJMP GGH ; 跳至GGH--處理結(jié)果
SUB32F: ; 四字節(jié)浮點(diǎn)減法運(yùn)算子程
SUBI R24,$80 ; 減數(shù)取反，視為浮點(diǎn)加法運(yùn)算
ADD32F: ; 四字節(jié)浮點(diǎn)加法運(yùn)算子程
RCALL YCL ; 調(diào)YCL子程
CPI R24,$80 ;先判加數(shù)是否為 0
BREQ ADD32F_2 ;為 0 則和為被加數(shù) 跳至ADD32F_2
CPI R19,$80 ;再判被加數(shù)是否為 0
BREQ ADD32F_1 ;為 0 則和為加數(shù) 跳至ADD32F_1
ADD32F_3:
MOV R26,R19 ;轉(zhuǎn)存被加數(shù)階碼
SUB R26,R24 ;R26=被加數(shù)階碼 減 加數(shù)階碼
BRVS ADD32F_2 ;溢出，跳至ADD32F_2 即加數(shù)可忽略
BRMI ADD32F_4 ;為負(fù)，跳至ADD32F_4
BRNE ADD32F_5 ;不等，跳至ADD32F_5
CP R16,R21
CPC R17,R22
CPC R18,R23
BRCC ADD32F_5
ADD32F_4:
RCALL ADD32F_16 ;調(diào)ADD32F_16，被加數(shù)和加數(shù)相交換
RJMP ADD32F_3 ;跳至ADD32F_3
ADD32F_5:
CPI R26,$18 ;階碼差值與 24 相比較
BRCS ADD32F_6 ;C=1，跳至ADD32F_6，即 < 24
CLR R21 ; > 24 加數(shù)清 0
CLR R22
CLR R23
ADD32F_6:
CPI R26,$08 ;階碼差值與 8 相比較
BRCS ADD32F_7 ;C=1，跳至ADD32F_7 (直至 < 8)
MOV R21,R22 ;加數(shù)尾數(shù)右移 8 位
MOV R22,R23 ;高 8 位清 0
CLR R23
SUBI R26,$08 ;階碼差值再減 8
RJMP ADD32F_6 ;跳至ADD32F_6
ADD32F_7:
AND R26,R26
BREQ ADD32F_9 ;直至R26=0，跳至ADD32F_9
ADD32F_8:
LSR R23 ;加數(shù)尾數(shù)右移 1 位
ROR R22
ROR R21
DEC R26 ;階碼差值減 1
BRNE ADD32F_8 ;不為 0 跳至ADD32F_8
ADD32F_9:
MOV R26,R20 ;被加數(shù)和加數(shù)是否同號(hào)
EOR R26,R25
BRMI ADD32F_10 ;異號(hào)，跳至ADD32F_10
RCALL ADD32F_13 ;同號(hào)，調(diào)ADD32F_13子程--尾數(shù)相加
BRCC ADD32F_2 ;C=0,無(wú)溢出，跳至ADD32F_2
ROR R18 ;C=1,溢出，尾數(shù)右移 1 位
ROR R17
ROR R16
SUBI R19,$FF ;階碼加 1
BRVC ADD32F_2 ;無(wú)溢出，跳至ADD32F_2，處理結(jié)果
RJMP JGZD ;溢出，跳至JGZD ，出結(jié)果
ADD32F_10:
RCALL ADD32F_14 ;調(diào)ADD32F_14子程--尾數(shù)相減
BRNE ADD32F_11 ;不等，跳至ADD32F_11
RJMP JGW0 ;跳至JGW0 ，出結(jié)果
ADD32F_11:
BRCC ADD32F_12 ;C=0,夠減，跳至ADD32F_12
RCALL ADD32F_15 ;C=1,不夠減，調(diào)ADD32F_15子程--取補(bǔ)
ADD32F_12:
AND R18,R18 ;判R18最高位是否位 1
BRMI ADD32F_2 ;為 1 ，跳至ADD32F_2，處理結(jié)果
ADD R16,R16 ;為 0 ，尾數(shù)左移一位
ADC R17,R17
ADC R18,R18
SUBI R19,$01 ;階碼減 1
BRVC ADD32F_12 ;無(wú)溢出，跳至ADD32F_12
RJMP JGZD ;溢出，跳至JGZD ，出結(jié)果
ADD32F_13: ;尾數(shù)相加
ADD R16,R21
ADC R17,R22
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -