Skip to content

Instantly share code, notes, and snippets.

View quephird's full-sized avatar

danielle quephird

View GitHub Profile
(ns space-dots
(:use quil.core))
(def screen-w 1000)
(def screen-h 1000)
(def phase (atom 0))
(defn- setup []
(smooth)
@quephird
quephird / looking-up.clj
Last active January 4, 2016 18:09
This sketch creates a set of branches and includes a blurring effect to simulate depth of perception.
(ns looking-up
(:use quil.core quil.applet))
(def screen-w 1920)
(def screen-h 1080)
(defn leaf [l]
; unfortunately, I still need to resort to dumping down
; into Java until bug fix for bezier-vertex is released.
(ns crossing-circles
(:use quil.core))
(def θ (atom 0))
(defn circles [sw]
(stroke-weight sw)
(doseq [i (range 1 15)]
(let [dr (* sw 2.5)
r (* i dr)]
(ns fun-with-quil.sea-breeze
(:use quil.core))
(def dθ (atom 0))
(defn setup []
(background 0)
(ellipse-mode :center)
(no-stroke)
(smooth))
@quephird
quephird / procedural-lichens.clj
Last active August 29, 2015 13:57
This was a procedural version of drawing I made using ArtRage for the iPad and inspired by lichens: http://quephird.deviantart.com/art/lichens-434718646. This code makes me retch, but it's functional and I need to mull things over a bit before I return to it.
(ns procedural-lichens
(:use quil.core))
(def screen-w 2880)
(def screen-h 1800)
(def lichens (atom []))
(defn intersects? [[x1 y1 r1] [x2 y2 r2]]
"Determines if the two circles passed in intersect"
@quephird
quephird / acid-rain.clj
Created March 20, 2014 14:18
A quickly written implementation using quil of this: http://pastebin.com/Wf9EZenN. I did it without looking at their code first.
(ns fun-with-quil.acid-rain
(:use quil.core))
(def screen-w 1920)
(def screen-h 1080)
(defn setup []
(smooth)
(no-stroke)
(background 0))
@quephird
quephird / mushroom-clouds.clj
Created March 20, 2014 17:52
Another little challenge to myself to see if I could replicate someone else's Processing sketch without looking: http://www.openprocessing.org/sketch/140475
(ns fun-with-quil.mushroom-clouds
(:use quil.core))
(def screen-w 800)
(def screen-h 800)
(def phase (atom 0))
(defn setup []
(smooth)
@quephird
quephird / turbine.clj
Last active August 29, 2015 14:00
Clojure interpretation of this neat little post here: http://p5art.tumblr.com/post/83764524629/turbine-inspired-by-this-my-code-here
(ns quil.hello
(:use quil.core))
(def screen-w 800)
(def screen-h 800)
(def t (atom 0))
(defn setup []
(smooth)
@quephird
quephird / tadpoles.clj
Last active August 29, 2015 14:00
Another blatant ripoff from this post: http://myartexperiments.tumblr.com/post/80601188764/tadpoles. My tadpoles aren't nearly as sharply defined as theirs but this is about as good as I can get mine for the moment.
(ns quil.tadpoles
(:use quil.core))
(def screen-w 800)
(def screen-h 800)
(def tadpoles (atom {}))
(defn- make-tadpole [max-x max-y max-r colors]
{:x (random max-x) ; Absolute x of center of revolution
@quephird
quephird / bullet_hell_game_recommendations.txt
Created August 7, 2014 01:14
Just a list of bullet hell/Danmaku/shmups that I highly recommend
Windows
----------
Blue Wish Resurrection Plus http://www004.upp.so-net.ne.jp/x_xgameroom/
eXceed2nd Vampire Rex http://store.steampowered.com/app/207380/
eXceed3rd Jade Penetrate http://store.steampowered.com/app/207400/
Anything by Zun, but Perfect Cherry Blossom is a classic http://www16.big.or.jp/~zun/html/th07.html