导航: 
楼 主:
不知发在这儿合不合适，这段代码什么意思？;------------------------------------------------------------------------------
; FUNCTION
;------------------------------------------------------------------------------
MODULE ALG1_srDelayPT1
;--------------------------------------
; INCLUDES
;--------------------------------------
LSTOUT-
Ext SET OwnCodeBlock ; Include all used external interfaces...
$ALG_CI.INC
; *HS*
extern MAT_srSwapOp24
extern MAT_srISub24
extern MAT_srCom24
extern MAT_srShr24
extern MAT_srIAdd24
LSTOUT+
;--------------------------------------
; EXPORT FUNCTION
;--------------------------------------
PUBLIC ALG_srDelayPT1
;--------------------------------------
; CODE
;--------------------------------------
%RsegN CODE
ALG_srDelayPT1:
push bc ; save damping factors
mov b6,a ; transform Xe to
mov a,x ; ...internal PT1 format (24 bit)
mov b5,a ; ...Xe*256
mov b4,#0 ; ...i.e. low byte=0
call MAT_srSwapOp24 ; prepare for subtraction
call MAT_srISub24 ; Xe-Xa_old > 0?
bf a.0,goPlus ; yes: --> goPlus
call MAT_srCom24 ; no: transform to Xa_old-Xe> =0
pop ax ; restore damping factors
mov a,#0 ; shifting with filler bit=0
call MAT_srShr24 ; ...(Xa_old-Xe) divided by k
call MAT_srSwapOp24 ; Xa=
call MAT_srISub24 ; ...Xa_old-(Xa_old-Xe)/k
br rtDelayPT1 ; return
goPlus: pop ax ; restore damping factors
mov x,a ; valid damping factor k=DaRising
mov a,#0 ; shifting with filler bit=0
call MAT_srShr24 ; (Xe-Xa_old) divided by k
call MAT_srIAdd24 ; Xa=Xa_old+(Xe-Xa_old)/k
rtDelayPT1:
ret ; return
ENDMOD ; End