summaryrefslogtreecommitdiff
path: root/glyphs/ru.scm
diff options
context:
space:
mode:
Diffstat (limited to 'glyphs/ru.scm')
-rw-r--r--glyphs/ru.scm41
1 files changed, 0 insertions, 41 deletions
diff --git a/glyphs/ru.scm b/glyphs/ru.scm
deleted file mode 100644
index 46d9ff8..0000000
--- a/glyphs/ru.scm
+++ /dev/null
@@ -1,41 +0,0 @@
-(define letters (string->list "АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ" ))
-
-(define numbers (string->list "1234567890"))
-(define brackets (string->list "()[]{}<>"))
-(define symbols (string->list "+-*\\|@#~$%&^`´\"'"))
-(define punct (string->list ",."))
-
-;(define tab "⭾")
-;(define tab "↹")
-;(define tab "→|")
-(define tab "⇥")
-;(define backspace "⌫")
-(define backspace "⟵")
-;(define arrows (string->list "▼▶▼▶"))
-(define arrows (string->list "←↑→↓"))
-
-(define key-symbols (concatenate (list (list backspace tab)
- arrows
- (string->list "⇧⇧⇪⏎"))))
-(define modifiers '("Ctrl" "Ctrl" "Alt" "AltGr" "Esc" "Del"))
-
-(define fn '("Fn"))
-(define media (string->list ""))
-
-;(define extra-symbols (string->list "☠⌨☭☮☢☣☥⚓"))
-(define extra-symbols (string->list "☠⎘⎘"))
-
-(define font "B612")
-
-(define glyphs
- (concatenate
- (list
- (map (lambda (l) (glyph l font "6" "white" "none")) letters)
- (map (lambda (l) (glyph l font "6" "lightgreen" "none")) symbols)
- (map (lambda (l) (glyph l font "6" "white" "none")) key-symbols)
- (map (lambda (l) (glyph l font "6" "white" "none")) numbers)
- (map (lambda (l) (glyph l font "3" "white" "italic")) modifiers)
- (map (lambda (l) (glyph l font "6" "red" "none")) brackets)
- ;(map (lambda (l) (glyph l font "6" "steelblue" "none")) media)
- (map (lambda (l) (glyph l font "6" "white" "none")) extra-symbols)
- (map (lambda (l) (glyph l font "6" "white" "none")) punct))))