2015-09-15

XForm Fx

myobj = undefined
myRange = animationRange
--animationRange = interval 0 800

rollout scalefx "xform Fx"
(
button pickobj "Add Objects"
spinner fxstart "Start Frm" range:[0,2000,1] scale:1
spinner fxdur "Durat Frm" range:[0.1,99,10] scale:1
spinner fxoffset "Offset Frm" range:[0,99,30] scale:1
spinner fxrnd "Random Frm" range:[0,300,3] scale:1

spinner fxmovXF "Mov.X From" range:[-3000,3000,0] scale:1 across:2
spinner fxmovXT "To" range:[-3000,3000,0] scale:1
spinner fxmovYF "Mov.Y From" range:[-3000,3000,0] scale:1 across:2
spinner fxmovYT "To" range:[-3000,3000,0] scale:1
spinner fxmovZF "Mov.Z From" range:[-3000,3000,0] scale:1 across:2
spinner fxmovZT "To" range:[-3000,3000,0] scale:1

Lights Off

-- create interface
myobj = undefined
rollout lightoff "Lights Off"
(
button picklight "Select Lights"
spinner offby "Off by" range:[2,200,2] scale:1
button offbtn "Off"
button undobtn "Undo Off"
on picklight pressed do
(
myobj = selectByName title:"Select Lights"
)

-- press off button
on offbtn pressed do
(
if myobj != undefined do
(

2011-12-16

detachfaces

myobj = plane length:100 width:100 lengthsegs:10 widthsegs:10
select myobj
convertToPoly $
for i in polyop.getnumfaces $ to 1 by -1 do
(
polyop.detachfaces $ #{i} asnode:false
)

2011-11-09

sin -two different rotate-

-- rotate by sin

animationRange = interval 0 60
delete $*
myobj = sphere radius:20
myobj = sphere radius:25 hemisphere:0.5
select myobj
addModifier $ (xform())
mymod = $.modifiers[#XForm].Gizmo.controller.Rotation.controller.X_Rotation.controller

2011-11-08

scale Fx

-- simple scale fx

delete $*
obj = plane lengthsegs:5 widthsegs:5
convertTopoly obj
select obj
for i in polyop.getnumfaces obj to 1 by -1 do

2011-11-05

particle atmos



global mypf = undefined
global myobj = undefined
global pf = undefined
global win = undefined
global volfog = undefined
if animationRange.end <= 100 do animationrange = interval 0 300

fn pf_filter pf = (classof pf == PF_Source)
fn rp rpobj =

with expression

delete $*
myball = sphere radius:10 name:"ball000"
mydum = point pos:[0,0,10] box:on
addModifier myball (XForm())
select myball
$.modifiers[#XForm].Gizmo.controller.Scale.controller = Scale_Expression ()