实验四子程序设计和调用.docVIP

实验四 子程序设计和调用 一、实验目的 1) 学习子程序的定义和调用方法。 2) 掌握子程序设计、编制及调试。 二、实验内容 编写计算N个偶数之和的子程序和接收键入的N及将结果送显示器的主程序。 三、实验准备 1) 阅读教材中有关的内容，按要求编写程序。 2) 熟悉字符显示程序段的编写。 四、实验设备 PC机一台 五、实验步骤 1) 编辑、调试。 2) 运行·EXE文件并进行调试。 六、实验报告的要求 1) 列出源程序。 2) 写出调试结果。 请N个偶数之和方法1 stack segment stack stack dw 32 dup(?) stack ends data segment input db please input N: ,$ n db 6,0,6 dup(?) obf db 9 dup(?) data ends code segment begin proc far assume ss:stack,cs:code,ds:data push ds sub ax,ax push ax mov ax, data mov ds, ax mov dx,offset input mov ah,9 int 21h mov dx,offset n mov ah,10 int 21h mov si,offset n+2 mov cl,n+1 mov ch,0 call abc call sum shl ax,1 mov bx,seg obf mov es,bx mov di,offset obf+1 call cba call lf mov dx,offset obf mov ah,9 int 21h ret begin endP sum proc push cx push bx ;加入你的程序，ax为出口 pop bx pop cx ret sum endp abc proc mov ax,0 abc1: push cx mov cx,10 mul cx and byte ptr[si],0fh add al,[si] adc ah,0 inc si pop cx loop abc1 ret abc endp cba proc push ax push bx push cx push dx push di or ax,ax jns plus mov byte ptr es:[di],- inc di neg ax plus: mov cx,0 mov bx,10 lop1: mov dx,0 div bx push dx inc cx or ax,ax jnz lop1 lop2: pop ax add al,30h stosb loop lop2 mov al,$ stosb pop di pop dx pop cx pop bx pop ax ret cba endp LF PROC MOV DL,0AH MOV AH,2 INT 21H MOV DL,0DH MOV AH,2 INT 21H RET LF ENDP code ends end begin 需要加的程序 mov cx,ax mov bx,0 mov ax,bx sm: add bx,1 add ax,bx