学生成绩管理系统Word下载.docx
- 文档编号:20066416
- 上传时间:2023-01-16
- 格式:DOCX
- 页数:21
- 大小:214.28KB
学生成绩管理系统Word下载.docx
《学生成绩管理系统Word下载.docx》由会员分享,可在线阅读,更多相关《学生成绩管理系统Word下载.docx(21页珍藏版)》请在冰豆网上搜索。
80<
90<
100'
ERR1DB'
thereisnotthisstudent$'
ERR2DB'
fileclosewrong$'
FNAMEDB"
E:
\HBYY\SCORE.TXT"
BUFFER1DB23DUP(?
)
BUFFEERDB0AH,0DH,'
BUFFER2DB30DUP(?
BUFFER3DB8DUP('
0'
COUNTDB5
HANDLEDW?
DELDB8DUP('
XDB?
DATAENDS
SCORESTRUC
NAMESDB15DUP('
'
MATHSDB0,0
ENGLISHDB0,0
COMPUTERDB0,0
CHINESEDB0,0
SCOREENDS
SHOWMACROADDRS
LEADX,ADDRS
MOVAH,9
INT21H
ENDM
SET_P1MACROA
MOVAH,2
MOVDH,A
MOVDL,36
MOVBH,0
INT10H
ENDM
SET_P2MACRO
MOVAH,2
MOVDH,12
MOVDL,2
MOVBH,0
ENDM
SET_P3MACRO
MOVAH,2
MOVDH,1
MOVDL,30
CLEARMACROMOVAL,0
MOVCL,0
MOVCH,0
MOVDH,24
MOVDL,79
MOVBH,7
MOVAH,6
CLEAR1MACROMOVAL,0
MOVCH,4
MOVCL,36
MOVDH,10
INT10H
CLEAR2MACROMOVAL,0
MOVCH,12
NEWLINEMACRO
PUSHAX
PUSHDX
MOVDL,0DH
MOVDL,0AH
POPDX
POPAX
HOW_ITEMMACROADDRS
LOCALILOOP,W10
PUSHBX
PUSHCX
MOVBX,0
ILOOP:
MOVDL,ADDRS[BX]MOVAH,2
INCBX
CMPBX,15
JLILOOP
MOVCX,4
W10:
MOVDL,'
MOVDL,ADDRS[BX]
LOOPW10
NEWLINE
POPCX
POPBX
GETINMACROADDRS,COUNT2
LOCALZEROIT,LP,INPUT_END,EXIT
ZEROIT:
MOVADDRS[BX],'
JLZEROIT
LP:
MOVAH,1
CMPAL,0AH
JZINPUT_END
CMPAL,0DH
MOVADDRS[BX],AL
CMPBX,COUNT2
JLLP
INPUT_END:
JZEXIT
MOVAH,7
JMPINPUT_END
EXIT:
CODESEGMENT
MAINPROCFAR
ASSUMECS:
CODE,DS:
DATA,ES:
DATA
START:
MOVAX,DATA
MOVDS,AX
MOVAH,0
MOVAL,3
CLEAR
SHOWMESS1
SHOWMESS2
SHOWMESS13
SHOWMESS3
SHOWMESS4
SHOWMESS5
SHOWMESS6
SHOWMESS7
SHOWMESS8
SHOWMESS9
NEWLINE
SHOWMESS10
SET_P3
W:
CMPAL,'
i'
JNZN1
CALLINSERT
JMPW
N1:
m'
JNZN2
CALLMODIFY
N2:
d'
JNZN3
CALLDELETE
N3:
q'
JNZN4
CALLQUERY
N4:
c'
JNZN5
CALLCOT
N5:
p'
JNZN6
CALLPRINT
N6:
l'
JNZN7
CALLLIST
N7:
e'
JZEXITF
EXITF:
MOVAH,4CH
RET
MAINENDP
INSERTPROCNEAR
MOVDX,OFFSETFNAME
MOVAL,2
MOVAH,3DH
MOVBX,AX
CLEAR1
SET_P14
CALLGET_REC
MOVCX,0MOVDX,0
MOVAH,42H
MOVCX,23MOVDX,OFFSETBUFFER1
MOVAH,40H
MOVAH,3EH
INSERTENDP
GET_RECPROCNEAR
GETINBUFFER2,15
MOVCX,15
CONTINUE:
MOVAL,BUFFER2[BX]
MOVBUFFER1[BX],AL
LOOPCONTINUE
SET_P15
GETINBUFFER2,2
MOVAL,BUFFER2
MOVAL,BUFFER2+1
SET_P16
SET_P17
SET_P18
GET_RECENDP
OPENFPROCNEAR
MOVAL,02
MOVHANDLE,AX
OPENFENDP
QUERYPROCNEAR
CLEAR2
SET_P2
GETINBUFFER1,15
LEADX,MESS11
B:
MOVAH,3FH
MOVCX,23
MOVDX,OFFSETBUFFER2
LEASI,BUFFER2
LEADI,BUFFER1
C:
MOVAL,BYTEPTR[SI]
CMPAL,BYTEPTR[DI]
JNZB
INCSI
INCDI
LOOPC
MOV[BUFFER2+23],'
SHOW_ITEMBUFFER2
QUERYENDP
MODIFYPROCNEAR
MOVBX,AX
CALLGET_RECREAD:
LEADI,BUFFER1
C5:
MOVDL,BYTEPTR[SI]
CMPDL,BYTEPTR[DI]
JNZREAD
LOOPC5
MOVBX,HANDLE
MOVAL,1
MOVCX,0FFFFH
MOVDX,-23
MOVDX,OFFSETBUFFER1
INT21H
JMPEXIT2
EXIT1:
SHOWERR1
EXIT2:
SET_P3
POPBX
RET
MODIFYENDP
DELETEPROCNEAR
PUSHBX
PUSHDX
CLEAR1
MOVAL,2
GETINBUFFER1,15
READ5:
C6:
CMPDL,BYTEPTR[DI]
JNZREAD5
INCSI
LOOPC6
MOVAH,42H
MOVDX,-8
MOVCX,8
MOVDX,OFFSETDEL
MOVAH,40H
INT21H
JMPEXIT6
EXIT5:
SET_P2
EXIT6:
DELETEENDP
LISTPROCNEAR
SHOWMESS11
AGAIN:
MOVDX,OFFSETBUFFER1
CMPAX,0
JZP
SHOW_ITEMBUFFER1
JMPAGAIN
P:
LISTENDP
PRINTPROCNEAR
CALLOPENF
MOVCL,COUNT
READ2:
MOVCX,TYPESCORE
MOVCX,23H
NEXT:
MOVAH,5
MOVDL,BYTEPTRBUFFER1[BX]
LOOPNEXT
DECX
CMPX,0
JNZREAD2
PRINTENDP
COTPROC
SHOWMESS12
READ0:
MOVDX,OFFSETBUFFER2
MOVDL,[BUFFER2+15]
CMPDL,'
6'
JLFIVE
7'
JLSIX
8'
JLSEVEN
9'
JLEIGHT
INC[BUFFER3+4]
JMPQUIT
EIGHT:
INC[BUFFER3+3]
SEVEN:
INC[BUFFER3+2]
SIX:
INC[BUFFER3+1]
FIVE:
INC[BUFFER3]
QUIT:
JNZREAD0
MOVCX,10
A:
LOOPA
A0:
MOVDL,[BUFFER3+BX]
CMPBX,5
JNZA0
COTENDP
CODEENDS
ENDSTART
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 学生 成绩管理系统