JailDoctor/jailsadventure2
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

- Implementat el moviment dels actors amb rutes

Browse Source 
- També el moviment amb teclat del "heroi"
This commit is contained in:
Raimon Zamora
2023-01-30 17:51:16 +01:00
parent 42d5c1f308
commit 09bea06850
4 changed files with 91 additions and 35 deletions
Download Patch File Download Diff File Expand all files Collapse all files

100
data/actors.lua
View File

@@ -6,51 +6,87 @@ actors={
table.insert(actors.list, actor)
end,
search=function(name)
for i,v in ipairs(actors.list) do
if v.name and v.name==name then
return v
end
end
end,
draw=function()
for i,v in ipairs(actors.list) do
sspr(v.gfx.x,v.gfx.y,16,16,v.x*8+v.dx,v.y*8+v.dy,16,16,v.o)
local frame=((v.dx+v.dy)%2)*16
--print(v.o)
if v.o=='u' then
sspr(v.gfx.x+frame,v.gfx.y+16,16,16,v.x*8-4+v.dx*2,v.y*8-12+v.dy*2,16,16)
elseif v.o=='d' then
sspr(v.gfx.x+frame,v.gfx.y,16,16,v.x*8-4+v.dx*2,v.y*8-12+v.dy*2,16,16)
elseif v.o=='l' then
sspr(v.gfx.x+frame,v.gfx.y+32,16,16,v.x*8-4+v.dx*2,v.y*8-12+v.dy*2,16,16)
elseif v.o=='r' then
sspr(v.gfx.x+frame,v.gfx.y+32,16,16,v.x*8-4+v.dx*2,v.y*8-12+v.dy*2,16,16,true)
end
end
end,
update=function()
local needs_sorting=false
for i,v in ipairs(actors.list) do
if v.dx==0 and v.dy==0 then
if v.path then
v.path.pos=v.path.pos+1
if v.path.pos > #v.path.route then
v.path=nil
else
local step=string.sub(v.path.route,v.path.pos,v.path.pos)
if step=='u' then
--check collision!
v.y=v.y-1
v.dy=-8
elseif step=='d' then
--check collision!
v.y=v.y+1
v.dy=8
elseif step=='l' then
--check collision!
v.x=v.x-1
v.dx=-8
elseif step=='r' then
--check collision!
v.x=v.x+1
v.dx=8
end
local step=string.sub(v.path.route,v.path.pos,v.path.pos)
if v.path.pos == #v.path.route then v.path=nil end
if step=='u' then
--check collision!
v.y=v.y-1
v.dy=4
v.o='u'
needs_sorting=true
elseif step=='d' then
--check collision!
v.y=v.y+1
v.dy=-4
v.o='d'
needs_sorting=true
elseif step=='l' then
--check collision!
v.x=v.x-1
v.dx=4
v.o='l'
elseif step=='r' then
--check collision!
v.x=v.x+1
v.dx=-4
v.o='r'
elseif step=='q' then
v.o='u'
elseif step=='a' then
v.o='d'
elseif step=='o' then
v.o='r'
elseif step=='p' then
v.o='l'
end
end
else
if v.dx > 0 then
v.dx=v.dx-2
elseif v.dx < 0 then
v.dx=v.dx+2
elseif v.dy > 0 then
v.dy=v.dy-2
elseif v.dy < 0 then
v.dy=v.dy+2
end
end
if v.dx > 0 then
v.dx=v.dx-1
elseif v.dx < 0 then
v.dx=v.dx+1
elseif v.dy > 0 then
v.dy=v.dy-1
elseif v.dy < 0 then
v.dy=v.dy+1
end
end
if needs_sorting then
table.sort(actors.list, compare_actors)
end
end
}
function compare_actors(a,b)
return a.y < b.y
end

2
data/game.ini
View File

@@ -3,4 +3,4 @@ config=ja2
width=160
height=144
zoom=5
files=game.lua,mapa.lua,editor.lua,textbox.lua,menu.lua,main.lua
files=actors.lua,game.lua,mapa.lua,editor.lua,textbox.lua,menu.lua,main.lua

20
data/game.lua
View File

@@ -3,12 +3,32 @@ game={
init=function()
mapa.load("test.map")
actors.add({name="usufondo",x=11,y=9,o="r",gfx={x=0,y=0},path={pos=0,route='rrrrura'}})
actors.add({name="jailer",x=6,y=9,o="r",gfx={x=32,y=0}})
update=game.update
end,
update=function()
camera(game.cam.x, game.cam.y)
setsource(tiles)
map(0,0,0,0,mapa.w, mapa.h)
setsource(sprites)
actors.draw()
camera(0,0)
local hero = actors.search("jailer")
if hero and not hero.path and hero.dx+hero.dy==0 then
if btn(KEY_DOWN) then
hero.path={pos=0,route='d'}
elseif btn(KEY_UP) then
hero.path={pos=0,route='u'}
elseif btn(KEY_LEFT) then
hero.path={pos=0,route='l'}
elseif btn(KEY_RIGHT) then
hero.path={pos=0,route='r'}
end
end
if beat() then actors.update() end
end
}

2
data/main.lua
View File

@@ -6,7 +6,7 @@ function _init()
setsource(tiles)
local pal=loadpal("tiles.gif")
setpal(pal)
beat(6)
main_init()
end