forked from pyrex/chameleonic
Replace multiple pal calls with a single pal-table call, or some pokes.
This commit is contained in:
parent
a0da322c3d
commit
5e3ca803b7
@ -663,16 +663,18 @@ function player:draw()
|
||||
|
||||
local setpal=function()
|
||||
-- base colors
|
||||
pal(13,TAIL)
|
||||
pal(14,TAIL)
|
||||
pal(15,TAIL)
|
||||
pal(4,BODY)
|
||||
pal(5,BODY)
|
||||
pal(12,BODY)
|
||||
pal(2,HEAD)
|
||||
pal(3,HEAD)
|
||||
pal(9,IRIS)
|
||||
pal(10,PUPIL)
|
||||
pal{
|
||||
[2]=HEAD,
|
||||
[3]=HEAD,
|
||||
[4]=BODY,
|
||||
[5]=BODY,
|
||||
[9]=IRIS,
|
||||
[10]=PUPIL,
|
||||
[12]=BODY,
|
||||
[13]=TAIL,
|
||||
[14]=TAIL,
|
||||
[15]=TAIL,
|
||||
}
|
||||
|
||||
-- vanish colors
|
||||
local vanish=split"13,15,14,5,4,12,2,3,9,10"
|
||||
@ -681,7 +683,9 @@ function player:draw()
|
||||
end
|
||||
|
||||
if self.fall_frame>3 then
|
||||
for i=0,15 do pal(i,1) end
|
||||
local zc=@0x5f00&0xf0
|
||||
for i=0x5f00,0x5f0c,4 do poke4(i,0x0101.0101) end
|
||||
poke(0x5f00,zc|0x01)
|
||||
end
|
||||
end
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user