DATAS SEGMENT
MAX DW 5555H
MIN DW 1111H
DATAS ENDS
STACKS SEGMENT
DW 20H DUP(?)
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
MOV AX,MAX ;AX=5555H
MOV BX,AX
MOV CL,4
MOV DL,AH ;DL=55H
SAR DL,CL ;DL=05H
OR DL,30H ;DL=31H
MOV AH,2
INT 21H
MOV AX,BX
MOV DL,AH ;DL=55H
AND DL,0FH ;DL=05H
OR DL,30H ;DL=31H
MOV AH,2
INT 21H
MOV AX,BX
MOV DL,AL ;DL=55H
SAR DL,CL ;DL=05H
OR DL,30H ;DL=31H
MOV AH,2
INT 21H
MOV AX,BX
MOV DL,AL ;DL=55H
AND DL,0FH ;DL=05H
OR DL,30H ;DL=31H
MOV AH,2
INT 21H
MOV AH,07H
INT 21H
MOV AH,4CH
INT 21H
CODES ENDS
END START