表喷我 资质有限 是在看不懂 求高人一一解释每条语句
DATAREA SEGMENT
DAT DB 20,-10,80,-5,-70,-9,95,-15,0,40
COUNT DB 10,10
dat2 db 10 dup(0) ;
DATAREA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,ES:DATA
START:MOV AX,DATAREA
MOV DS,AX
MOV ES,AX
MOV BL,1
LP1: CMP BL,0
JE LP4 ;
XOR BL,BL
MOV CL,COUNT
DEC CL
PUSH CX ;
LEA DI,DAT ;
LP2:MOV AL,[DI]
CMP AL,[DI+1] ;
JLE LP3 ;
XCHG [DI+1],AL
MOV [DI],AL
MOV BL,1
LP3:INC DI
LOOP LP2
POP CX
MOV COUNT,CL
JMP LP1
LP4:MOV CL,10
LEA DI,DAT
SC:MOV AX,0
MOV BH,2
MOV AL,[DI]
CMP AL,0
JGE NEXT
NEG AL
PUSH AX
MOV AH,02H
MOV DL,'-'
INT 21H
POP AX
NEXT:XOR AH,AH
DIV COUNT+1
MOV DH,AH
ADD AL,30H
MOV DL,AL
MOV AH,02H
INT 21H
MOV AL,DH
XOR AH,AH
ADD AX,3030H
MOV DL,AL
OUTP: MOV AH,2
INT 21H
DEC BH
JZ XT ;
MOV DL,BL
JMP OUTP
XT: DEC CL
JZ DONE
INC DI
JMP SC
DONE: MOV AH,4CH
INT 21H
CODE ENDS
END START

DATAREA SEGMENT
DAT DB 20,-10,80,-5,-70,-9,95,-15,0,40
COUNT DB 10,10
dat2 db 10 dup(0) ;
DATAREA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,ES:DATA
START:MOV AX,DATAREA
MOV DS,AX
MOV ES,AX
MOV BL,1
LP1: CMP BL,0
JE LP4 ;
XOR BL,BL
MOV CL,COUNT
DEC CL
PUSH CX ;
LEA DI,DAT ;
LP2:MOV AL,[DI]
CMP AL,[DI+1] ;
JLE LP3 ;
XCHG [DI+1],AL
MOV [DI],AL
MOV BL,1
LP3:INC DI
LOOP LP2
POP CX
MOV COUNT,CL
JMP LP1
LP4:MOV CL,10
LEA DI,DAT
SC:MOV AX,0
MOV BH,2
MOV AL,[DI]
CMP AL,0
JGE NEXT
NEG AL
PUSH AX
MOV AH,02H
MOV DL,'-'
INT 21H
POP AX
NEXT:XOR AH,AH
DIV COUNT+1
MOV DH,AH
ADD AL,30H
MOV DL,AL
MOV AH,02H
INT 21H
MOV AL,DH
XOR AH,AH
ADD AX,3030H
MOV DL,AL
OUTP: MOV AH,2
INT 21H
DEC BH
JZ XT ;
MOV DL,BL
JMP OUTP
XT: DEC CL
JZ DONE
INC DI
JMP SC
DONE: MOV AH,4CH
INT 21H
CODE ENDS
END START