frameofdm.asm

基于TMS320F2812的AMR+RS编解码+OFDM调制解调源程序。是stand alone运行版本

        LRETR
        ; return occurs
	.endfunc	102,000000fc0h,454



	.sect	".text"
	.global	_OFDMDemo
	.sym	_OFDMDemo,_OFDMDemo, 32, 2, 0
	.func	110

;***************************************************************
;* FNAME: _OFDMDemo                     FR SIZE: 664           *
;*                                                             *
;* FUNCTION ENVIRONMENT                                        *
;*                                                             *
;* FUNCTION PROPERTIES                                         *
;*                            2 Parameter, 656 Auto,  6 SOE     *
;***************************************************************


;***************************************************************
;*                                                             *
;* Using -g (debug) with optimization (-o3) may disable key op *
;*                                                             *
;***************************************************************
_OFDMDemo:
	;.line	2
;* AR4   assigned to _BaseSignal
	.sym	_BaseSignal,12, 20, 17, 22
;* AR5   assigned to _SpecSignal
	.sym	_SpecSignal,14, 29, 17, 22
	.sym	_RefPhase,-668, 21, 9, 22
;* AR3   assigned to C$1
;* AR3   assigned to U$81
;* AR0   assigned to U$92
;* AR4   assigned to U$101
;* AR6   assigned to L$2
;* AR4   assigned to L$4
;* T     assigned to L$5
;* AR3   assigned to L$6
;* AR6   assigned to L$7
;* AR1   assigned to _pSpec
	.sym	_pSpec,6, 29, 4, 22
	.sym	_xI,-658, 5, 1, 32
	.sym	_xR,-656, 5, 1, 32
;* AR5   assigned to _pBase
	.sym	_pBase,14, 20, 4, 22
	.sym	_RefPhase,-644, 21, 1, 22
	.sym	_SpecSignal,-640, 29, 1, 22
	.sym	_BaseSignal,-642, 20, 1, 22
;* AR1   assigned to U$83
;* AR5   assigned to U$83
;* AR1   assigned to _pCarrPh
	.sym	_pCarrPh,6, 21, 4, 22
;* AR4   assigned to _pCarrPh
	.sym	_pCarrPh,12, 21, 4, 22
;* AR4   assigned to _pRxSpecI
	.sym	_pRxSpecI,12, 21, 4, 22
	.sym	_pRxSpecI,-652, 21, 1, 22
;* AR7   assigned to _pRxSpecR
	.sym	_pRxSpecR,18, 21, 4, 22
	.sym	_pRxSpecR,-650, 21, 1, 22
	.sym	_RxSpecR,-130, 53, 1, 2048,, 64
	.sym	_RxSpecI,-258, 53, 1, 2048,, 64
	.sym	_CarrPh,-638, 53, 1, 6080,, 190
        MOVL      *SP++,XAR1
        MOVL      *SP++,XAR2
        MOVL      *SP++,XAR3
        MOVZ      AR2,SP
        ADD       SP,#658
        SUBB      FP,#10
        MOVL      XAR0,#28              ; |111| 
        MOVL      *+FP[AR0],XAR5        ; |111| 
        MOVL      XAR0,#26              ; |111| 
        MOVL      *+FP[AR0],XAR4        ; |111| 
        MOVL      XAR0,#24              ; |111| 
        MOVL      ACC,*+FP[0]           ; |111| 
        MOVL      *+FP[AR0],ACC         ; |111| 
        MOVL      XAR0,#23
        MOV       *+FP[AR0],#0
        MOVL      XAR0,#22
        MOV       *+FP[AR0],#8
        MOVL      XAR0,#21
        MOV       *+FP[AR0],#9
L14:    
	;.line	18
        MOVL      XAR0,#22
        SETC      SXM
        MOV       ACC,*+FP[AR0]
        MOVL      XAR0,#26              ; |127| 
        MOVL      XAR6,*+FP[AR0]        ; |127| 
        ADDL      ACC,XAR6
        MOVL      XAR5,ACC              ; |127| 
	;.line	16
        MOVZ      AR7,SP                ; |125| 
        ADD       AR7,#-130             ; |125| 
	;.line	17
        MOVZ      AR4,SP                ; |126| 
        MOVB      XAR6,#63
        ADD       AR4,#-258             ; |126| 
L15:    
	;.line	21
        SETC      SXM
        MOV       ACC,*XAR5++           ; |130| 
        MOVL      *XAR7++,ACC           ; |130| 
	;.line	22
        MOVB      ACC,#0
        MOVL      *XAR4++,ACC           ; |131| 
	;.line	26
        BANZ      L15,AR6--
        ; branch occurs ; |135| 
	;.line	29
        MOVZ      AR4,SP                ; |138| 
        MOVZ      AR5,SP                ; |138| 
        ADD       AR4,#-130             ; |138| 
        ADD       AR5,#-258             ; |138| 
        MOVB      AL,#1                 ; |138| 
        LCR       #_FFT                 ; |138| 
        ; call occurs [#_FFT] ; |138| 
	;.line	32
        MOVZ      AR1,SP                ; |141| 
        MOVL      XAR0,#23
        ADD       AR1,#-638             ; |141| 
        SETC      SXM
        MOV       AL,*+FP[AR0]
        MOV       ACC,AL << 1           ; |141| 
        MOVL      XAR6,ACC              ; |141| 
        MOVU      ACC,AR1               ; |141| 
        ADDL      ACC,XAR6
        MOVL      XAR1,ACC              ; |141| 
	;.line	33
        MOVZ      AR4,SP                ; |142| 
        MOVL      XAR0,#18              ; |142| 
        SUBB      XAR4,#126
        MOVL      *+FP[AR0],XAR4        ; |142| 
	;.line	34
        MOVZ      AR4,SP                ; |143| 
        ADD       AR4,#-254             ; |143| 
        MOVL      XAR0,#16              ; |143| 
        MOVL      *+FP[AR0],XAR4        ; |143| 
        MOVL      XAR0,#15
        MOV       *+FP[AR0],#18
L16:    
	;.line	37
        MOVL      XAR0,#18
        MOVL      XAR4,*+FP[AR0]
        MOVL      XAR0,#12              ; |146| 
        MOVL      ACC,*+XAR4[0]         ; |146| 
        MOVL      *+FP[AR0],ACC         ; |146| 
	;.line	38
        MOVL      XAR0,#16
        MOVL      XAR4,*+FP[AR0]
        MOVL      XAR0,#10              ; |147| 
        MOVL      ACC,*+XAR4[0]         ; |147| 
        MOVL      *+FP[AR0],ACC         ; |147| 
	;.line	40
        MOVL      XAR0,#16
        MOVL      XAR4,*+FP[AR0]
        MOVL      ACC,*+XAR4[0]         ; |149| 
        LCR       #L$$TOFS              ; |149| 
        ; call occurs [#L$$TOFS] ; |149| 
        MOVL      XAR3,ACC              ; |149| 
        MOV       AL,#0
        MOV       AH,#17076
        MOVL      *-SP[2],ACC           ; |149| 
        MOVL      ACC,XAR3              ; |149| 
        LCR       #FS$$MPY              ; |149| 
        ; call occurs [#FS$$MPY] ; |149| 
        MOVL      *-SP[2],XAR3          ; |149| 
        LCR       #FS$$MPY              ; |149| 
        ; call occurs [#FS$$MPY] ; |149| 
        MOVL      XAR0,#16              ; |149| 
        MOVL      XAR4,*+FP[AR0]        ; |149| 
        MOVL      XAR0,#16              ; |149| 
        MOVL      XT,*+XAR4[0]          ; |149| 
        MOVL      XAR4,*+FP[AR0]        ; |149| 
        MOVL      XAR0,#18              ; |149| 
        IMPYL     P,XT,*+XAR4[0]        ; |149| 
        MOVL      XAR4,*+FP[AR0]        ; |149| 
        MOVL      XAR0,#18              ; |149| 
        MOVL      XT,*+XAR4[0]          ; |149| 
        MOVL      XAR4,*+FP[AR0]        ; |149| 
        MOVL      XAR3,ACC              ; |149| 
        IMPYL     ACC,XT,*+XAR4[0]      ; |149| 
        ADDL      ACC,P
        LCR       #L$$TOFS              ; |149| 
        ; call occurs [#L$$TOFS] ; |149| 
        MOVL      *-SP[2],ACC           ; |149| 
        MOVL      ACC,XAR3              ; |149| 
        LCR       #FS$$DIV              ; |149| 
        ; call occurs [#FS$$DIV] ; |149| 
        LCR       #FS$$TOI              ; |149| 
        ; call occurs [#FS$$TOI] ; |149| 
        SETC      SXM
        MOV       ACC,AL << 1           ; |149| 
        MOVL      XAR4,#_asin_tab       ; |149| 
        ADDL      XAR4,ACC
        MOVL      ACC,*+XAR4[0]         ; |149| 
        MOVL      *+XAR1[0],ACC         ; |149| 
	;.line	41
        MOVL      XAR0,#12
        MOVL      ACC,*+FP[AR0]
        B         L17,LT                ; |150| 
        ; branch occurs ; |150| 
        MOVL      XAR0,#10
        MOVL      ACC,*+FP[AR0]
        B         L19,LT                ; |150| 
        ; branch occurs ; |150| 
L17:    
	;.line	45
        MOVL      XAR0,#12
        MOVL      ACC,*+FP[AR0]
        B         L20,GEQ               ; |154| 
        ; branch occurs ; |154| 
        MOVL      XAR0,#10
        MOVL      ACC,*+FP[AR0]
        B         L18,LEQ               ; |154| 
        ; branch occurs ; |154| 
	;.line	51
        MOVL      XAR4,#102943          ; |160| 
        MOVL      ACC,XAR4              ; |160| 
        SUBRL     *+XAR1[0],ACC         ; |160| 
        B         L20,UNC               ; |160| 
        ; branch occurs ; |160| 
L18:    
	;.line	47
        MOVL      XAR4,#102943          ; |156| 
        MOVL      ACC,XAR4              ; |156| 
        ADDL      ACC,*+XAR1[0]         ; |156| 
        MOVL      *+XAR1[0],ACC         ; |156| 
	;.line	48
        B         L20,UNC               ; |157| 
        ; branch occurs ; |157| 
L19:    
	;.line	43
        MOVL      XAR4,#205887          ; |152| 
        MOVL      ACC,XAR4              ; |152| 
        SUBRL     *+XAR1[0],ACC         ; |152| 
L20:    
	;.line	53
        MOVL      XAR0,#18
        MOVL      ACC,*+FP[AR0]
        MOVL      XAR0,#18              ; |162| 
        ADDB      ACC,#2                ; |162| 
        MOVL      *+FP[AR0],ACC         ; |162| 
	;.line	54
        MOVL      XAR0,#16
        MOVL      ACC,*+FP[AR0]
        MOVL      XAR0,#16              ; |163| 
        ADDB      ACC,#2                ; |163| 
        MOVL      *+FP[AR0],ACC         ; |163| 
	;.line	55
        ADDB      XAR1,#2               ; |164| 
	;.line	56
        MOVL      XAR0,#15
        MOVZ      AR4,*+FP[AR0]
        MOVL      XAR0,#15              ; |165| 
        SUBB      XAR4,#1               ; |165| 
        MOV       *+FP[AR0],AR4         ; |165| 
        MOVL      XAR0,#15              ; |165| 
        MOVZ      AR4,*+FP[AR0]         ; |165| 
        CMP       AR4,#-1               ; |165| 
        BF        L16,NEQ               ; |165| 
        ; branch occurs ; |165| 
	;.line	58
        MOVL      XAR0,#22
        MOV       AL,*+FP[AR0]
        MOVL      XAR0,#22              ; |167| 
        ADDB      AL,#72                ; |167| 
        MOV       *+FP[AR0],AL          ; |167| 
        MOVL      XAR0,#23              ; |167| 
        MOV       AL,*+FP[AR0]          ; |167| 
        MOVL      XAR0,#23              ; |167| 
        ADDB      AL,#19                ; |167| 
        MOV       *+FP[AR0],AL          ; |167| 
        MOVL      XAR0,#21              ; |167| 
        MOVZ      AR4,*+FP[AR0]         ; |167| 
        MOVL      XAR0,#21              ; |167| 
        SUBB      XAR4,#1               ; |167| 
        MOV       *+FP[AR0],AR4         ; |167| 
        MOVL      XAR0,#21              ; |167| 
        MOVZ      AR4,*+FP[AR0]         ; |167| 
        CMP       AR4,#-1               ; |167| 
        BF        L14,NEQ               ; |167| 
        ; branch occurs ; |167| 
        MOVL      XAR0,#24
        MOVZ      AR3,SP
        MOVL      XAR1,*+FP[AR0]
        MOVL      XAR0,#28
        ADD       AR3,#-638
        MOVL      XAR0,*+FP[AR0]
        MOVB      XAR4,#18
L21:    
	;.line	63
        MOVL      XAR5,#51470           ; |172| 
        MOVL      *-SP[2],XAR5          ; |172| 
        MOVL      ACC,*XAR3++           ; |172| 
        MOVL      XAR5,#231622          ; |172| 
        SUBL      ACC,*XAR1++           ; |172| 
        ADDL      ACC,XAR5
        FFC       XAR7,#L$$DIV          ; |172| 
        ; call occurs [#L$$DIV] ; |172| 
        ANDB      AL,#0x03              ; |172| 
        MOV       *XAR0++,AL            ; |172| 
	;.line	65
        BANZ      L21,AR4--
        ; branch occurs ; |174| 
	;.line	66
        MOVL      XAR0,#28
        MOVZ      AR4,SP
        MOVL      XAR1,*+FP[AR0]
        ADD       AR4,#-638
        ADDB      XAR1,#19              ; |175| 
        MOV       T,#8
L22:    
        MOVB      XAR3,#18
L23:    
	;.line	74
        MOVL      XAR5,#51470           ; |183| 
        MOVB      XAR0,#38              ; |183| 
        MOVL      *-SP[2],XAR5          ; |183| 
        MOVL      ACC,*+XAR4[AR0]       ; |183| 
        MOVL      XAR5,#231622          ; |183| 
        SUBL      ACC,*+XAR4[0]         ; |183| 
        ADDL      ACC,XAR5
        FFC       XAR7,#L$$DIV          ; |183| 
        ; call occurs [#L$$DIV] ; |183| 
        ANDB      AL,#0x03              ; |183| 
        MOV       *XAR1++,AL            ; |183| 
	;.line	77
        ADDB      XAR4,#2               ; |186| 
	;.line	78
        BANZ      L23,AR3--
        ; branch occurs ; |187| 
	;.line	79
        MOVZ      AR5,T
        SUBB      XAR5,#1               ; |188| 
        MOV       T,AR5                 ; |188| 
        MOVZ      AR0,T                 ; |188| 
        CMP       AR0,#-1               ; |188| 
        BF        L22,NEQ               ; |188| 
        ; branch occurs ; |188| 
	;.line	82
        MOVZ      AR4,SP                ; |191| 
        MOVL      XAR0,#24              ; |191| 
        ADD       AR4,#-296             ; |191| 
        MOVL      XAR5,*+FP[AR0]        ; |191| 
        MOVB      XAR6,#18
L24:    
	;.line	85
        MOVL      ACC,*XAR4++           ; |194| 
        MOVL      *XAR5++,ACC           ; |194| 
	;.line	87
        BANZ      L24,AR6--
        ; branch occurs ; |196| 
	;.line	88
        ADD       SP,#-658
        MOVL      XAR3,*--SP
        MOVL      XAR2,*--SP
        MOVL      XAR1,*--SP
        LRETR
        ; return occurs
	.endfunc	197,000000fc0h,664


;***************************************************************
;* UNDEFINED EXTERNAL REFERENCES                               *
;***************************************************************
	.global	_FFT
	.global	L$$TOFS
	.global	FS$$MPY
	.global	FS$$DIV
	.global	FS$$TOI
	.global	L$$DIV

;***************************************************************
;* TYPE INFORMATION                                            *
;***************************************************************
	.sym	_WordType, 0, 3, 13, 16
	.sym	_DType, 0, 13, 13, 16