汇编程序33：问题10.2

assume cs:code,ds:data,ss:stack
//模块化程序初步,使用call与ret建立子程序
data segment
    db 'word',0
    db 'unix',0
    db 'wind',0
    db 'good',0
data ends

stack segment
    dw 8 dup(0)
stack ends

code segment
    start:
          mov ax,data
          mov ds,ax
          mov bx,0
          mov cx,4
        s:
          mov si,bx
          call capital //下一条指令第一字节作为IP压栈,随后跳到标号处
          add bx,5
          loop s
          mov ax,4c00h
          int 21h
  capital:
          push cx
          mov cl,[si]
          mov ch,0
          jcxz ok
          and byte ptr [si],11011111b
          inc si
          pop cx
          jmp short capital
       ok:
          pop cx
          ret //取出之前压入的IP,随后跳到新IP处执行指令
code ends

end start

··