on ChannelsUsed pCont do ( pCont.useTM = true ) on Init pCont do () on Proceed pCont do ( count = pCont.numParticles() for i in 1 to count do ( pCont.particleIndex = i if pCont.particleNew do ( pCont.particleOrientation = (pCont.particleTM).row1 ) ) ) on Release pCont do ()