keyboard/altgr/p8scii.eng.inc.pl

   1 use utf8;
   2 use strict;
   3 use warnings;
   4 use Shiar_Sheet::KeyboardChars 'kbchars';
   5
   6 my %rows = (
   7         1 => '▮',
   8         2 => '■',
   9         3 => '□',
  10         4 => '⁙',
  11         5 => '⁘',
  12         6 => '‖',
  13         7 => '◀',
  14         8 => '▶',
  15         0 => '○', #
  16         a => '█',
  17         b => '▒',
  18         c => '🐱',
  19         d => '⬇️',
  20         e => '░',
  21         f => '✽',
  22         g => '●',
  23         h => '♥',
  24         i => '☉',
  25         j => '웃',
  26         k => '⌂',
  27         l => '⬅️',
  28         m => '😐',
  29         n => '♪',
  30         o => '🅾️',
  31         p => '◆',
  32         q => '…',
  33         r => '➡️',
  34         s => '★',
  35         t => '⧗',
  36         u => '⬆️',
  37         v => 'ˇ',
  38         w => '∧',
  39         x => '❎',
  40         y => '▤',
  41         z => '▥',
  42 );
  43
  44 my $groups = kbchars(\%rows);
  45
  46 +{
  47         %{ $groups },
  48         version => '1.0',
  49         title => 'P8SCII',
  50         moderows => '1',
  51         intro => 'PICO-8 character set',
  52 }