Mercurial > vba-clojure
comparison clojure/com/aurellem/run/sound.clj @ 523:d00096b6bf17
added sound introspection abilities.
| author | Robert McIntyre <rlm@mit.edu> |
|---|---|
| date | Sat, 23 Jun 2012 20:34:14 -0500 |
| parents | |
| children | 7ef5c73ea8fa |
comparison
equal
deleted
inserted
replaced
| 522:5596cd4a3fc6 | 523:d00096b6bf17 |
|---|---|
| 1 (ns com.aurellem.run.sound | |
| 2 (:use (com.aurellem.gb saves gb-driver util constants | |
| 3 items vbm characters money | |
| 4 rlm-assembly)) | |
| 5 (:use (com.aurellem.run util music title save-corruption | |
| 6 bootstrap-0 bootstrap-1)) | |
| 7 (:require clojure.string) | |
| 8 (:import [com.aurellem.gb.gb_driver SaveState]) | |
| 9 (:import java.awt.image.BufferedImage) | |
| 10 (:import java.io.File)) | |
| 11 | |
| 12 | |
| 13 (defn sound-test [] | |
| 14 (step (mid-game)) | |
| 15 (println (frequencies (sound-data))) | |
| 16 (run-moves @current-state (repeat 10 [])) | |
| 17 (println (frequencies (sound-data)))) | |
| 18 | |
| 19 | |
| 20 |