minor optimization and consistent light source

This commit is contained in:
Kistaro Windrider 2024-02-29 22:04:14 -08:00
parent b421df9174
commit ad05ea4bde
Signed by: kistaro
SSH Key Fingerprint: SHA256:TBE2ynfmJqsAf0CP6gsflA0q5X5wD5fVKWPsZ7eVUg8

View File

@ -1401,6 +1401,7 @@ end
-- pyrex's cloud renderer
cld_bpl={241,242,244,248}
wpal={[0]=7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7}
cmgr={
f=0,
df=1,
@ -1463,15 +1464,13 @@ function cmgr:draw()
rectfill(0,112,127,112+h,0)
palt(0b1110100010000000)
for i=0,15 do
pal(i,7)
end
pal(wpal)
poke(0x5f5e,0xf1)
sspr(0,96,128,h,0,112)
sspr(0,96,128,h,5,112)
poke(0x5f5e,0xf2)
sspr(0,96,128,h,1,112+1)
sspr(0,96,128,h,5,112+1)
sspr(0,96,128,h,4,113)
sspr(0,96,128,h,1,113)
poke(0x5f5e,255)
-- render to screen