p3.asm

用汇编语言编写的在MASM上实现大小写转换,排序,比较大小的源程序和可执行文件

EXTRN  START:FAR
PUBLIC SUB3

HUANHANG  MACRO
          MOV DL,0DH
          MOV AH,2
          INT 21H
          MOV DL,0AH
          MOV AH,2
          INT 21H
ENDM

DATA3   SEGMENT
MEGP3   DB '3.SORT(PLEASE ENTER STRINGS):$'
BUFP3   DB 100
        DB ?
STRP3   DB 100 DUP(?)
FLAG    DB -1
DATA3   ENDS

STACK SEGMENT PARA STACK 'STACK'
      DB 100 DUP(0)
STACK ENDS

CODE3  SEGMENT
       ASSUME CS:CODE3,DS:DATA3
SUB3: PUSH DS
      PUSH AX
      PUSH DX
      MOV AX,DATA3
      MOV DS,AX
     
BB3:  MOV DX,OFFSET MEGP3        ;PRINT MEG
      MOV AH,9
      INT 21H
     
      HUANHANG      
            
      MOV DX,OFFSET BUFP3         ;ENTER
      MOV AH,10
      INT 21H

      HUANHANG           

      MOV SI,OFFSET STRP3
      MOV BL,[SI-1]
      CMP BL,0
      JE  CC3      
      MOV FLAG,-1
            
LP1:  CMP FLAG,0

      JE  AA3
      DEC BL
      MOV CL,BL
      MOV CH,0
      CMP CL,0
      JE  AA3      

      MOV SI,0
      MOV FLAG,0
LP2:  MOV AL,STRP3[SI]
      CMP AL,STRP3[SI+1]
      JAE NEXT3
      XCHG AL,STRP3[SI+1]
      MOV STRP3[SI],AL
      MOV FLAG,-1
NEXT3:INC SI
      LOOP LP2
      JMP LP1
            
AA3:  MOV SI,OFFSET STRP3
      MOV CL,[SI-1]
EE:   MOV DL,[SI]
      MOV AH,2
      INT 21H
      INC SI
      LOOP EE

CC3:  HUANHANG
      MOV AH,0
      INT 16H
      CMP AL,1BH
      JE  EXITP3
      JMP BB3

EXITP3:HUANHANG
       HUANHANG
       POP DX
       POP AX
       POP DS
       JMP START
CODE3  ENDS
       END