汇编语言编写学生成绩管理系统

hhMACRO;»Ø³µ»»Ðк궨ÒåPUSHDXPUSHAXMOVDL,0AHMOVAH,2INT21HMOVDL,0DHMOVAH,2INT21HPOPAXPOPDXENDMclearMACRO;ÇåÆÁºê¶¨ÒåPUSHAXPUSHBXPUSHCXPUSHDXMOVAH,2MOVDH,0MOVDL,0INT10HMOVAH,6MOVAL,0MOVBH,7MOVCH,0MOVCL,0MOVDH,24MOVDL,79INT10HENDMDATASSEGMENTcjDB100DUP(-1)pmDB100DUP(0)mzDB100DUP(14DUP(''),'$')strm1DB'1.insertstudentscore$'strm2DB'2.deletestudentscore$'strm3DB'3.showstudentscoreandrank$'strm4DB'ESC.exit$'stri1DB'inputthestudentnumber:$'stri2DB'inputthisstudentscore:$'stri3DB'insertsuccess,pressanykey!$'stri4DB'inputthisstudentname:$'strd1DB'deletethestudentnumber:$'strd2DB'deletesuccess,pressanykey!$'strr1DB'===================scoreandrank===================$'strr2DB'numbernamescorerank$'strr3DB'showsuccess,pressanykey!$'streDB'error,pleasetryagain$'strqDB'thanksforusing$'DATASENDSSTACKSSEGMENTSTACKSENDSCODESSEGMENTASSUMECS:CODES,DS:DATAS,SS:STACKSSTART:MOVAX,DATASMOVDS,AXmain:LEADX,strm1MOVAH,9INT21HhhLEADX,strm2;»ñÈ¡STRM2µÄÆ«ÒƵØÖ·MOVAH,9INT21HhhLEADX,strm3;»ñÈ¡STRM3µÄÆ«ÒƵØÖ·MOVAH,9INT21HhhLEADX,strm4MOVAH,9INT21Hhhmain1:MOVAH,1INT21HCMPAL,31H;²åÈëѧÉú³É¼¨JEinsert;µÈÓÚÔòתÒÆINSERTCMPAL,32H;ɾ³ýJEdeleteCMPAL,33H;ÏÔʾJErankCMPAL,1BH;Í˳öJEquitJMPmain1;Ìøתµ½MAIN1insert:clear;µ÷ÓÃÇåÆÁºêLEADX,stri1MOVAH,9INT21HhhCALLshuruMOVBX,AXhhLEADX,stri4MOVAH,9INT21HhhPUSHBXPUSHDXMOVAX,BXMOVCL,15MULCLMOVBX,AXLEADX,mz[BX];°ÑÃû×Ö´æµ½mzÖÐMOVAH,10INT21HPOPDXPOPBXhhLEADX,stri2MOVAH,9INT21HhhCALLshuruMOVcj[BX],AL;°Ñ³É¼¨´æµ½cjhhLEADX,stri3MOVAH,9INT21HMOVAH,1INT21HhhclearJMPmaindelete:clearLEADX,strd1MOVAH,9INT21HhhCALLshuruMOVBX,AXMOVcj[BX],-1;°ÑÊäÈëѧºÅµÄ³É¼¨É¾³ýhhLEADX,strd2MOVAH,9INT21HhhMOVAH,1INT21HhhclearJMPmainrank:MOVCX,100MOVDH,1rank0:MOVDL,DHDECCXCMPCX,-1HJErank5MOVBX,1rank1:CMPcj[BX],CLJErank3rank2:INCBXCMPBX,100JErank0JMPrank1rank3:MOVpm[BX],DL;°ÑÃû´Î´æµ½pmINCDHJMPrank2rank5:clearLEADX,strr1MOVAH,9INT21HhhLEADX,strr2MOVAH,9INT21HhhMOVBX,0MOVDH,1rank10:INCBXCMPBX,100JErank11CMPcj[BX],-1JErank10INCDHMOVDL,10MOVAH,2INT10HPUSHBXPUSHDXMOVAX,BXMOVCL,15MULCLMOVBX,AXADDBX,2LEADX,mz[BX]MOVAH,9INT21HPOPDXPOPBXMOVDL,1MOVAH,2INT10HMOVAX,BXCALLshuchuMOVDL,30MOVAH,2INT10HMOVAL,cj[BX]CALLshuchuMOVDL,45MOVAH,2INT10HMOVAH,0MOVAL,pm[BX]CALLshuchuhhJMPrank10rank11:LEADX,strr3MOVAH,9INT21HMOVAH,1INT21HclearJMPmainquit:clearMOVBH,0MOVAH,2MOVDH,5MOVDL,20INT10HLEADX,strqMOVAH,9INT21HMOVAH,4CHINT21HshuruPROCNEARPUSHBXreturn:MOVAH,1INT21HCMPAL,30HJLcuowuCMPAL,39HJGcuowuSUBAL,30HMOVAH,0MOVBL,10MULBLMOVBX,AXMOVAH,1INT21HCMPAL,30HJLcuowuCMPAL,39HJGcuowuMOVAH,0SUBAL,30HADDAX,BXPOPBXRETcuowu:hhLEADX,streMOVAH,9INT21HhhJMPreturnshuruENDPshuchuPROCNEARPUSHCXPUSHDXMOVCL,10CBW;×Ö½ÚÀ©Õ¹Îª×ÖIDIVCLMOVDH,AHMOVDL,ALADDDL,30HMOVAH,2INT21HMOVDL,DHADDDL,30HMOVAH,2INT21HPOPDXPOPCXRETshuchuENDPCODESENDSENDSTART