Skip to content

Commit

Permalink
added Parallel plugins
Browse files Browse the repository at this point in the history
  • Loading branch information
micah-frank-studio committed Feb 6, 2020
1 parent 641855d commit 8149954
Show file tree
Hide file tree
Showing 13 changed files with 445 additions and 44 deletions.
11 changes: 6 additions & 5 deletions Builds/Kickblast/README.md
@@ -1,28 +1,29 @@
PROTOTYPES

Hello! Thanks for your interest in Puremagnetik Prototypes.
Hello! Thanks for your interest in Prototypes.

These are small, experimental sketches that are built as alpha, proof-of-concept distributions.
These are small, experimental sketches that are built as proof-of-concept distributions.

I do not provide installers or support for them but I will make an effort to reply to questions on IG or Github Issues.

For the most part, they should function as expected as I've tested them on my own systems.

Nevertheless, I hope you enjoy them and can make something cool with these sketches.
I hope you enjoy them and can make something cool with these sketches.

To install for OSX:
Move the VST and/or Component files to their respective folders
Macintosh HD/Library/Audio/Plug-Ins/Components
Macintosh HD/Library/Audio/Plug-Ins/VST

to install for Windows:
I built an installer. Just run it and point it to your plugin directory
I built an installer. Simply run it and point it to your plugin directory

Thanks and have fun!

Micah

http://instagram.com/micah.frank.studio

https://github.com/chronopolis5k
https://github.com/micah-frank-studio

http://micahfrank.com
Binary file added Builds/Parallel/OSX_Parallel_Prototype.zip
Binary file not shown.
29 changes: 29 additions & 0 deletions Builds/Parallel/README.md
@@ -0,0 +1,29 @@
PROTOTYPES

Hello! Thanks for your interest in Prototypes.

These are small, experimental sketches that are built as proof-of-concept distributions.

I do not provide installers or support for them but I will make an effort to reply to questions on IG or Github Issues.

For the most part, they should function as expected as I've tested them on my own systems.

I hope you enjoy them and can make something cool with these sketches.

To install for OSX:
Move the VST and/or Component files to their respective folders
Macintosh HD/Library/Audio/Plug-Ins/Components
Macintosh HD/Library/Audio/Plug-Ins/VST

to install for Windows:
I built an installer. Simply run it and point it to your plugin directory

Thanks and have fun!

Micah

http://instagram.com/micah.frank.studio

https://github.com/micah-frank-studio

http://micahfrank.com
Binary file added Builds/Parallel/Win64_Parallel_Prototype.zip
Binary file not shown.
391 changes: 391 additions & 0 deletions GrainstationC/Grainstation-C.csd

Large diffs are not rendered by default.

Binary file added GrainstationC/fileButton.png
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file added GrainstationC/grainstationc-bg.png
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file added GrainstationC/samples/bowbounce.wav
Binary file not shown.
Binary file added GrainstationC/samples/geyser1.wav
Binary file not shown.
Binary file added GrainstationC/samples/ice.wav
Binary file not shown.
Binary file added GrainstationC/samples/rhodezart.wav
Binary file not shown.
58 changes: 19 additions & 39 deletions Parallel/Parallel.csd
@@ -1,57 +1,39 @@
<Cabbage>
;Parallel Prototype 1.0.0

form caption("Parallel") size(410, 511), pluginid("8110")
#define KNOB1 outlinecolour(30,30,30,50) trackercolour(30,30,30,220), trackerthickness (0.2), style ("normal"), trackeroutsideradius(1), trackerinsideradius (0.01), colour(30, 30, 30, 255), textcolour(183,183,183), popuptext(0)
form caption("Parallel") size(300, 270), pluginid("8110")
#define KNOB1 outlinecolour(30,30,30,50) trackercolour(30,30,30,220), trackerthickness (0.2), style ("normal"), trackeroutsideradius(1), trackerinsideradius (0.01), colour(30, 30, 30, 255), textcolour(30,30,30,220), popuptext(0)

image bounds(0, 0, 410, 511), colour(50,50,50), file("parallel-bg.png")
image bounds(0, 0, 300, 270), colour(50,50,50), file("parallel-bg.png")

rslider bounds(10, 215, 80, 80),channel("Depth"), text("DEPTH"), range(0.001, 0.999, 0.55, 1, 0.001) $KNOB1 ;, trackercolour(77,190,250, 250)
rslider bounds(110, 215, 80, 80),channel("Speed"), text("SPEED"), range(0.001, 0.999, 0.5, 1, 0.001) $KNOB1 ;, trackercolour(77,190,250, 250)
rslider bounds(10, 115, 80, 80),channel("Depth"), text("DEPTH"), range(0.001, 0.999, 0.5, 1, 0.001) $KNOB1 ;, trackercolour(77,190,250, 250)

combobox bounds(25, 200, 60, 20), channel("Wave"), text("TRI", "SQUARE", "SAW") colour(30,30,30,0), fontcolour (30,30,30,220)
rslider bounds(100, 115, 80, 80),channel("Split"), text("SPLIT"), range(0.0, 1, 0.05, 1, 0.001) $KNOB1 ;, trackercolour(244,236,9,200)
rslider bounds(190, 115, 80, 80),channel("Offset"), text("OFFSET"), range(0.0, 1, 0.05, 1, 0.001) $KNOB1 ;, trackercolour(244,236,9,200)

combobox bounds(222, 295, 60, 20), channel("Wave"), text("TRI", "SQUARE", "SAW") colour(72,72,72,0), fontcolour (212, 216, 216)
rslider bounds(40, 330, 80, 80),channel("Shift"), text("SHIFT"), range(0.0, 1, 0.05, 1, 0.001) $KNOB1 ;, trackercolour(244,236,9,200)
rslider bounds(140, 330, 80, 80),channel("Offset"), text("OFFSET"), range(0.0, 1, 0.05, 1, 0.001) $KNOB1 ;, trackercolour(244,236,9,200)
rslider bounds(240, 330, 80, 80),channel("Mix"), text("MIX"), range(0, 1, 0.8, 1, 0.001) $KNOB1 ;, trackercolour(247,63,6, 180)
rslider bounds(340, 350, 60, 60),channel("Output"), text("OUTPUT"), range(0, 2, 1, 1, 0.001) $KNOB1 ;, trackercolour(247,63,6, 180)

</Cabbage>
<CsoundSynthesizer>
<CsOptions>
-n -d -+rtmidi=NULL -M0 -m0d --displays
-n -d -+rtmidi=NULL -M0 -m0d
</CsOptions>
<CsInstruments>
ksmps = 64
nchnls = 2
0dbfs = 1
;giRecBuf1L ftgen 0,0,131072,2,0 ; 3 seconds at 44.1 khz
;giRecBuf1R ftgen 0,0,131072,2,0
;giwin ftgen 1, 0, 8192, 20, 2, 1 ;Hanning window
instr 1
kdelay chnget "Depth"
kwave chnget "Wave"
kdepth chnget "Speed"
ktone chnget "Tone"
kdepth chnget "Depth"
koffset chnget "Offset"
kmix chnget "Mix"
kspeed scale kdelay, 5, 0.001
kshift chnget "Shift"
kout chnget "Output"
kdepth scale kdepth, 5, 0.01
kshift chnget "Split"
koffset scale koffset, 2,0
ktone scale ktone, 10000, 200
kshift scale kshift, 1, 0
aspeed interp kspeed
kshift scale kshift, 0.5, 0
;itablelength = ftlen(giRecBuf1L)
;imaxlength = itablelength/sr ; get table length in seconds
ainL inch 1 ; read audio from live input channel 1
ainR inch 2 ; read audio from live input channel 2
ainL, ainR diskin "../../Repo/puremagnetik_plugins/testSounds/stereocheck.wav", 1, 0, 1
if kwave == 1 then
kspeedmodl lfo 1, kdepth, 1
kspeedmodr lfo 1, kdepth+kshift, 1
Expand All @@ -72,23 +54,21 @@ aspeedmodr interp kspeedmodrp
if changed:k(koffset) == 1 then
kDelayGain = 0
endif
kDelayGain = kDelayGain<1 ? kDelayGain+.0001 : 1
;delay method
aDelSpeedl = aspeed*abs(aspeedmodl) ;speed is modulated by LFO
aDelSpeedr = aspeed*abs(aspeedmodr)
aDelSpeedl = 5*abs(aspeedmodl) ;speed is modulated by LFO
aDelSpeedr = 5*abs(aspeedmodr)
aDelayL vdelay ainL, aDelSpeedl+(koffset*1000), 1001 ;and then controls delay time
aDelayR vdelay ainR, aDelSpeedr+(koffset*1000), 1001 ;add offset time to delay time (everything in ms)
kDelayGain = kDelayGain<1 ? kDelayGain+.0001 : 1
;add feedback
aDelMixL = (ainL*0.5)+(aDelayL*kmix*0.5)
aDelMixR = (ainR*0.5)+(aDelayR*kmix*0.5)
aDelMixL = (ainL*0.5)+(aDelayL*kDelayGain)
aDelMixR = (ainR*0.5)+(aDelayR*kDelayGain)
abalL balance aDelMixL, ainL
abalR balance aDelMixR, ainR
outs abalL*kout, abalR*kout
outs abalL, abalR
endin
Expand Down
Binary file added Parallel/parallel-bg.png
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.

0 comments on commit 8149954

Please sign in to comment.