|
Post by PeterMaria on Jul 19, 2015 9:22:54 GMT -5
Hello, TextMode(TEXT_BUFFERED) ResizeSpriteArea(800,600)
Sub SprSetAnimate(nr(),ax,ay,aw,ah,frame) NewSprite(nr) SprSetxCentre(0):SprSetyCentre(0) SprSetZOrder(1) SprSetSize(aw,ah) SprSetPos (ax,ay) SprSetFrame(frame) End Sub
dim fo = LoadTex("fonts/font01.png") dim s(15) = LoadImageStrip("png/dance.png",64) dim m,x,y,z,v# Font(fo) glClearColor(.5,.5,.5,1) PlayMusic("music/robic.xm")
while scankeydown(27)=0 SprSetAnimate(s,280,260,256,256,z) v#=v#+.1 if v#>1 then v#=0 z=z+1 if z=16 then z=0: end if end if locate 10,1 print "OLD WOMAN DANCING" drawText() waittimer(10) ClearSprites() wend
Attachments:things.zip (438.43 KB)
|
|
|
Post by matthew on Jul 19, 2015 10:19:30 GMT -5
It that one of the fighters from 'Street Fighter', Peter? :-)
|
|
|
Post by PeterMaria on Jul 19, 2015 10:41:35 GMT -5
No clue, I think she's a grandmother.
|
|