STACK SEGMENT STACK
DB 200 DUP(0)
STACK ENDS
DATA SEGMENT
PROG DB 'MOV AX,DATA',0DH,'MOV DX,AX',0DH,'MOV AX,0',0DH,'MOV BX,2',0DH,'MOV CX,10',0DH,'ADD AX,BX',0DH
DB '...'
DB 1AH
NUM DW 0
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STACK
BEGIN: MOV AX,DATA
MOV DS,AX
MOV AX,0
MOV SI,OFFSET PROG
LOPA: CMP [SI],BYTE PTR 1AH
JE EXIT
CMP [SI],BYTE PTR 'M'
JNE NEXT
CMP [SI+1],BYTE PTR 'O'
JNE NEXT