汇编：使用结构体完成对学生信息（姓名、学号、成绩）的处理

怼烎@ 2022-05-23 12:46 208阅读 0赞

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;
    ;                                题目：显示学生名次表
    ;具体要求：  1.输入1是数据录入并输出（包括姓名、学号、成绩）
    ;		     2.输入2是排序后的数据输出（包括姓名、学号、成绩、名次）
    ;			 3.输入3是可以按学号查找某学生，并输出其成绩，选择修改或不改成绩（选做）
    ;
    ;子程序及功能介绍：
    ;            1.inputinformation子程序：学生信息的录入，与displaydatas子程序连用，输出学生基本信息。
    ;			 2.outputinformation子程序：对学生信息按照score进行排序，与displayrank子程序连用，输出
    ;						                排序后的学生信息并显示排名ranking。
    ;            3.displaydatas子程序：显示学生基本信息：name,number,score。
    ;		     4.displayrank子程序：显示学生排名：name,number,score,ranking。
    ;  			 5.findinformation子程序：按学号查找某学生，并输出其成绩，可选择修改或不改成绩。
    ;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    include 一套工具.mac
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;
    ;结构体class，用于存放学生信息
    	class struc
    		names db 20 dup (?)
    		number db 20 dup (?)
    		score dw ?
    	class ends
    ;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;定义数据段
    data segment
    	mem class <>
    	x dw $
    	y dw ?
    	z dw ?    ;存放学生人数
    	member class 50 dup(<>)
    	show1 db "============================================================",13,10
    		  db "Options:",13,10
    		  db "1.Input student informations(name,number,score)",13,10
    		  db "2.Output student informations(name,number,score,ranking)",13,10
    		  db "3.Find student informations(number)",13,10
    		  db "============================================================",13,10,"$"
    	
    	details1 db "name(eg:MasterShi):$"
    	details2 db "number(eg:201407014212):$"
    	details3 db "score(0-100):$"
    	details4 db "name            number          score",13,10,"$"
    	details5 db "name            number          score  ranking",13,10,"$"
    	
    	noinformation db "not information!",13,10,"$"
    	information db "score:$"
    	modification db "amend it?(y\n)$"
    	nobody db "nobody!",13,10,"$"
    	
    	blank db "       $"
    	blank1 db "      $"
    	blank2 db "        $"
    	
    	error1 db "Input error,please input again:$"
    	scoreerror db "The score must be 0~100..$"
    	nameerror db "name must be A~Z or a~z..$"
    	numbererror db "number must made by 0~9..$"
    	
    	temp1 db 20 dup (?)
    	temp2 db 20 dup (?)
    	count dw ?
    	result dw ?
    	wc dw ?
    	ranks db ?
    	
    data ends
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;定义堆栈段
    stack segment
    
    stack ends
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;定义附加段
    extra segment
    	
    extra ends
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;代码段
    code segment
    assume cs:code,ds:data,ss:stack,es:extra
    start:
    	mov ax,data
    	mov ds,ax   ;加载数据段
    	;mov ax,extra
    	mov es,ax   ;加载附加段
    	mov ax,stack
    	mov ss,ax   ;加载堆栈段
    	
    	lea ax,mem
    	sub x,ax
    
    set0:
    	oustring show1
    set1:
    	input       ;输入选项
    	cmp al,1bh
    	jz exit     ;esc键退出
    	cmp al,31h
    	jz option1
    	cmp al,32h
    	jz option2
    	cmp al,33h
    	jz option3
    	jmp error   ;输入的不是1-3
    
    option1:
    	call inputinformation
    	ld
    	jmp set0
    option2:
    	call outputinformation
    	ld
    	jmp set0
    option3:
    	call findinformation
    	ld
    	jmp set0
    error:
    	ld
    	oustring error1
    	jmp set1
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;inputinformation子程序：数据录入并输出;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    inputinformation proc
    	ld
    out0:   ;name
    	mov si,0
    	oustring details1
    set11:
    	input 
    	cmp al,13            ;输入的字符是回车
    	jz out1
    	cmp al,7ah
    	jg errorname         ;输入的字符大于'z'
    	cmp al,61h
    	jge circulationname  ;输入的字符在'a'~'z'之间
    	cmp al,5ah
    	jg errorname         ;输入的字符在'Z'~'a'之间
    	cmp al,41h
    	jge circulationname  ;输入的字符在'A'~'Z'之间
    	jmp errorname            ;输入的是其他字符
    	
    out1:    ;number
    	ld
    	mov si,0
    	oustring details2
    set2:
    	input
    	cmp al,13
    	jz out2  ;输入回车跳到out2
    	cmp al,30h
    	jl errornumber
    	cmp al,39h
    	jg errornumber
    	;输入的字符在0-9之间
    	mov bx,y
    	mov member[bx].number[si],al
    	inc si
    	jmp set2
    	
    out2:    ;score
    	ld
    	mov si,0
    	mov bx,0
    	oustring details3
    set3:
    	input
    	cmp al,13
    	jz out3  ;输入回车跳到out3
    	cmp al,30h
    	jl errorscore
    	cmp al,39h
    	jg errorscore
    	;输入的字符在0-9之间
    	sub al,30h
    	cbw 
    	xchg ax,bx
    	mov cl,10
    	imul cl
    	add bx,ax
    	jmp set3
    
    out3:
    	cmp bx,100
    	jg errorscore
    	mov ax,bx
    	mov bx,y
    	mov member[bx].score,ax
    	
    	mov ax,x
    	add y,ax
    	inc z
    	call displaydatas
    	ret
    	
    circulationname:
    	mov bx,y
    	mov member[bx].names[si],al  ;把录入的姓名的字母存入member.name中
    	inc si
    	jmp set11
    
    errorname:
    	ld
    	oustring nameerror
    	ld 
    cc1:
    	dec si
    	cmp si,0
    	jl out0
    	mov bx,y
    	mov member[bx].names[si],0
    	jmp cc1
    	
    errornumber:
    	ld
    	oustring numbererror
    	ld
    cc2:
    	dec si
    	cmp si,0
    	jl out1
    	mov bx,y
    	mov member[bx].number[si],0
    	jmp cc2
    	
    errorscore:
    	ld
    	oustring scoreerror
    	ld
    	mov bx,y
    	mov member[bx].score,0
    	jmp out2
    	
    inputinformation endp
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;outputinformation子程序：排序后的数据输出;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    outputinformation proc
    	ld
    	cmp z,0
    	jz nobodys
    	;比较思路，外层循环控制比较次数，内层循环控制被比较的元素
    	mov cx,z  ;人数，行数，也是控制被比较次数的关键数
    	dec cx    ;n个人比较n-1次
    	mov wc,cx  ;外循环
    ccompare:
    	mov cx,wc
    	mov result,cx ;内循环
    	mov bx,0
    compare:
    	mov ax,member[bx].score
    	add bx,x
    	cmp ax,member[bx].score    ;两个score比较
    	jl exchange                ;如果前面比后面小，交换
    	dec result
    	cmp result,0
    	jg compare
    	dec wc
    	cmp wc,0
    	jg ccompare
    	jmp out5
    exchange:
    	mov dx,member[bx].score
    	sub bx,x
    	mov member[bx].score,dx        ;把后面大的数给前面
    	add bx,x
    	mov member[bx].score,ax        ;把前面小的数给后面
    	;names
    	lea si,member[bx].names
    	lea di,temp1
    	mov cx,20
    	rep movsb                ;把后面的串送给temp1
    	
    	sub bx,x
    	lea si,member[bx].names
    	lea di,temp2
    	mov cx,20
    	rep movsb                ;把前面的串送给temp2
    	
    	lea si,temp1
    	lea di,member[bx].names
    	mov cx,20
    	rep movsb                ;把temp1送给前面的串
    	
    	add bx,x
    	lea si,temp2
    	lea di,member[bx].names
    	mov cx,20
    	rep movsb                ;把temp2送给后面的串
    	;number
    	lea si,member[bx].number
    	lea di,temp1
    	mov cx,20
    	rep movsb                ;把后面的串送给temp1
    	
    	sub bx,x
    	lea si,member[bx].number
    	lea di,temp2
    	mov cx,20
    	rep movsb                ;把前面的串送给temp2
    	
    	lea si,temp1
    	lea di,member[bx].number
    	mov cx,20
    	rep movsb                ;把temp1送给前面的串
    	
    	add bx,x
    	lea si,temp2
    	lea di,member[bx].number
    	mov cx,20
    	rep movsb                ;把temp2送给后面的串
    	
    	dec result
    	cmp result,0
    	jg compare
    	dec wc
    	cmp wc,0
    	jg ccompare
    	jmp out5
    nobodys:
    	oustring nobody
    	ret
    out5:
    	call displayrank
    	ret
    outputinformation endp
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    displaydatas proc
    	ld
    	oustring details4
    	mov cx,z        ;行数
    	mov count,cx
    	mov bx,0
    ccc:
    	mov member[bx].names[16],'$'
    	oustring member[bx].names       ;bx单元中的names显示完毕
    	
    	mov member[bx].number[16],'$'
    	oustring member[bx].number      ;bx单元中的number显示完毕
    	
    	cmp member[bx].score,10
    	jge abten
    	mov dx,member[bx].score
    	add dl,30h
    	output dl
    	jmp ddd
    abten:
    	cmp member[bx].score,100
    	je hundred
    	mov ax,member[bx].score
    	mov cl,10
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	add cl,30h
    	output cl
    	jmp ddd
    	
    hundred:
    	mov ax,member[bx].score
    	mov cl,100
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	mov al,cl
    	cbw
    	mov cl,10
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	add cl,30h
    	output cl
    	
    ddd:
    	ld
    	add bx,x
    	dec count
    	cmp count,0
    	jg ccc
    	ret
    displaydatas endp
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    displayrank proc
    	ld
    	oustring details5
    	mov cx,z        ;行数
    	mov count,cx
    	mov bx,0
    ccc:
    	mov member[bx].names[16],'$'
    	oustring member[bx].names       ;bx单元中的names显示完毕
    	
    	mov member[bx].number[16],'$'
    	oustring member[bx].number      ;bx单元中的number显示完毕
    	
    	cmp member[bx].score,10
    	jge abten
    	mov dx,member[bx].score
    	add dl,30h
    	output dl
    	jmp ddd
    abten:
    	cmp member[bx].score,100
    	je hundred
    	mov ax,member[bx].score
    	mov cl,10
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	add cl,30h
    	output cl
    	jmp ddd
    	
    hundred:
    	mov ax,member[bx].score
    	mov cl,100
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	mov al,cl
    	cbw
    	mov cl,10
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	add cl,30h
    	output cl
    	
    ddd:   ;score显示完毕，准备显示ranking
    	inc ranks
    	cmp member[bx].score,100
    	jz bbb1
    	cmp member[bx].score,10
    	jl bbb2
    	oustring blank
    	jmp xxx
    bbb1:
    	oustring blank1
    	jmp xxx
    bbb2:
    	oustring blank2
    xxx:
    	mov dl,ranks
    	add dl,30h
    	output dl
    	ld
    	add bx,x
    	dec count
    	cmp count,0
    	jg ccc
    	mov ranks,0
    	ret
    displayrank endp
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;findinformation子程序：按学号查找某学生;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    findinformation proc
    out1:    ;number
    	ld
    	cmp z,0
    	jz nobodys
    	mov si,0
    	mov cx,20
    set3:
    	mov temp1[si],0
    	inc si
    	loop set3
    	mov si,0
    	oustring details2
    set2:
    	input
    	cmp al,13  ;输入回车跳到out2
    	jz out2
    	cmp al,30h
    	jl errornumber
    	cmp al,39h
    	jg errornumber
    	;输入的字符在0-9之间，则存入temp1中
    	mov temp1[si],al
    	inc si
    	jmp set2
    	
    out2:
    	mov cx,z
    	mov count,cx   ;学生人数
    	mov bx,0
    	mov cx,17
    rets:
    	lea si,member[bx].number
    	lea di,temp1
    	repz cmpsb
    	cmp cx,0
    	jz haveinformation
    	dec count
    	cmp count,0
    	jz out3
    	add bx,x
    	mov cx,17
    	jmp rets
    out3:
    	ld
    	oustring noinformation
    	ld
    	ret
    haveinformation:
    	mov result,bx   ;先将bx存起来
    	ld
    	oustring information
    	cmp member[bx].score,10
    	jge abten
    	mov dx,member[bx].score
    	add dl,30h
    	output dl
    	jmp ddd
    abten:
    	cmp member[bx].score,100
    	je hundred
    	mov ax,member[bx].score
    	mov cl,10
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	add cl,30h
    	output cl
    	jmp ddd
    	
    hundred:
    	mov ax,member[bx].score
    	mov cl,100
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	mov al,cl
    	cbw
    	mov cl,10
    	idiv cl
    	mov cl,ah
    	add al,30h
    	output al
    	add cl,30h
    	output cl
    
    ddd:
    	ld
    	oustring modification
    ret2:
    	input
    	cmp al,'y'
    	jz yes1
    	cmp al,'Y'
    	jz yes1
    	cmp al,'n'
    	jz no1
    	cmp al,'N'
    	jz no1
    	ld
    	oustring error1
    	jmp ret2
    
    yes1:
    	ld
    	oustring details3
    	mov si,0
    	mov bx,0
    set4:
    	input
    	cmp al,13
    	jz out4  ;输入回车跳到out4
    	cmp al,30h
    	jl errorscore
    	cmp al,39h
    	jg errorscore
    	;输入的字符在0-9之间
    	sub al,30h
    	cbw 
    	xchg ax,bx
    	mov cl,10
    	imul cl
    	add bx,ax
    	jmp set4
    
    out4:
    	cmp bx,100
    	jg errorscore
    	mov ax,bx
    	mov bx,result
    	mov member[bx].score,ax
    	call displaydatas
    	ret
    
    nobodys:
    	oustring nobody
    	ret
    
    errorscore:
    	ld
    	oustring scoreerror
    	ld
    	mov bx,y
    	mov member[bx].score,0
    	jmp yes1
    	
    	
    no1:
    	call displaydatas
    	ret
    
    errornumber:
    	ld
    	oustring numbererror
    	ld
    cc2:
    	dec si
    	cmp si,0
    	jl out1
    	mov temp1[si],0
    	jmp cc2
    
    findinformation endp
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    exit:
    	mov ah,4ch
    	int 21h     
    code ends
    end start

运行结果如下：

1.边界判断

![20180609114707658][]

2.录入学生信息

![20180609060931671][]

![20180609061133760][]

3.按照成绩进行排序

![20180609061242982][]

4.按学号查找并修改指定学生成绩（并且名次发生变化，按2可以看到）

![20180609061441308][]

[20180609114707658]: /images/20220523/e3bbce7cf8ad4a1ba05182d4a73ab95d.png
[20180609060931671]: /images/20220523/a28a564aaeac448da770cedc0edefa4f.png
[20180609061133760]: /images/20220523/bf86c493a98846feba37d512794c9273.png
[20180609061242982]: /images/20220523/bdd9ae966027478fa84f0ef4615e7356.png
[20180609061441308]: /images/20220523/5ad299a33bec43b5b2d60c7bbf77f000.png