|
|
|
Set Sprite Full Screen
Added on 7/28/2003
|
One of my first Behaviors. (Its really a script) not customizable or very friendly but works pretty good.
Setup the behavior script and then place on your sprites that you want to zoom full screen.
property spriteNum
property mySprite
property cloch
property clocv
property cwidth
property cheight
property cursor
on beginSprite me
mySprite = sprite (me.spriteNum)
mySprite.cursor = 303
cloch = mySprite.loch
clocv = mySprite.locv
cwidth = mySprite.width
cheight = mySprite.height
end beginSprite
on mouseup
if mySprite.loch = cloch then
mySprite.cursor = 302
mySprite.loch = 200
mySprite.locv = 200
mySprite.width = 400
mySprite.height = 400
else
mySprite.cursor = 303
mySprite.loch = cloch
mySprite.locv = clocv
mySprite.width = cwidth
mySprite.height = cheight
end if
end
|
|