X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/c1831544dfc72d7b11697e4de711ef28aab91d4c..91551ba60a8f0170ff90f05e60c4fb8e21226d2a:/script.plp

diff --git a/script.plp b/script.plp
index c09d933..0f40c68 100644
--- a/script.plp
+++ b/script.plp
@@ -28,35 +28,55 @@ use Shiar_Sheet::FormatChar;
 my $glyphs = Shiar_Sheet::FormatChar->new;
 
 print $glyphs->table([qw{
-	. A  𐌀 А  𐌰 Ⲁ Α  𐤀 א ﺍ
-	. B  𐌁 БВ 𐌱 Ⲃ Β  𐤁 ב ﺏ
-	. GC 𐌂 Г  𐌲 Ⲅ Γ  𐤂 ג ﺝ
-	. D  𐌃 Д  𐌳 Ⲇ Δ  𐤃 ד دذ
-	. E  𐌄 ЕЭ 𐌴 Ⲉ Ε  𐤄 ה هـ
-	. F  𐌅 -  𐍆 - -Ϝ 𐤅 ו ﻭ
-	. Y  - -Ѵ 𐍅 Ⲩ Υ  - - -
-	. VU 𐌖 У  - - -  - - -
-	. W  - -  - - -  - ×° -
-	. Z  𐌆 З  𐌶 Ⲍ Ζ  𐤆 ז ﺯ
-	. H  𐌇 И  𐌷 Ⲏ Η  𐤇 ח حخ
-	. -  𐌈 Ѳ  𐌸 Ⲑ Θ  𐤈 ט طظ
-	. I  𐌉 І  𐌹 Ⲓ Ι  𐤉 י ي
-	. J  𐌝 -  - - Ј  - ײ -
-	. K  𐌊 К  𐌺 Ⲕ Κ  𐤊 כ ﻙ
-	. L  𐌋 Л  𐌻 Ⲗ Λ  𐤋 ל ﻝ
-	. M  𐌌 М  𐌼 Ⲙ Μ  𐤌 מ ﻡ
-	. N  𐌍 Н  𐌽 Ⲛ Ν  𐤍 נ ﻥ
-	. X  𐌎 Х  𐍇 Ⲭ Χ  𐤎 ס س
-	. -  - -Ѯ - Ⲝ Ξ  - - -
-	. O  𐌏 О  - Ⲟ Ο  𐤏 ע عغ
-	. P  𐌐 П  𐍀 Ⲡ Π  𐤐 פ ﻑ
-	. -  𐌑 Ц  - Ⲋ -Ϻ 𐤑 צ ص
-	. -  - Ч  - - -  - ץ ض
-	. Q  𐌒 -Ҁ - - -Ϙ 𐤒 ק ﻕ
-	. R  𐌓 Р  𐍂 Ⲣ Ρ  𐤓 ר ﺭ
-	. -  - Ш  - - Σ  𐤔 ש ش
-	. S  𐌔 С  𐍃 Ⲥ -Ϲ - - -
-	. T  𐌕 Т  𐍄 Ⲧ Τ  𐤕 ת تث
+	.>Chinese              壹 貳 參 肆 伍 陸 柒 捌 玖 零
+	.>Chinese              一 二 三 四 五 六 七 八 九 〇
+	.>Hangzhou             〡 〢 〣 〤 〥 〦 〧 〨 〩  
+	.>Ethiopic             ፩ ፪ ፫ ፬ ፭ ፮ ፯ ፰ ፱  
+	.>Khmer                ១ ២ ៣ ៤ ៥ ៦ ៧ ៨ ៩ ០
+	.>Arabic_-_Indic       Ù¡ Ù¢ Ù£ Ù¤ Ù¥ Ù¦ Ù§ Ù¨ Ù© Ù 
+	.>Arabic_-_Indic_(Alt) Û± Û² Û³ Û´ Ûµ Û¶ Û· Û¸ Û¹ Û°
+	.>Lao                  ໑ ໒ ໓ ໔ ໕ ໖ ໗ ໘ ໙ ໐
+	.>Malayalam_-_മലയാളം   ൧ ൨ ൩ ൪ ൫ ൬ ൭ ൮ ൯ ൦
+	.>Tamil_-_தமிழ்         ௧ ௨ ௩ ௪ ௫ ௬ ௭ ௮ ௯  
+	.>Myanmar              ၁ ၂ ၃ ၄ ၅ ၆ ၇ ၈ ၉ ၀
+	.>Thai_-_ไทย           ๑ ๒ ๓ ๔ ๕ ๖ ๗ ๘ ๙ ๐
+	.>Kannada              ೧ ೨ ೩ ೪ ೫ ೬ ೭ ೮ ೯ ೦
+	.>Telugu               ౧ ౨ ౩ ౪ ౫ ౬ ౭ ౮ ౯ ౦
+	.>Tibetan              ༡ ༢ ༣ ༤ ༥ ༦ ༧ ༨ ༩ ༠
+	.>Bengali              ১ ২ ৩ ৪ ৫ ৬ ৭ ৮ ৯ ০
+	.>Oriya_-_ଓଡ଼ିଆ          ୧ ୨ ୩ ୪ ୫ ୬ ୭ ୮ ୯ ୦
+	.>Gurmukhi_-_ਪੰਜਾਬੀ     ੧ ੨ ੩ ੪ ੫ ੬ ੭ ੮ ੯ ੦
+	.>Gujarati             ૧ ૨ ૩ ૪ ૫ ૬ ૭ ૮ ૯ ૦
+	.>Devanagari           १ २ ३ ४ ५ ६ ७ ८ ९ ०
+	.>Arabic_(Western)     1 2 3 4 5 6 7 8 9 0
+	.>Roman                Ⅰ Ⅱ Ⅲ Ⅳ Ⅴ Ⅵ Ⅶ Ⅷ Ⅸ  
+	.>Tengwar                       
+	.>Klingon                        
+}]);
+
+sub print_glyph_tables {
+	while (@_) {
+		printf '<div class="section"><h2>%s</h2>'."\n\n", shift;
+		while (ref $_[0] and $_ = shift) {
+			print $glyphs->table($_);
+		}
+		print '</div>';
+	}
+}
+
+print_glyph_tables(
+Western => [qw{
+	.>Latin      A > B  C G  D  > E  F  Y  VU W Z H  -  I J K L M N > X  O  P >  - Q  R > S  T
+	.>Old_Italic 𐌀 > 𐌁  > 𐌂  𐌃  > 𐌄  𐌅  >  >  𐌖 𐌆 𐌇  𐌈  𐌉 𐌝 𐌊 𐌋 𐌌 𐌍 > 𐌎  𐌏  𐌐 >  𐌑 𐌒  𐌓 > 𐌔  𐌕
+	.>Cyrillic   А Б В  > Г  Д  Е Э  >  -Ѵ >  У З И  Ѳ  > І К Л М Н Х -Ѯ О  П Ц  Ч -Ҁ Р Ш С  Т
+	.>Gothic     𐌰 > 𐌱  > 𐌲  𐌳  > 𐌴  𐍆  >  >  𐍅 𐌶 𐌷  𐌸  > 𐌹 𐌺 𐌻 𐌼 𐌽 > 𐍇  𐌿  𐍀 >  - -  𐍂 > 𐍃  𐍄
+	.>Coptic     Ⲁ > Ⲃ  > Ⲅ  Ⲇ  > Ⲉ  >  >  >  Ⲩ Ⲍ Ⲏ  Ⲑ  > Ⲓ Ⲕ Ⲗ Ⲙ Ⲛ Ⲭ Ⲝ  Ⲟ  Ⲡ >  Ⲋ -  Ⲣ > Ⲥ  Ⲧ
+	.>Greek      Α > Β  > Γ  Δ  > Ε  -Ϝ >  >  Υ Ζ Η  Θ  Ι Ј Κ Λ Μ Ν Χ Ξ  Ο  Π > -Ϻ -Ϙ Ρ Σ -Ϲ Τ
+	.>Phoenician 𐤀 > 𐤁  > 𐤂  𐤃  > 𐤄  >  >  >  𐤅 𐤆 𐤇  𐤈  > 𐤉 𐤊 𐤋 𐤌 𐤍 > 𐤎  𐤏  𐤐 >  𐤑 𐤒  𐤓 > 𐤔  𐤕
+	.>Samaritan  ࠀ > ࠁ  > ࠂ  ࠃ  > ࠄ  >  >  >  ࠅ ࠆ ࠇ  ࠈ  > ࠉ ࠊ ࠋ ࠌ ࠍ > ࠎ  ࠏ  ࠐ >  ࠑ ࠒ  ࠓ > ࠔ  ࠕ
+	.>Hebrew     א > ב  > ג  ד  > ה  >  >  ו  װ ז ח  ט  י ײ כ ל מ נ > ס  ע  פ צ  ץ ק  ר > ש  ת
+	.>Syriac     ܐ > ܒ  > ܓ  ܕ  > ܗ  >  >  >  ܘ ܙ ܚ  ܛ  ܝ ҩ ܟ ܠ ܡ ܢ > ܣ  ܥ  ܦ >  ܨ ܩ  ܪ > ܫ  ܬ
+	.>Arabic     ﺍ > ﺏ  > ﺝ  دذ ه ـ  >  >  >  ﻭ ﺯ حخ طظ > ي ﻙ ﻝ ﻡ ﻥ > س  عغ ﻑ ص  ض ﻕ  ﺭ > ش  تث
 }]);
 
 :></div>