refactor: reorganize pxl8 into client/src/ module structure

- core/: main entry, types, logging, I/O, RNG
- asset/: ase loader, cart, save, embed
- gfx/: graphics, animation, atlas, fonts, tilemap, transitions
- sfx/: audio
- script/: lua/fennel runtime, REPL
- hal/: platform abstraction (SDL3)
- world/: BSP, world, procedural gen
- math/: math utilities
- game/: GUI, replay
- lua/: Lua API modules
This commit is contained in:
asrael 2026-01-12 21:46:31 -06:00
parent 272e0bc615
commit 39b604b333
106 changed files with 6078 additions and 3715 deletions

View file

@ -6,9 +6,11 @@
(var time 0)
(var active-demo :logo)
(var particles nil)
(var particles2 nil)
(var fire-init? false)
(var rain-init? false)
(var snow-init? false)
(var snow-init2? false)
(var use-famicube-palette? false)
(var logo-x 256)
@ -22,14 +24,15 @@
(fn switch-demo [new-demo]
(when (and (not= active-demo new-demo) (not transition))
(set transition-pending new-demo)
(set transition (pxl8.transition_create :pixelate 0.5))
(pxl8.transition_set_color transition 0xFF000000)
(pxl8.transition_start transition)))
(set transition (pxl8.create_transition :pixelate 0.5))
(transition:set_color 0xFF000000)
(transition:start)))
(global init (fn []
(pxl8.load_palette "res/sprites/pxl8_logo.ase")
(set logo-sprite (pxl8.load_sprite "res/sprites/pxl8_logo.ase"))
(set particles (pxl8.particles_new 1000))
(set particles (pxl8.create_particles 1000))
(set particles2 (pxl8.create_particles 500))
(music.init)
(music.start)
(worldgen.init)))
@ -44,8 +47,8 @@
(set time (+ time dt))
(when transition
(pxl8.transition_update transition dt)
(when (pxl8.transition_is_complete transition)
(transition:update dt)
(when (transition:is_complete)
(when transition-pending
(when (and (= active-demo :worldgen) (not= transition-pending :worldgen))
(pxl8.set_relative_mouse_mode false))
@ -55,8 +58,8 @@
(set transition-pending nil)
(when (= active-demo :fire) (set fire-init? false))
(when (= active-demo :rain) (set rain-init? false))
(when (= active-demo :snow) (set snow-init? false)))
(pxl8.transition_destroy transition)
(when (= active-demo :snow) (set snow-init? false) (set snow-init2? false)))
(transition:destroy)
(set transition nil)))
(when (pxl8.key_pressed "1") (switch-demo :logo))
@ -93,7 +96,9 @@
(music.update dt)
(when particles
(pxl8.particles_update particles dt)))
(particles:update dt))
(when particles2
(particles2:update dt)))
(when (menu.is-paused)
(menu.update))))
@ -105,50 +110,75 @@
(when logo-sprite
(pxl8.sprite logo-sprite logo-x logo-y 128 64 (< logo-dx 0) (< logo-dy 0))))
:plasma (pxl8.vfx_plasma time 0.10 0.04 1)
:plasma (do
(pxl8.clear 0)
(pxl8.text "Plasma (TODO: Fennel impl)" 200 170 1))
:tunnel (pxl8.vfx_tunnel time 2.0 0.25)
:tunnel (do
(pxl8.clear 0)
(pxl8.text "Tunnel (TODO: Fennel impl)" 200 170 1))
:raster (do
(pxl8.clear 0)
(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))
(pxl8.text "Raster Bars (TODO: Fennel impl)" 180 170 1))
:fire (do
(pxl8.clear 0)
(when particles
(when (not fire-init?)
(pxl8.particles_clear particles)
(pxl8.vfx_fire particles 160 140 100 12)
(particles:clear)
(particles:set_position 320 360)
(particles:set_spread 320 0)
(particles:set_gravity 0 -80)
(particles:set_drag 0.98)
(particles:set_turbulence 60)
(particles:set_spawn_rate 200)
(particles:set_colors 1 9)
(particles:set_life 2.0 5.0)
(particles:set_velocity -30 30 -120 -60)
(set fire-init? true))
(pxl8.particles_render particles)))
(particles:render)))
:rain (do
(pxl8.clear 0)
(when particles
(when (not rain-init?)
(pxl8.particles_clear particles)
(pxl8.vfx_rain particles 320 10.0)
(particles:clear)
(particles:set_position 320 -10)
(particles:set_spread 340 0)
(particles:set_gravity 30 80)
(particles:set_drag 1.0)
(particles:set_turbulence 5)
(particles:set_spawn_rate 500)
(particles:set_colors 20 22)
(particles:set_life 2.0 3.0)
(particles:set_velocity -20 20 400 600)
(set rain-init? true))
(pxl8.particles_render particles)))
(particles:render)))
:snow (do
(pxl8.clear 0)
(when particles
(when (not snow-init?)
(pxl8.particles_clear particles)
(pxl8.vfx_snow particles 320 5.0)
(particles:clear)
(particles:set_position 320 -10)
(particles:set_spread 340 0)
(particles:set_gravity 0 25)
(particles:set_drag 1.0)
(particles:set_turbulence 100)
(particles:set_spawn_rate 100)
(particles:set_life 8.0 12.0)
(particles:set_colors 10 15)
(particles:set_velocity -50 50 30 50)
(set snow-init? true))
(pxl8.particles_render particles)))
(particles:render)))
:worldgen (worldgen.frame)
_ (pxl8.clear 0))
(when transition
(pxl8.transition_render transition))
(transition:render))
(when (menu.is-paused)
(menu.draw))))