Mercurial > hg > jslab

comparison examples/sound/midi/plinky.scm @ 5:b67a33c44de7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove some crap, etc
author samer
date Fri, 05 Apr 2019 21:34:25 +0100
parents 5df24c91468d
children 5e3cbbf173aa
comparison
equal deleted inserted replaced
4:79922c7f2475 5:b67a33c44de7
21 21
22 22
23 ; program 46 is cool! 23 ; program 46 is cool!
24 ; so are 10, 12, 111 24 ; so are 10, 12, 111
25 (define midiin (VVector. "midiin" 64)) 25 (define midiin (VVector. "midiin" 64))
26 (define synth (MidiSynth. midiin)) 26 (define synth (MidiWithAftertouch. midiin))
27 (define m 0) 27 (define m 0)
28 28
29 (addtasks 29 (addtasks
30 (sub 4 (task 30 (sub 4 (task
31 (.timesEquals matrix (- 1 (.get decay))) 31 (.timesEquals matrix (- 1 (.get decay)))