Challenge 2012-09 – Basic Challenge 3
Create program to show 4 pictures downloaded from Flickr in a 2 by 2 grid on the GraphicsWindow.
Le API di Flickr sono state aggiornate.
Per poter utilizzare la libreria Flickr è necessario installare Smallbasic 1.1.
Recupera immagini a rotazione da http://www.flickr.com
- il tema è Pacman
- ne compaiono 4 contemporaneamente
- vengono ridimensionate
GraphicsWindow.BackgroundColor="Black"
passo=10
dimx =(Graphicswindow.Width -3*passo)/2
dimy =(Graphicswindow.Height-3*passo)/2
x[1]=passo
y[1]=passo
x[2]=passo+dimx+passo
y[2]=passo
x[3]=passo
y[3]=passo+dimy+passo
x[4]=passo+dimx+passo
y[4]=passo+dimy+passo
Timer.Interval=2000
Timer.Tick =NuovaImmagine
turno=1
Sub NuovaImmagine
pic=Flickr.GetRandomPicture("pacman")
GraphicsWindow.DrawResizedImage(pic, x[turno],y[turno], dimx,dimy)
turno=turno+1
If(turno > 4)Then
turno=1
EndIf
EndSub