SW3Dメモ ポリゴン数カウント

--ワールド内のポリゴン数をカウントするハンドラ

on CountFace myWorld
totalnum=0
repeat with i=1 to myWorld.model.count
myModel=myWorld.model[i]
if findPos(myModel.modifier,#meshDeform)=void then
myModel.addModifier(#meshDeform)
myFlag=1
else
myFlag=0
end if
mynum=myModel.meshdeform.face.count
put myModel.name&&":"&&mynum
totalnum=totalnum+mynum
if myFlag then
myModel.removeModifier(#meshDeform)
end if
end repeat
put totalnum
return totalnum
end