kistaro/mmbshmup
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

set up candidate "tyrian" palette

Browse Source
This commit is contained in:
Kistaro Windrider 2023-10-01 15:47:01 -07:00
parent 0f7c7a810b
commit 447a1bedd0
Signed by: kistaro
SSH Key Fingerprint: SHA256:TBE2ynfmJqsAf0CP6gsflA0q5X5wD5fVKWPsZ7eVUg8
1 changed files with 17 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
updatedshmup.p8
View File

@ -123,8 +123,7 @@ function _init()
primary_ship.main_gun = zap_gun.new() primary_ship.main_gun = zap_gun.new()
load_level(example_level) load_level(example_level)
state = game state = game
pal(2,129) pal(0)
pal()
end end
function once_next_frame(f) function once_next_frame(f)
@ -232,6 +231,17 @@ function updategame()
if (not pships.next) state = lose if (not pships.next) state = lose
end end
function parse_pal(str)
local ret = split(str)
for i=0,15 do
ret[i]=ret[i+1]
end
ret[16] = nil
return ret
end
mainpal = parse_pal"0,134,141,138,4,5,6,7,8,9,10,11,12,13,8,12"
function _draw() function _draw()
fillp(0) fillp(0)
drawgame() drawgame()
@ -297,6 +307,8 @@ function pukeboard(item)
end end
function drawgame() function drawgame()
pal(0)
pal(mainpal, 1)
clip(0,0,112,128) clip(0,0,112,128)
rectfill(0,0,112,128,0) rectfill(0,0,112,128,0)
for slist in all{intangibles_bg, pbullets, pships, eships, ebullets, intangibles_fg} do for slist in all{intangibles_bg, pbullets, pships, eships, ebullets, intangibles_fg} do
@ -465,7 +477,7 @@ end
function ship_m:draw() function ship_m:draw()
if(self.fx_pal) pal(self.fx_pal) if(self.fx_pal) pal(self.fx_pal)
spr(self.sprite, self.x, self.y, self.size, self.size) spr(self.sprite, self.x, self.y, self.size, self.size)
pal() pal(0)
end end
function hurtbox(ship) function hurtbox(ship)
@ -750,7 +762,7 @@ function spawn_xl_chasey_at(x, y)
draw = function(self) draw = function(self)
if(self.fx_pal) pal(self.fx_pal) if(self.fx_pal) pal(self.fx_pal)
sspr(40, 0, 8, 8, self.x, self.y, 16, 16) sspr(40, 0, 8, 8, self.x, self.y, 16, 16)
pal() pal(0)
end, end,
} }
eships:push_back(c) eships:push_back(c)
@ -1918,7 +1930,7 @@ function spawn_spec_gun_at(x, y, gunt)
draw = function(self) draw = function(self)
pal(spec_gun_pl) pal(spec_gun_pl)
powerup.draw(self) powerup.draw(self)
pal() pal(0)
spr(self.gun.icon, self.x+2, self.y+2, 1, 1) spr(self.gun.icon, self.x+2, self.y+2, 1, 1)
end end
} }