home *** CD-ROM | disk | FTP | other *** search
/ Hackers Magazine 57 / CdHackersMagazineNr57.iso / Software / Multimedia / k3d-setup-0.7.11.0.exe / share / k3d / shaders / surface / k3d_toonmap.sl < prev    next >
Encoding:
Text File  |  2008-01-23  |  3.8 KB  |  183 lines
  1. /*
  2.  * 2006-03-13 dan@3-e.net
  3.  *
  4.  */
  5.  
  6. #include "k3d_rmannotes.h"
  7.  
  8. surface k3d_toonmap (
  9.  
  10. float Ka=0.327; 
  11. float Kd=0.336; 
  12. float Ks=0.929; 
  13. float roughness=0.107; 
  14. string Highlight_Map="";
  15. color Highlight_Color=(1, 1, 1); 
  16. float channel4=0; 
  17. float swidth4=1; 
  18. float twidth4=1; 
  19. float samples4=1; 
  20. float ss4=1; 
  21. float tt4=1; 
  22. string Paint_Map="";
  23. color Paint_Color=(0.5, 0.5, 0.5); 
  24. float channel3=0; 
  25. float swidth3=1; 
  26. float twidth3=1; 
  27. float samples3=1; 
  28. float ss3=1; 
  29. float tt3=1; 
  30. float paint_spec=0.0888; 
  31. float paint_trans=0.539; 
  32. float paint_fuzz=0.274; 
  33. float ink_thresh=0.389; 
  34. float ink_fuzz=0.765; 
  35. string Ink_Map=""; 
  36. color Ink_Color=(0, 0, 0);
  37. float channel2=0; 
  38. float swidth2=1; 
  39. float twidth2=1; 
  40. float samples2=1; 
  41. float ss2=1; 
  42. float tt2=1; ) 
  43. {
  44. /** Surface main-code start **/
  45.  
  46. /** Texture_Highlight_Map **/
  47. color temt_c4;
  48. float temp_ss4;
  49. float temp_tt4;
  50. if (ss4 ==1) {temp_ss4=s;} else {temp_ss4=ss4;}
  51. if (tt4 ==1) {temp_tt4=t;} else {temp_tt4=tt4;}
  52. if ( Highlight_Map=="" ) 
  53. {
  54. temt_c4=Highlight_Color;
  55. } 
  56. else
  57. {
  58. if (channel4 < 0 || channel4 > 3)
  59. {
  60. temt_c4=texture(Highlight_Map,temp_ss4,temp_tt4,"swidth",swidth4,"twidth",twidth4,"samples",samples4);
  61. } 
  62. else 
  63. {
  64. temt_c4=texture(Highlight_Map[channel4],temp_ss4,temp_tt4,"swidth",swidth4,"twidth",twidth4,"samples",samples4);
  65. }
  66. }
  67. /** Texture_Paint_Map **/
  68. color temt_c3;
  69. float temp_ss3;
  70. float temp_tt3;
  71. if (ss3 ==1) {temp_ss3=s;} else {temp_ss3=ss3;}
  72. if (tt3 ==1) {temp_tt3=t;} else {temp_tt3=tt3;}
  73. if ( Paint_Map=="" ) 
  74. {
  75. temt_c3=Paint_Color;
  76. } 
  77. else
  78. {
  79. if (channel3 < 0 || channel3 > 3)
  80. {
  81. temt_c3=texture(Paint_Map,temp_ss3,temp_tt3,"swidth",swidth3,"twidth",twidth3,"samples",samples3);
  82. } 
  83. else 
  84. {
  85. temt_c3=texture(Paint_Map[channel3],temp_ss3,temp_tt3,"swidth",swidth3,"twidth",twidth3,"samples",samples3);
  86. }
  87. }
  88. /** Texture_Ink_Map **/
  89. color temt_c2;
  90. float temp_ss2;
  91. float temp_tt2;
  92. if (ss2 ==1) {temp_ss2=s;} else {temp_ss2=ss2;}
  93. if (tt2 ==1) {temp_tt2=t;} else {temp_tt2=tt2;}
  94. if ( Ink_Map=="" ) 
  95. {
  96. temt_c2=Ink_Color;
  97. } 
  98. else
  99. {
  100. if (channel2 < 0 || channel2 > 3)
  101. {
  102. temt_c2=texture(Ink_Map,temp_ss2,temp_tt2,"swidth",swidth2,"twidth",twidth2,"samples",samples2);
  103. } 
  104. else 
  105. {
  106. temt_c2=texture(Ink_Map[channel2],temp_ss2,temp_tt2,"swidth",swidth2,"twidth",twidth2,"samples",samples2);
  107. }
  108. }
  109. #define blend(a,b,x) ((a) * (1 - (x)) + (b) * (x))
  110. #define union(a,b) ((a) + (b) - (a) * (b))
  111.  
  112. float
  113. toonspec(vector N, V; float roughness)
  114. {
  115. float C = 0;
  116. vector H;
  117.  
  118. illuminance(P, N, PI/2) {
  119. H = normalize(normalize(L)+V);
  120. C += pow(N.H, 1/roughness);
  121. }
  122. return C;
  123. }
  124.  
  125. float cos_here;
  126. float diff, spec;
  127. normal Nf;
  128. vector normI, half;
  129.  
  130. color toon_color, layer_color;
  131. color toon_opac, layer_opac;
  132.  
  133. Nf = faceforward(normalize(N), I);
  134. normI = normalize(I);
  135.  
  136. /* background layer (layer 0) */
  137. toon_color = color (0, 0, 0);
  138. toon_opac = Os;
  139.  
  140. /* toon paint (layer 1) */
  141.  
  142. /* only care about percentage illumination */
  143. diff = 0;
  144. illuminance(P, Nf, PI/2)
  145. diff += normalize(L).Nf; 
  146.  
  147. /* antialias the transition */
  148. diff = smoothstep(paint_trans - paint_fuzz/2, paint_trans + paint_fuzz/2, diff);
  149.  
  150. /* specular -- transition also antialiased */ 
  151. spec = toonspec(Nf, -normalize(I), roughness);
  152. spec = smoothstep(paint_spec - paint_fuzz/2, paint_spec + paint_fuzz/2, spec);
  153.  
  154. layer_color = Cs*(Kd*diff*temt_c3 + Ka*ambient()) + temt_c4*Ks*spec;
  155. layer_opac = Os;
  156.  
  157. toon_color = blend(toon_color, layer_color, layer_opac);
  158. toon_opac = union(toon_opac, layer_opac);
  159.  
  160. /* toon ink (layer 3) */
  161.  
  162. cos_here = normalize(Nf).normI;
  163.  
  164. /* antialias ink lines */
  165. layer_opac = 1 - smoothstep(ink_thresh - ink_fuzz/2, ink_thresh + ink_fuzz/2, abs(cos_here));
  166.  
  167. if (abs(cos_here) < ink_thresh)
  168. layer_color = temt_c2;
  169. else
  170. layer_color = 0;
  171.  
  172. toon_color = blend(toon_color, layer_color, layer_opac);
  173. toon_opac = union(toon_opac, layer_opac);
  174.  
  175. color toonOi = toon_opac;
  176. color toonCi = toon_opac * toon_color;
  177.  
  178. /** Surface main-code end **/
  179.  
  180. Ci = toonCi;
  181. Oi = toon_opac;
  182. }
  183.