Sorry your browser is not supported!

CreateSprite(1,CreateImageColor(255,0,0,255))
CreateTweenSprite(1,1)
//CreateTweenChain(10000000)

do
    print(GetTweenSpritePlaying(1,1))

    UpdateAllTweens(GetFrameTime())
    Sync()
loop

//** A Roational Stopwatch with some text movement effects - This will
//** create a clock face with drawing commands and the use of maths
//** to get the angle correctly
//** But most importantly, it builds up tweens to calculate around 
//** the clock face and every second, it will move round, changing colours
//** changing angles, and added a bit extra to create a Text Tween of which
//** you can easily programatically do wonderful things with TextTweens
//**
//** Example of various tween commands
//**
//** SetSpriteTweenX
//** SetSpriteTweenY
//** CreateTweenSprite
//** CreateTweenChain
//** AddTweenChainSprite
//** UpdateTweenChain
//** PlayTweenChain
//** PlayTweenChain
//** UpdateAllTweens
//*************************************************************

// Lets setup the display
#Constant width=1024
#Constant height=768
SetWindowSize( width, height, 0 )
SetVirtualResolution( width, height )
 
tween as integer[60]

// Setup a starting location and colours
oldpositionx=width/2 : oldpositiony=height/2
beginx#=width/2
beginy#=height/2

// *******************************************************************
// Lets create a sprite first and position it somewhere on the screen
render()
DrawEllipse(0,0,50,50,makecolor(255,255,255),makecolor(255,255,255),1)

swap()
sprite = CreateSprite( getimage(0,0,50,50 ))
SetSpritePosition(sprite,oldpositionx,oldpositiony)
SetSpriteScale(sprite,.5,.5)
SetSpritePositionByOffset(sprite,50,50)
// *******************************************************************
//Setup a chain of tweens to follow on from one another in a sequence
chain=CreateTweenChain()

secstep=30 // 30 = as minute hands, 12 = hours, 6 = seconds
depth#=200 // the distance of the starting (centre of screen to the end
sec=secstep
// Lets setup the multiple of tweems depending how big you have set the tween array above

for tweens=1 to tween.length
        // Create a sprite tween first with a delay of 1 (so at least it starts)
        tween[tweens] = CreateTweenSprite( 1 )

        // Lets create a new position - This is how to work out Angles particularly for a 
        // clock face 
        endx#=width/2 -  depth# * cos(270-sec)
        endy#=height/2 + depth# * sin(270-sec) 
        inc sec,secstep
        
        // +30 cause a full circle is 360d and there are 12 hands in the hour hand - 360/12 = 30
        endcolour=random(1,255)

        // Setup the coordinates begin and end and interpolation
        // There are a few default interopulations with nice effects
        SetTweenSpriteXByOffset(tween[tweens],beginx#,endx#,TweenBounce())
        SetTweenSpriteYByOffset(tween[tweens],beginy#,endy#,TweenBounce())

        // Setup an angle for the sprite which will change the angle in one pass of the update
        SetTweenSpriteAngle(tween[tweens],220-secstep+sec,220-secstep+sec,TweenLinear())
        
        // For effect change the tween colour upon stages of the length
        // Starting at BeginColour and EndColour variables
        SetTweenSpriteBlue(tween[tweens],random(1,255),random(1,255),TweenSmooth1())
        SetTweenSpriteRed(tween[tweens],random(1,255),random(1,255),TweenSmooth1())
        SetTweenSpriteGreen(tween[tweens],random(1,255),random(1,255),TweenSmooth1())

        // When the for loop is finished --> Next then next rotation of the for loop the tween
        // commands need to remember where and what colour the tween finished up at and for it 
        // to start where it finished
        
        begincolour=endcolour
        beginx#=endx#
        beginy#=endy#
        
        AddTweenChainSprite( chain, tween[tweens], sprite, 0 )
        
next

// Mainloop to setup the clock and start the tweens
do
        // Make some lines for a clock face.
        for a=1 to 360 step secstep
                endx#=width/2 + (depth#-40) * cos(a)
                endy#=height/2 - (depth#-40) * sin(a) 
                drawline(width/2,height/2,endx#,endy#,makecolor(255,255,255),makecolor(0,0,0))
                DrawEllipse(endx#,endy#,5,5,makecolor(0,0,0),makecolor(0,255,255),1)
        next
        
        // We can play the tweens by running the chain event
    PlayTweenChain( chain )
        
        UpdateAllTweens(GetFrameTime())
    Sync()
loop

CreateSprite(1,CreateImageColor(255,0,0,255))
CreateTweenSprite(1,1.0)
id=CreateTweenChain()

CreateSprite(1,CreateImageColor(255,0,0,255))
CreateTweenSprite(2,1.0)
id=CreateTweenChain()

CreateSprite(1,CreateImageColor(255,0,0,255))
CreateTweenSprite(2,1.0)
id=CreateTweenChain()
do
	print(GetTweenSpritePlaying(2,1))
    UpdateAllTweens(GetFrameTime())
    Sync()
loop

#constant id 100
for i = 0 to  10
	CreateTweenSprite(id+i,1.0)
next

idSprite = CreateSprite(CreateImageColor(255,0,0,255))
idTweenSprite=CreateTweenSprite(1.0)
idTweenChain=CreateTweenChain()
do
	print(GetTweenSpritePlaying(idTweenSprite,idSprite))
    UpdateAllTweens(GetFrameTime())
    Sync()
loop