assume CS:codesg,DS:datasg
datasg SEGMENT
DB ‘ibm ‘
DB ‘dec ‘
DB ‘dso ‘
DB ‘vax ‘
datasg ENDS
stacksg SEGMENT
DW 0,0,0,0,0,0,0,0
stacksg ENDS
codesg SEGMENT
start : MOV AX,datasg
MOV DS,AX
MOV DX,stacksg
MOV SS,DX
MOV SP,16
MOV BX,0
MOV CX,4
s0: PUSH CX
MOV SI,0
MOV CX,3
s: MOV AL,[BX+SI]
AND AX,11011110b
MOV [BX+SI],AL
INC SI
LOOP s
ADD BX,16
POP CX
INC BX
LOOP s0
MOV AX,4c00h
INT 21h
codesg ends
end start