input.asm

suanfa de shiyan xw dui gan xingqu de pengyou you bangzhu

;			  第四章  子程序结构

;		       	  实验二  子程序的嵌套

;一.实验目的:

;	    掌握子程序嵌套的定义和常用DOS功能调用的使用方法,并了解子程序嵌套

;	 的结构.

;二.实验内容:

;	    分别从键盘输入姓名及8个字符的电话号码.
	    
;	 主程序main:

;		. 显示提示符 INPUT NAME: ;

;		. 调用子程序 INAME 输入姓名;

;		. 显示提示符 INPUT A TELEPHONE NUMBER: ;

;		. 调用子程序 INPHONE 输入电话号码.

;	子程序INAME:

;		. 调用键盘输入子程序GET,把输入的姓名存放在INBUF 缓冲区中.
		
;  	子程序INPHONE:

;		. 调用键盘输入子程序GET,把输入的8位电话号码存放在INBUF缓冲

;		区中.

;三.程序清单:

;**************************************************************************

data 	segment
	s1	db  0dh,  0ah
	db  'input  name: ', '$'
	s2	db  0dh,  0ah
	db 'input  a  telephone  number: ', '$'
	inbuf	db  9, ?, 9  dup ( ? )
data 	ends

code	segment
main 	proc  far
	assume  cs: code, ds: data
start:	push  ds
	mov   ax, 0
	push  ax
	mov   ax, data
	mov   ds, ax
	lea   dx, s1	
	mov   ah, 09h
	int   21h
	call  iname
	lea   dx,  s2
	mov   ah,  09h
	int   21h
	call  inphone
	ret
main 	endp

iname 	proc  near
	call  get
	ret 
iname	endp
 
get 	proc  near
	mov   ah,  0ah			;键盘输入到缓冲区	
	lea   dx,  [ inbuf ]
	int   21h
	add   dx,  2
	ret
get 	endp

inphone	proc  near
	call  get 
	ret
inphone	endp

code 	ends
	end   start 

;**************************************************************************