home *** CD-ROM | disk | FTP | other *** search
/ Maclife 39 / MACLIFE39.ISO.7z / MACLIFE39.ISO / FreeWare200 / グラフィック / Photonick_68K.sit / Photonick_68Kフォルダ / Filter / divide4.fcf < prev    next >
Text File  |  1998-03-10  |  509b  |  45 lines
  1. AFCF
  2. #    Artemis Filter Code File
  3. #   4 Divide Image
  4. #
  5. #    Copyright (C) 1997 by Yasushi Tanaka
  6.  
  7. # Version Number    ; V:n
  8. V:1
  9.  
  10. # Filter ID            ; I:n
  11. I:1
  12.  
  13. # Filter Title        ; T:str
  14. T:Divide 4-Image
  15.  
  16. # Color Space : RGB or YUV
  17. C:RGB
  18.  
  19. R:
  20.     mov 2 a
  21.     const_cx R0
  22.     const_cy R1
  23.     const_x X
  24.     const_y Y
  25.     mod    R0 X
  26.     mod R1 Y
  27.     mul 2 X            ; X: x-pos to global
  28.     mul 2 Y            ; Y: y-pos to global
  29.     func_avg_r A
  30.     eop
  31. /:
  32. G:
  33.     mov 2 a
  34.     func_avg_g A    ; X,Y from global
  35.     eop
  36. /:
  37. B:
  38.     mov 2 a
  39.     func_avg_b A    ; X,Y from global
  40.     eop
  41. /:
  42.  
  43. # End of fsf
  44. E:
  45.