NORM ACC, *ind
6-252
Example
; Normalize the contents of VarA,
; XAR2 will contain shift value at the end of the operation:
MOVL ACC,@VarA ; ACC = VarA
MOVB XAR2,#0 ; Initialize XAR2 to zero
NOP *,ARP2 ; Set ARP pointer to point to XAR2
SBF Skip,EQ ; Skip if ACC value is zero
RPT #31 ; Repeat next operation 32 times
||NORM ACC,*++ ; Normalize contents of ACC
Skip: