ex6-11r.asm

一些汇编实验程序

;程序模板

extrn messg1:byte,namepar:byte,crlf:byte,namelen:byte,namefld:byte
public b10read

CSEG SEGMENT
	assume  cs:CSEG
  start:	
b10read proc far

  mov ah,09
  lea dx,messg1
  int 21h

mov ah,0ah
lea dx,namepar
int 21h

mov ah,09h
lea dx,crlf
int 21h

mov bh,0
mov bl,namelen
mov cx,21
sub cx,bx

b20:
mov namefld[bx],20h
inc bx
loop  b20
ret

b10read endp
	
CSEG ENDS

END start