DSEG   SEGMENT
QUELLE DB "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
ZIEL   DB 26 DUP (?)
       DB "$"
QP     DW OFFSET QUELLE
       DW SEG QUELLE
ZP     DW OFFSET ZIEL
       DW SEG ZIEL
DSEG   ENDS

CSEG   SEGMENT 'CODE'
       ASSUME CS:CSEG,DS:DSEG

MAIN   PROC
       MOV AX,DSEG
       MOV DS,AX
       LES DI,DWORD PTR ZP
       LDS SI,DWORD PTR QP
       CLD
       MOV CX,26
       REP MOVSB
       MOV AH,9
       LDS DX,DWORD PTR ZP
       INT 21h
       MOV AX,4C00h
       INT 21h
MAIN   ENDP

CSEG   ENDS

SSEG   SEGMENT STACK
       DW 128 DUP (?)
SSEG   ENDS

       END MAIN