29 Premium Themes
Included with purchase — and more features on the way!
Get access — $12 once
Version 2 is coming soon.
The price goes up when it arrives.
Pay once today and every update after that is free.
One Dark Pro
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Andromeda
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Ayu Dark
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Ayu Mirage
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Ayu Light
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Cobalt2
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Night Owl
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Night Owl Light
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Azureus
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Bordo
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Hibernus
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Lilac
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Lux
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Minimus
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Obscuro
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Sereno
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Uva
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Noctis Viola
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Palenight
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Pico 8
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Shades of Purple
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Shades of Purple SD
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Synthwave '84
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Tokyo Night
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Tokyo Night Storm
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Tokyo Night Light
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Winter is Coming
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Winter is Coming Light
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/
Winter is Coming Dark
(define WINDOW-WIDTH 150)
(define WINDOW-HEIGHT 180)
; A world is a number.
; Its display is a blue disk of that size.
; show-world : world -> image
(define (show-world diameter)
(circle diameter "solid" "blue"))
"Examples of show-world:"
(show-world 1) "should be a blue dot"
(show-world 20) "should be" (circle 20 "solid" "blue")
; The next world is one larger.
; next-world : world -> world
(define (next-world diameter)
(+ 1 diameter))
"Examples of next-world:"
(next-world 7) "should be" 8
"Now let's start the animation!"
(big-bang WINDOW-WIDTH WINDOW-HEIGHT 1 1)
(on-update-event show-world)
(on-tick-event next-world)
; From https://home.adelphi.edu/sbloch/class/archive/160/spring2005/examples/