DATA ENDS
STACK SEGMENT STACK DB 100 DUP(?) STACK ENDS CODE SEGMENT
ASSUME CS:CODE, DS:DATA, SS:STACK START: MOV AX, DATA MOV DS, AX
MOV AL, DATA1 MOV BL, DATA2 MOV CL, DATA3 CMP AL,BL
JGE NEXT1 ;带符号数用JG,若用JA就错了 XCHG AL,BL NEXT1: CMP AL, CL JGE NEXT2 XCHG AL,CL NEXT2: CMP BL, CL
JGE NEXT3
XCHG BL, CL; 至此AL > BL > CL
NEXT3: MOV DATA1, CL; 按递增顺序存储
MOV DATA2, BL MOV DATA3, AL
CODE ENDS END START
附其他解法如下: DATA SEGMENT DAT DB 5,-7,100 DATA ENDS
STACK1 SEGMENT STACK DB 100H DUP(?) STACK1 ENDS CODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACK1 START: MOV AX,DATA MOV DS,AX LEA SI,DAT MOV CX,2 L1: MOV AL,[SI]
CMP AL,[SI+1] JNG L2 XCHG AL,[SI+1] MOV [SI],AL L2: INC SI LOOP L1 MOV AH,4CH INT 21H CODE ENDS END START
;此程序做完,只能保证最大的一个排在最后面,但若原来的第二、第三个发生过交换,则第一个和第三个还没比较过。所以应该再作一次新的第一、第二个之间的比较。程序修改如下。
START: MOV AX,DATA MOV DS,AX LEA SI,DAT MOV CX,2 L1: MOV AL,[SI] CMP AL,[SI+1] JNG L2 XCHG AL,[SI+1] MOV [SI],AL L2: INC SI LOOP L1 MOV AL,DTA :比较新的一、二元素 CMP AL,DTA+1 JNG DONE XCHG AL, DTA+1 MOV DTA,AL
DONE: MOV AH,4CH INT 21H
;此程序可以改成一个二重循环如下。这样还可以适应更多个数的排序: DATA SEGMENT DT1 DB 07FH, 56H, 80H DATA ENDS
STACK SEGMENT STACK DB 100 DUP(?) STACK ENDS CODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACK START: MOV AX,DATA MOV DS,AX
MOV CH,2 LP1: MOV CL,CH LEA SI,DT1 LP2: MOV AL,[SI] INC SI CMP AL,[SI] JNG NEXT1 XCHG AL,[SI] MOV [SI-1],AL NEXT1: DEC CL ;内循环控制 JNZ LP2 DEC CH ;外循环控制 JNZ LP1 DONE: MOV AH,4CH INT 21H CODE ENDS END START
67. 设PC/XT存储器低地址区一段内容如下:
地址(H):0: 20,21,22,23,24,25,26,27,28,29,2A,2B
内容(H): 3C,00,86,0E,45,00,86,0E,57,00,86,0E (1) 在CS=2000H,IP=0010H,SS=1000H,SP=0100H,FLAGS=0240H时,执行INT8H指令后:① 程序转向何处执行?(用物理地址回答)_________________ ② SP=_______;栈顶六单元的内容分别是: ( (
: )= _________; ( : )= _________; ( : )= _________; : )= _________; ( : )= _________; ( : )= _________;
(2) 若用户要使用系统的IRQ2,其中断服务程序入口地址为2000:0100H,如何安装中断矢量(包括保护原矢量)。
解:
(1) ①因为执行指令INT 8 ,中断矢量的地址为4X8=32D=20H,中断矢量的内容(即
中断服务程序入口地址)为0E86H:003CH=E89CH。
② SP=100H – 6=0FAH; 栈顶六单元的内容分别是:
(1000H:FAH)=12H ; (1000H:FBH)=00H; (1000H:FCH)=00H ; (1000H:FDH)=20H ; (1000H:FEH)=40H ; (1000H:FFH)=02H ; 因为执行INT 8 指令(2字节),IP+2=0012H.
(2) PROIP DW ?
PROCS DW ?
;保护原矢量 PUSH AX PUSH BX
PUSH PUSH PUSH MOV MOV
INT MOV MOV MOV MOV MOV MOV MOV INT POP POP POP POP POP
DX DS ES AH,35H;
AL,0AH;中断类型码,IRQ2对应的 21H PROIP,BX
PROCS,ES; 装入现矢量 AX,2000H DS,AX DX,100H AH,25H;
AL,0AH;中断类型码 21H ES DS DX BX
AX; 用户程序结束时再恢复原矢量