That Phial Game

Fri, 25 Apr 2025 13:40:01 UTC

that_phial_game_1_1

by sl3dge

[Click to Play]

That Phial Game

Inspired by that mobile game, try to sort colors together by pouring them from one phial to the other.

Controls

Z or 🅾️ to deselect [Special action on double press]
X or ❎ to select
Arrow Keys to move selection

Game Modes

Puzzle

Start with a random arrangement of colors and try to sort them all.
Special action: Undo.

Infinite

Colors get added every 5 turns. When all phials are full, you loose. Try to survive as long as possible.
Get two turns of additional time when you complete a phial.
Special action: Skip to the next drop.

Changelog

Added difficulty selection in puzzle mode. These go from 2 to 8 colors and 4 to 10 phials respectively.
Made the phials bigger
Add a victory screen
Add a menu entry to retry the current seed (to avoid mashing undo)

Please let me know what you think!

Older versions

ls -al or ll

Mon, 13 Jan 2025 20:35:35 UTC

Hello everyone,

Here's my first upload to the BBS ever, it's a simple rewrite of the ls.lua util. I've always preferred using ls -al (that is usually aliased as ll) in my unix terminals and because the muscle memory is too strong, I've just remade it quickly in Picotron.

Let me know if you have any issue. I also wanted to add the 'rwx' info just as a joke, but it crowded the output a bit too much.

Just copy this code in 'll.lua' in '/appdata/system/util'

function lpad(nb, str)
	local nb_to_add = nb - #str
	local result = ""
	for k=0,nb_to_add do
		result = result.." "
	end		
	return result..str
end

cd(env().path)

local path0 = env().argv[1] or "."
path = fullpath(path0)

if (not path) then
	print("could not resolve path "..tostr(path0))
	exit(0)
end

local res=ls(path)

if (not res) then
	print("could not find path "..tostr(res))
	exit(0)
end

local sizes = {}
local max_size = 0
local modifies = {}
local max_mod = 0
local names = {}
local sub_count = {}
local max_sub = 0

for i=1,#res do
	local type, size, mount_point = fstat(path.."/"..res[i])
	local meta = fetch_metadata(res[i])
	local modified = ""
	if meta != nil then
		if meta.modified != nil then
			modified = meta.modified
		end
	end
	add(sizes, tostring(size))
	local s = #tostring(size)
	if (s > max_size) max_size = s
	add(modifies, modified)
	local m = #modified
	if (m > max_mod) max_mod = m
	add(names, res[i])

	local sub_c = "1"
	if type == "folder" then
		sub_c = tostring(#ls(res[i]))
	end
	add(sub_count, sub_c)
	if (#sub_c > max_sub) max_sub = #sub_c
end

-- print header?
--[[
local header = ""
header = header .. "nb"
header = header .. lpad(max_size, "size")
header = header .. lpad(max_mod, "modified")
header = header .. " name"
print(header)
--]]

for i=1,#res do
	local str=""
	local col = "6"

	if (sub(names[i],-4)==".lua") then col="c" end
	if (sub(names[i],-4)==".txt") then col="a" end
	if (sub(names[i],-4)==".pod") then col="9" end
	if (sub(names[i],-4)==".png") then col="b" end
	if (sub(names[i],-4)==".p64") then col="s" end

	str = str..lpad(max_sub, sub_count[i])	
	str = str..lpad(max_size, tostring(sizes[i]))
	str = str..lpad(max_mod, modifies[i])
	str = str.." \f"..col..names[i]

	print(str)
end

sl3dge [Lexaloffle Blog Feed]

That Phial Game

That Phial Game

Controls

Game Modes

Puzzle

Infinite

Changelog

Older versions

1.0

ls -al or ll