paixu.asm

汇编语言程序设计课程设计

DISPLAY MACRO
      OR DL,30H
      MOV AH,02H
      INT 21H
      ENDM
DATA SEGMENT
A DB 110,219,8,67,246,58,100,93,99,1
DATA ENDS
STACK SEGMENT PARA STACK'STACK'
      DW 50 DUP(?)
STACK ENDS
CODE SEGMENT
   ASSUME CS:CODE,DS:DATA,SS:STACK
START:MOV AX,DATA
      MOV DS,AX
      MOV AX,STACK
      MOV SS,AX
      MOV CX,9
   H5:PUSH CX
      MOV SI,0
   H4:MOV AL,A[SI]
      MOV BL,A[SI+1]
      CMP AL,BL
      JNA H6
      XCHG AL,BL
   H6:MOV A[SI],AL
      MOV A[SI+1],BL
      INC SI
      LOOP H4
      POP CX
      LOOP H5
      MOV SI,0
      MOV CX,10
   H7:MOV BL,A[SI]
      CALL SHUCHU
      INC SI
      LOOP H7
      MOV AH,4CH
      INT 21H

SHUCHU PROC
      MOV DL,0
   L3:CMP BL,100
      JNAE L4
      INC DL
      SUB BL,100
      JMP L3
   L4:DISPLAY
      MOV DL,0
   L5:CMP BL,10
      JNAE L6
      INC DL
      SUB BL,10
      JMP L5
   L6:DISPLAY
      MOV DL,BL
      DISPLAY
      MOV AH,02H
      MOV DL,' '
      INT 21H
      RET
SHUCHU ENDP

   CODE ENDS
     END START