home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / tasm / chapxmpl.arc / MODCHAR.ASM < prev    next >
Encoding:
Assembly Source File  |  1988-10-09  |  1.3 KB  |  35 lines
  1.     DOSSEG                ; Reihenfolge der Segmente festlegen
  2.     .MODEL    SMALL        ; Speichermodell mit NEAR-Code-Segment
  3.                         ; und NEAR-Datensegment
  4.     .STACK    200h            ; Stack mit 512 Bytes
  5.     .DATA                ; Anfang des Datensegments
  6. StringAusgabe    DB    13,10    ; CR/LF für Zeilenvorschub
  7. DreiZeichen    DB    3 DUP (?)    ; Speicherplatz für 3 Zeichen
  8.             DB    '$'        ; Stringende in MS-DOS
  9.         .CODE            ; Anfang des Code-Segments
  10. Anfang:
  11.         mov    ax,@Data
  12.         mov    ds,ax        ; DS zeigt auf Datensegment
  13.         mov    bx,OFFSET Dreizeichen
  14.                         ; Zeiger auf erstes Zeichen
  15.         mov    ah,1            ; MS-DOS: Eingabefunktion
  16.         int    21h            ; Zeichen von Tastatur lesen
  17.         dec    al            ; 1 vom Zeichen abziehen
  18.         mov    [bx],al        ; geändertes Zeichen speichern
  19.         inc    bx            ; Zeiger auf zweites Zeichen
  20.         int    21h            ; nächstes Zeichen lesen
  21.         dec    al            ; 1 vom Zeichen abziehen
  22.         mov    [bx],al        ; geändertes Zeichen speichern
  23.         inc    bx            ; Zeiger auf drittes Zeichen
  24.         int    21h            ; nächstes Zeichen lesen
  25.         dec    al            ; 1 vom Zeichen abziehen
  26.         mov    [bx],al        ; geändertes Zeichen speichern
  27.         mov    dx,OFFSET StringAusgabe    ; Zeiger auf String
  28.                         ; mit geänderten Zeichen
  29.         mov    ah,9            ; MS-DOS: Stringausgabe
  30.         int    21h            ; String ausgeben
  31.         mov    ah,4Ch        ; MS-DOS: Programmende
  32.         int    21h            ; Programm beenden
  33.         END    Anfang        ; Ende des Quelltexts
  34.                         ; Programm startet am Label Anfang
  35.