--- /dev/null
+use utf8;
+use strict;
+use warnings;
+our %rows = (
+ 'q' => '∧',
+ 'w' => '∨',
+ 'e' => '∩',
+ 'r' => '∪',
+ 't' => '⊂',
+ 'y' => '⊃',
+ 'u' => '∀',
+ 'i' => '∞',
+ 'o' => '∃',
+ 'p' => '∂',
+
+ 'a' => '⊥',
+ 's' => '⊤',
+ 'd' => '⊢',
+ 'f' => '⊣',
+ 'g' => '↑',
+ 'h' => '↓',
+ 'j' => '←',
+ 'k' => '→',
+ 'l' => '↔',
+
+ 'z' => '⌊',
+ 'x' => '⌈',
+ 'c' => '≠',
+ 'v' => '≃',
+ 'b' => '≡',
+ 'n' => '≤',
+ 'm' => '≥',
+ #',' => '<', # just shifted
+ #'.' => '>',
+ #'/' => '?',
+
+ '+:' => '⋄', # positioned left of 1, also drawn as §-ish
+ '+1' => '†',
+ '+2' => '‡',
+ '+3' => '∇',
+ '+4' => '¢',
+ '+5' => '∘',
+ '+6' => '⎕', # or ⌷
+ '+7' => '÷',
+ '+8' => '×',
+ '+9' => '¶',
+ '+0' => '○',
+ '+-' => '¯',
+ '+=' => '≈',
+
+ '+q' => 'θ',
+ '+w' => 'ω',
+ '+e' => 'ε',
+ '+r' => 'ρ',
+ '+t' => 'τ',
+ '+y' => 'ψ',
+ '+u' => 'υ',
+ '+i' => 'ι',
+ '+o' => 'ο',
+ '+p' => 'π',
+ '+[' => '⟦', # separate keys ([ and {<
+ '+]' => '⟧', # )] and }> ⟨⟩
+ '+`' => '¬', # positioned between ] and \
+ '+\\'=> '∥',
+
+ '+a' => 'α',
+ '+s' => 'σ',
+ '+d' => 'δ',
+ '+f' => 'φ', # drawn like ø
+ '+g' => 'γ',
+ '+h' => 'η',
+ '+j' => 'ϑ', # probably
+ '+k' => 'κ',
+ '+l' => 'λ',
+ '+;' => '¨',
+ "+'" => '·', # ambiguous dot (visually raised •)
+
+ '+z' => 'ζ',
+ '+x' => 'ξ',
+ '+c' => 'χ',
+ '+v' => 'ς', # likely
+ '+b' => 'β',
+ '+n' => 'ν',
+ '+m' => 'μ',
+ '+,' => '≪',
+ '+.' => '≫',
+ '+/' => '∫',
+);
+
++{
+ %{ do 'keyboard/altgr/groups.inc.pl' },
+ version => '1.0',
+ title => 'Space Cadet',
+ intro => join("\n",
+ 'Apparent <a href="/charset">glyphs</a> available',
+ 'on the 1978 Symbolics Space Cadet keyboard',
+ 'by pressing either the <em>Greek/Front</em> or <em>Top</em> key.',
+ 'Distinct from the modern <a href="/keyboard/altgr/apl">IBM standard</a>',
+ 'for <a href="/apl">APL</a> programming.',
+ ),
+ description => [
+ 'A map of the legendary Space Cadet keyboard',
+ 'with Unicode characters of all greek and APL options.',
+ ],
+ rows => [3, 0], # greek/front and top
+ moderows => '41-4',
+ image => 'keyboard/altgr/spacecadet.jpg',
+}
[qw(
apl less screen digits sc/bw sc/hots termcol/legacy mplayer
keyboard/altgr/macos-abc keyboard/altgr/msx keyboard/altgr/ukext
- keyboard/altgr/eurkey keyboard/altgr/apl
+ keyboard/altgr/eurkey keyboard/altgr/apl keyboard/altgr/spacecadet
)],
[qw( chars/table/html sample source plan )],
);