-- shared.p8lua: included into hello.p8 via #include
-- demonstrates Pico-8 dialect features outside a __lua__ section.

local x, y = 64, 64

function move()
 if (btn(0)) x-=1
 if (btn(1)) x+=1
 if (btn(2)) y-=1
 if (btn(3)) y+=1
 x = mid(0, x, 127)
 y = mid(0, y, 127)
end

function draw_blob()
 cls(1)
 circfill(x, y, 5, 7)
 ?"x="..x..",y="..y, 0, 0, 7
end

-- peek/poke via prefix shorthands
function sweep_palette()
 for i=0,15 do
  poke(0x5f10+i, %0x5f10 ^^ i)
 end
end

-- single-line while with compound assignment body
local i = 0
while (i < 8) i += 1