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