用汇编语言将字符串中的字母和数字分开存储

data segment 
      buf db '4a52lui3sril3j2g2s$'
      len equ $ - buf
      buf1 db len dup(?)
      buf2 db len dup(?) 
      buf3 db '    $'
      N=($-buf1)/2
data ends

code segment 
      assume cs:code,ds:data
      start:
    mov ax,data
    mov ds,ax
         mov si,offset buf1
         mov cx,len 
         dec cx
         mov bx,0
    next:mov al,buf[bx] 
         cmp al,'0'
         jl continue
         cmp al,'9'
         jg continue
         mov ds:[si],al
         add si,1
continue:add bx,1
         loop next
         mov ax,'$'
         mov ds:[si],ax
         mov si,offset buf2