(DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "INTERLISP" :BASE 10 :FORMAT :UTF-8)


(FILECREATED "16-Jul-2026 22:55:42" {MEDLEY}<library>virtualkeyboards>XKEYBOARDS.;15
 16136  

      :EDIT-BY rmk

      :CHANGES-TO (ALISTS (VKBD.LOADED-KEYBOARDS X))

      :PREVIOUS-DATE "16-Jul-2026 22:45:11" {MEDLEY}<library>virtualkeyboards>XKEYBOARDS.;14)


(PRETTYCOMPRINT XKEYBOARDSCOMS)

(RPAQQ XKEYBOARDSCOMS
 ((ALISTS (VKBD.LOADED-KEYBOARDS X))))

(ADDTOVAR VKBD.LOADED-KEYBOARDS

          (X (DEFAULT NIL X NIL)
             (DVORAK ((%" (%, ” NOLOCKSHIFT))
                      (- (|8| ← NOLOCKSHIFT))
                      (ZERO (|2| ¢ NOLOCKSHIFT))
                      (FOUR (! @ NOLOCKSHIFT))
                      (FIVE (|6| - NOLOCKSHIFT))
                      (SIX (|7| %# NOLOCKSHIFT))
                      (SEVEN (|3| %) NOLOCKSHIFT))
                      (%: (s S LOCKSHIFT))
                      (< (w W LOCKSHIFT))
                      (> (v V LOCKSHIFT))
                      (? (z Z LOCKSHIFT))
                      (B (x X LOCKSHIFT))
                      (C (j J LOCKSHIFT))
                      (D (|1| * NOLOCKSHIFT))
                      (D (e E LOCKSHIFT))
                      (E (|5| %( NOLOCKSHIFT))
                      (E (%. > NOLOCKSHIFT))
                      (F (u U LOCKSHIFT))
                      (G (i I LOCKSHIFT))
                      (H (d D LOCKSHIFT))
                      (I (c C LOCKSHIFT))
                      (J (h H LOCKSHIFT))
                      (K (|4| $ NOLOCKSHIFT))
                      (K (t T LOCKSHIFT))
                      (L (n N LOCKSHIFT))
                      (N (b B LOCKSHIFT))
                      (O (r R LOCKSHIFT))
                      (P (l L LOCKSHIFT))
                      (Q (? / NOLOCKSHIFT))
                      (R (p P LOCKSHIFT))
                      (S (o O LOCKSHIFT))
                      (T (y Y LOCKSHIFT))
                      (U (|9| %% NOLOCKSHIFT))
                      (U (g G LOCKSHIFT))
                      (V (|0| & NOLOCKSHIFT))
                      (V (k K LOCKSHIFT))
                      (W (%, < NOLOCKSHIFT))
                      (X (q Q LOCKSHIFT))
                      (Y (f F LOCKSHIFT))
                      (Z (; %: NOLOCKSHIFT))
                      (%` (‘ “ NOLOCKSHIFT)))
                    NIL NIL NIL)
             (EUROPEAN ((%" (» “ LOCKSHIFT))
                        (+ (̌ ° NOLOCKSHIFT))
                        (- (̧ ̌ NOLOCKSHIFT))
                        (%: (; %: LOCKSHIFT))
                        (< (æ Æ LOCKSHIFT))
                        (> (œ Œ LOCKSHIFT))
                        (? (/ ¿ NOLOCKSHIFT))
                        (A (â Â LOCKSHIFT))
                        (B (õ Õ LOCKSHIFT))
                        (C (ç Ç LOCKSHIFT))
                        (D (î Î LOCKSHIFT))
                        (E (í Ǎ LOCKSHIFT))
                        (EIGHT (|8| ̈ NOLOCKSHIFT))
                        (F (ô Ô LOCKSHIFT))
                        (FIVE (|5| ̄ NOLOCKSHIFT))
                        (FOUR (|4| ̃ NOLOCKSHIFT))
                        (G (û Û LOCKSHIFT))
                        (H (ä Ä LOCKSHIFT))
                        (I (ì Ì LOCKSHIFT))
                        (J (ë Ë LOCKSHIFT))
                        (K (ï Ï LOCKSHIFT))
                        (L (ö Ö LOCKSHIFT))
                        (M (ʼn M LOCKSHIFT))
                        (N (ñ Ñ LOCKSHIFT))
                        (NINE (|9| ̊ NOLOCKSHIFT))
                        (O (ò Ò LOCKSHIFT))
                        (ONE (|1| ̀ NOLOCKSHIFT))
                        (P (ù Ù LOCKSHIFT))
                        (Q (á Á LOCKSHIFT))
                        (R (ó Ó LOCKSHIFT))
                        (S (ê Ê LOCKSHIFT))
                        (SEVEN (|7| ̇ NOLOCKSHIFT))
                        (SIX (|6| ̆ NOLOCKSHIFT))
                        (T (ú Ú LOCKSHIFT))
                        (THREE (|3| ̂ NOLOCKSHIFT))
                        (TWO (|2| ́ NOLOCKSHIFT))
                        (U (è È LOCKSHIFT))
                        (V (ã Ã LOCKSHIFT))
                        (W (é É LOCKSHIFT))
                        (X (å Å LOCKSHIFT))
                        (Y (à À LOCKSHIFT))
                        (Z (ß Z LOCKSHIFT))
                        (ZERO (|0| ~ NOLOCKSHIFT))
                        (%` (« ” LOCKSHIFT))
                        ({ (ij IJ LOCKSHIFT))
                        (} (ø ø LOCKSHIFT)))
                    NIL NIL NIL)
             (FRENCH ((%" (%' à NOLOCKSHIFT))
                      (- (- -))
                      (|2| (|2| â NOLOCKSHIFT))
                      (|3| (|3| ê NOLOCKSHIFT))
                      (|4| (|4| î NOLOCKSHIFT))
                      (|5| (|5| ô NOLOCKSHIFT))
                      (|6| (|6| û NOLOCKSHIFT))
                      (|7| (|7| & NOLOCKSHIFT))
                      (|8| (|8| ù NOLOCKSHIFT))
                      (< (%, « NOLOCKSHIFT))
                      (> (%. » NOLOCKSHIFT))
                      (? (̲ ? NOLOCKSHIFT))
                      (D (d D NOLOCKSHIFT))
                      (E (e E NOLOCKSHIFT))
                      (U (u U NOLOCKSHIFT))
                      (%` (ç Ç LOCKSHIFT))
                      ({ (é ë LOCKSHIFT))
                      (} (è ï LOCKSHIFT)))
                    NIL NIL NIL)
             (GERMAN ((+ (ü Ü LOCKSHIFT))
                      (- (- -))
                      (? (ß ? NOLOCKSHIFT))
                      (U (u U NOLOCKSHIFT))
                      (%` (_ ^ NOLOCKSHIFT))
                      ({ (ö Ö LOCKSHIFT))
                      (} (ä Ä LOCKSHIFT)))
                    NIL NIL NIL)
             (GREEK ((- (- -))
                     (A (α Α LOCKSHIFT))
                     (B (β Β LOCKSHIFT))
                     (C (ξ Ξ LOCKSHIFT))
                     (D (δ Δ LOCKSHIFT))
                     (E (ε E LOCKSHIFT))
                     (F (φ Φ LOCKSHIFT))
                     (G (γ Γ LOCKSHIFT))
                     (H (η Η LOCKSHIFT))
                     (I (ι Ι LOCKSHIFT))
                     (K (κ Κ LOCKSHIFT))
                     (L (λ Λ LOCKSHIFT))
                     (M (μ Μ LOCKSHIFT))
                     (N (ν Ν LOCKSHIFT))
                     (O (ο Ο LOCKSHIFT))
                     (P (π Π LOCKSHIFT))
                     (Q (θ Θ LOCKSHIFT))
                     (R (ρ Ρ LOCKSHIFT))
                     (S (σ Σ LOCKSHIFT))
                     (SIX (|6| ~ NOLOCKSHIFT))
                     (T (τ Τ LOCKSHIFT))
                     (U (υ Υ LOCKSHIFT))
                     (V (s Σ LOCKSHIFT))
                     (W (ω Ω LOCKSHIFT))
                     (X (χ Χ LOCKSHIFT))
                     (Y (ψ Ψ LOCKSHIFT))
                     (Z (ζ Ζ LOCKSHIFT))
                     (%` (_ ^ NOLOCKSHIFT)))
                    NIL NIL NIL)
             (ITALIAN ((%" (%' %" NOLOCKSHIFT))
                       (- (- -))
                       (< (%, « NOLOCKSHIFT))
                       (> (%. » NOLOCKSHIFT))
                       (? (̲ ? NOLOCKSHIFT))
                       (FIVE (|5| ò NOLOCKSHIFT))
                       (FOUR (|4| ì NOLOCKSHIFT))
                       (SIX (|6| ù NOLOCKSHIFT))
                       (THREE (|3| è NOLOCKSHIFT))
                       (TWO (|2| á NOLOCKSHIFT))
                       (%` (← “ NOLOCKSHIFT)))
                    NIL NIL NIL)
             (LOGIC ((%" (ℂ ℂ))
                     (+ (= ≠ NOLOCKSHIFT))
                     (- (± ∓ NOLOCKSHIFT))
                     (%: (ℵ ℵ))
                     (< (∥ ∦ NOLOCKSHIFT))
                     (> (∅ Ø NOLOCKSHIFT))
                     (? (← → NOLOCKSHIFT))
                     (A (∀ ∀))
                     (B (⇆ ⇌ NOLOCKSHIFT))
                     (C (≡ ∝ NOLOCKSHIFT))
                     (D (∠ ∡ NOLOCKSHIFT))
                     (E (∈ ∋ NOLOCKSHIFT))
                     (F (≪ ≫ NOLOCKSHIFT))
                     (FIVE (⊥ ⊥))
                     (FOUR (⊈ ⊉ NOLOCKSHIFT))
                     (G (¬ ¬))
                     (H (∵ ∵))
                     (I (⊂ ⊃ NOLOCKSHIFT))
                     (J (≈ ≃ NOLOCKSHIFT))
                     (K (∏ ∑ NOLOCKSHIFT))
                     (L (⊕ ⊖ NOLOCKSHIFT))
                     (M (∣ ∤ NOLOCKSHIFT))
                     (N (≮ ≯ NOLOCKSHIFT))
                     (O (⊆ ⊇ NOLOCKSHIFT))
                     (ONE (⋁ ⋀ NOLOCKSHIFT))
                     (P (⊊ ⊋ LOCKSHIFT))
                     (Q (〈 〉 NOLOCKSHIFT))
                     (R (⊄ ⊅ NOLOCKSHIFT))
                     (S (↔ ⇔ NOLOCKSHIFT))
                     (SEVEN (− + NOLOCKSHIFT))
                     (SIX (× ∘ NOLOCKSHIFT))
                     (T (⊣ ⊢ NOLOCKSHIFT))
                     (THREE (∉ • NOLOCKSHIFT))
                     (TWO (^ ↓ NOLOCKSHIFT))
                     (U (∪ ∩ NOLOCKSHIFT))
                     (V (⊗ ⊘ NOLOCKSHIFT))
                     (W (⊨ ⫤ NOLOCKSHIFT))
                     (X (≟ ≐ NOLOCKSHIFT))
                     (Y (⇒ ⇐ NOLOCKSHIFT))
                     (Z (∃ ∃))
                     (ZERO (|0| %) LOCKSHIFT))
                     (%[ (≤ ≥ NOLOCKSHIFT))
                     (%` (ℝ ℕ NOLOCKSHIFT)))
                    NIL NIL NIL)
             (MATH ((%" (≡ ≯ NOLOCKSHIFT))
                    (- (- -))
                    (%: (≐ ≮ NOLOCKSHIFT))
                    (< (%, ≪ NOLOCKSHIFT))
                    (> (%. ≫ NOLOCKSHIFT))
                    (? (/ ≟ NOLOCKSHIFT))
                    (A (ℵ A LOCKSHIFT))
                    (B (b ⌈ NOLOCKSHIFT))
                    (C (ℂ ⌊ LOCKSHIFT))
                    (E (⊗ ⊘ LOCKSHIFT))
                    (G (≈ ≃ NOLOCKSHIFT))
                    (H (ℏ H LOCKSHIFT))
                    (I (↓ ↙ LOCKSHIFT))
                    (J (∣ ¦ NOLOCKSHIFT))
                    (K (∣ ∤ NOLOCKSHIFT))
                    (L (∥ ∦ LOCKSHIFT))
                    (M (∠ ∡ LOCKSHIFT))
                    (N (ℕ ⌉ NOLOCKSHIFT))
                    (O (← ↖ LOCKSHIFT))
                    (P (↑ ↗ LOCKSHIFT))
                    (Q (∘ • NOLOCKSHIFT))
                    (R (ℝ R LOCKSHIFT))
                    (S (∫ ∮ NOLOCKSHIFT))
                    (T (⊥ ↔ NOLOCKSHIFT))
                    (U (→ ↘ NOLOCKSHIFT))
                    (V (∇ ⌋ NOLOCKSHIFT))
                    (W (⊕ ⊖ LOCKSHIFT))
                    (X (× ÷ LOCKSHIFT))
                    (Y (√ ↝ LOCKSHIFT))
                    (Z (∓ ± LOCKSHIFT))
                    (%` (_ ^ NOLOCKSHIFT))
                    ({ (%[ ⇌ NOLOCKSHIFT))
                    (} (%] ⇆ NOLOCKSHIFT)))
                   NIL NIL NIL)
             (OFFICE ((+ (☮ ∎ NOLOCKSHIFT))
                      (- (⅓ ⅔ NOLOCKSHIFT))
                      (%: (№ %: NOLOCKSHIFT))
                      (> (‰ > NOLOCKSHIFT))
                      (? (℅ ? NOLOCKSHIFT))
                      (A (a 〒 NOLOCKSHIFT))
                      (B (¾ ☎ NOLOCKSHIFT))
                      (C (⅔ C NOLOCKSHIFT))
                      (D († ▼ NOLOCKSHIFT))
                      (E (″ ♀ NOLOCKSHIFT))
                      (EIGHT (⑧ Ⅷ NOLOCKSHIFT))
                      (F (‡ ▽ NOLOCKSHIFT))
                      (FIVE (⑤ Ⅴ NOLOCKSHIFT))
                      (FOUR (④ Ⅳ NOLOCKSHIFT))
                      (G (• ▲ NOLOCKSHIFT))
                      (H (∎ △ NOLOCKSHIFT))
                      (I (¢ ★ NOLOCKSHIFT))
                      (J (■ J NOLOCKSHIFT))
                      (K (® □ NOLOCKSHIFT))
                      (L (ℓ ◆ NOLOCKSHIFT))
                      (M (_ → NOLOCKSHIFT))
                      (N (^ ↓ NOLOCKSHIFT))
                      (NINE (⑨ Ⅸ NOLOCKSHIFT))
                      (O (o ☆ NOLOCKSHIFT))
                      (ONE (① Ⅰ NOLOCKSHIFT))
                      (P (£ ℃ NOLOCKSHIFT))
                      (Q (° ≠ NOLOCKSHIFT))
                      (R (™ ◇ NOLOCKSHIFT))
                      (S (%§ ※ NOLOCKSHIFT))
                      (SEVEN (⑦ Ⅶ NOLOCKSHIFT))
                      (SIX (⑥ Ⅵ NOLOCKSHIFT))
                      (T (℡ ◎ NOLOCKSHIFT))
                      (THREE (③ Ⅲ NOLOCKSHIFT))
                      (TWO (② Ⅱ NOLOCKSHIFT))
                      (U (ƒ ○ NOLOCKSHIFT))
                      (V (¼ V NOLOCKSHIFT))
                      (W (’ ♂ NOLOCKSHIFT))
                      (X (⅓ X NOLOCKSHIFT))
                      (Y (¥ ● NOLOCKSHIFT))
                      (Z (½ Z NOLOCKSHIFT))
                      (ZERO (⑩ Ⅹ NOLOCKSHIFT))
                      (%` (← ☒ NOLOCKSHIFT)))
                    NIL NIL NIL)
             (SPANISH ((%" (; %: NOLOCKSHIFT))
                       (%: (ñ Ñ LOCKSHIFT))
                       (< (%, « NOLOCKSHIFT))
                       (> (%. » NOLOCKSHIFT))
                       (? (̲ ? NOLOCKSHIFT))
                       (EIGHT (|8| ü NOLOCKSHIFT))
                       (FIVE (|5| ó NOLOCKSHIFT))
                       (FOUR (|4| í NOLOCKSHIFT))
                       (SIX (|6| ú NOLOCKSHIFT))
                       (THREE (|3| é NOLOCKSHIFT))
                       (TWO (|2| á NOLOCKSHIFT))
                       (%` (¡ ¿ NOLOCKSHIFT))
                       ({ (%, « NOLOCKSHIFT))
                       (} (̧ » NOLOCKSHIFT)))
                    NIL NIL NIL)
             (STANDARD-RUSSIAN ((%" (э Э LOCKSHIFT))
                                (+ (! = NOLOCKSHIFT))
                                (- (%% |0| NOLOCKSHIFT))
                                (%: (ж Ж LOCKSHIFT))
                                (< (б Б LOCKSHIFT))
                                (> (ю Ю LOCKSHIFT))
                                (? (ё Ё LOCKSHIFT))
                                (EIGHT (%. |7| NOLOCKSHIFT))
                                (F (а А LOCKSHIFT))
                                (FIVE (%" |4| NOLOCKSHIFT))
                                (FOUR (/ |3| NOLOCKSHIFT))
                                (G (п П LOCKSHIFT))
                                (H (р Р LOCKSHIFT))
                                (I (ш Ш LOCKSHIFT))
                                (J (о О LOCKSHIFT))
                                (K (л Л LOCKSHIFT))
                                (L (д Д LOCKSHIFT))
                                (M (ь Ь LOCKSHIFT))
                                (N (т Т LOCKSHIFT))
                                (NINE (← |8| NOLOCKSHIFT))
                                (O (щ Щ LOCKSHIFT))
                                (ONE (%§ + NOLOCKSHIFT))
                                (P (з З LOCKSHIFT))
                                (Q (й Й LOCKSHIFT))
                                (R (к К LOCKSHIFT))
                                (S (ы Ы LOCKSHIFT))
                                (SEVEN (%, |6| NOLOCKSHIFT))
                                (SIX (%: |5| NOLOCKSHIFT))
                                (T (е Е LOCKSHIFT))
                                (THREE (- |2| NOLOCKSHIFT))
                                (TWO (№ |1| NOLOCKSHIFT))
                                (U (г Г LOCKSHIFT))
                                (V (м М LOCKSHIFT))
                                (W (ц Ц LOCKSHIFT))
                                (X (ч Ч LOCKSHIFT))
                                (Y (н Н LOCKSHIFT))
                                (Z (я Я LOCKSHIFT))
                                (ZERO (? |9| NOLOCKSHIFT))
                                (%` (%) %( NOLOCKSHIFT))
                                ({ (х Х LOCKSHIFT))
                                (} (ъ Ъ LOCKSHIFT)))
                    NIL NIL NIL)))
(DECLARE%: DONTCOPY
  (FILEMAP (NIL)))
STOP