trentgill

--- default
-- a really weird way of writing a 30segment lfo
-- output 1 is the main output
-- outputs 2-4 are the default lfos
-- should probably add cv control over rate

-- start all the output actions
function init()
    for c=1, 4 do
        output[c].asl:action()

trentgill

data FIWord = Imm
            | Not
            | NA deriving (Show, Eq)
type FDictEntry = (String, FIWord, FStackItem)
type FDict = [FDictEntry]

native_dict :: FDict
native_dict = [ (".S"        ,Not, FFn  fDOTESS    )
              , ("."         ,Not, FFn  fDOT       )
              ]

trentgill

-- spacetime
-- norns study 3
--
-- ENC 1 - sweep filter
-- ENC 2 - select edit position
-- ENC 3 - choose command
-- KEY 3 - randomize command set
--
-- spacetime is a weird function sequencer.
-- it plays a note on each step.

trentgill

   /*
	* Generates a random tree, then searches for a node
	*
	* Compile w GCC then run:
	*	> gcc search.c -o search
	*	> ./search
	*/

#include <stdio.h>
#include <stdlib.h>

trentgill

/*  A simple program demonstrating a doubly-linked-list library.
	Intended to store arbitrary timestamps that must be maintained
	in chronological order w/ neighbour access. */

#include <stdio.h>
#include "wrCueList.h"

cueList myCues;

int main(void) {