39 lines
733 B
Lua
39 lines
733 B
Lua
pico-8 cartridge // http://www.pico-8.com
|
|
version 42
|
|
__lua__
|
|
-- vacuum gambit
|
|
-- by kistaro windrider
|
|
|
|
function _draw()
|
|
cls()
|
|
-- hud placeholder
|
|
|
|
rectfill(112, 0, 127, 127,0x56)
|
|
rect(112,0,127,127,7)
|
|
line(127,1,127,127,5)
|
|
line(113,127)
|
|
|
|
glow_box(0, 0, 55, 100, 4, 10, 1)
|
|
glow_box (0, 101, 111, 127, 4, 10, 1)
|
|
if t()%1>0.5 then
|
|
glow_box(56, 0, 111, 100, 14, 7, 1)
|
|
else
|
|
glow_box(56, 0, 111, 100, 2, 8, 1)
|
|
end
|
|
-- rect(4, 4, 123, 123, 4)
|
|
-- rect(5, 5, 122, 122, 10)
|
|
-- rect(6, 6, 121, 121, 4)
|
|
end
|
|
|
|
function glow_box(x0, y0, x1, y1, c0, c1, cf)
|
|
rect(x0, y0, x1, y1, c0)
|
|
rect(x0+1, y0+1, x1-1, y1-1, c1)
|
|
rect(x0+2, y0+2, x1-2, y1-2, c0)
|
|
if cf then
|
|
fillp(…)
|
|
rectfill(x0+3, y0+3, x1-3, y1-3, cf)
|
|
fillp()
|
|
end
|
|
end
|
|
|