实验要求：编程将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. dispaly      '
    db '2. brows        '
    db '3. replace      '
    db '4. modify       '
data ends

code segment
  start: mov ax,stack
         mov ss,ax
         mov sp,16 

         mov ax,data
         mov ds,ax

         mov bx,0

         mov cx,4

     s0: push cx
         mov si,3
         mov cx,4

      s: mov al,[bx+si]
         and al,11011111B
         mov [bx+si],al
         inc si
         loop s

         add bx,16
         pop cx
         loop s0

         mov ax,4c00h
         int 21h
code ends
end start