;编程，将DATA段中每个单词的前4个字母改为大写字母；
ASSUME CS:CODE,DS:DATA,SS:STACK
STACK  SEGMENT
       DW 0,0,0,0,0,0,0,0
STACK  ENDS
DATA   SEGMENT
       DB '1. display      '
       DB '2. brows        '
       DB '3. replace      '
       DB '4. modify       '
DATA   ENDS

CODE   SEGMENT
START: MOV  AX,DATA
       MOV  DS,AX
       MOV  AX,STACK
       MOV  SS,AX

       MOV  AX,00H
       MOV  BX,00H
       MOV  CX,04H
     S:PUSH CX
       MOV  SI,00H
       MOV  CX,04H
        S0: MOV  AL,[BX+SI+3]
            AND  AL,11011111B
            MOV  [BX+SI+3],AL
            INC  SI
            LOOP S0
       
       ADD  BX,10H
       POP  CX
       LOOP S
                
       MOV  AH,4CH
       INT  21H
CODE   ENDS
END    START