Forum: Poser - OFFICIAL


Subject: Is there a decent pearl shader out there for Poser 9/Pro 2012?

LaurieA opened this issue on Jul 09, 2012 · 225 posts


bagginsbill posted Fri, 13 July 2012 at 8:02 PM

The code looks like this.

colors = [  (IColor(50, 50, 50), 'Black'),  (IColor(230, 230, 230), 'White'),  (IColor(25, 25, 85), 'Midnight Blue'),  (IColor(60, 5, 5), "Deep Red"),  (IColor(100, 10, 35), "Burgundy Red"),  (IColor(228, 184, 201), "Pale Pink"),  (IColor(217, 236, 255), "Powder Blue"),  (IColor(65, 40, 45), "Cordovan"),  (IColor(100, 115, 100), "Williamsburg Green"),  (IColor(91, 110, 126), "Limestone Blue"),    (IColor(128, 136, 87), "Monkey Green"),  (IColor(143, 108, 108), "Hemlock Rose"),  (IColor(212, 167, 95), "Honeysuckle"),  (IColor(240, 225, 206), "Cream"),  (IColor(245, 223, 173), "Wheat"),  (IColor(93, 128, 162), "Rustic Blue"),  (IColor(190, 200, 180), "Farmhouse Green"),  (IColor(180, 180, 180), "Gray"),  (IColor(0xcd, 0x85, 0x3f), "Peru"),  (IColor(0xd8, 0xbf, 0xd8), "Thistle"),    (IColor(0xff, 0xeb, 0xcd) * .9, "Almond"),  (IColor(107, 107, 30), "Olive"),  (IColor(30, 127, 127), "Teal"),  (IColor(235, 129, 129), "Coral"),  (IColor(139, 69, 19), "Chocolate"),  (IColor(206, 183, 70), "Goldenrod"),  (IColor(200, 25, 25), "Red"),  (IColor(150, 25, 25), "Cherry Red"),  (IColor(50, 190, 220), "Sky Blue"),  (IColor(95, 36, 147), "Deep Purple"),    (IColor(185, 125, 235), "Bright Purple"),  (IColor(140, 70, 180), "Light Purple"),  (IColor(230, 180, 20), "Flame Yellow"),  (IColor(230, 110, 20), "Flame Orange"),  (IColor(230, 60, 20), "Flame Red"),  (IColor(20, 90, 230), "Hyper Blue"),  (IColor(20, 230, 90), "Hyper Green"),  (IColor(230, 20, 90), "Hyper Red"),  (IColor(215, 150, 45), "Amber"),  (IColor(75, 200, 35), "Lime Green"),    #(IColor(28, 88, 34), "Emerald Green"),  (BIColor(1, 66, 37) , "British Racing Green"),  (IColor(245, 170, 30), "Insignia Yellow"),  (IColor(85, 40, 90), "Royal Purple"),  (IColor(240, 120, 180), "Pink"),  (IColor(250, 80, 140), "Hot Pink"),    (IColor(230, 210, 200), "Champagne"),  (IColor(180, 210, 240), "Sheer Blue"),  (IColor(240, 200, 140), "Yellow Ochre"),  (IColor(174, 210, 123), "Celadon Green"),  (IColor(128, 188, 230), "Aqua Blue"), ]

cp = CandyPaint()

outputs += [  '=CandyMetal', CandyPaint(cp(version='metal')),  '=CandyDiffuse', CandyPaint(cp(version='diffuse')), ]

for clr, name in colors:  if P9Mode:   ver = 'scatter'  else:   ver = 'diffuse'  p = cp(color=clr, version=ver, baseBlur=2)    mat = CandyPaint(p)  outputs += [ 'Candy Paint/=%s Candy Paint' % name, mat ]    mat = CandyPaint(p(glitter=.3))  outputs += [ 'Candy Glitter/=%s Candy Glitter' % name, mat ]

 mat = CandyPaint(p(satinFlame=.6))  outputs += [ 'Candy Satin Flame/=%s Candy Satin Flame' % name, mat ]

 aclr = clr ** 1.1  lum = max(aclr[0], aclr[1], aclr[2]) ** 2.2  bv =   min(.93 / lum, 2)  mat = CandyPaint(p(color=aclr, baseColor=Blend(WHITE, clr, .15), ior=2, baseValue=bv, reflQuality=.3))  outputs += [ 'Crazy Paint/=%s Crazy Paint' % name, mat ]    p = p(baseBlur=.01)  mat = CandyPaint(p(version='metal'))  outputs += [ 'Candy Silver/=%s Candy Silver' % name, mat ]

 mat = CandyPaint(p(version='metal', baseBlur=4))  outputs += [ 'Candy Silver Blur/=%s Candy Silver Blur' % name, mat ]

 mat = CandyPaint(p(version='metal', baseFresnel=.95, baseColor=IColor(255, 215, 150)))  outputs += [ 'Candy Gold/=%s Candy Gold' % name, mat ]

 


Renderosity forum reply notifications are wonky. If I read a follow-up in a thread, but I don't myself reply, then notifications no longer happen AT ALL on that thread. So if I seem to be ignoring a question, that's why. (Updated September 23, 2019)