extend font overview to 3x70

[unicode-sampler.git] / unicode.txt

diff --git a/unicode.txt b/unicode.txt
index 6dcd6eb7155b058706af308ec3a42377ff8c6d89..df3c55a31fc20797674de5a7ba41fcb016586b07 100644 (file)
--- a/unicode.txt
+++ b/unicode.txt
@@ -11,7 +11,9 @@ Code:
 
   Hash[ :nbsp => 0O2_40 ].each {|name, cp| puts "#{name} is '#{cp.chr}'" }
 
-  perl -pe's/\w/$^=~$&>chop($^=$&.$^)?"@-":$&/ge'
+  while ((c = *l++) != '\0') { m->stat[2] = IO | (~OK & X_8); }
+
+  perl -pe's/\w/$^ =~ $& > chop($^ = $& . $^) ? "@-" : $&/ge'
 
   ↑1 ⍵∨.∧3 4=+/,¯1 0 1∘.⊖¯1 0 1⌽¨⊂⍵ ⍝ game of life
 
@@ -31,11 +33,11 @@ Mathematics and sciences:
 
 Compact font overview:
 
-  ╔═══════════════════════════════════════════════════════════════╗
-  ║ _ABCDEFGHIJKLMNOPQRSTUVWXYZ ÅĀČẾƏṆÞß ΑΒΓΔΩὮ АБВГДЯ ԱႠא $€     ║
-  ║ @abcdefghijklmnopqrstuvwxyz åāčếəṇþſ αβγδωὦ абвгдя աაا ¥£     ║
-  ║ [-0123456789] !¿?#%‰&©/*•† (.:;,…) {'"|“’”} +×=≠½²∈∞ ↗┌╁╖░☺ � ║
-  ╚═══════════════════════════════════════════════════════════════╝
+  ╔═══════════════════════════════════════════════════════════════��════════��
+  ║ _ABCDEFGHIJKLMNOPQRSTUVWXYZ ÅĀČẾƏØṆⱣÞß ΑΒΓΔΩὮ АБВГДЯѢЌ ԱԲԳ ႠႡႢ אבג ¤¢$ ║
+  ║ @abcdefghijklmnopqrstuvwxyz åāčếəøṇᵽþſ αβγδωὦ абвгдяѣќ աբգ აბგ ابج €¥£ ║
+  ║ -0123456789 (/)[\]{|} '"«“’”» ,;:.… !¿?#§¶†%‰&©*• +×<=≠>½²√∈∞ ↗┌╁╖░☺ � ║
+  ╚═══════════════════════════════════════════════════════════════��════════��
 
 English panphone (traditional, IPA, Shavian, Braille):