实验6.我的解答

flyue

assume cs:cs1, ds:ds1 ,ss:ss1
ss1 segment
  dw 0,0,0,0,0,0,0,0
  ss1 ends
ds1 segment
db '1.display       '
db '2.brous         '
db '3.replace       '
db '4.modify        '
ds1 ends
cs1 segment
start:mov ax,ds1
      mov ds,ax
   mov ax,ss1
   mov ss,ax
   mov sp,10h
   mov bx,0
   mov si,0
   mov cx,4
s0:mov bx,0
   push cx
   mov cx,4
s:mov al,ds:[bx+si+2]
   and al,11011111b
   mov ds:[bx+si+2],al
   inc bx
   loop s
   add si,16
  pop cx
     
      loop s0
   
   
   
  mov ax,4c00h
  int 21h

cs1 ends
end start

qq952670771

貌似你有的地方写错了那，

这是我自己写的，我也不知道对不对，但是能通过编译:lol

assume cs:codesg,ss:stacksg,ds:datasg
stacksg segment
        dw 0,0,0,0,0,0,0,0
stacksg ends
datasg segment
        db '1. display      '
        db '2. brows        '
        db '3. replace      '
        db '4. modify       '
datasg ends
codesg segment
  start:
        mov ax,stacksg
        mov ss,ax
        mov sp,10h
        mov ax,datasg
        mov ds,ax
        mov bx,0

        mov cx,4
      s:
        push cx
        mov si,0
        mov cx,4
     s0:
        mov ax,[bx+3+si]
        and ax,11011111b
        mov [bx+3+si],ax
        inc si
        loop s0

        add bx,10h
        pop cx
        loop s0

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

gongheng

qq952670771 发表于 2011-10-13 09:49

                               
登录/注册后可看大图

貌似你有的地方写错了那，

这是我自己写的，我也不知道对不对，但是能通过编译

能编译通过，就单步调试啊，看看结果正不正确，结果正确就对了！！！

qq952670771

嗯，谢谢啦:lol