property height
property radius
property duration
property smoothCount
property stretch
on getBehaviorDescription me
return "This behavior will set the general ripple properties. It does nothing else. Use it in conjunction with the other ripple behaviors."
end
on getPropertyDescriptionList me
set list = [:]
addProp list, #radius, [#comment: "Radius:", #format: #integer, #default: 4, #range: [#max: 15, #min:1]]
addProp list, #height, [#comment: "Height:", #format: #integer, #default: 400, #range: [#max: 2000, #min:1]]
addProp list, #duration, [#comment: "Duration:", #format: #integer, #default: 4, #range: [#max: 10, #min:1]]
addProp list, #smoothCount, [#comment: "Smooth Count:", #format: #integer, #default: 0, #range: [#max: 300, #min:0]]
addProp list, #stretch , [#comment: "Stretch", #format: #boolean, #default: TRUE]
return list
end
on beginSprite me
set sNum = the spriteNum of me
ripple(sprite sNum, [radius:radius, height:height, duration:duration, stretch:stretch, smoothCount:smoothCount])
end
|