【正文】 。 對正弦和余弦均采用循環(huán)尋址方式， I8中存放正弦地址； I9中存放 sine基址加 N/4，即余弦的地址：其循環(huán)長度存在 L L9中，均為 64。分別用來存放計算結果的實部和虛部。 4）程序的數(shù)據(jù)處理部分采用子程序調用方式，子程序名為 dft。 5） B0＝ input：來取出輸入數(shù)據(jù)的地址，放入 I0，并設定循環(huán)基址， L0 寄存器中放入數(shù)據(jù)循環(huán)長度。由于輸入的數(shù)據(jù)和旋轉因子表均采用循環(huán)尋址方 式。在最后一個數(shù)據(jù)（數(shù)組中）被讀取后，地址寄存器中的地址會自動變?yōu)閿?shù)組的起始地址。外循環(huán)中，每一循環(huán) k值加 1，則旋轉因子表尋址步長也應加 1。 7）程序中用到的指令含義 B0=input； 設定循環(huán)基址，并使 I0＝ ipput L0＝＠ input； 將數(shù)組 input[N]的長度值賦給 L0 F8＝ PASS F15； 將寄存器 F15的值賦給 F8 F0=DM（ I0， M1）； 將 I0地址所在的值通過 DM數(shù)據(jù)總線傳輸給 F0寄存器， 并修改 IO的地址值，即 I0＝ I0＋ M1 F5＝ PM（ I9， M8）； 將 I9地址所在的值通過 PM數(shù)據(jù)總線傳輸給 F5，并修 改 I9＝ I9＋ M8 DM（ I2， M0） =F9； 將 F9的值通過 DM數(shù)據(jù)總線存入到 I2地址，并將 I2= I2十 M1 MODIFY（ I10， M9）；修改 I10地址值 I10＝ I10十 M9 源程序代碼： ／ * DFT． ASM N點實數(shù) DFT N－ l real（ k）＋ j*imag（ k）＝ SUM input（ n） *[C－ j*S]； k＝ 0 to N－ l n＝ 0 這里： C＝ COS（ 2*PI*k*n/N）， S=sin（ 2*pi*k*n/N）， j=sqrt（ 1） */ ＃ include “ ” ＃ define N 64 .SECTION／ DM dm_data； ／ *變量定義在 DM數(shù)據(jù)段 *／ .VAR Input［ N］ =“ ”； ／ * 輸入數(shù)據(jù) *／ .VAR real[N] ＝“ ”； ／ *輸出數(shù)據(jù)的實部 *／ .VAR imagp[N]＝“ ”； ／ *輸出數(shù)據(jù)的虛部 *／ .SECTION／ PM pm_data； .VAR sine［ N］ =“ sin64． dat”； ／ *定義正弦旋轉因子表，放在 PM數(shù)據(jù)段 *／ ／ *余弦旋轉因子表由正弦表移動 N／ 4而得 *／ .VAR modul[N]= “” .SECTION／ PM pm_rsti； NOP； USTAT2＝ 0x108421； ／ *USTAT2為用戶自定義寄存器 *／ DM（ WAIT） =USTAT2； ／ *WAIT寄存器用來設定與外設數(shù)據(jù)傳 輸時的等待周期及狀態(tài)數(shù) *／ JUMP Start； .SECTION／ PM pm_code； /*程序代碼段 *／ START： M1=l； ／ *地址修改寄存器 */ M9=1； B0=input 。 ／ *實部輸出地址 *／ L2=0； nop。 /*調用子程序 ，計算 DFT的模值 *／ end： IDLE； /********* 計算 DFT子程序 ****************************/ dft： /*dft子程序 *／ B8＝ sine； ／ *將 sine放到 I8基址，并設定循環(huán)基址 *／ L8＝＠ sine； B9=sine； ／ *Cos表的循環(huán)基址 *／ I9＝ sine＋ N/4； ／ *通過 sine＋ N／ 4得到 cos放到 I9基址 *／ L9=＠ sine； ／ *循環(huán)長度． *／ I10=0； ／ *用來調整 M8的步長 *／ L10＝ 0； F15＝ 0； ／ *在每一外循環(huán)時，對 F F9清 0*／ LCNTR＝ N， DO outer UNTIL LCE； ／ *外循環(huán) *／ F8＝ PASS F15， M8＝ I10； F9=PASS F15， F0＝ DM（ I0， M1）， F5=PM（ I9， M8）； ／ *上二句是清 F F9寄存器，設定 M8步長 ，并讀取 X（ n）和 COS值 *／ F12=F0*F5， F4＝ PM（ I8， M8）； LCNTR=N－ l， DO inner UNTIL LCE。 F13＝ F0*F4 , F9＝ F9＋ F12； ／ * F8中放虛部值， F9中放實部值 *／ F8=F8－ F13， DM（ I2， M1）＝ F9； ／ *存實部值 *／ MODIFY(I10, M9)； ／ *使旋轉因子表的尋址步長加一 *／ outer： DM（ I1， M1） =F8 ／ *存虛部值 *／ RTS； /********* 求模計算的子程序 ****************************/ modl: I0=real。 I1=imag。 I8=modul。 F2=DM(I0,M1)。 F3=DM(I1,M1)。 F8=F2*F6。 LCNTR=N, DO mod_cal UNTIL LCE。 F4=RSQRTS F13, F7=F3。 F13=F3*F7,F6=F2。 NOP。 RTS。 2）選擇輸入數(shù)據(jù)文件 編譯程序前，在下述程序行中將輸入數(shù)據(jù)文件改為 ： .VAR input[N]= 。 3）編譯程序 分析、理解源程序，