学生综合素质成绩计系统程序设计.doc

学生综合素质成绩统计程序设计学生综合素质成绩统计学生综合素质成绩统计学生综合素质成绩统计学生综合素质成绩统计DATA SEGMENT MESS1 DB Welcome to student grade DB message system,0AH,0DH LONG1 EQU $-MESS1 MESS2 DB Edit please input ENTER,0AH,0DH LONG2 EQU $-MESS2 MESS3 DB Exit input ESC,0AH,0DH LONG3 EQU $-MESS3 MESS4 DB NUM NAME MORAL PE THEORY PRACTISE DB INTEGRATION,0AH,0DH LONG4 EQU $-MESS4 DEYU DB 4 DUP(?) TIYU DB 4 DUP(?) LILUN DB 4 DUP(?) SJ DB 4 DUP(?) EXIT DB ? ZGRADE DB ?,?,?,? GRADE DB ? DISPLAY DB ?,?,$ DATA ENDS STA SEGMENT STACK DB 100 DUP(?) STA ENDS CODE SEGMENT ASSUME DS:DATA,CS:CODE,ES:DATA START PROC FAR MOV AX,DATA MOV DS,AX MOV ES,AX MOV CX,0 CALL CLRSCR MOV BP,OFFSET MESS1 ;显示第一行字符 MOV DH,1 MOV DL,14H MOV CX,LONG1 CALL OUTPUT MOV BP,OFFSET MESS2 ;显示第二行字符 MOV DH,3 MOV DL,11H MOV CX,LONG2 CALL OUTPUT MOV BP,OFFSET MESS3 ;显示第二行字符 MOV DH,3 MOV DL,31H MOV CX,LONG3 CALL OUTPUT MOV BP,OFFSET MESS4 ;显示第四行字符 MOV DH,5 MOV DL,6 MOV CX,LONG4 CALL OUTPUT MOV DX,0606H ;初始化输入坐标 ;******************************************** ;退出程序 A0: MOV AH,01H INT 21H CMP AL,1BH JNZ BEGIN MOV AH,4CH INT 21H ;******************************************** BEGIN: INC DH PUSH DX CALL POSITION ;确定光标位置 S1: MOV AH,01H ;输入学号 INT 21H CMP AL,0DH JNZ S1 ADD DX,0010 CALL POSITION S2: MOV AH,01H ;输入姓名 INT 21H CMP AL,0DH JNZ S2 ADD DX,0009H CALL POSITION MOV SI,OFFSET DEYU ;输入并保存德育成绩 D1: MOV AH,01H INT 21H MOV [SI],AL INC SI CMP AL,0DH JNZ D1 ADD DX,0008H CALL POSITION MOV SI,OFFSET TIYU ;输入并保存体育成绩 D2: MOV AH,01H INT 21H MOV [SI],AL INC SI CMP AL,0DH JNZ D2 ;第一百行 ADD DX,0008H CALL POSITION MOV SI,OFFSET LILUN ;输入并保存理论成绩 D3: MOV AH,01H INT 21H MOV [SI],AL INC SI CMP AL,0DH JNZ D3 ADD DX,000AH CALL POSITION MOV SI,OFFSET SJ ;输入并保存实践成绩 D4: MOV AH,01H INT 21H MOV [SI],AL INC SI CMP AL,0DH JNZ D4 ;