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