keyboard/altgr: copy pico-8 graphical symbols as p8scii
authorMischa POSLAWSKY <perl@shiar.org>
Sat, 23 Mar 2024 22:18:58 +0000 (23:18 +0100)
committerMischa POSLAWSKY <perl@shiar.org>
Wed, 3 Jul 2024 22:40:25 +0000 (00:40 +0200)
Official corresponding unicode (including variation selectors) from
<https://pico-8.fandom.com/wiki/P8SCII?oldid=3510>.

keyboard/altgr/p8scii.eng.inc.pl [new file with mode: 0644]

diff --git a/keyboard/altgr/p8scii.eng.inc.pl b/keyboard/altgr/p8scii.eng.inc.pl
new file mode 100644 (file)
index 0000000..f7831e2
--- /dev/null
@@ -0,0 +1,52 @@
+use utf8;
+use strict;
+use warnings;
+use Shiar_Sheet::KeyboardChars 'kbchars';
+
+my %rows = (
+       1 => '▮',
+       2 => '■',
+       3 => '□',
+       4 => '⁙',
+       5 => '⁘',
+       6 => '‖',
+       7 => '◀',
+       8 => '▶',
+       0 => '○', #
+       a => '█',
+       b => '▒',
+       c => '🐱',
+       d => '⬇️',
+       e => '░',
+       f => '✽',
+       g => '●',
+       h => '♥',
+       i => '☉',
+       j => '웃',
+       k => '⌂',
+       l => '⬅️',
+       m => '😐',
+       n => '♪',
+       o => '🅾️',
+       p => '◆',
+       q => '…',
+       r => '➡️',
+       s => '★',
+       t => '⧗',
+       u => '⬆️',
+       v => 'ˇ',
+       w => '∧',
+       x => '❎',
+       y => '▤',
+       z => '▥',
+);
+
+my $groups = kbchars(\%rows);
+
++{
+       %{ $groups },
+       version => '1.0',
+       title => 'P8SCII',
+       moderows => '1',
+       intro => 'PICO-8 character set',
+}