Rotate Vertexlist

 

Compatibilities:

This item has not yet been rated

This custom handler will allow you to rotate a vertexList directly.

on rotateVectorShape vList, vAngle   vCount = vList.count   rad = vAngle / 180.0 * pi      repeat with i = 1 to vCount     if vList[i].ilk = #propList then       nCount = vList[i].count       repeat with j = 1 to nCount         pPoint = vList[i][j]         u = cos(rad) * (pPoint[1]) - sin(rad) * (pPoint[2])         v = sin(rad) * (pPoint[1]) + cos(rad) * (pPoint[2])                  vList[i][j] = point(u,v)       end repeat     end if   end repeat      return vList    end

Upload Provided by ABCUpload ASP