星火微课系统客户端
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

преди 4 години
123456789101112131415161718192021222324252627282930313233343536373839
  1. % two component colorseparation for laser (c) Copyright Anoto AB 2004
  2. /csp
  3. {
  4. pop 0
  5. } bind def
  6. /cspx
  7. {
  8. exch
  9. pop 0
  10. exch
  11. } bind def
  12. /srgbF
  13. {
  14. 3{3 -1 roll 1 exch sub }repeat
  15. 2 copy
  16. lt
  17. {
  18. 3 1 roll
  19. 2 copy
  20. gt {csp} {cspx} ifelse
  21. 3 -1 roll
  22. }
  23. {
  24. 3 -1 roll
  25. 2 copy
  26. gt {csp} {cspx} ifelse
  27. 3 1 roll
  28. }
  29. ifelse
  30. 3 1 roll dup 3 -1 roll dup 4 1 roll add 1.92 gt { 0.04 sub exch 0.04 sub exch } if 3 -1 roll
  31. 0 setcmykcolor
  32. } bind def
  33. /scmykF { dup dup 6 2 roll add 5 -1 roll exch 5 1 roll add 4 1 roll add 3 1 roll 3{3 -1 roll 1 exch sub dup 0 lt { pop 0 } if }repeat srgbF }bind def