data segment string1 db 'please input score: $' string2 db 'output score : $' string3 db '| max score | $' string4 db '| min score | $' string5 db '| Passers-by | $' string6 db '| Not Passer-by | $' string7 db '| Average score | $' string8 db '+----------------+-------+$' kong db ' $' string9 db ' | $' string0 db 'Press any key to continue...$' pas dw 0000H npa dw 0000H avg dw 0000H num dw 0000H avg2 dw 0000H score dw 60 dup(0) data ends stack segment dw 64 dup(0) stack ends code segment assume cs:code,ds:data,ss:stack main proc far start: t: call ready call input call sort call count call output jmp t main endp ;========================ready============================= ready: mov ax,data mov ds,ax ;ds数据段寄存器 mov ax,stack mov ss,ax ;ss站段寄存器 mov dx,offset string1 mov ah,09h int 21h xor bx,bx ;临时存放输入进来的数 xor cx,cx ; xor si,si ;score的指针 xor di,di ;计数 ret ;==========================input========================== input: mov ah,1 int 21h cmp al,0dh jz over cmp al,20h jz save sub al,30h mov cl,4 shl bx,cl add bl,al jmp input save: mov score[si],bx add si,2 inc di xor bx,bx jmp input over: mov score[si],bx inc di mov dl,0ah mov ah,02h int 21h mov cx,di dec cx xor bx,bx ret ;===========================sort========================= sort: ;bx=0，用冒泡排序,bx为要改变的哪一位的坐标 mov si,2 mov dx,cx cmp2: mov ax,score[bx] cmp ax,score[bx+si] jnc cmp3 ;大于或相等时转 xchg ax,score[bx+si] mov score[bx],ax cmp3: add si,2 dec dx jnz cmp2 add bx,2 ; loop sort mov dx,offset string2 mov ah,09h int 21h sub si,si 注释这段代码

这段代码是一个汇编语言程序，用于输入一组分数并对它们进行排序、统计和输出结果。它包含了一些数据段和代码段，其中包括了一些字符串常量和变量的定义，以及一些处理函数的实现。程序会先输出一个提示信息，然后等待用户输入一组分数，将其存储在一个score数组中，并对其进行排序。接着，程序会统计各种数据，如最高分、最低分、及格人数、不及格人数和平均分，并将结果输出到屏幕上。最后，程序会等待用户按下任意键，然后重新开始整个过程。