X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/382c3a9fa1e25c7665ee16f0115998bb226dfbae..7c3505283729953254055925ce997eda7789570b:/keyboard/altgr/unigraph.eng.inc.pl

diff --git a/keyboard/altgr/unigraph.eng.inc.pl b/keyboard/altgr/unigraph.eng.inc.pl
index 03e5161..7c4d570 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,29 @@ 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] .= ' linkkeyboard/altgr/zoo';
 
 +{
 	%{ $groups },
-	version => '1.0',
+	version => '1.2',
 	title => 'Unicode semigraphics',
-	category => 'specialized',
+	category => 'specialized/graph',
 	intro => join("\n",
 		sprintf('Keyboard mode to %s draw character graphics.',
 			'<span title="without requiring a specialised editor">manually</span>',
 		),
 		'Inspired by <a href="/keyboard/altgr/msx-graph">MSX graph</a> mode,',
 		'but reimagined for modern Unicode coverage.',
+		'Freely available as <a href="/keyboard/symbols/unigraph">xorg symbols</a> 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'],