1 files changed, 0 insertions, 100 deletions
diff --git a/scripts/synth1.lua b/scripts/synth1.lua
deleted file mode 100644
index de68c58e46..0000000000
--- a/scripts/synth1.lua
+++ /dev/null
@@ -1,100 +0,0 @@
-ardour {
-	["type"]    = "dsp",
-	name        = "Simple Synth",
-	category    = "Instrument",
-	license     = "MIT",
-	author      = "Ardour Lua Task Force",
-	description = [[An Example Synth for Prototyping.]]
-}
-
-function dsp_ioconfig ()
-	return
-	{
-	--	{ midi_in = 1, audio_in = 0, audio_out = -1}, -- any number of channels
-	--	{ midi_in = 1, audio_in = 0, audio_out =  1}, -- values >  0, precisely N channels
-		{ midi_in = 1, audio_in = 0, audio_out =  2}, -- values >  0, precisely N channels
-		{ midi_in = 1, audio_in = 0, audio_out =  4}, -- values >  0, precisely N channels
-		{ midi_in = 1, audio_in = 0, audio_out =  8}, -- values >  0, precisely N channels
-	--	{ midi_in = 1, audio_in = 0, audio_out = -6}, -- values < -2, up to -N channels, here 1,..,6
-	}
-end
-
-local note_table = {}
-local active_notes = {}
-local phases = {}
-local env = .01;
-
-function dsp_init (rate)
-	for n = 1,128 do
-		note_table [n] = (440 / 32) * 2^((n - 10.0) / 12.0) / rate
-	end
-	env = 100 / rate
-end
-
-function dsp_run (ins, outs, n_samples)
-	-- initialize output buffer
-	local a = {}
-	for s = 1, n_samples do a[s] = 0 end
-
-
-	-- very basic synth, simple sine, basic envelope
-	local function synth (s_start, s_end)
-		for n,v in pairs (active_notes) do
-			local vel = v["vel"] or 0
-			local tgt = v["tvel"];
-			for s = s_start,s_end do
-				local phase = phases[n] or 0
-				vel = vel + env * (tgt - vel)
-				a[s] = a[s] + math.sin(6.283185307 * phase) * vel / 167
-				phase = phase + note_table[n]
-				if (phase > 1.0) then
-					phases[n] = phase - 2.0
-				else
-					phases[n] = phase
-				end
-			end
-			if vel < 1 and tgt == 0 then
-				active_notes[n] = nil
-			else
-				active_notes[n]["vel"] = vel;
-			end
-		end
-	end
-
-	local tme = 1
-	-- parse midi messages
-	assert (type(midiin) == "table") -- global table of midi events (for now)
-	for _,b in pairs (midiin) do
-		local t = b["time"] -- t = [ 1 .. n_samples ]
-
-		-- synth sound until event
-		synth(tme, t)
-		tme = t + 1
-
-		local d = b["data"] -- get midi-event
-		-- we ignore the midi channel
-		if (#d == 3 and (d[1] & 240) == 144) then -- note on
-			local n = 1 + d[2];
-			active_notes[n] = active_notes[n] or {}
-			active_notes[n]["tvel"] = d[3]
-		end
-		if (#d == 3 and (d[1] & 240) == 128) then -- note off
-			local n = 1 + d[2];
-			active_notes[n] = active_notes[n] or {}
-			active_notes[n]["tvel"] = 0
-		end
-		if (#d == 3 and (d[1] & 240) == 176) then -- CC
-			if (d[2] == 120 or d[2] == 123) then -- panic
-				active_notes = {}
-			end
-		end
-	end
-
-	-- synth rest of cycle
-	synth(tme, n_samples)
-
-	-- copy
-	for c = 1,#outs do
-		outs[c]:set_table(a, n_samples)
-	end
-end