DSEG SEGMENT
T DB "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
DB 0
DSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG
MAIN PROC
MOV AX,SEG T
MOV ES,AX
MOV DI,OFFSET T
MOV CX,26
CLD
MOV AL,'M'
REPNE SCASB
JZ ERFOLG
MISSERFOLG:
JMP ENDE
ERFOLG:
MOV AL,'$'
STOSB
MOV AH,9
MOV DX,SEG T
MOV DS,DX
MOV DX,OFFSET T
INT 21h
ENDE:
MOV AX,4C00h
INT 21h
MAIN ENDP
CSEG ENDS
SSEG SEGMENT STACK
DW 128 DUP (?)
SSEG ENDS
END MAIN