DSP.doc

; USER Program Demo ! 用户程序演示; It Start At 0x1800,and interrupt vector don't changed, At 200h !; 这段程序开始于 1800H ,在地址 200H 处中断向量不会改变! ; Please Don't modify PMST ! 请不要修改程序状态控制方式位! ; Some data put in 080h DP=1 一些数据放在 080H 数据单元,页面指针 DP=1 ; SP may use system stack,so user needn't setup SP ! 堆栈指针 SP 可以用作系统堆栈,因此用户不必;设置 SP ;----------------------------------------------------------------- .title "for test user program ... "; ; _c_int00 .ref fs_start,errno op1valh .set 4140h ; op1valh= 浮点数 op1vall .set 0000h ;op1vall= op2valh .set 4140h ;floating point number op2valh= op2vall .set 0000h ;op2vall= initst0 .set 1800h ;set st0 initial number 设置 st0 为整数(=1800h) initst1 .set 2900h ;设置 st1 为整数(=2900h) ; rlthm,1 ;result high mantissa,address is 80h .bss rltlm,1 ;result low mantissa,address is 81h .bss rltsign,1 ;ressult sigh,address is 82h .bss rltexp,1 ;result exponent,address is 83h .bss op1hm,1 ;op1 high mantissa,address is 84h .bss op1lm,1 ;op1 low mantissa,address is 85h .bss op1se,1 ;op1 sigh and exp,address is 86h .bss op2se,1 ;op2 sigh and exponent,address is 87h .bss op2hm,1 ;op2 high mantissa,address is 88h .bss op2lm,1 ;op2 low mantissa,address is 89h .bss op1_hsw,1 ;op1 packed high,address is 8ah .bss op1_lsw,1 ;op1 packed low,address is 8bh .bss op2_hsw,1 ;op2 packed high,address is 8ch .bss op2_lsw,1 ;op2 packed low,address is 8dh _c_int00: stm #initst0,st0 ; stm #initst1,st1 ; rsbx C16 ;把 C16 复位 ld #op1lm,dp ;设置 dp 指针, dp=85h ( dp 为 9位) ld #op1valh,a ; 加载浮点数给累加器 A,(A)=4140h stl a,op1_hsw ;把 A(15~0) 传送到 op1_hsw=40H ld #op1vall,a ;加载浮点数给累加器 A,(A)=0000H stl a,op1_lsw ;把 A(15~0) 传送到 op1_lsw=00H ld #op2valh,a; 加载浮点数到累加器 A,(A)=4140h stl a,op2_hsw; 把 A(15~0) 传送到 op2_hsw=40H ld #op2vall,a; 加载浮点数给累加器 A,(A)=0000H stl a,op2_lsw; 把 A(15~0) 传送到 op1_lsw=00H nop ;1st breakpoint S! 空操作,设置断点;----------- conversion of floating point format - unpack ------- ;浮点数转换格式 dld op1_hsw,a; 加载 op1 到累加器 A (双精度操作) sfta a,8; 累加器 A 的内