XOR BX，BX XOR DX，DX XOR BP，BP NEXT： LODSB
CMP AL，90 JNC NEXT1 CMP AL，60 JNC NEXT2 INC BP
JMP DONE NEXT1：INC BX
JMP DONE
NEXT2：INC DX DONE： LOOP NEXT
MOV [DI]，BX ADD DI，2 MOV [DI]，DX ADD DI，2 MOV [DI]，BP
MOV AH，4CH INT 21H CODE ENDS
；BX存放90～100分的学生个数 ；DX存放60~89分的学生个数 ；BP存放00～59分的学生个数 ；取学生分数 ；是否大干等于90分
；大于等于90分，转到BX+1
；是否大于等于60分 ；大干等于60分，转到DX+1
；小于60分，BP+1
；90～100分的个数加1
；60～89分的个数加1
END START
15．设有一数据块，共有100个字节，试找出数据块中最大者，并把它送至MAX单元中。
解
CODE SEGMENT
ASSUME CS：CODE，DS：CODE 0RG 100H
START：JMP BEGIN BUF
DB 12H，56H，0ABH，…，0FDH，00H；共100个字节无符号数
COUNT EQU $-BUF MAX DB ?
BEGIN：MOV AX，CS
MOV DS，AX
MOV SI，OFFSET BUF MOV CX，COUNT MOV AL，[SI] LOP1： INC SI
CMP AL，[SI] JG LOP2 XCHG AL，[SI] 坏原始数据。 LOP2： LOOP LOP1
；用MOV AL，[SI]似乎要好一些，不会破
MOV MAX，AL MOV AH，4CH INT 21H CODE ENDS 或：
DATA BUF
SEGMENT
DB 12H，56H，0ABH，…，0FDH，00H；共100个字节无符号数 END START
COUNT EQU $-BUF MAX DB ? DATA
ENDS
CODE SEGMENT
ASSUME CS：CODE，DS：DATA 0RG 100H
START：MOV AX，DATA
MOV DS，AX
MOV SI，OFFSET BUF MOV CX，COUNT MOV AL，[SI] LOP1： INC SI
CMP AL，[SI] JG LOP2
XCHG AL，[SI] 始数据。
LOP2： LOOP LOP1
MOV MAX，AL MOV AH，4CH INT 21H CODE ENDS
END START
；用MOV AL，[SI]似乎要好一些，不会破坏原
19．在偏移量为First和Two的内存单元中，分别有两个双字节带符号数X和Y。试编一程序，若X＜Y，则清除中断标志，否则就把方向标志置位。 解
DATA SEGMENT FIRST DW X TW0 DW Y DATA ENDS CODE SEGMENT
ASSUME CS：CODE，DS：DATA
START：MOV AX，DATA
MOV DS，AX
MOV SI，OFFSET FIRST MOV AX，[SI]