tracker impl, s3m converter, larger tracker sample bin

tsvm_executable/src/net/torvald/terrarum/imagefont/TinyAlphNum.kt

@@ -85,6 +85,107 @@ object TinyAlphNum : BitmapFont() {
 
 
 
+    private fun isColourCodeHigh(c: Char) = c.toInt() in 0b110110_1111000000..0b110110_1111111111
+    private fun isColourCodeLow(c: Char) = c.toInt() in 0b110111_0000000000..0b110111_1111111111
+
+    private fun getColour(charHigh: Char, charLow: Char): Color { // input: 0x10ARGB, out: RGBA8888
+        val codePoint = Character.toCodePoint(charHigh, charLow)
+
+        if (colourBuffer.containsKey(codePoint))
+            return colourBuffer[codePoint]!!
+
+        val a = codePoint.and(0xF000).ushr(12)
+        val r = codePoint.and(0x0F00).ushr(8)
+        val g = codePoint.and(0x00F0).ushr(4)
+        val b = codePoint.and(0x000F)
+
+        val col = Color(r.shl(28) or r.shl(24) or g.shl(20) or g.shl(16) or b.shl(12) or b.shl(8) or a.shl(4) or a)
+
+
+        colourBuffer[codePoint] = col
+        return col
+    }
+
+    private val colourBuffer = HashMap<Int, Color>()
+}
+
+/**
+ * Created by minjaesong on 2026-04-19.
+ */
+object PatternView : BitmapFont() {
+
+    internal val W = 5
+    internal val H = 6
+
+    internal val fontSheet = TextureRegionPack(Gdx.files.internal("net/torvald/terrarum/imagefont/tiny.tga"), W, H)
+
+
+    init {
+        setOwnsTexture(true)
+        setUseIntegerPositions(true)
+    }
+
+    fun getWidth(str: String): Int {
+        var l = 0
+        for (char in str) {
+            if (!isColourCodeHigh(char) && !isColourCodeLow(char)) {
+                l += 1
+            }
+        }
+        return W * l
+    }
+
+    lateinit var colMain: Color
+    lateinit var colShadow: Color
+
+    override fun draw(batch: Batch, text: CharSequence, x: Float, y: Float): GlyphLayout? {
+        val originalColour = batch.color.cpy()
+        colMain = batch.color.cpy()
+        colShadow = colMain.cpy().mul(0.5f, 0.5f, 0.5f, 1f)
+
+        val x = x.roundToInt().toFloat()
+        val y = y.roundToInt().toFloat()
+
+        var charsPrinted = 0
+        text.forEachIndexed { index, c ->
+            if (isColourCodeHigh(c)) {
+                val cchigh = c
+                val cclow = text[index + 1]
+                val colour = getColour(cchigh, cclow)
+
+                colMain = colour
+                colShadow = colMain.cpy().mul(0.5f, 0.5f, 0.5f, 1f)
+            }
+            else if (c in 0.toChar()..255.toChar()) {
+                batch.color = colShadow
+                batch.draw(fontSheet.get(c.toInt() % 16, c.toInt() / 16), x + charsPrinted * W + 1, y)
+                batch.draw(fontSheet.get(c.toInt() % 16, c.toInt() / 16), x + charsPrinted * W, y + 1)
+                batch.draw(fontSheet.get(c.toInt() % 16, c.toInt() / 16), x + charsPrinted * W + 1, y + 1)
+
+
+                batch.color = colMain
+                batch.draw(fontSheet.get(c.toInt() % 16, c.toInt() / 16), x + charsPrinted * W, y)
+
+                charsPrinted += 1
+            }
+        }
+
+
+        batch.color = originalColour
+
+        return null
+    }
+
+    fun drawRalign(batch: Batch, text: CharSequence, x: Float, y: Float): GlyphLayout? {
+        return draw(batch, text, x - W*text.length, y)
+    }
+
+    override fun getLineHeight() = H.toFloat()
+    override fun getCapHeight() = getLineHeight()
+    override fun getXHeight() = getLineHeight()
+
+
+
     private fun isColourCodeHigh(c: Char) = c.toInt() in 0b110110_1111000000..0b110110_1111111111
     private fun isColourCodeLow(c: Char) = c.toInt() in 0b110111_0000000000..0b110111_1111111111