SSEG SEGMENT
STK DW 200 DUP(0)
SSEG ENDS
DSEG SEGMENT
TIP1 DB 13, 10, 'MAX = ', 36
TIP2 DB 13, 10, 'MIN = ', 36
XXX DB 37, 8, 4, 96, 100, 124, 5, 92, 35, 2
DSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG, DS:DSEG, SS:SSEG
START:
MOV AX, DSEG
MOV DS, AX
MOV AX, SSEG
MOV SS, AX
MOV SP, SIZE STK
CALL SEACH
MOV DX, OFFSET TIP1
CALL DISP
MOV AL, BL
CALL DISP_NUM
MOV DX, OFFSET TIP2
CALL DISP
MOV AL, BH
CALL DISP_NUM
EXIT:
MOV AH, 4CH
INT 21H
;--------------------------
SEACH PROC
MOV SI, 0
MOV BL, XXX[SI]
MOV BH, XXX[SI]
MOV CX, 9
LP:
MOV AL, XXX[SI + 1]
CMP AL, BL
JB NEXT1
MOV BL, AL
NEXT1:
CMP AL, BH
JA NEXT
MOV BH, AL
NEXT:
INC SI
LOOP LP
RET
SEACH ENDP
;--------------------------
DISP PROC
MOV AH, 9
INT 21H
RET
DISP ENDP
;--------------------------
DISP_NUM PROC
MOV AH, 0
MOV CL, 100
DIV CL
MOV DX, AX
MOV AH, 2
ADD DL, '0'
INT 21H
MOV AL, DH
MOV AH, 0
MOV CL, 10
DIV CL
ADD AX, 3030H
MOV DX, AX
MOV AH, 2
INT 21H
MOV DL, DH
INT 21H
RET
DISP_NUM ENDP
;--------------------------
CSEG ENDS
END START
;-----------------------------------
温馨提示:内容为网友见解,仅供参考