Walk animation!?

[What]

I need some help...
Im trying to make an walk animation with 3 pictures but I don't know how, I have tryed and look at others scripts but I just get confused. Please help me!

[DiabloTerrorGF]

walking=false
step=0
----

if walking==true
step+=1
if step==1
screen:blit(x,x,first walk)
end
if step==2
screen:blit(x,x,second walk)
end
if step==3
scree:blit(x,x, third walk)
end
if step==3
step = 0
end
end

[DiabloTerrorGF]

whoops,

you can can combine those if step==3

Also, that might appear fast, so can do thing like multiply all the numbers to 10 or something to make them appear mopre regular.

[What]

thanks for the help.

[Giuliano]

That's a really dirty way of doing it though . I would recommend an array (table) that contains the animation and then simply loading the values from that

[DiabloTerrorGF]

I hate LUA arrays/tables

[Giuliano]

I hate LUA arrays/tables

It's almost the same as a normal array and arrays are a must in programs :)

[imhotep]

Code: Select all

animation={}
animtimer={}

man={}
for i=1,6 do
        man[i]=Image.load("man"..i..".png")
end

function walk(objectname,x,y,timelimit,limit,alphavalue)
animdone=false

--init?
if limit==nil then
        animtimer[objectname]=Timer.new()
        animtimer[objectname]:start()
        walkstep=1
        animation[objectname]=1
else

if animtimer[objectname]:time()>=timelimit then
        walkstep=walkstep+1
        animtimer[objectname]:stop()
	animtimer[objectname]:reset()
        animtimer[objectname]:start()
end

if walkstep>limit then
        walkstep=1
        animdone=true
        animtimer[objectname]:stop()
	animtimer[objectname]:reset()
        animtimer[objectname]:start()
        animation[objectname]=animation[objectname]+1
else
        screen:blit(x,y,objectname[walkstep],alphavalue)
--end if
end

--end else
end

return animdone
--end function
end


--main

--call init, this example a man walking

walk(man)

--animate 10 times

pad=Controls.read()
while animation&#91;man&#93;<10 and pad&#58;start&#40;&#41;==false do
pad=Controls.read&#40;&#41;

--object,x,y,limit of frames,alpha value
walk&#40;man,100,100,300,6,true&#41;
	screen.waitVblankStart&#40;&#41;
	screen.flip&#40;&#41;
	screen&#58;clear&#40;&#41;
end

WORKING CODE

the good thing about this code is: you just have to call the function once
with an object name to initialize everything, it can be used for all objects
in your game.
you just need an array that has the same name as your object
(in this case man[number] ). that means all timers are configured
through this simple script, ergo all animations are done with this.

variables: function walk(objectname,x,y,timelimit,limit,alphavalue)
objectname: give the object the same name as the array with the frames.
x,y: coordinates where to blit
timelimit: time in milliseconds to change the frame
limit: but change it only until it reaches frame X
alphavalue: alpha value of the frame

BELOW ARE THE PIX USED... ENJOY!

[imhotep]

btw you can incorporate a position change, too if you make a table with presets where the man should stay in which frame.
xpos and ypos i mean

Code: Select all

animation={}
animtimer={}
path_no={}
pathtimer={}

man={}
for i=1,6 do
        man[i]=Image.load("man"..i..".png")
end

function walk(objectname,x,y,timelimit,limit,alphavalue)
animdone=false

--init?
if limit==nil then
        animtimer[objectname]=Timer.new()
        animtimer[objectname]:start()
        walkstep=1
        animation[objectname]=1
else

if animtimer[objectname]:time()>=timelimit then
        walkstep=walkstep+1
        animtimer[objectname]:stop()
   animtimer[objectname]:reset()
        animtimer[objectname]:start()
end

if walkstep>limit then
        walkstep=1
        animdone=true
        animtimer[objectname]:stop()
   animtimer[objectname]:reset()
        animtimer[objectname]:start()
        animation[objectname]=animation[objectname]+1
else

	if walkstep==nil then walkstep=1 end
	screen:blit(x,y,objectname[walkstep],alphavalue)
--end if
end

--end else
end

return animdone
--end function
end

function path(objectX,objectY,timelimit,limit)

if limit==nil then
	path_no[objectX]=1
	pathtimer[objectX]=Timer.new(0)
	pathtimer[objectX]:start()
	objectX={}
	objectY={}
else

if pathtimer[objectX]:time()>timelimit then
	pathtimer[objectX]:stop()
	pathtimer[objectX]:reset()
	pathtimer[objectX]:start()
	path_no[objectX]=path_no[objectX]+1
end

if path_no[objectX]>limit then
	path_no[objectX]=1
	pathgone=true
	pathtimer[objectX]:stop()
	pathtimer[objectX]:reset()
	pathtimer[objectX]:start()
end

nowX=objectX[path_no[objectX]]
nowY=objectY[path_no[objectX]]

end

return pathgone,nowX,nowY

end

--main

--call init, this example a man walking

walk(man)

--init movement
manX={}
manY={}

manX[1],manY[1]=50,50
manX[2],manY[2]=60,50
manX[3],manY[3]=70,50
manX[4],manY[4]=80,50
manX[5],manY[5]=70,50
manX[6],manY[6]=60,50
manX[7],manY[7]=50,50

path(manX)

--animate 10 times

pad=Controls.read()
while animation&#91;man&#93;<10 and pad&#58;start&#40;&#41;==false do
pad=Controls.read&#40;&#41;

--object,x,y,limit of frames,alpha value
path&#40;manX,manY,300,7&#41;
walk&#40;man,nowX,nowY,300,6,true&#41;
   screen.waitVblankStart&#40;&#41;
   screen.flip&#40;&#41;
   screen&#58;clear&#40;&#41;
end

[What]

Thanks for the code