home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / p / pchdemo.zip / SOURCESW.ZIP / 320X200.ASM < prev    next >
Assembly Source File  |  1992-10-28  |  1KB  |  63 lines
  1. code    segment public
  2.  
  3. assume  cs:code,ds:code,es:code,ss:stack
  4.  
  5. extrn    digit:near
  6.  
  7.     push    cs
  8.     pop    ds
  9.     push    cs
  10.     pop    es
  11.  
  12.     mov    di,offset tab1    ; Erstellen der Palette mit 64 Graustufen
  13.     mov    ax,0
  14. s0:
  15.     stosw
  16.     stosw
  17.     stosw
  18.     stosw
  19.     stosw
  20.     stosw
  21.     add    ax,101h
  22.     cmp    al,64
  23.     jnz    s0
  24.  
  25.         mov     ax,13h
  26.     int    10h        ; Grafik einschalten (VGA 320 x 200)
  27.         mov     ax,1012h
  28.     mov    bx,0
  29.     mov    cx,256
  30.     mov    dx,offset tab1
  31.         int     10h             ; und Palette auf 64 Graustufen ändern.
  32. s1:
  33.     mov    al,15        ; mittlere Kontrastwert
  34.     mov    bl,32        ; ab dem 32.Pixel von links
  35.     mov    bh,44        ; ab der 44.Zeile von oben
  36.     mov    cx,320        ; 320 Pixel digitalisieren
  37.     mov    dx,200        ; 200 Zeilen digitalisieren
  38.     les    di,vstart    ; Adresse der VGA A000H
  39.     call    digit        ; und Digitalisieren
  40.  
  41.     mov    ah,1
  42.     int    16h
  43.     jz    s1        ; Wenn keine Taste gedrückt
  44.     mov    ah,0
  45.     int    16h
  46.  
  47.     mov    ax,3
  48.     int    10h        ; Auf Textmodus schalten
  49.  
  50.     mov    ah,4ch
  51.     int    21h        ; Programm beenden
  52.  
  53. tab1    db    768 dup (0)
  54. vstart    dd    0a0000000h
  55.  
  56. code    ends
  57. stack    segment para stack
  58.     dw    256 dup (?)
  59. stack    ends
  60.  
  61. end
  62.  
  63.