69 lines
1.6 KiB
Lua
69 lines
1.6 KiB
Lua
pico-8 cartridge // http://www.pico-8.com
|
|
version 33
|
|
__lua__
|
|
-- pyras
|
|
-- by: djib
|
|
|
|
function _init()
|
|
initpyras()
|
|
end
|
|
|
|
function _update()
|
|
movepyras()
|
|
moveguy()
|
|
end
|
|
|
|
function _draw()
|
|
cls()
|
|
drawguy()
|
|
drawpyras()
|
|
end
|
|
-->8
|
|
-- guy
|
|
guy={
|
|
x=64,
|
|
y=64,
|
|
speed=2
|
|
}
|
|
|
|
function moveguy()
|
|
if (btn(0)) guy.x=max(0,guy.x-guy.speed)
|
|
if (btn(1)) guy.x=min(127,guy.x+guy.speed)
|
|
if (btn(2)) guy.y=max(0,guy.y-guy.speed)
|
|
if (btn(3)) guy.y=min(127,guy.y+guy.speed)
|
|
end
|
|
|
|
function drawguy()
|
|
pset(guy.x,guy.y,11)
|
|
end
|
|
-->8
|
|
pyras={}
|
|
|
|
function initpyras()
|
|
for i=1,10 do
|
|
pyras[i]={x=rnd(128),y=rnd(128)}
|
|
end
|
|
end
|
|
|
|
function drawpyras()
|
|
for pyra in all(pyras) do
|
|
pset(pyra.x,pyra.y,8)
|
|
end
|
|
end
|
|
|
|
function movepyras()
|
|
for pyra in all(pyras) do
|
|
if (pyra.x>guy.x) pyra.x-=1
|
|
if (pyra.x<guy.x) pyra.x+=1
|
|
if (pyra.y>guy.y) pyra.y-=1
|
|
if (pyra.y<guy.y) pyra.y+=1
|
|
end
|
|
end
|
|
__gfx__
|
|
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
|
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
|
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
|
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
|
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
|
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|