?? ad.lst
字號:
D:\TIC2XX\C2000\CGTOOLS\BIN\DSPA.EXE Ad.asm Ad.obj -ls -v2xx
TMS320C1x/C2x/C2xx/C5x COFF Assembler Version 7.00 Sat Jul 14 16:18:01 2001
Copyright (c) 1987-1999 Texas Instruments Incorporated
Ad.asm PAGE 1
1 ;*************************************************************
2 ; File Name : Ad.asm
3 ; Originator : Texas Instrument-Chongqing University DSPs Lab.
4 ; Description: LF2407 DSK 32 Points FFT Algorithms Test Program
5 ; Author : Zhuo Qingfeng
6 ; Last Update: 7-14-2001
7 ;**************************************************************
8 ; INPUT : NO
9 ; OUTPUT :The sample result store in 0x800-0x9ff(i.e.0x800--
10 ; 0x81f-->channel0,0x820--0x83f-->channel1...),flag.1
11 ; (0x60h) indicates AD conv.completion.
12 ; USED REGS.:ACC,DP,ST0,ST1,AR0,AR1,AR2,ADCOUNT,flag and Timer4
13 ;***************************************************************
14 0000 ADRESULT .usect ".ad",16*32 ;Samples-->SRAM(0800H--0A00H)
15 0200 ADCOUNT .usect ".ad",1
16 0201 ADCHANN .usect ".ad",1 ;FFT Channel NO.
17 00e1 DP_PF2 .set 225
18 00ea DP_EVB .set 234
19 0014 DP_SARAM2 .set 20 ;Page of SARAM(A00H/80H)
20 7505 T4CNT .set 7505h ; T2 Counter
21 7507 T4PER .set 7507h ; T2 Period
22 7508 T4CON .set 7508h
23 7500 GPTCONB .set 7500h
24 752d EVBIMRB .set 752dh
25 7530 EVBIFRB .set 7530h
26 70a0 ADCTRL1 .set 70A0h ; ADC Control reg 1
27 70a1 ADCTRL2 .set 70A1h ; ADC Control reg 2
28 70a2 MAXCONV .set 70A2h ; Maximum conversions in sequence
29 70a3 CHSELSEQ1 .set 70A3h ; Channel select fields: Results 3,2,1,0
30 70a4 CHSELSEQ2 .set 70A4h ; Channel select fields: Results 7,6,5,4
31 70a5 CHSELSEQ3 .set 70A5h ; Channel select fields: Results 11,10,9,8
32 70a6 CHSELSEQ4 .set 70A6h ; Channel select fields: Results 15,14,13,12
33 70a8 RESULT0 .set 70A8h ; Conversion result 0
34
35 .def ADINIT,ADCINT_ISR,AD,ADRESULT,ADCHANN
36 .ref INT1RET,flag
37
38 0000 .text
39 ;---------------------------------------
40 0000 ADINIT:
41 0000 bcea LDP #DP_EVB ;Timer4 Setting
42 0001 ae05 SPLK #0000H,T4CNT
0002 0000
43 0003 ae08 SPLK #170CH,T4CON ;Continuous-up,x/128 174CH
0004 170c
44 0005 ae07 SPLK #075H,T4PER ;24M,20ms/32
0006 0075
45 0007 ae00 SPLK #0400H,GPTCONB
0008 0400
46 0009 ae30 SPLK #0FFFFH,EVBIFRB
000a ffff
47 000b ae2d SPLK #0000H,EVBIMRB ;Disable all Timer4 Int.
000c 0000
48
TMS320C1x/C2x/C2xx/C5x COFF Assembler Version 7.00 Sat Jul 14 16:18:01 2001
Copyright (c) 1987-1999 Texas Instruments Incorporated
Ad.asm PAGE 2
49 000d bce1 LDP #DP_PF2
50 000e ae20 SPLK #0010H,ADCTRL1 ;24M,Disable Cal&Sel-test
000f 0010
51 0010 ae21 SPLK #8404H,ADCTRL2 ;Start/Stop Mode,Int.1
0011 8404
52 0012 ae22 SPLK #000FH,MAXCONV ;16 Channels
0013 000f
53 0014 ae23 SPLK #3210H,CHSELSEQ1
0015 3210
54 0016 ae24 SPLK #7654H,CHSELSEQ2
0017 7654
55 0018 ae25 SPLK #0BA98H,CHSELSEQ3
0019 ba98
56 001a ae26 SPLK #0FEDCH,CHSELSEQ4
001b fedc
57
58 001c bc14 LDP #DP_SARAM2 ;0A00H/80H
59 001d ae00- SPLK #ADRESULT,ADCOUNT
001e 0000-
60
61 001f ef00 RET
62 ;-----------------------------------
63 0020 bc00 AD: LDP #0
64 0021 6900! LACL flag
65 0022 bfb0 AND #0FFFDH ;Clear flag.1
0023 fffd
66 0024 9000! SACL flag
67
68 0025 bcea LDP #DP_EVB ;AD starting Sub.
69 0026 6908 LACL T4CON
70 0027 bfc0 OR #40H ;Start Timer4-->Start AD
0028 0040
71 0029 9008 SACL T4CON
72 002a ef00 RET
73 ;-----------------------------------
74 002b ADCINT_ISR:
75 002b be46 CLRC SXM
76 002c bc14 LDP #DP_SARAM2 ;0A00H/80H
77 002d 0100- LAR AR1,ADCOUNT
78 002e b00f LAR AR0,#15 ;16 Channels
79 002f bf0a LAR AR2,#RESULT0
0030 70a8
80
81 0031 8b8a MAR *,AR2
82 0032 1aa9 ADC1 LACC *+,10,AR1
83 0033 9880 SACH *
84 0034 7820 ADRK #32
85 0035 8b88 MAR *,AR0
86 0036 7b9a BANZ ADC1,*-,AR2
0037 0032'
87
88 0038 bce1 LDP #DP_PF2
89 0039 6921 LACL ADCTRL2
90 003a bfc0 OR #4000H ;Set bit14--Reset SEQ1
TMS320C1x/C2x/C2xx/C5x COFF Assembler Version 7.00 Sat Jul 14 16:18:01 2001
Copyright (c) 1987-1999 Texas Instruments Incorporated
Ad.asm PAGE 3
003b 4000
91 003c bfb0 AND #0FFDFH ;Clear bit9--INT FLAG SEQ1
003d ffdf
92 003e 9021 SACL ADCTRL2
93
94 003f bc14 LDP #DP_SARAM2
95 0040 6900- LACL ADCOUNT
96 0041 bfa0 SUB #ADRESULT+31
0042 001f-
97 0043 e38c BCND ADC2,GEQ
0044 004a'
98 0045 bf90 ADD #ADRESULT+32 ;<32
0046 0020-
99 0047 9000- SACL ADCOUNT
100 0048 7980 B INT1RET
0049 0000!
101
102 004a ae00- ADC2: SPLK #ADRESULT,ADCOUNT ;=32
004b 0000-
103 004c bc00 LDP #0
104 004d 6900! LACL flag
105 004e bfc0 OR #2H ;Set flag.1
004f 0002
106 0050 9000! SACL flag
107
108 0051 bcea LDP #DP_EVB
109 0052 6908 LACL T4CON
110 0053 bfb0 AND #0FFBFH ;Stop Timer4-->Stop AD
0054 ffbf
111 0055 9008 SACL T4CON
112
113 0056 7980 B INT1RET
0057 0000!
114 ;-----------------------------------
115 END
No Errors, No Warnings
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -