.MODEL Small ;EXE Datei
.STACK 100h ;Stackgr��e
.DATA ;Datensegment
Msg1 DB "Geben Sie den Text ein: $"
CR_LF DB 10,13,"$"
Puffer STRUC ;Struktur f. Puffer
Max DB 50 ;Max. 50 Zeichen
Anz DB ? ;Reserv. f. Anzahl
Txt DB 53 DUP (?) ;3 mehr weil + CR-LF und $
Puffer ENDS ;Ende Puffer
Buffer Puffer <> ;Speicherplatz f. Puffer
.CODE ;Codesegmet
Start: mov ax,@data ;DS initialisieren
mov ds,ax
mov dx,OFFSET Msg1
mov ah,09h
int 21h ;Msg1 ausgeben
mov dx,OFFSET Buffer
mov ah,0Ah
int 21h ;Text einlesen
mov bx,dx ;Offset nach bx f. sp�ter
mov dx,OFFSET CR_LF
mov ah,09h
int 21h ;n�chste Zeile
add bx,2 ;bx auf Textanfang (+Max+Anz)
add bl,Buffer.Anz ;bx auf Pufferende
adc bh,0 ;bh+1 falls �berlauf
mov word ptr [bx],0D0Ah ;CRLF ans Ende
mov byte ptr [bx+2],"$" ;$ ans Ende
mov dx,OFFSET Buffer.Txt
mov ah,09h
int 21h ;Eingeg. Text ausgeben
mov ah,4Ch
int 21h ;Programm beenden!
END Start
¤ Dauer der Verarbeitung: 0.2 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|