37 lines
640 B
Racket
37 lines
640 B
Racket
|
#lang racket
|
||
|
|
||
|
(define space
|
||
|
(string-append
|
||
|
"░░░░░"
|
||
|
"░░░░░"
|
||
|
"░░░░░"
|
||
|
"░░░░░"
|
||
|
"░░░░░"
|
||
|
"░░░░░"))
|
||
|
|
||
|
(define A
|
||
|
(string-append
|
||
|
"░░█░░"
|
||
|
"░█░█░"
|
||
|
"█░░░█"
|
||
|
"█████"
|
||
|
"█░░░█"
|
||
|
"█░░░█"))
|
||
|
|
||
|
(define B
|
||
|
(string-append
|
||
|
"███░░"
|
||
|
"█░░█░"
|
||
|
"███░░"
|
||
|
"█░░█░"
|
||
|
"█░░█░"
|
||
|
"███░░"))
|
||
|
|
||
|
(define C
|
||
|
(string-append
|
||
|
"░░██░"
|
||
|
"░█░░█"
|
||
|
"█░░░░"
|
||
|
"█░░░░"
|
||
|
"░█░░█"
|
||
|
"░░██░"))
|