用汇编语言写去极值平均滤波程序

用汇编语言写去极值平均滤波程序,第1张

老师给出的程序,大部分,都不用动,

仅仅改动几个地址,即可符合题目要求。

把程序中的:

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


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/8045766.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-12
下一篇 2023-04-12

发表评论

登录后才能评论

评论列表(0条)

保存