浮点数中值滤波.asm

8个汇编程序

SAMP1A     EQU        30H  
SAMP1B     EQU        31H
SAMP1C     EQU        32H
SAMP2A     EQU        33H
SAMP2B     EQU        34H
SAMP2C     EQU        35H
SAMP3A     EQU        36H
SAMP3B     EQU        37H
SAMP3C     EQU        38H
SAMP4A     EQU        39H
SAMP4B     EQU        3AH
SAMP4C     EQU        3BH
SAMP5A     EQU        3CH
SAMP5B     EQU        3DH
SAMP5C     EQU        3EH
           ORG 0000H
           LJMP 0100H
           ORG 0100H
MAIN:      MOV R0,#SAMP1A
           MOV A,#05H
           MOV @R0,A
           INC R0
           MOV A,#23H
           MOV @R0,A
           INC R0
           MOV A,#78H
           MOV @R0,A
           INC R0
           MOV A,#05H
           MOV @R0,A
           INC R0
           MOV A,#23H
           MOV @R0,A
           INC R0
           MOV A,#9AH
           MOV @R0,A
           INC R0
           MOV A,#05H
           MOV @R0,A
           INC R0
           MOV A,#58H
           MOV @R0,A
           INC R0
           MOV A,#9BH
           MOV @R0,A
           INC R0
           MOV A,#06H
           MOV @R0,A
           INC R0
           MOV A,#58H
           MOV @R0,A
           INC R0
           MOV A,#9BH
           MOV @R0,A
           INC R0
           MOV A,#06H
           MOV @R0,A
           INC R0
           MOV A,#58H
           MOV @R0,A
           INC R0
           MOV A,#10H
           MOV @R0,A
INSER:     MOV R2,#04H
SORT:      MOV A,R2
           MOV R3,A
           MOV R0,#SAMP1A
LOOP:      MOV A,@R0
           MOV R1,A
           INC R0
           INC R0
           INC R0
           CLR C
           SUBB A,@R0
           JNC DONE
           MOV A,@R0
           DEC R0
           DEC R0
           DEC R0
           XCH A,@R0
           INC R0
           INC R0
           INC R0
           MOV @R0,A
           INC R0
           MOV A,@R0
           DEC R0
           DEC R0
           DEC R0
           XCH A,@R0
           INC R0
           INC R0
           INC R0
           MOV @R0,A
           INC R0
           MOV A,@R0
           DEC R0
           DEC R0
           DEC R0
           XCH A,@R0
           INC R0
           INC R0
           INC R0
           MOV @R0,A
           DEC R0
           DEC R0
           SJMP DONE1
DONE:      JNZ DONE2
           DEC R0
           DEC R0
           MOV A,@R0
           INC R0
           INC R0
           INC R0
           CLR C
           SUBB A,@R0
           JNC DONE3
           MOV A,@R0
           DEC R0
           DEC R0
           DEC R0
           XCH A,@R0
           INC R0
           INC R0
           INC R0
           MOV @R0,A
           INC R0
           MOV A,@R0
           DEC R0
           DEC R0
           DEC R0
           XCH A,@R0
           INC R0
           INC R0
           INC R0
           MOV @R0,A
           DEC R0
           DEC R0
           SJMP DONE1
DONE3:     JNZ DONE4
           DEC R0
           DEC R0
           MOV A,@R0
           INC R0
           INC R0
           INC R0
           CLR C
           SUBB A,@R0
           JNC DONE5
           MOV A,@R0
          ; MOV A,@R0
           DEC R0
           DEC R0
           DEC R0
           XCH A,@R0
           INC R0
           INC R0
           INC R0
           MOV @R0,A
           DEC R0
           DEC R0
           SJMP DONE1
DONE5:     DEC R0
           DEC R0
           SJMP DONE1
DONE4:     DEC R0
           SJMP DONE1
DONE2:     SJMP DONE1
DONE1:     DJNZ R3,LOOP
           DJNZ R2,SORT
           INC R0
           MOV A,@R0
           SJMP $
           END