home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 23 / AACD 23.iso / AACD / Programming / tek / kn / elate / visual / flush.asm < prev    next >
Encoding:
Assembly Source File  |  2001-05-12  |  1.2 KB  |  48 lines
  1.  
  2.     .include 'taort'
  3.     .include 'ave/toolkit/toolkit.inc'
  4.     .include 'lib/tek/kn/elate/visual.inc'
  5.  
  6. ;=============================================================================
  7. ;-----------------------------------------------------------------------------
  8. ; 
  9. ;    TEKlib
  10. ;    (C) 1999-2001 TEK neoscientists
  11. ;    all rights reserved.
  12. ;
  13. ;    void kn_sync(TAPTR v, TINT x, TINT y, TINT w, TINT h)
  14. ;
  15. ;-----------------------------------------------------------------------------
  16. ;=============================================================================
  17.  
  18.     tool 'lib/tek/kn/visual/flush',VP,TF_EMBED
  19.  
  20. ;-----------------------------------------------------------------------------
  21.  
  22.     ent p0 i0 i1 i2 i3 : -
  23.  
  24.     defbegin
  25.     defp visual,pixmap
  26.     defi x,y,w,h
  27.  
  28.         ; qcall    dev/ave/tao/lock,(-:-)
  29.         ; qcall    dev/ave/tao/unlock,(-:-)
  30.  
  31.         cpy.p    [visual+vis_pixmap],pixmap
  32.  
  33.         bcp    x ge 0,_local
  34.  
  35.         ncall    pixmap,updatelocal,(pixmap:-)
  36.         ret
  37.  
  38. _local:        ncall    pixmap,addpatch,(pixmap,x,y,w,h:-)
  39.         ncall    pixmap,updatepatchlocal,(pixmap:-)
  40.         ret
  41.  
  42.     defend
  43.  
  44.     toolend
  45.  
  46. ;-----------------------------------------------------------------------------
  47. ;=============================================================================
  48.