题目要求
信息检素程序设计:在数据区,有9个不同的信息,编号 0-8,每个信息包括20 个字符。从键盘接收 0-8 之间的一个编号,然后再屏幕上显示出相应编号的信息内容,按“q”键退出
完整代码
DATAS SEGMENTn0 db '00000000000000000000'n1 db '11111111111111111111'n2 db '22222222222222222222'n3 db '33333333333333333333'n4 db '44444444444444444444'n5 db '55555555555555555555'n6 db '66666666666666666666'n7 db '77777777777777777777'n8 db '88888888888888888888'Errmsg DB 'please input 0-8 q:exit $'
DATAS ENDSCODES SEGMENTASSUME CS:CODES, DS:DATAS
START:MOV AX, DATASMOV DS, AXLOP:MOV AH, 1 INT 21HCMP AL, 'q'JZ exitCMP AL, '0' JB ERRCMP AL, '8'JA ERRSUB AL, 30H ;'0':30MOV DH, 14HMUL DHMOV BX, AX CALL DISPJMP LOPERR:MOV DL, 0DH ;回车换行MOV AH, 02INT 21HMOV DL, 0AHMOV AH, 02INT 21HMOV DX, OFFSET ErrmsgMOV AH, 09INT 21HMOV DL, 0DH ;回车换行MOV AH, 02INT 21HMOV DL, 0AHMOV AH, 02INT 21HJMP LOPDISP PROC NEARMOV DL, 0DH ;回车换行MOV AH, 02INT 21HMOV DL, 0AHMOV AH, 02INT 21HMOV CX, 14HLOP1:MOV DL, [BX] MOV AH, 02HINT 21HINC BX ;LOOP LOP1MOV DL, 0DH ;回车换行MOV AH, 02INT 21HMOV DL, 0AHMOV AH, 02INT 21HRETDISP ENDPexit:MOV AH, 4CHINT 21 CODES ENDS
END START