Fake Spinning Cube. by Steve Ancell7th Oct 2011 18:54
|
---|
Summary A fake spinning cube, using the SetSpriteUVOffset(iSprite, u#, v#) and SetSpriteAngle(iSprite, angle) commands. Additional info: Download the attached "sprite.PNG" file and place i Description Code ` This code was downloaded from The Game Creators ` It is reproduced here with full permission ` http://www.thegamecreators.com SetVirtualResolution(320, 480) sprite1_u# = 0 sprite1_v# = 0 sprite1_angle = 0 Initialise() do if GetRawKeyPressed(27) = 1 or GetPointerState() = 1 CleanUp() exit endif UpdateSprite() sync() loop function Initialise() LoadImage(1, "sprite.PNG") CreateSprite(1, 1) SetSpriteAnimation(1, 50, 50, 4) SetSpriteOffset(1, GetSpriteWidth(1) / 2, GetSpriteHeight(1) / 2) SetSpritePositionByOffset(1, GetVirtualWidth() / 2, GetVirtualHeight() / 2) endfunction function UpdateSprite() SetSpriteUVOffset(1, sprite_u#, sprite_v#) sprite_u# = sprite_u# + 0.01 if sprite_u# > 0.60 then sprite_u# = 0.00 SetSpriteAngle(1, sprite_angle) sprite_angle = sprite_angle + 5 if sprite_angle > 359 then sprite_angle = 0 endfunction function CleanUp() DeleteSprite(1) DeleteImage(1) endfunction |