comparison clojure/com/aurellem/run/sound.clj @ 530:8d3177d19d5f

added full recording function.
author Robert McIntyre <rlm@mit.edu>
date Sun, 24 Jun 2012 16:47:18 -0500
parents 2620d6318e8d
children
comparison
equal deleted inserted replaced
529:945c7b500433 530:8d3177d19d5f
6 bootstrap-0 bootstrap-1)) 6 bootstrap-0 bootstrap-1))
7 (:require clojure.string) 7 (:require clojure.string)
8 (:import [com.aurellem.gb.gb_driver SaveState]) 8 (:import [com.aurellem.gb.gb_driver SaveState])
9 (:import java.awt.image.BufferedImage) 9 (:import java.awt.image.BufferedImage)
10 (:import java.io.File) 10 (:import java.io.File)
11
12 (:import com.aurellem.gb.WaveWriter)) 11 (:import com.aurellem.gb.WaveWriter))
13 12
14 (defn sound-test [] 13 (defn sound-test []
15 (step (mid-game)) 14 (step (mid-game))
16 (println (frequencies (sound-bytes))) 15 (println (frequencies (sound-bytes)))