home *** CD-ROM | disk | FTP | other *** search
/ Internet 53 / INTERNET53.iso / pc / software / windows / graphics / pspplugs / afhbevel / afhbevel.afs < prev    next >
Encoding:
Text File  |  1996-02-27  |  606 b   |  24 lines

  1. %RGB-1.0
  2. 95
  3. 255
  4. 0
  5. 149
  6. 0
  7. 0
  8. 0
  9. 7
  10. ((x<ctl(7))&&(y>x)&&(y<Y-x))||((y<ctl(7))&&(x>y)&&(x<X-y))?scl(
  11. c,0,255,ctl(0),ctl(1)):((X-x<=ctl(7))&&(Y-y>X-x)&&(y>x-X))||((Y
  12. -y<=ctl(7))&&(X-x>Y-y)&&(x>y-Y))?scl(c,0,255,ctl(2),ctl(3)):c
  13.  
  14. ((x<ctl(7))&&(y>x)&&(y<Y-x))||((y<ctl(7))&&(x>y)&&(x<X-y))?scl(
  15. c,0,255,ctl(0),ctl(1)):((X-x<=ctl(7))&&(Y-y>X-x)&&(y>x-X))||((Y
  16. -y<=ctl(7))&&(X-x>Y-y)&&(x>y-Y))?scl(c,0,255,ctl(2),ctl(3)):c
  17.  
  18. ((x<ctl(7))&&(y>x)&&(y<Y-x))||((y<ctl(7))&&(x>y)&&(x<X-y))?scl(
  19. c,0,255,ctl(0),ctl(1)):((X-x<=ctl(7))&&(Y-y>X-x)&&(y>x-X))||((Y
  20. -y<=ctl(7))&&(X-x>Y-y)&&(x>y-Y))?scl(c,0,255,ctl(2),ctl(3)):c
  21.  
  22. a
  23.  
  24.