汇编试验程序.docVIP

第一次实验程序： 第二次实验程序： 第三次实验： 课本130页子程序的补充 重写CALL READINT 和CALL WRITEINT 程序：.MODEL .DATA NUM DW 10 DUP(?) real_max dw 0 BUFFER Db 10,0,10 dup(0) PROMPT1 DB 0AH,0DH,Input a Number Between (-32768~32767):$ PROMPT2 DB 0AH,0DH,The Maximun Number is:$ C10 Dw 10 .CODE START: MOV AX,@DATA MOV DS,AX MOV CX,10 LEA BX,NUM NEXT: LEA DX,PROMPT1 MOV AH,9 INT 21H CALL READINT;调用子程序 MOV[BX],ax ADD BX,2 LOOP NEXT LEA BX,NUM MOV CX,10 CALL MAX LEA DX,PROMPT2 MOV AH,9 INT 21H CALL WRITEINT;调用子程序 MOV AX,4C00H INT 21H MAX PROC ; 最大数据的求解子程序 MOV AX,8000H AGAIN: CMP AX,[BX] JGE SKIP MOV AX,[BX] SKIP: INC BX INC BX LOOP AGAIN mov real_max,ax RET MAX ENDP READINT PROC ; 输入数据的子程序**************************************** PUSH CX;保护现场 PUSH BX PUSH DX LEA DX,BUFFER mov ah,0ah int 21h mov dl,buffer[2] mov dh,- cmp dh,dl je neg_s0 mov cl,buffer[1] mov ch,0 mov dx,0 mov bx,2 jmp in_next neg_s0:mov cl,buffer[1] mov ch,0 dec cx mov bx,3 mov dx,0 in_next:mov ax,10 mul dx mov dx,ax mov al,buffer[bx] mov ah,0 and ax,0FH add dx,ax inc bx loop in_next mov al,buffer[2] mov ah,- cmp ah,al je neg_s1 jmp in_over neg_s1: neg dx in_over: mov ax,dx POP DX;恢复现场 POP BX POP CX ret READINT ENDP WRITEINT PROC ; 输出最大数的子程序 PUSH BX PUSH DX PUSH AX PUSH CX mov ax,real_max mov dx,0 mov cx,5 cmp ax,0 jl out_neg jmp out_one out_neg: mov dl,- mov ah,02h int 21h mov ax,real_max neg ax mov dx,0 out_one: div c10 push dx mov dx,0 loop out_one mov cx,5 out_two: pop dx m