Monorepo for Aesthetic.Computer
aesthetic.computer
1;;; Font bitmap data — 6x10 BDF font (Misc-Fixed-Medium-R-Normal--10)
2;;; 95 printable ASCII chars (32-126), each 10 rows, 6px wide (MSB-first in byte)
3
4(in-package :ac-native.font)
5
6(defconstant +font-w+ 6)
7(defconstant +font-h+ 10)
8
9(defvar *font-6x10*
10 (make-array '(95 10)
11 :element-type '(unsigned-byte 8)
12 :initial-contents
13 '((0 0 0 0 0 0 0 0 0 0) ; SPC (32)
14 (0 32 32 32 32 32 0 32 0 0) ; ! (33)
15 (0 80 80 80 0 0 0 0 0 0) ; " (34)
16 (0 80 80 248 80 248 80 80 0 0) ; # (35)
17 (0 32 112 160 112 40 112 32 0 0) ; $ (36)
18 (0 72 168 80 32 80 168 144 0 0) ; % (37)
19 (0 64 160 160 64 168 144 104 0 0) ; & (38)
20 (0 32 32 32 0 0 0 0 0 0) ; ' (39)
21 (0 16 32 64 64 64 32 16 0 0) ; ( (40)
22 (0 64 32 16 16 16 32 64 0 0) ; ) (41)
23 (0 0 136 80 248 80 136 0 0 0) ; * (42)
24 (0 0 32 32 248 32 32 0 0 0) ; + (43)
25 (0 0 0 0 0 0 48 32 64 0) ; , (44)
26 (0 0 0 0 248 0 0 0 0 0) ; - (45)
27 (0 0 0 0 0 0 32 112 32 0) ; . (46)
28 (0 8 8 16 32 64 128 128 0 0) ; / (47)
29 (0 32 80 136 136 136 80 32 0 0) ; 0 (48)
30 (0 32 96 160 32 32 32 248 0 0) ; 1 (49)
31 (0 112 136 8 48 64 128 248 0 0) ; 2 (50)
32 (0 248 8 16 48 8 136 112 0 0) ; 3 (51)
33 (0 16 48 80 144 248 16 16 0 0) ; 4 (52)
34 (0 248 128 176 200 8 136 112 0 0) ; 5 (53)
35 (0 48 64 128 176 200 136 112 0 0) ; 6 (54)
36 (0 248 8 16 16 32 64 64 0 0) ; 7 (55)
37 (0 112 136 136 112 136 136 112 0 0) ; 8 (56)
38 (0 112 136 152 104 8 16 96 0 0) ; 9 (57)
39 (0 0 32 112 32 0 32 112 32 0) ; : (58)
40 (0 0 32 112 32 0 48 32 64 0) ; (59)
41 (0 8 16 32 64 32 16 8 0 0) ; < (60)
42 (0 0 0 248 0 248 0 0 0 0) ; = (61)
43 (0 64 32 16 8 16 32 64 0 0) ; > (62)
44 (0 112 136 16 32 32 0 32 0 0) ; ? (63)
45 (0 112 136 152 168 176 128 112 0 0) ; @ (64)
46 (0 32 80 136 136 248 136 136 0 0) ; A (65)
47 (0 240 72 72 112 72 72 240 0 0) ; B (66)
48 (0 112 136 128 128 128 136 112 0 0) ; C (67)
49 (0 240 72 72 72 72 72 240 0 0) ; D (68)
50 (0 248 128 128 240 128 128 248 0 0) ; E (69)
51 (0 248 128 128 240 128 128 128 0 0) ; F (70)
52 (0 112 136 128 128 152 136 112 0 0) ; G (71)
53 (0 136 136 136 248 136 136 136 0 0) ; H (72)
54 (0 112 32 32 32 32 32 112 0 0) ; I (73)
55 (0 56 16 16 16 16 144 96 0 0) ; J (74)
56 (0 136 144 160 192 160 144 136 0 0) ; K (75)
57 (0 128 128 128 128 128 128 248 0 0) ; L (76)
58 (0 136 136 216 168 136 136 136 0 0) ; M (77)
59 (0 136 136 200 168 152 136 136 0 0) ; N (78)
60 (0 112 136 136 136 136 136 112 0 0) ; O (79)
61 (0 240 136 136 240 128 128 128 0 0) ; P (80)
62 (0 112 136 136 136 136 168 112 8 0) ; Q (81)
63 (0 240 136 136 240 160 144 136 0 0) ; R (82)
64 (0 112 136 128 112 8 136 112 0 0) ; S (83)
65 (0 248 32 32 32 32 32 32 0 0) ; T (84)
66 (0 136 136 136 136 136 136 112 0 0) ; U (85)
67 (0 136 136 136 80 80 80 32 0 0) ; V (86)
68 (0 136 136 136 168 168 216 136 0 0) ; W (87)
69 (0 136 136 80 32 80 136 136 0 0) ; X (88)
70 (0 136 136 80 32 32 32 32 0 0) ; Y (89)
71 (0 248 8 16 32 64 128 248 0 0) ; Z (90)
72 (0 112 64 64 64 64 64 112 0 0) ; [ (91)
73 (0 128 128 64 32 16 8 8 0 0) ; \ (92)
74 (0 112 16 16 16 16 16 112 0 0) ; ] (93)
75 (0 32 80 136 0 0 0 0 0 0) ; ^ (94)
76 (0 0 0 0 0 0 0 0 248 0) ; _ (95)
77 (32 16 0 0 0 0 0 0 0 0) ; ` (96)
78 (0 0 0 112 8 120 136 120 0 0) ; a (97)
79 (0 128 128 176 200 136 200 176 0 0) ; b (98)
80 (0 0 0 112 136 128 136 112 0 0) ; c (99)
81 (0 8 8 104 152 136 152 104 0 0) ; d (100)
82 (0 0 0 112 136 248 128 112 0 0) ; e (101)
83 (0 48 72 64 240 64 64 64 0 0) ; f (102)
84 (0 0 0 120 136 136 120 8 136 112) ; g (103)
85 (0 128 128 176 200 136 136 136 0 0) ; h (104)
86 (0 32 0 96 32 32 32 112 0 0) ; i (105)
87 (0 8 0 24 8 8 8 72 72 48) ; j (106)
88 (0 128 128 136 144 224 144 136 0 0) ; k (107)
89 (0 96 32 32 32 32 32 112 0 0) ; l (108)
90 (0 0 0 208 168 168 168 136 0 0) ; m (109)
91 (0 0 0 176 200 136 136 136 0 0) ; n (110)
92 (0 0 0 112 136 136 136 112 0 0) ; o (111)
93 (0 0 0 176 200 136 200 176 128 128) ; p (112)
94 (0 0 0 104 152 136 152 104 8 8) ; q (113)
95 (0 0 0 176 200 128 128 128 0 0) ; r (114)
96 (0 0 0 112 128 112 8 240 0 0) ; s (115)
97 (0 64 64 240 64 64 72 48 0 0) ; t (116)
98 (0 0 0 136 136 136 152 104 0 0) ; u (117)
99 (0 0 0 136 136 80 80 32 0 0) ; v (118)
100 (0 0 0 136 136 168 168 80 0 0) ; w (119)
101 (0 0 0 136 80 32 80 136 0 0) ; x (120)
102 (0 0 0 136 136 152 104 8 136 112) ; y (121)
103 (0 0 0 248 16 32 64 248 0 0) ; z (122)
104 (0 24 32 16 96 16 32 24 0 0) ; { (123)
105 (0 32 32 32 32 32 32 32 0 0) ; | (124)
106 (0 96 16 32 24 32 16 96 0 0) ; } (125)
107 (0 72 168 144 0 0 0 0 0 0) ; ~ (126)
108 )))