sugarflower [Lexaloffle Blog Feed]

internettime

Fri, 10 Jan 2025 07:55:35 UTC

internettime

by sugarflower

[Click to Play]

I've loved Internet Time ever since I first learned about it in the 1990s.
I'd love to be able to make my own wristwatch like .beat in the future, but for now I'm content with having it run on my beloved picotron.

touch control for mobile phone

Fri, 25 Oct 2024 07:25:55 UTC

Thanks to HTML export, it's now possible to run picotron cartridges on a mobile phone.
However, at present the DPAD isn't displayed, and touch operations are replaced by mouse movements, making operation very uncomfortable.

So I wrote the following code to simulate touch operations.
This also led me to notice some strange behavior, but that's another story.

I'd be happy if the picotron itself could support touch operations in the future.

function _init()
	window{cursor=0} -- Hide the mouse cursor
	tch = touch.new() -- Initializing the touch structure
end

function _draw()
	-- Touch Structure Update. This is necessary to determine touch.
	tch:check() 

	--[[
	*** Wait until it truly becomes the initial state ***

	Since _init cannot fully initialize, it waits for time to pass in the main program.
	It seems that the time t() stops in _init, and the mouse position does not change. 
	It seems that time progresses entirely within _draw(_update).

	This is to prevent unnecessary tap events from occurring because a touch is 
	determined by moving the position of the mouse cursor, and the initial position of 
	the mouse cannot be obtained correctly.

	There may be a way to avoid this using memory manipulation, etc. 
	This decision statement is clearly a waste of processing.
	--]]
	if t() < 0.2 then return end

	-- Processes when it is determined that a touch has occurred.
	if tch.tap then
		splatter(tch.x, tch.y)
	end
end

--[[
It's not used within the program, but is useful 
for making the mouse cursor visible again.
--]]
function rst()
	cls()
	window { cursor=1 }
end

--[[
Creates an ink splatter effect.
This is just to make the examples a bit more interesting. Have fun!
--]]
function splatter(x, y)
	local col = flr(rnd(31)+1)
	local mdist = rnd(20)+10
	for i=0,mdist do
		local ang = rnd(1)
		local dist = rnd(mdist)
		local rad = rnd(mdist-dist)
		local xx = dist * cos(ang) + x
		local yy = dist * sin(ang) + y
		circfill(xx, yy, rad, col)
	end
end

--[[
Touch Structure
This determines if a tap has been performed by touch 
operation when the mouse cursor is moved.
--]]
touch = {}
touch.new = function()
	local x, y, _ = mouse()
	local obj = {}
	obj.x = 0
	obj.y = 0
	obj.tap = false
	obj.check = function(self)
		local x, y, _ = mouse()
		if self.tap == false and (x != self.x or y != self.y) then
			self.x = x
			self.y = y
			self.tap = true
		else
			self.tap = false
		end
	end
	return obj
end

Japanese 'MISAKI' font

Sat, 21 Sep 2024 17:18:35 UTC

misakitest

by sugarflower

[Click to Play]

I've put together a way to use the MISAKI font (https://littlelimit.net/misaki.htm) to display Japanese on picotoron.

Currently, only simple functions have been implemented, so there is still a lot to do before it can be used in practical use.

I can't keep up with the work by myself, so I decided to release it here so that it can be used partially. Basically, I think it's fine if you use it freely. (I would appreciate feedback as well.)

*You will need to know the kuten code to display it, but there is a lot of useful information on the Internet about this.

chipeight

Mon, 09 Sep 2024 11:54:49 UTC

A virtual computer that runs on a fantasy console. I find this very interesting, so I've made it work for now.

chipeight

by sugarflower

[Click to Play]

Key assignments

[1][2][3][4]
[q][w][e][r]
[a][s][d][f]
[z][x][c][v]

These can also be changed in key.lua if necessary.

0.0.1b

Minor bug fixes
Modified to load ROMs as external pod files by drag and drop (Thank you pancelor!)
Change display from full screen to windowed (to drop the ROM)

How to create a "rom" pod.

store(filepath, userdata("u8", bytelength, romdata))

Specifically, it looks like this.

store("/logo.pod", userdata("u8", 132, "00e0a22a600c6108d01f7009a239d01fa2487008d01f7004a257d01f7008a266d01f7008a275d01f1228ff00ff003c003c003c003c00ff00ffff00ff0038003f003f003800ff00ff8000e000e00080008000e000e00080f800fc003e003f003b003900f800f8030007000f00bf00fb00f300e30043e505e2008507810180028007e106e7"))

Handling floating point binary numbers (experimental)

Thu, 22 Aug 2024 11:33:24 UTC

f32b_test

by sugarflower

[Click to Play]

Operation cannot be confirmed online.

If you want to store floating point values in user data (or POD storage), currently using floats in user data or memmaps will not give good results.

My guess is that using floats in user data will be treated as standard in the future.

This program, f32b.lua, is included, and main.lua contains a simple usage example.
It is very experimental, but may be useful in some way.
It may also be possible to improve it and achieve more.
I don't think f32b.lua is fully optimized, but someone could perfect it.

The usage is as follows (contents of main.lua):

include "f32b.lua"

--[[
*** If you store it in user data.

f32b.lua uses "u8" for user data. Each floating point value uses 4 bytes.
In other words, if you want to save two values, create it as userdata("u8", 8).
--]]
mydata = userdata("u8", 8)

-- To set a value for user data, do this:
set_value(mydata, 0, -123.45)
set_value(mydata, 1, 100.0)

-- To extract it from the user data:
print(get_value(mydata, 0))
print(get_value(mydata, 1))

--[[
32b.lua is not for user data.
Use this if you want to create pure floating point binaries.
--]]
v = pack(d2b(3.1415))
binary = string.format("%08x", v)
print(binary)

-- To revert back to the original value:
print(b2d(unpack(v)))

-- An unpacked value is a 4-byte table.
data = d2b(123.45)
for i=1,4 do
	print(data[i])
end

Feel free to modify it to make it easier for you. :)

Choose a map by its name and use it.

Fri, 16 Aug 2024 04:54:18 UTC

function sel_layer(name)
	local m = fetch("map/0.map")
	local map_no = 0
	for i in pairs(m) do
		if m[i].name == name then
			map_no = i
			break
		end
	end
	if map_no != 0 then
		memmap(m[map_no].bmp, 0x100000)
	else
		error("There is no map data named '" .. name .. "'")
	end
end

I have saved the aforementioned code as a file named 'layer.lua'.
By utilizing this code, we can load specific map layers based on their assigned names.

To illustrate, imagine a map with a layer configuration as depicted in the following image.

include "layer.lua"

function _draw()
	sel_layer("sky")
	map(0, 0)

	sel_layer("house")
	map(0, 0)

	sel_layer("tree")
	map(0, 0)
end

maze wallpaper

Tue, 06 Aug 2024 18:59:39 UTC

zamuwawaje

by sugarflower

[Click to Play]

There were problems with /ram/shared/theme.pod not being able to be loaded on the web, but by providing default values it now works on the web.
No changes to functionality

trackercmd

Mon, 22 Jul 2024 11:30:25 UTC

trackercmd

by sugarflower

[Click to Play]

Since I have a hard time remembering tracker commands, I made this.
We can change where things show up by tweaking main.lua.

It seems that the web player can't play the tool tray.

changes

Fixed a typo.
Right-click to exit.

bytebeat

Thu, 27 Jun 2024 15:51:23 UTC

zamarazida

by sugarflower

[Click to Play]

This is Bytebeat that uses PCM function.

punkt

Wed, 26 Jun 2024 15:18:48 UTC

punkt

by sugarflower

[Click to Play]

I ported my favorite game for Gamebuino.
It's simple but very nice.

The original punkt is here.

Note: This game is not a complete port of the original punkt.

pico tone

Mon, 03 Jun 2024 16:35:48 UTC

Although it is still a prototype, I have created a toy that dynamically generates sounds using PCM functions :) I am thinking about how to make this even more interesting.

zazaharudo

by sugarflower

[Click to Play]

functionlist

Mon, 13 May 2024 17:08:45 UTC

This was created to create an instruction list.
It will be useful to use spreadsheet software (such as Excel) to understand the whole.

It is intended to be used on a console.
Also, the execution results are copied to the clipboard.

characterlist

Mon, 13 May 2024 17:04:22 UTC

characterlist_2

by sugarflower

[Click to Play]

In the future I'm thinking of running this in a tool tray.
This is not easy to use in terms of area unless you consider the layout.

0.0.2: Simple fix to reduce unnecessary code.
0.0.3: Selected characters are now copied to the clipboard for reuse.

milkiecolour wallpaper

Sat, 11 May 2024 09:16:11 UTC

milkiecolour wallpaper

by sugarflower

[Click to Play]

I tried to make it :D

0.1.1 Fixed to prevent unnecessary drawing.