sketch for possible REARM ui blank
This commit is contained in:
parent
d799947c46
commit
93792c36c9
37
rearm_prototype.p8
Normal file
37
rearm_prototype.p8
Normal file
@ -0,0 +1,37 @@
|
|||||||
|
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, 128, 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
|
Loading…
x
Reference in New Issue
Block a user