kcp
/
kip
mirror of https://git.cro.wtf/kip.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

s/epto2kmm.bqn:init

This commit is contained in:
Kitty-Cricket Piapiac 2023-03-23 23:31:24 -07:00
parent dd4f546d09
commit 52cd51be2f
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
s/epto2kmm.bqn Executable file
View File

@ -0,0 +1,8 @@
#!/usr/bin/env bqn
#Converts Epto's font files to kmm files & keeps the copyright notice
nl←@+10⋄L2Hex←{((2⊸×⊸+˜´⌽)˘⌽‿4⥊'█'=𝕩)⊏∾"0a"+⟜↕¨10‿26}⋄Split←((⊢-˜+`׬)∘=⊔⊢)
ToImm←{𝕊x:{"CP":⟨⟩;"FH":⟨⟩;"FW":⟨⟩;"VER":⟨⟩;"MAX":⟨⟩;#Assumes FH,FW=8,8∧MAX=256
"INF":"{"∾(¯1↓4↓x)∾"}"∾nl;"NAME":":"∾(1⊑b);
"CH":nl∾˜∾' '⊸∾¨('#'⊸∾)¨L2Hex¨32(⌊∘÷˜⟜(↕≠)⊔⊢)y/˜nl≠y←¯2↓x↓˜1+⊑/nl=x;
𝕩:""}⊑b←' 'Split 𝕩}⋄•Out";
"∾˜∾ToImm¨1↓'@'Split•FChars 0⊑•args