汇编语言实验六学生成绩管理系统设计实验

1、汇编语言实验六学生成绩管理系统设计实验实验六学生成绩管理系统设计实验（综合性实验）一、实验要求和目的1.熟悉汇编语言程序结构；2 .熟悉INT 21H的文件操作功能调用； 3 .熟悉INT 21H的1、9号功能和 INT 10H常用功能的使用方法；4 .掌握多子程序复杂问题程序设 计方法；5 . 了解多模块程序设计方法（不作要求）。二、软硬件环境1、硬件环境：计算机系统windows;2、软件环境：装有MASM DEBUG LINK、 等应用程序。三、实验涉及的主要知识单元对于一个复杂的程序， 往往是分成若干个子程序设计的，然后用将它们组成一个完整的程序。子程序通过调用和返回，参数传递方法实现

2、互相联系。四、实验内容与步骤1、实验内容设计一个学生成绩管理系统，要求完成文件建立、学生成绩录入、显示指定学号的学 生记录、删除一个学生的记录、修改学生记录、返回等工作。学生成绩包括学号（XH）、姓名（XM）、数学（SX）、语文（YW）、外 语（WY序段。至少包括30名学生信息， 每名学生学号字段为4个字符，姓 名字段为15个字符（最大），每门成绩字段为3个字符（最大）。2、实验步骤 （1）编写主程序main .asm,实现如图所示菜单； （2）编写文件创建子程序create ,实现在指定盘指定文件下建立一个指定名称的文件 2009doc.dat ,界 面如图所示；（3）编写成绩录入子程序ap

3、pe nd,实现在指定文件尾部插入一个学生的成绩记录， 界面如图所示；（4）编写显示子程序display，实现按指定学号显示一个学生的记录， ，界 面如图所示；（5）编写修改子程序modify，实现按指定学号修改一个学生的记录字段（不需修改直接回车），界面如图所示； （6） 编写删除子程序，实现按指定学号、姓名删除一个学生的记录， 界 面如图所示；（7）编译、链接、调试，产生可执行文件main.exe。五、实验要求与提示1、实验要求（1）画出各程序流程图；（2）列出程序清单，加上适量注释； （3）回答思考问题； （4） 记录实验结果；（5） 完成实验报告（实验材料上的内容简写， 自 己的工作要

4、详尽）。2 、实验提示 考虑用INT 10H的06H号实现清屏的功能，用02H号实现置光标位置的功能？六、 思考与练习以及测评标准1.有兴趣的同学可以考虑用多模块程序设计方法实现；2 .文件在使用之前为何要打开？使用后为何要关闭？怎样计算文件的长度和移动文件 的读写指针？打开获得句柄，使用后用i nt 21h七、程序流程图 开始插入显示修改删除 YYNNN打开保存NNNYYYY 退出输入命令结束YN查找末尾插入输入学号查找输出输入学号查找 修改输入学号查找删除输入文件名打开文件载入输入文件名新建文 件输出八、 实验结果九、 程序代码datasegmentformsdb101*64dup( $&

5、#39; )filenamedb14,0,14dup(0)fo rmsbdb14,' $ ,22, ' $,6, ' $' ,6, ' $' ,6, ' $' screen0db'1. Appendarecord ' ,0dh,0ah,'2. Displayarecord ' ,0dh,0ah,'3. Modifyarecord ' ,0dh,0ah,'4. Deletearecord ' ,0dh,0ah,'5.0penafile ' ,0dh,0a

6、h,'6.Saveintoafile ' ,0dh,0ah,'7.ReturnDOS ,0dh,0ah,'Pleaseinput1 - 6: ' , ' $' f1str1dbPleaseinputXH:$'f1str2dbPleaseinputXM:$'f1str3dbPleaseinputSX:$'f1str4dbPleaseinputYW:$'f1str5db PleaseinputWY:$ ' f2str1db XueHao:$' f2str2db XingMing:$' f

7、2str3db ShuXue:$' f2str4db Yuwen:$' f2str5db WaiYu:$' f3str1dbXueHaodoesnotexist.Nothinghasbeenchanged.$' f4str1db PleaseinputXingMing:$ ' f4str2dbPleaseinputXueHao:$' f5str1dbPlease in putfile name:$' f5str2db'db'Loading.$ ' f5str4db'Completed.*' f5st

8、r5db'Failed.$ ' f6str1db'Savesucceed!$' f6str2 dbSavefailed.$ ' fstrldbSorry!Filedoesnotexist.$' f5str3Finish!$ ' fstr2dbPressa ny keytoretur n!$tempiodbOstatedb ' O' formen ddwOXHtempdbOeh,' O' , ' $ XHtempbdbOeh,' O' , ' $ $' cxtemp1d

9、w100cxtemp2dw14ditempdw0sitempdw0handledwOd atae ndsstacksegme ntstacksdb64dup(0)stacke ndscodesegme ntassu meds:data,ss:stack,cs:codestart:movax,datamovds,axmoves,axm ovax,stackmovss,axcalli nitialwi n:callprtsOcalli nputmoval,te mpiomovstate,alM1:cmpal, ' 1' jnzM2jmpf1jmpwinM2:cmpal, '

10、 2' jnzM3jmpf2jmpwinM3:cmpal, ' 3' jnzM4jmpf3jmpwinM4:cmpal, '4 'jnzM5jmpf4jmpwinM5:cmpal, ' 5' jnzM6jmpf5jmpwinM6:cmpal,' 6' jnzM7jmpf6jmpwinM7:cmpal, ' 7' jnzwinjmpquit;quit:movah,4ch in t21h;i nitial:leaax,formsm ovsi,axmovcx,101li nit:moval,14movds:si,

11、almoval,22movds:s i+16,almoval,6movds:si+40,almoval,6movds:si+48,almoval ,6movds:si+56,aladdsi,64loopl in itretfl:callcscree nleadi,formsmovcx,100Lf1:movdl, ' $' cmpes:di+1,dljzskipf1adddi,64loopLf1skipf1:lea ax,f1str1movsi,axcallputsmovax,dimovsi,axcallgetsleaax,f1st r2movsi,axcallputsmovax

12、,diaddax,16movsi,axcallgetsleaax,f1s tr3movsi,axcallputsmovax,diaddax,40movsi,axcallgetsleaax,f1 str4movsi,axcallputsmovax,diaddax,48movsi,axcallgetsleaax,f 1str5movsi,axcallputsmovax,diaddax,56movsi,axcallgetsleaax, fstr1movsi,axcallputscall newli neleaax,fstr2movsi,axcallputs call newli necalli np

13、utretf2:callcscree nleaax,f1str1movsi,axcallputsleaax,XHtempmovsi,ax callgetsmovcx,100movcxtemp1,cxleadi,XHtempleasi,formsLf21:l eadi,XHtempmovcx,16movsitemp,sirepecmpsbjzf21startmovsi,sit empaddsi,64movcx,cxtemp1deccxmovcxtemp1,cxi nccxloopLf21leas i,f3str1callputscall newli nejmpf2Qf21sta 比movsi,s

14、itempcallcscree nleasi,f2str1callputsmovsi,sitempaddsi,2callputscall newli neleasi,f2str2callputsmovsi,sitempaddsi,18callputscall newli neleasi,f2str3callputsmovsi,sitempaddsi,42callputscall newli neleasi,f2str4callputsmovsi,sitempaddsi,50callputscall newli neleasi,f2str5callputsmovsi,sitempaddsi,58

15、callputscall ne wli nef2Q:leasi,XHtempbleadi,XHtempmovcx,16repmovsbleaax,fst r1movsi,axcallputscall newli neleaax,fstr2movsi,axcallputscalIn ewli necalli nputretf3:callcscree nleasi,f4str2callputsleasi,XHtempleadi,formscallg etsmovcx,100Lf3:movcxtemp1,cxleasi,XHtempmovcx,16movsitemp,simovditemp,dire

16、 pecmpsbjzf3startmovsi,sitempmovdi,ditempadddi,64movcx,cxtem p1loopLf3;ca nnotfin dleasi,f3str1callputscall newli nejmpf3Qf3 start:;f4,f2movcx,64movdi,ditempleasi,formsbrepmovsbcallf1f3Q:retf4:callcscree nleasi,f4str2callputsleasi,XHtempleadi,formscallg etsmovcx,100Lf4:movcxtemp1,cxleasi,XHtempmovcx

17、,16movsitemp,simovditemp,dire pecmpsbjzf4startmovsi,sitempmovdi,ditempadddi,64movcx,cxtem p1loopLf4;ca nnotfin dleasi,f3str1callputscall newli nejmpf4Qf4 start:movcx,64movdi,ditempleasi,formsbrepmovsbf4Q:leasi,XHt empbleadi,XHtempmovcx,16repmovsbleasi,fstr1callputscall newl in eleasi,fstr2callputsca

18、ll newli necalli nputretf5:callcscree n;copyfiletomemeryleasi,f5str1callputsleasi,file n amecallgetsmovbx,0leasi,file namemovbl,ds:si+1moval,0movds:si+bx+2,almovdx,sii ncdxi ncdxmovah,3dhmoval,0i nt21hj ncsuc ceed1fail:leasi,f5str2callputscall newli nejmpf5Qsucceed1:movha ndle,axl easi,f5str3callput

19、sleadx,formsmovbx,ha ndlemovcx,6000movah,3 fhin t21hj ncsucceed2leasi,f5str5callputscall newli nemovbx,ha n dlemovah,3ehi nt21hjmpf5Qsucceed2:leasi,f5str4callputscall ne wli nemovbx,ha ndlemovah,3ehi nt21hjmpf5Qf5Q:leasi,fstr2callpu tscall newli necalli nputretf6:callcscree n;copymemerytofileleasi,f5str1callputsleasi,file n amecallgetsmovbx,Oleasi,file namemovbl,ds:si+1moval,0movds :si+bx+2,alleadx,file name in cdx in cdxmovcx,0movah,3ch in t21h jn csucleasi,f5str5callputscall newli nejmpf6Qsuc:movha ndle,ax leadx,formsmovbx,axmovah,40hmovcx,6