移动点动画

when transform $ changes do
(
 vertArray = $box001.verts
 vertArrayCount = vertArray.count
 
 for i = 1 to vertArrayCount do
 (
 if (distance $.pos vertArray[i].pos) <= 20
 do
  (
   animateVertex $box001 i
   vertArray[i].pos = $.pos +20
  )
 )
 update $box001
)