仅仅改动几个地址,即可符合题目要求。
把程序中的:
70H,改为 60H;
71H,改为 61H;
81H,改为 71H;
82H,改为 72H。
即可。
线性缓冲区实现FIR滤波器程序清单:
.title “FIR1.ASM”
.mmregs
.def start
x .usect “x”,8
PA0 .set 0
PA1 .set 1
.data
COEF: .word 1*32768/10
.word 2*32768/10
.word -4*32768/10
.word 3*32768/10
.word -4*32768/10
.word 2*32768/10
.word 1*32768/10
.text
start: SSBX FRCT
STM #x+7,AR2
STM #6,AR0
LD #x+1,DP
PORTR PA1,@x+1
FIR1: RPTZ A,#6
MACD *AR2-,COEF,A
STH A,*AR2
PORTW *AR2+,PA0
BD FIR1
PORTR PA1,*AR2+0
.end
用循环缓冲区实现FIR滤波器
程序清单:
.title “FIR2.ASM”
.mmregs
.def start
.bss y,1
xn .usect “xn”,7
b0 .usect “b0”,7
PA0 .set 0
PA1 .set 1
.data
table: .word 1*32768/10
.word 2*32768/10
.word 3*32768/10
.word 4*32768/10
.word 5*32768/10
.word 6*32768/10
.word 7*32768/10
.text
start: SSBX FRCT
STM #b0,AR1
RPT #6
MVPD table,*AR1+
STM #xn+6,AR2
STM #b0+6,AR3
STM #7,BK
STM #-1,AR0
LD #xn,DP
PORTR PA1,@xn
FIR2: RPTZ A,#6
MAC *AR2+0%,*AR3+0%,A
STH A,@y
PORTW @y,PA0
BD FIR2
PORTR PA1,*AR2+0%
.end
链接命令文件
FIR2.obj
vectors.obj
-o FIR2.out
-m FIR2.map
-e start
MEMORY
{
PAGE0:
EPROM:org=0E000h,
len=1000h
VECS: org=0FF80h,
len=0080h
PAGE1:
SPRAM:org=0060h,
len=0020h
DARAM:org=0080h,
len=1380h
}
SECTIONS
{
.text:>EPROM PAGE 0
.data:>EPROM PAGE 0
.bss :>SPRAM PAGE 1
xn:align(8){}>DARAM PAGE 1
b0:align(8){}>DARAM PAGE 1
.vections:VECS PAGE 0
}
xiexie
分类: 电脑/网络 >>程序设计 >>其他编程语言问题描述:
明天晚上要上机实验微机原理,如果我做不出来那程序,那就完蛋了。虽然说是超级简单,但是对于我一个新学者,并且是电脑文盲来说,艰巨性还是可以想象的。
题目要求是:(1)单子节无符号数排序:DATANUM单元开始存放双字节无符号数,表示要排序数据的个数;DATAS单元开始存放要排序的数据,数据格式至少10个,程序运行之后,这些数据按照由小到大的顺序仍然存放于DATAS单元开始的位置‘
(2)去极值滤波:某控制系统为了抗干扰,采用去极值滤波法处理采集数据,采集数据所用A/D转换器精度为12位,取连续6个A/D采样值(双字节,低12位),要求去掉最大值和最小值,将余下的4个数求平均值,用该平均值代表当前时刻系统状态的真值。试编一程序完成这一滤波过程。
以上算法我也懂,但是刚学微机,指令什么的都不知道该如何用。各位好手,麻烦帮帮忙,帮我编写以上两个小程序,最好的给出注释。先给200,满意的追100
解析:
你等我
DATANUM=10 ;设有10个数据
STACK SEGMENMT STACK ‘STACK’
DW 100H DUP(?)
TOP LABEL WORD
STACK ENDS
DATA SEGMENT
DATABUF DW DATANUM
DB DATANUM DUP(?)
DATA EDATANUMDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,ES:DATA,SS:STACK
START:
MOV AX,DATA
MOV DS,AX
MOV ES,AX
MOV AX,STACK
MOV SS,AX
LEA SP,TOP
取出随机数据
MOV CX,DATABUF
LEA SI,DATABUF+2
MOV BL,23
MOV AL,11
LP:
MOV [SI],AL
INC SI
ADD AL,BL
LOOP LP
数据排序
MOV CX,DATABUF
DEC CX
LEA SI,DATABUF+2
ADD SI,CX
LP1:
PUSH CX
PUSH SI
LP2:
MOV AL,[SI]
CMP AL,[SI-1]
JAE NOXCHG
XCHG AL,[SI-1]
MOV [SI],AL
NOXCHG:
DEC SI
LOOP LP2
POP SI
POP CX
LOOP LP1
;数据排序结束
MOV AH,4CH 返回DOS
MOV AL,0
IDATANUMT 21H
CODE ENDS
END START
我这个连中断都用上了
第二题
PUSH PSW ;保护现场
PUSH A
CLR C ;进位标志位清零
MOV DATA,DATA2
MOV A,DATA1
SUBB A,DATA ;求Yn-1 -Yn
JNC COMPARE ;如果Yn-1 -Yn≥0,转COMPARE
CPL A ;如果Yn-1 -Yn<0, 求补
INC A
COMPARE: CLR C
SUBB A,LIMIT ;│Yn-Yn-1│和△y比较
JC OVER ;如果│Yn-Yn-1│≤△y,DATA2→DATA
MOV DATA,DATA1 ;如果│Yn-Yn-1│>△y,DATA1→DATA
OVER: POP A ;恢复现场
POP PSW
RET ;返回
这个作为参考,是MCS的
入口 :A,SDAT,DELTY
占用资源:B
堆栈需求:2字节
出口 :A
JUGFILT :MOV B,A
CLR C
SUBB A,SDAT
JNC JUGFT1
CPL A
INC A
JUGFT1 :SETB A
SUBB A,#DELTY
JNC JUGFT3
MOV A,SDAT
RET
JUGFT3 :MOV A,B
MOV SDAT,A
RET
中位值滤波程序
入口 :ADDPH,ADDPL,N
占用资源:ESELSORT
堆栈需求:4字节
出口 :A
MEDFILT :LCALL ESELSORT
MOV A,N
CLR C
RRC A
ADD A,ADDPL
MOV DPL,A
MOV A,ADDPH
MOV DPH,A
JNC MEDFT1
INC DPH
MEDFT1 :MOVX A,@DPTR
RET
N点算术平均滤波
入口 :ADDPH,ADDPL,N
占用资源:B,R3,R4
堆栈需求:2字节
出口 :A
AVFILT :MOV A,ADDPL
MOV DPL,A
MOV A,ADDPH
MOV DPH,A
CLR A
MOV R3,A
MOV R4,A
MOV R7,N
AVFT1 :MOVX A,@DPTR
INC DPTR
ADD A,R4
MOV R4,A
JNC AVFT2
INC R3
AVFT2 :DJNZ R7,AVFT1
MOV R7,N
MOV R2,#00H
LCALL NDIV31
MOV A,R4
RET
N点加权平均滤波
入口 :ADDPH,ADDPL,N
占用资源:B,R3,R4
堆栈需求:2字节
出口 :A
QAVFILT :CLR A
MOV R3,A
MOV R4,A
MOV R7,N
MOV P2,ADDPH
MOV R1,ADDPL
MOV DPTR,#QAVTAB
QAVFT1 :MOVC A,@A+DPTR
MOV B,A
MOVX A,@R1
INC DPTR
INC R1
MUL AB
ADD A,R4
MOV R4,A
MOV A,B
ADDC A,R3
MOV R3,A
DJNZ R7,QAVFT1
MOV A,R4
JNB ACC.7,QAVFT2
INC R3
QAVFT2 :MOV A,R3
RET
QAVTAB :DB
一阶加权滞后滤波程序
入口 :A,DELTY
占用资源:B,R3,R4
堆栈需求:2字节
出口 :A
BQFILT :MOV B,A
CLR A
MOV DPTR,#ABTAB
MOVC A,A+DPTR
MUL AB
MOV R4,A
MOV R3,B
MOV A,01H
MOVC A,A+DPTR
MOV B,DELTY
MUL AB
ADD A,R4
MOV R4,A
MOV A,B
ADDC A,R3
MOV R3,A
MOV A,R4
JNB ACC.7,FT1
INC R3
FT1 :MOV A,R3
MOV DELTY,A
RET
BQTAB :DB 80H,80H
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)