home *** CD-ROM | disk | FTP | other *** search
- DOSSEG
- .MODEL SMALL
- .STACK 100h
- .DATA
- Tageszeitfrage DB 'Ist es nachmittags (J/N)?$'
- GutenMorgenGruss LABEL BYTE
- DB 13,10,'Guten Morgen',13,10,'$'
- GutenTagGruss LABEL BYTE
- DB 13,10,'Guten Tag',13,10,'$'
- .CODE
- mov ax,@Data
- mov ds,ax ; DS zeigt auf das Datensegment
- mov dx,OFFSET Tageszeitfrage ; Zeiger auf Tageszeitfrage
- mov ah,9 ; DOS-Funktion zur Ausgabe von Strings
- int 21h ; Ausgabe der Frage
- mov ah,1 ; DOS-Funktion, um Zeichen einzulesen
- int 21h ; Zeichen einlesen
- cmp al,'j' ; Mit 'j' beantwortet?
- je Nachmittag ; Ja, es ist nachmittags
- cmp al,'J' ; Mit 'J' beantwortet?
- jne Vormittag ; Nein, es ist vormittags
- Nachmittag:
- mov dx,OFFSET GutenTagGruss
- jmp GrussAnzeigen
- Vormittag:
- mov dx,OFFSET GutenMorgenGruss
- GrussAnzeigen:
- mov ah,9 ; DOS-Funktion zur Ausgabe von Strings
- int 21h ; Ausgabe des Grußes
- mov ah,4Ch ; DOS-Funktion für Programmende
- int 21h ; Programm beenden
- END
-