home *** CD-ROM | disk | FTP | other *** search
/ CD-X 1 / cdx_01.iso / demodisc / cyberdan / intrance / pattvect / smooth.asm < prev    next >
Encoding:
Assembly Source File  |  1994-11-16  |  1.0 KB  |  49 lines
  1. ;------------------------------------------------------------------------------
  2. paletta:    pusha
  3.         mov    dx,3c8h
  4.         MOV    AL,1
  5.         out    dx,al
  6.         ;xor    bx,bx
  7.         mov    bl,10
  8.         inc    dx
  9.         out    dx,al
  10.         out    dx,al
  11.         out    dx,al
  12.         mov    cx,63
  13. palinc:        mov    al,bl
  14.         push    cx
  15.         mov    cx,4
  16. palfour:    mov    al,10
  17.         out    dx,al
  18.         mov    al,bl
  19.         out    dx,al
  20.         add    al,5
  21.         out    dx,al
  22.         loop    palfour
  23.         pop    cx
  24.         inc    bx
  25.         loop    palinc
  26.         popa
  27.         ret
  28. ;*****************************************************************************
  29. smooth:        mov    di,80+320*24
  30. smoo:        mov    ah,0
  31.         mov    bh,0
  32.         mov    cx,160
  33. smoo1:          mov     al,byte ptr es:[di-1]
  34.                 mov     bl,byte ptr es:[di+1]
  35.         add    ax,bx
  36.                 mov     bl,byte ptr es:[di-320]
  37.                 add     ax,bx
  38.                 mov     bl,byte ptr es:[di+320]
  39.                 add     ax,bx
  40.                 shr     ax,2
  41.                 mov     byte ptr es:[di+320],al
  42.         inc    di
  43.         loop    smoo1
  44.         add    di,160
  45.         cmp    di,64000
  46.         jbe    smoo
  47.         ret
  48. ;*****************************************************************************
  49.