X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/382c3a9fa1e25c7665ee16f0115998bb226dfbae..refs/heads/master:/keyboard/altgr/unigraph.eng.inc.pl?ds=inline
diff --git a/keyboard/altgr/unigraph.eng.inc.pl b/keyboard/altgr/unigraph.eng.inc.pl
index 03e5161..ad87104 100644
--- a/keyboard/altgr/unigraph.eng.inc.pl
+++ b/keyboard/altgr/unigraph.eng.inc.pl
@@ -1,50 +1,52 @@
use utf8;
use strict;
use warnings;
+no warnings 'qw';
use Shiar_Sheet::KeyboardChars 'kbchars';
-my %rows = qw{
- +! ð +@ ð +# ð
+$ ð +% ð +^ ð +& ð +* ð +( ð +) ð +_ ð ++ ð
- +1 â +2 â +3 â +4 â +5 â +6 â +7 â +8 â +9 â +0 â +- â += â
+my %guys = qw{
+ ! ð @ ð # ð
$ ð % ð ^ ð & ð * ð ( ð ) ð _ ð + ð
+ 1 â 2 â 3 â 4 â 5 â 6 â 7 â 8 â 9 â 0 â - â = â
+};
- $ â 4 â % â¡ 5 â ^ â 6 â
\{ â
- & â * ⥠( ⦠) â£
- - ⺠_ â¹ = â»
- = â¼ + â
+my %rows = qw`
+ +- â += ⥠++ ⦠+_ â£
+ ) ⺠+) â¹ 0 â» +6 â +0 â¼ ^ â 6 â
+ +! â +1 â +@ â¡ +2 â +# â +3 â
+ - â = â _ â + â +^ â
q â w â e â Q â W â E â +q ⤠+w â² +e ⥠+Q ⸠+W â³ +E â¹
a â s â d â A â S â D â +a â +s â +d ⶠ+A â +S â +D â·
z â x â c â Z â X â C â +z ⣠+x â¼ +c ⢠+Z ⺠+X â½ +C â¿
1 ⤡ 2 â 3 ⤢ ! â @ â # âº
- r â t ⬠y â R â T ⦠Y â
- f â g â¼ h ⤠F â G ⬠H â£
- v â b â´ n â V â B â© N â
- ' â \ â " â | â +' â +\ â +" â +| â
+ r â t ⬠y â R â T ⦠Y â +u â +i â· +o â®
+ f â g â¼ h ⤠F â G ⬠H ⣠+j ⶠ+k 𮯠+l â´
+ v â b â´ n â V â B â© N â +m â° +, âµ +. â¯
+ 4 â 5 â $ â % â
+ { ⯠| â® \\ · P â° } â± +| â +" â
+ [ â³ p â± ] â²
+ +[ â +4 â +$ â +\\ â +5 â +% â
+r â +R â +t ⤠+T ⥠+y â +Y â
+f â +F â +g ⪠+G â« +h â¡ +H â¢
+v â +V â +b ⧠+B ⨠+n â +N â
+ ' ⬠" â® +' âª
> â . â , â M â m â
- l â L â k â J â j â ; â : â +; ð® +: ð®
+ l â ( â k â & â j â ; â : â +; ð® +: ð®
O â o â i â U â u â / â ? â +/ ð® +? ð®
7 â 8 â 9 â
- I ð® K ð® < ð®
+ +p ð® +] ð® +8 ð® +* ð® +{ ð®
+ I ð¯ < ð J ð® L ð¬ * ð® K ð®
- +i ð¯ +, ð +j ð® +l ð¬ +[ ð® +k ð®
- +u â +o â® +m â° +. â¯
+ +U 𮣠+I 𮦠+O 𮢠+7 𮫠+9 ð®ª
+ +J 𮥠+K ð®® +L 𮤠+P 𮨠+} ð®©
+ +M 𮡠+< 𮧠+> ð® +& 𮬠+( ð®
+`;
- +U 𮣠+I 𮦠+O ð®¢
- +J 𮥠+K ð®® +L ð®¤
- +M 𮡠+< 𮧠+> ð®
- p â± [ â³ ] â²
- P 𮨠\} 𮩠+p 𮫠+] 𮪠+P 𮬠+\} ð®
-};
$rows{' '} = "\N{FIGURE SPACE}";
-# remaining candidates: ââ ð® ð® â¤â§â¡â¢ ââ ââ ââ â¬
-
my $groups = kbchars(\%rows);
use Encode 'decode';
@@ -57,27 +59,30 @@ my %cpcompat = (
);
while (my ($k, $c) = each %rows) {
- $groups->{def}{''}{$k} = $cpcompat{$c} // (
+ $groups->{def}{''}{$k}[0] = $cpcompat{$c} // (
$c =~ /\p{In=1.1}/ ? 'g5' :
$c =~ /\p{In=6.0}/ ? 'g6' :
$c =~ /[\x{1FB00}-\x{1FBFF}]/ ? 'g7' : # Age=V13.0
'g0'
);
}
+$groups->{def}{''}{'+0'}[0] .= ' linkkeyboard/altgr/zoo';
+$groups->{def}{''}{ '0'}[0] .= ' linkkeyboard/altgr/im';
+{
%{ $groups },
- version => '1.0',
+ version => '1.4',
title => 'Unicode semigraphics',
- category => 'specialized',
+ category => 'specialized/graph',
intro => join("\n",
sprintf('Keyboard mode to %s draw character graphics.',
'manually',
),
'Inspired by MSX graph mode,',
'but reimagined for modern Unicode coverage.',
+ 'Freely available as xorg symbols export.',
),
- moderows => '5421-21',
+ moderows => '5421',
flag => {
g2 => ['cp850' => 'shared international repetoire in most DOS code pages'],
g3 => ['historic' => 'extended graphics presentations of control characters in cp437 ea'],