Rotation:

vektor = eulerangles 30 60 -45
for i=1 to selection.count do
(
rotate selection[i] vektor
)
if selection.count==0

Creating array of boxes :

kocka=box()
vektor=[20,13.3,15]
array=#()
array[1]=kocka
for i=2 to 10 do
(
array[i]=copy kocka
array[i].pos=array[i-1].pos+vektor
array[i].scale/=log(i)
)

Creating and rotating box:

kocka=box()
vektor=[20,13.5,5]
kocka.pos=vektor
rotate kocka eulerangles 30 50 -60
rotate kocka (eulerangles 30 50 -60)
addModifier kocka (twist angle:30)

Rotation icon(creating):

macroScript RotateSomething category: "Presentation"
--buttonText: "Rotate"
icon: #("Maintoolbar", 69)
toolTip: "Rotates all selected objects for some chosen 3D angle "
(
vektor = eulerangles (random 0.0 90.0) (random 0.0 90.0) (random 0.0 90.0)
for i=1 to selection.count do
rotate selection[i] vektor
if selection.count==0
)