Question about animating sprite - GameCreators Forum

Author

Message

Abiz

11

Years of Service

User Offline

Joined: 14th Nov 2012

Location: Amsterdam

Posted: 17th Dec 2012 23:37

Link

I create a sprite with a number of frames and use SetSpriteAnimation. All works fine.

When I want to change all frames from that sprite (using a new picture), I now delete the sprite, so in fact creating a new sprite. Disadvantage is that I have to set positioning etc. again.

Is there a better/other way to do this, without having to delete the original sprite? Something like UpdateSpriteImage()

Or is this the normal procedure?

Back to top

Profile PM

Hodgey

14

Years of Service

User Offline

Joined: 10th Oct 2009

Location: Australia

Posted: 18th Dec 2012 00:10

Link

There's a SetSpriteImage command.

Back to top

Profile PM Email

Abiz

11

Years of Service

User Offline

Joined: 14th Nov 2012

Location: Amsterdam

Posted: 18th Dec 2012 00:29

Link

I presume you mean this webpage:
.../documentation/Reference/Sprite/SetSpriteImage.htm
Which gives an error. The page is not there.

I tried it with this syntax:
SetSpriteImage( sID, image_ID) but that doesn't work.

It looks like only the first frame is altered. The rest of the animation remains the same.

Back to top

Profile PM

Hodgey

14

Years of Service

User Offline

Joined: 10th Oct 2009

Location: Australia

Posted: 18th Dec 2012 00:45

Link

Quote: "I presume you mean this webpage:
.../documentation/Reference/Sprite/SetSpriteImage.htm
Which gives an error. The page is not there.
"

Works on this end.

Quote: "It looks like only the first frame is altered. The rest of the animation remains the same."

You might need to set up the animation again. Could we see your code?

Back to top

Profile PM Email

Abiz

11

Years of Service

User Offline

Joined: 14th Nov 2012

Location: Amsterdam

Posted: 18th Dec 2012 01:12

Link

Of course. It's just a test program.
Both pictures contain 10 frames of 40x40.

+ Code Snippet

SetVirtualResolution ( 320, 480 )

dim iID[1]
iID[0] = 1
iID[1] = 2
LoadImage (iID[0], "10balls.png" )
LoadImage (iID[1], "10piccies.png" )
sID = 1
CreateSprite ( sID, iID[0])
posX = 50 ; posY = 60
SetSpritePosition ( sID, posX, posY )
SetSpriteAnimation ( sID, 40, 40, 10 )
fps = 10
PlaySprite ( sID, fps, 1, 1, 10 )

setprintsize(22)

do
	t = t + 1
	print ( str(t) + ". Current anim: " + str(itel) )

	if t > 50
		itel = itel + 1
		if itel > 1 then itel = 0
		SetSpriteImage( sID, iID[itel])
		t = 0
	endif

    Sync ( )
loop

Back to top

Profile PM

Ancient Lady

Valued Member

20

Years of Service

User Offline

Joined: 17th Mar 2004

Location: Anchorage, Alaska, USA

Posted: 18th Dec 2012 03:50

Link

It's entirely possible that things are happening so fast that you aren't seeing them.

You aren't limiting your frame sync at all.

Also, before you change the image, you need to stop the animation.

Cheers,
Ancient Lady
AGK Community Tester and AppGameKit Master

Back to top

Profile PM

Hodgey

14

Years of Service

User Offline

Joined: 10th Oct 2009

Location: Australia

Posted: 18th Dec 2012 04:49 Edited at: 18th Dec 2012 04:49

Link

Slowing it down is a good idea, change the variable fps to something like 1 or 2.

This works (you'll have change the images loaded back to yours):

+ Code Snippet

SetVirtualResolution ( 320, 480 )

dim iID[1]
iID[0] = 1
iID[1] = 2
LoadImage (iID[0], "Jellyfish.jpg" )
LoadImage (iID[1], "Hydrangeas.jpg" )
sID = 1
CreateSprite ( sID, iID[0])
posX = 50 ; posY = 60
SetSpritePosition ( sID, posX, posY )
SetSpriteAnimation ( sID, 40, 40, 10 )
fps = 2
PlaySprite ( sID, fps, 1, 1, 10 )

flag = 0
setprintsize(22)

do
    if getSpriteCurrentFrame(sID) >= 10
        flag = abs(flag-1)
        setSpriteImage(sID, iID[flag])
        SetSpriteAnimation ( sID, 40, 40, 10 )
        PlaySprite ( sID, fps, 1, 1, 10 )
    endif

    print(getSpriteCurrentFrame(sID))
    print(flag)

    remstart
	t = t + 1
	print ( str(t) + ". Current anim: " + str(itel) )

	if t > 50
		itel = itel + 1
		if itel > 1 then itel = 0
		SetSpriteImage( sID, iID[itel])
		t = 0
	endif
    remend


    Sync ( )
loop

Back to top

Profile PM Email

DVader

20

Years of Service

User Offline

Joined: 28th Jan 2004

Location:

Posted: 18th Dec 2012 06:58

Link

I've just knocked this little snippet up. I think from looking it is probably similar to what has been suggested. It may help you suss it out though.

+ Code Snippet

loadimage(1,"alieneye.png")
eye=createsprite(1)
setspriteanimation(eye,128,128,32)
setspritepositionbyoffset(eye,50,50)
playsprite(eye)
loadimage(2,"alienblock.png")
newimage=1
do
if getpointerpressed()=1
    newimage=newimage+1
    if newimage>2
        newimage=1
    endif
    stopsprite(eye)
    setspriteimage(eye,newimage)
    setspriteanimation(eye,128,128,32)
    playsprite(eye)
endif
 Sync()
loop

Back to top

Profile PM Website

Abiz

11

Years of Service

User Offline

Joined: 14th Nov 2012

Location: Amsterdam

Posted: 19th Dec 2012 01:32

Link

Thanks for all help and suggestions. I got it working.

Main missing instruction was: setspriteanimation() after I set the new sprite image.

PS: Regarding my remark about the missing webpage: That's only a Mozilla problem. IE has no problem finding it.

Back to top

Profile PM

Sorry your browser is not supported!

AppGameKit Classic Chat / Question about animating sprite