asrael/pxl8
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

refactor atlas implementation

Browse source
This commit is contained in:
asrael 2025-10-05 16:25:17 -05:00
parent 6008ebf5ed
commit 2d1ae9578b
12 changed files with 825 additions and 261 deletions
Download patch file Download diff file Expand all files Collapse all files

17
demo/main.fnl
View file

@ -7,6 +7,7 @@
(var fire-init false)
(var rain-init false)
(var snow-init false)
(var use-nes-palette false)
(var logo-x 256)
(var logo-y 148)
@ -15,7 +16,7 @@
(var logo-sprite nil)
(global init (fn []
(pxl8.load_palette "palettes/gruvbox.ase")
(pxl8.load_palette "sprites/pxl8_logo.ase")
(set logo-sprite (pxl8.load_sprite "sprites/pxl8_logo.ase"))
(set particles (pxl8.particles_new 1000))))
@ -41,6 +42,12 @@
(set snow-init false))
(when (pxl8.key_pressed "8")
(set current-effect 8))
(when (pxl8.key_pressed "9")
(set use-nes-palette (not use-nes-palette))
(local palette-path (if use-nes-palette "palettes/nes.ase" "sprites/pxl8_logo.ase"))
(print (.. "Switching to palette: " palette-path))
(pxl8.load_palette palette-path)
(print "Palette loaded"))
(case current-effect
1 (do
@ -63,15 +70,15 @@
(when logo-sprite
(pxl8.sprite logo-sprite logo-x logo-y 128 64)))
2 (pxl8.vfx_plasma time 0.10 0.04 0)
2 (pxl8.vfx_plasma time 0.10 0.04 1)
3 (pxl8.vfx_tunnel time 2.0 0.25)
4 (do
(pxl8.clr 0)
(local bars [{:base_y 60 :amplitude 30 :height 16 :speed 2.0 :phase 0 :color 20 :fade_color 10}
{:base_y 180 :amplitude 35 :height 16 :speed 1.8 :phase 2.0 :color 26 :fade_color 10}
{:base_y 300 :amplitude 25 :height 16 :speed 2.2 :phase 4.0 :color 14 :fade_color 10}])
(local bars [{:base_y 60 :amplitude 30 :height 16 :speed 2.0 :phase 0 :color 1 :fade_color 18}
{:base_y 180 :amplitude 35 :height 16 :speed 1.8 :phase 2.0 :color 1 :fade_color 27}
{:base_y 300 :amplitude 25 :height 16 :speed 2.2 :phase 4.0 :color 1 :fade_color 24}])
(pxl8.vfx_raster_bars bars time))
5 (do