匯編語(yǔ)言程序設(shè)計(jì)課程設(shè)計(jì)報(bào)告-班級(jí)成績(jī)管理程序-資料下載頁(yè)
2025-08-11 12:05本頁(yè)面
【正文】 N2 JMP FINISHN2: SHOW PRINT JMP LISTLOOPFINISH: CALL CLOSEF RETLIST ENDPINSERT PROC NEAR 。Insert recorder CALL OPENF MOV RECID,0 CMP FLAG,0 JZ READL RETREADL: 。Read until at the end MOV AH,14H LEA DX,MYFCB INT 21H CMP AL,01 JE WRITES CMP AL,0 JE READLWRITES: SHOW NAMES 。Input the information GETSTR N SHOW AGE GETSTR A SHOW SEX GETSTR S SHOW HEIGHT GETSTR H SHOW WEIGHT GETSTR W MOV AH,15H 。Write in LEA DX,MYFCB INT 21H CALL CLOSEF RETINSERT ENDPSEARCH PROC NEAR PUSH AX PUSH BX PUSH CX PUSH DX CALL OPENF MOV RECID,0 CMP FLAG,0 JZ START RETSTART: SHOW NAMES SHOW AGE SHOW SEX SHOW HEIGHT SHOW WEIGHT SHOW WHICHINWAY: MOV AH,1 。Select search by which field INT 21H CMP AL,39。139。 JL INWAY CMP AL,39。539。 JG INWAY SUB AL,31H MOV WAY,AL SHOW STRING GETSTR VALUE 。Input the value to search SHOW PROMPTCMPLOOP: 。Search MOV AH,14H LEA DX,MYFCB INT 21H CMP AL,01 JNZ NEXT JMP EXITSNEXT: CLD MOV AL,10 MUL WAY LEA SI,VALUE LEA DI,N ADD DI,AX MOV CX,10 REPE CMPSB JNZ CMPLOOP SHOW PRINT MOV FLAG,1 MOV CL,RECID CMP STATE,39。D39。 JNE RETURNDEL: MOV AH,14H 。 NOTE: Delete is in the module of Search LEA DX,MYFCB INT 21H CMP AL,0 JNZ W_END SUB RECID,2 MOV AH,15H LEA DX,MYFCB INT 21H INC RECID JMP DELW_END: CLD LEA DI,MYDTA MOV CX,50 MOV AL,0 REP STOSB SUB RECID,1 MOV AH,15H MOV MYDTA,1AH LEA DX,MYFCB INT 21H SHOW DELOKRETURN: MOV RECID,CL JMP CMPLOOPEXITS: CALL CLOSEF CMP FLAG,0 JNZ EXT SHOW NOTHISEXT: MOV FLAG,0 POP DX POP CX POP BX POP AX RETSEARCH ENDPOPENF PROC NEAR 。Open OR Create (if 39。MYFCB39。 inexistence) MOV AH,0FH LEA DX,MYFCB INT 21H OR AL,AL JNZ CREATE RETCREATE: MOV AH,16H LEA DX,MYFCB INT 21H OR AL,AL JNZ SETFLAG RETSETFLAG: MOV FLAG,1 SHOW ERRMSG RETOPENF ENDPCLOSEF PROC NEAR MOV AH,10H LEA DX,MYFCB INT 21H RETCLOSEF ENDPCODE ENDS END MAIN三、參考書(shū)籍：[1] 劉韜、 basic [m]. 人民郵電出版社，2002年4月.[2] 劉圣才、 basic [m].清華大學(xué)出版社，2002年1月.[3] mike geundenloy[美]著、 basic開(kāi)發(fā)指南[m].電子工業(yè)出版社，2000年7月.[4] [m].清華大學(xué)出版社，1998年1月.23
教學(xué)教案相關(guān)推薦
鄂ICP備17016276號(hào)-1