Setvirtualresolution(640,480)
ResetTimer()
//Create Two Images, 11 and 12
swap()
Drawline(0,0,15,15,255,255,0)
Update(0)
Render()
Drawline(0,15,15,0,255,255,0)
Update(0)
Render()
GetImage(11,0,0,15,15)
ClearScreen()
Drawline(8,0,8,15,255,255,0)
Update(0)
Render()
Drawline(0,8,15,8,255,255,0)
Update(0)
Render()
GetImage(12,0,0,15,15)
ClearScreen()
//Create Sprite Frames
id=CreateSprite(11)
AddSpriteAnimationFrame(id,11)
AddSpriteAnimationFrame(id,12)
//Set Background
SetClearColor(50,50,100)
SetSpritePosition(id,100,100)
//Start Animation
PlaySprite(id,3)

Do
    Print("Current Frame:"+Str(GetSpriteCurrentFrame(id),0))
    Sync()
    If Timer()>15 Then Exit
Loop
End