汇编语言proc near（汇编语言小题一个，感激不尽）

本文目录

• 汇编语言小题一个，感激不尽
• 汇编语言的 注释啊啊 ，追加的
• 微机原理题：汇编语言编写的子程序中最后一条汇编语句是什么
• NEAR的汇编语言
• 用汇编语言编下列两题，高分！急求！！
• 汇编语言中proc far是什么意思

汇编语言小题一个，感激不尽

;如果在dos下编译，将中文注释删除后进行。data segment   str1 db ’abcdefghijklmn........’,0h,’other string, useless’   str2 db ’def’,0h,’other string’   len1 dw 0   len2 dw 0   lastpos  dw 0   msg0 db ’found it, position at :’,’$’   msg1 db ’not found.$’   pos   dw  0   found db 0data endsassume cs:code, ds:data, es:datacode segmentstart:   mov ax, data   mov ds, ax   mov es, ax   ;计算str1长度   lea si, str1,   lea di, len1   call strlen   ;计算str2长度   lea si, str2,   lea di, len2   call strlen   ;计算str1最大可查找position   mov ax, offset str1   mov bx, ax    ;bx保存查找起始位置   add ax, len1   sub ax, len2   inc ax   mov lastpos, ax ;当查找从这里开始时，就表示不可能匹配上了，因为剩余字符串长度不够   ;开始查找   cld  ;设置查找方向为增向search0:   mov cx, len2   mov si, bx   lea di, str2   repe cmpsb   jz  found0 ;zf为0，表示找到   inc bx   cmp bx, lastpos   jnz search0   ;执行到这里，表示未找到   lea dx, msg1   mov ah, 9   int 21h   jmp exitfound0:      mov found, 0ffh ;把这2个要求忘掉了。      mov pos bx     ;      ;输出(bx)，即在str1中的首地址   lea dx, msg0   mov ah, 9   int 21h   mov ax, bx   call printexit:   mov ax, 4c00h   int 21h;计算指向的字符串的长度;0为字符串结束符号;保存计算结果,dw类型strlen proc near   mov , 0strlen0:   cmp , 0   jz strlen1   inc    inc si   jmp strlen0strlen1:   retstrlen endp;10进制输出(ax)中的数值print proc near  push cx  push bx  xor cx, cx  mov bx, 10p0:  xor dx, dx  div bx  xor dx, 0e30h  push dx  inc cx  cmp ax, 0  jnz p0p1:  pop ax  int 10h  loop p1    pop bx  pop cx  retprint endpcode endsend start

汇编语言的 注释啊啊 ，追加的

代码有点小问题，改动了一点点后，执行结果是将代码段中的256个值为55的数分别改为：0，1，2，3，4，……一直到255（十六进制为FF），如下：

data segment;数据段Block db 256 dup(55h);申请首地址为block的256个字节地址空间，每个字节的值均为55h

data endscode segment;代码段assume cs:code, ds:datastart procnear;程序开始，将之改成“start:”mov ax, datamov ds, ax;这两句的意思是将数据段地址赋给dsmov bx, offset Block;将首地址block的值赋给bxmov cx,256;设置cx的值，即为循环次数256次Again:  ;自定义的标号mov , bl ;将bl的值存入bx所指向的数据段中inc bx;bx自加1，相当于C语言中的C++Loop Again;此步是CX-1到CX=0，即循环256次后跳出循环jmp $;跳转到当前的地址， 所以它是一个死循环，相当于在此原地踏步。如果要让它能正常结束，应该将这句改为“mov ah,4ch   int 21h”两句

code endsend start

微机原理题：汇编语言编写的子程序中最后一条汇编语句是什么

汇编语言子程序以proc语句行开始，以endp语句行结束。如：p1 proc near(或far)..........................p1 endp

NEAR的汇编语言

在汇编语言中，NEAR是指近过程调用，即子程序和主程序在一个代码段，则使用NEAR（可省略）。近调用发生后，主程序堆栈中将压入IP值保护起来。请对比FAR远过程调用。使用范例： SUB1 PROC NEAR; 调用在同一代码段内的子程序SUB1

用汇编语言编下列两题，高分！急求！！

1、7个评委分别给出10~20之间的整数分，去掉一个最高和最低分，剩余5个求平均分。要求：评委给出两位的十进制数从键盘输入，最后得分以十进制输出显示在屏幕，设计显示格式。 ; 本程序通过编译，运行正确 Code Segment Assume CS:Code,DS:Code CR EQU 000DH LF EQU 000AH KBBack EQU 0008H ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：输出一个字符 ; 入口：dl=要显示的字符 enter_Chr proc Near push ax mov ah,02h int 21h pop ax ret enter_Chr endp ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：显示指定地址（Str_Addr）的字符串 ; 入口： ; Str_Addr＝字符串地址（要求在数据段） ; 用法: Output Str_Addr ; 用法举例：Output PromptStr Output MACRO Str_Addr lea dx,Str_Addr mov ah,9 int 21h EndM ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：取光标位置 ; 入口：无 ; 出口：DH=行号，DL=列号 GetCursor Proc Near PUSH AX PUSH BX PUSH CX XOR BX,BX MOV AH,3 INT 10H MOV Cursor_Row,DH MOV Cursor_Col,DL POP CX POP BX POP AX RET Cursor_Row DB ? Cursor_Col DB ? GetCursor EndP ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：置光标位置 ; 入口：Cursor_Row=行坐标; Cursor_Col: 列坐标) SetCursor Proc Near PUSH CX PUSH BX PUSH AX MOV DH,Cursor_Row MOV DL,Cursor_Col XOR BX,BX MOV AH,2 INT 10H POP AX POP BX POP CX RET SetCursor EndP ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：输出回车换行 enter_CTLF proc Near push ax push dx mov ah,02h mov dl,0dh int 21h mov dl,0ah int 21h pop dx pop ax ret enter_CTLF endp ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：键盘输入一个N位的十进制数字， ; 用逻辑和移位指令将其转换成二进制数并保存在指定的内存单元。 ; 入口：N=数字位数；di=保存输入的数字首地址 ; 出口：转换后的二进制数保存在di所指的单元 Input_Digit Proc Near push dx push cx push bx push di lea di,@@Save_Tmp push di cld mov cx,N push cx @@Input: call GetCursor ;取光标位置 mov ah,1 ;从键盘接受一个字符 int 21h cmp al,CR ;若键入的是回车，已经键入的数字不足N位 jz @@ASC_Dec ;转去处理已经键入的数字 cmp al,KBBack jz @@KB_Back ;若是回空键，重新输入 cmp al,’0’ jb @@KBBack ;若低于数字’0’，重新输入 cmp al,’9’ ja @@KBBack ;若低于数字’9’，重新输入 jmp @@Save_Dig @@KB_Back: dec Cursor_Col inc cx dec di @@KBBack: call SetCursor ;置光标位置 jmp @@Input @@Save_Dig: and al,0fh ;转换成二进制数 stosb ;保存 loop @@Input ;接受下一个数字 @@ASC_Dec: mov ax,cx pop cx pop si sub cx,ax ;实际输入的数字位数 xor dx,dx xor ax,ax jcxz @@Save_Ret ;若直接回车，没有输入任何数字，按输入’0’处理 dec cx ;实际输入的数字位数减1，准备把输入的这一串数字转换成二进制数 mov bl,10 @@Mul_Ten: lodsb cbw add ax,dx mul bl mov dx,ax loop @@Mul_Ten lodsb cbw add ax,dx @@Save_Ret: pop di stosb pop bx pop cx pop dx ret @@Save_Tmp db 16 dup(?) Input_Digit EndP ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：把AL中的二进制无符号数转换成显式的十进制ASCII ; 入口：AL=二进制数；di=转换后的ASCII保存地址 ; 出口：无 Dec_ASCII Proc Near push si push cx push bx push di mov bl,10 xor cx,cx lea di,@@Temp_Save cld @@Divide: xor ah,ah div bl or ah,30h mov ,ah dec di inc cx test al,0ffh jnz @@Divide push di pop si inc si pop di pop bx push di rep movsb pop di pop cx pop si ret @@Temp_Save db 4 dup(?) Dec_ASCII EndP ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ Teachers equ 7 ;评委人数 N equ 2 ;评委打分位数 Grades db Teachers dup(?) ;7位评委给出的分数 Most_Grade dw ? ;最高分 Least_Grade dw ? ;最低分 PromptStr DB ’Please input ’,Teachers or 30h,’ grades: $’ Max_One db ’The maximum grade: ’ Most_Str db 4 dup(’$’) Mix_One db ’The miximum grade: ’ Least_Str db 4 dup(’$’) Last_Grade db ’The last everage grade: ’ Last_Str db 4 dup(’$’) Start: push cs pop ds push cs pop es ;使数据段、附加段与代码段同段 ; 7个评委分别给出10~20之间的整数分 Output PromptStr ;提示评委亮分 lea di,Grades ;分数存放地址 mov cx,Teachers ;评委数 push cx push di Input_Number: call enter_CTLF ;输出一个回车、换行 call Input_Digit ;从键盘输入一位评委的打分 loop Input_Number ;下一个评委的打分 pop si pop cx dec cx lodsb mov ah,al ;ah=最低分，al=最高分 Compare: cmp ah, ;当前最低分与当前分比较 jbe $+4 ;若低于或等于，转去比较最高分 mov ah, ;当前最低分高于当前分，保存新的最低分 cmp al, ;当前最高分与当前分比较 jae $+5 ;若高于或等于，转去与下一个分数比较 lodsb ;当前最高分低于当前分，保存新的最高分 jmp $+3 ;转去与下一个分数比较 inc si ;数组下标增1 loop Compare ;循环 mov byte ptr Most_Grade,al ;保存最高分 mov byte ptr Least_Grade,ah ;保存最低分 call enter_CTLF ;输出一个回车、换行 call enter_CTLF ;输出一个回车、换行 call enter_CTLF lea di,Most_Str call Dec_ASCII ;把最高分转换成ASCII码 Output Max_One ;显示一个最高分 call enter_CTLF ;输出一个回车、换行 lea di,Least_Str mov al,byte ptr Least_Grade ;取最低分 call Dec_ASCII ;把最低分转换成ASCII码 Output Mix_One ;显示一个最低分 call enter_CTLF ;输出一个回车、换行 call enter_CTLF lea si,Grades ;分数存放地址 mov cx,Teachers-1 ;评委数-1 xor ah,ah lodsb mov dx,ax ;总分初值 Addition: lodsb add dx,ax ;累加各评委分数 loop Addition ; 去掉一个最高分和最低分 sub dx,Most_Grade ;去掉一个最高分 sub dx,Least_Grade ;去掉一个最低分 ; 剩余5个求平均分 mov ax,dx mov bx,Teachers-2 div bl ;平均分取整数部分 ; 最后得分以十进制输出显示在屏幕 lea di,Last_Str call Dec_ASCII ;把平均分转换成ASCII码 Output Last_Grade ;显示平均分 Exit_Proc: mov ah,4ch ;结束程序 int 21h Code ENDS END Start ;编译到此结束 2、设-8《=A《=8,-12《=B《=12,-15《=C《=15 求出A+B+C=0的全部解 给定条件的三个变量，共有13175个组合，满足A+B+C=0的有400个。 ; 本程序通过编译，运行正确 Code Segment Assume CS:Code,DS:Code ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：显示指定地址（Str_Addr）的字符串 ; 入口： ; Str_Addr＝字符串地址（要求在数据段） ; 用法: Output Str_Addr ; 用法举例：Output PromptStr Output MACRO Str_Addr lea dx,Str_Addr mov ah,9 int 21h EndM ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：把AL中的二进制有符号数转换成显式的十进制ASCII码 ; 入口：AL=二进制数；di=转换后的ASCII保存地址 ; 出口：无 Dec_ASCII Proc Near push si push cx push bx push di mov bl,10 xor cx,cx lea di,@@Temp_Save cld push ax test al,80h jz @@Divide neg al @@Divide: xor ah,ah div bl or ah,30h mov ,ah dec di inc cx test al,0ffh jnz @@Divide pop ax mov byte ptr ,’ ’ test al,80h jz $+5 mov byte ptr ,’-’ dec di inc cx push di pop si inc si pop di pop bx push di rep movsb pop di pop cx pop si ret @@Temp_Save db 4 dup(?) Dec_ASCII EndP ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ ; 功能：向指定的内存地址写3个空格 ; 入口：di=指定的内存地址 ; 出口：无 Out_Space Proc Near push di push cx push ax mov al,20h mov cx,3 cld rep stosb pop ax pop cx pop di ret Out_Space EndP ; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ A0 equ -8 ;变量A初值 B0 equ -12 ;变量B初值 C0 equ -15 ;变量C初值 ABC_Number db 3 dup(?) Count dw 0 ;A+B+C=0的全部解计数 PromptStr DB ’A+B+C=0’,13,10,13,10,’$’ Sum_Zero db ’A=’ A_Number db 3 dup(20h) db ’, B=’ B_Number db 3 dup(20h) db ’, C=’ C_Number db 3 dup(20h),13,10,’$’ ; 设-8《=A《=8,-12《=B《=12,-15《=C《=15，求出A+B+C=0的全部解 Start: push cs pop ds push cs pop es ;使数据段、附加段与代码段同段 Output PromptStr lea si,ABC_Number mov cx,17 mov byte ptr ,A0 A_Var: push cx mov cx,25 mov byte ptr ,B0 B_Var: push cx mov cx,31 mov byte ptr ,C0 C_Var: push cx mov al, add al, adc al, cmp al,0 jnz Next_One lea di,A_Number call Out_Space mov al, call Dec_ASCII ;把变量A的值转换成显式的十进制ASCII码 lea di,B_Number call Out_Space mov al, call Dec_ASCII ;把变量B的值转换成显式的十进制ASCII码 lea di,C_Number call Out_Space mov al, call Dec_ASCII ;把变量C的值转换成显式的十进制ASCII码 Output Sum_Zero inc Count ;计数 Next_One: inc byte ptr pop cx loop C_Var pop cx inc byte ptr loop B_Var pop cx inc byte ptr loop A_Var Exit_Proc: mov ah,4ch ;结束程序 int 21h Code ENDS END Start ;编译到此结束

汇编语言中proc far是什么意思

proc far－－段间调用子程序的首部，调用时使用20位的组合物理地址，也称为远调用proc near－－段内调用子程序的首部，调用时仅使用16位的段内偏移地址，也称近调用