Oops, I take that back; the pdata seems to only hold the colour there would
be (non-transparent black) if vertcols had been set. I'm now a bit lost on
how we'd get such colours at all.
if you use (hint-vertcols) you can do this. (colour) and (wire-colour)
cannot be get as far as i know, only pdata.
(clear)
(define p (build-cube))
(with-primitive p
(hint-none)
(hint-wire)
(hint-vertcols)
(backfacecull 0)
(pdata-map!
(λ (c) #(1 0 0))
"c"))
(every-frame
(with-primitive p
(pdata-map!
(λ (c) (vector (vr c) (vg c) (vb c) (* .99 (va c))))
"c")))
best,
gabpr
