on exitframe me
Case (pControl) of
"Move horizontally":
sprite(me.spritenum).loch = sprite(me.spritenum).loch + pRange
"Move vertically" :
sprite(me.spritenum).locv = sprite(me.spritenum).locv + pRange
"Rotate":
sprite(me.spritenum).rotation = sprite(me.spritenum).rotation + pRange
"Zoom":
the Width of sprite(me.spritenum) = the Width of sprite(me.spritenum )+ (the Width of sprite(me.spritenum )* (pSpeed/100.0))
the Height of sprite(me.spritenum) = the Height of sprite(me.spritenum) + (the Height of sprite(me.spritenum) * (pSpeed/100.0))
end case
end
on getPropertyDescriptionList
description =[:]
addProp description, #pControl,[#comment: "Select your option:", #format:#String,#range:["Move horizontally", "Move vertically", "Rotate", "Zoom"], #default:"Move horizontally"]
addProp description, #pRange, [#comment: "Speed for rotate and move:", #format:#Integer, #range:[#min:-30,#Max:30],#default:1]
addprop description, #pSpeed,[#comment:"Speed to zoom (- to zoom in, + to zoom out):",#format:#integer, #default: -10, #range:[#min:-30,#max:30]]
return description
end
Contact
MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA