применить скрипт после создания объекта

ar = $.rotation.z_rotation;
$.rotation.z_rotation = $.rotation.z_rotation - ar;

for obj in $selection where isGroupHead obj do
(
ar = $.rotation.z_rotation;
$.rotation.z_rotation = $.rotation.z_rotation - ar;
)
[i]-- Error occurred in obj loop
--  Frame:
--   obj: $Group01
-- Unknown property: "rotation" in $selection[/i]

on selectAndRotate pressed do
(
local xa = getCurrentSelection();
for i = 1 to xa.count do
(
if isGroupMember xa do continue
rnd = (random -360 360)
rotate xa (eulerangles 0 0 rnd)
)

Paul_Winexar = $.rotation.z_rotation;
$.rotation.z_rotation = $.rotation.z_rotation - ar;

in coordsys world $.rotation.z_rotation = 0

for obj in $selection where isGroupHead obj do in coordsys world obj.rotation.z_rotation = 0

zr = getCurrentSelection();
for i = 1 to zr.count do
( 
if isGroupMember zr[i] do continue
$.rotation.z_rotation = 0; 
)

for obj in $selection where isGroupHead obj do 
   obj.pivot = [obj.center.x,obj.center.y,obj.min.z]; 

for obj in $selection where isGroupHead obj do 
   in coordsys world obj.rotation.z_rotation = 0;

for obj in $selection where isGroupHead obj do 
   obj.pos = [0,0,0];

rollout resetobj "Reset Transform" 

( 
group "Reset selected objects";
	(
	button start "Reset object" 
	label lab1 "Parameters to reset:" align:#left
	label lab2 "Pivot - center of object, Z=min;" align:#left 
	label lab3 "Rotate = x,y,0;" align:#left 
	label lab4 "Positon = 0,0,0;" align:#left 
	)
on start pressed do
	(
	 for obj in $selection where isGroupHead obj do 
  	  obj.pivot = [obj.center.x,obj.center.y,obj.min.z]; 

	 for obj in $selection where isGroupHead obj do 
  	  in coordsys world obj.rotation.z_rotation = 0;

	 for obj in $selection where isGroupHead obj do 
  	  obj.pos = [0,0,0];
	)
				
)
createDialog resetobj 180 120

ResetTransform o;

Savin DenisPS. Надеялся что сам все же домыслишь