Search Results for 'z1'

[dnaldoog]

It seems to be working for me. Can you post the function code you’ve got?
Here is the output FOR ALL 37 VALUES from the following function using the sysex string

• f0 01 05 2c 00 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0f 0a f7

>> 37
f0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff af
—————
right shift OSC COARSE FREQUENCY by 0
[1] n=48
—————
right shift LFO FREQ by 1
[2] n=15
—————
right shift LFO AMOUNT by 5
left shift LFO AMOUNT by 3
[3] n=31
—————
right shift OSC SAW by 2
[4] n=1
—————
right shift OSC PULSE by 4
[5] n=1
—————
right shift MIXER by 2
[6] n=15
—————
right shift FIL ENV RELEASE by 4
[7] n=15
—————
right shift FIL ENV DECAY by 4
[8] n=15
—————
right shift OSC TRI AMOUNT by 0
[9] n=63
—————
right shift FIL ENV AMOUNT by 4
[10] n=15
—————
right shift FIL ENV ATTACK by 0
[11] n=15
—————
right shift OSC TRI by 3
[12] n=1
—————
right shift VOICE VOLUME by 6
left shift VOICE VOLUME by 2
[13] n=15
—————
right shift OSC ENV ATTACK by 3
[14] n=15
—————
right shift UNISON by 7
[15] n=1
—————
right shift GLIDE RATE by 3
[16] n=15
—————
right shift LFO SHAPE by 0
[17] n=1
—————
right shift OSC ENV RELEASE by 0
[18] n=7
—————
right shift OSC FINE FREQUENCY by 6
left shift OSC FINE FREQUENCY by 2
[19] n=31
—————
right shift OSC ENV DECAY by 7
left shift OSC ENV DECAY by 3
[20] n=57
—————
right shift PULSE WIDTH by 3
left shift PULSE WIDTH by 5
[21] n=63
—————
right shift OSC ENV SUSTAIN by 3
[22] n=15
—————
right shift OSC ENV INVERT by 5
[23] n=1
—————
right shift FIL ENV INVERT by 6
[24] n=1
—————
right shift FIL FULL by 5
[25] n=1
—————
right shift FIL HALF by 4
[26] n=0
—————
right shift LFO FILTER by 3
[27] n=1
—————
right shift OSC ENV AMOUNT by 7
left shift OSC ENV AMOUNT by 1
[28] n=15
—————
right shift LFO PULSE by 2
[29] n=1
—————
right shift FIL ENV SUSTAIN by 0
[30] n=15
—————
right shift RESONANCE by 6
left shift RESONANCE by 2
[31] n=63
—————
right shift LFO OSC by 1
[32] n=1
—————
right shift FILTER CUTOFF by 7
left shift FILTER CUTOFF by 1
[33] n=127
—————
right shift AMP ENV RELEASE by 6
left shift AMP ENV RELEASE by 2
[34] n=15
—————
right shift AMP ENV SUSTAIN by 2
[35] n=15
—————
right shift AMP ENV DECAY by 6
left shift AMP ENV DECAY by 2
[36] n=15
—————
right shift AMP ENV ATTACK by 2
[37] n=15
—————

function run(m)
local t={}
mbTemp32Byte=MemoryBlock()
mbTemp32Byte:append(m:getData():getRange(4, 32))
m16=MemoryBlock()
if mbTemp32Byte:getSize()==32 then
--assert(mbTemp32Byte:getSize()==32) -- development code can be deleted
for n=0,mbTemp32Byte:getSize()-1,2 do
local msb=bit.lshift(mbTemp32Byte:getByte(n+1),4)
local lsb=mbTemp32Byte:getByte(n)
table.insert(t,msb+lsb)
end

m16:createFromTable(t)
console(String(m16:toHexString(1))) -- let's see what we got
panel:getLabel("debug"):setText(m16:toHexString(1))

modulators={
["OSC COARSE FREQUENCY"]={byte={0},position={0x3f},lShift={0},rShift={0}},--A
["OSC FINE FREQUENCY"]={byte={0,1},position={0xC0,0x07},lShift={0,2},rShift={6,0}},--B
["GLIDE RATE"]={byte={0x01},position={0x78},lShift={0},rShift={3}}, --C
["OSC ENV AMOUNT"]={byte={0x01,0x02},position={0x80,0x07},lShift={0,1},rShift={7,0}}, --D
["OSC ENV ATTACK"]={byte={0x02},position={0X78},lShift={0},rShift={3}}, --E
["OSC ENV DECAY"]={byte={0x02,0x03},position={0X80,0X07},lShift={0,3},rShift={7,0}},--F
["OSC ENV SUSTAIN"]={byte={0x03},position={0x78},lShift={0},rShift={3}},--G
["OSC ENV RELEASE"]={byte={0x04},position={0x07},lShift={0},rShift={0}},--H
["PULSE WIDTH"]={byte={0x04,0x05},position={0xF8,0x01},lShift={0,5},rShift={3,0}},--I
["LFO FREQ"]={byte={0x05},position={0x1E},lShift={0},rShift={1}},--J
["LFO AMOUNT"]={byte={0x05,0x06},position={0xE0,0x03},lShift={0,3},rShift={5,0}},--K
MIXER={byte={0x06},position={0X3C},lShift={0},rShift={2}},--L
["FILTER CUTOFF"]={byte={0x06,0x07},position={0x80,0x3F},lShift={0,1},rShift={7,0}},--M
RESONANCE={byte={0x07,0x08},position={0xC0,0x0F},lShift={0,2},rShift={6,0}},--N
["FIL ENV AMOUNT"]={byte={0x08},position={0xF0},lShift={0},rShift={4}},--O
["FIL ENV ATTACK"]={byte={0x09},position={0x0F},lShift={0},rShift={0}},--P
["FIL ENV DECAY"]={byte={0x09},position={0xF0},lShift={0},rShift={4}},--Q
["FIL ENV SUSTAIN"]={byte={0x0A},position={0x0F},lShift={0},rShift={0}},--R
["FIL ENV RELEASE"]={byte={0x0A},position={0xF0},lShift={0},rShift={4}},--S
["OSC TRI AMOUNT"]={byte={0x0B},position={0x3F},lShift={0},rShift={0}},--T
["VOICE VOLUME"]={byte={0x0B,0x0C},position={0xC0,0x03},lShift={0,2},rShift={6,0}},--U
["AMP ENV ATTACK"]={byte={0x0C},position={0x3C},lShift={0},rShift={2}},--V
["AMP ENV DECAY"]={byte={0x0C,0x0D},position={0xC0,0x03},lShift={0,2},rShift={6,0}},--W
["AMP ENV SUSTAIN"]={byte={0x0D},position={0x3C},lShift={0},rShift={2}},--X
["AMP ENV RELEASE"]={byte={0x0D,0x0E},position={0xC0,0x03},lShift={0,2},rShift={6,0}},--Y
["OSC SAW"]={byte={0x0E},position={0x04},lShift={0},rShift={2}},--Z0
["OSC TRI"]={byte={0x0E},position={0x08},lShift={0},rShift={3}},--Z1
["OSC PULSE"]={byte={0x0E},position={0x10},lShift={0},rShift={4}},--Z2
["OSC ENV INVERT"]={byte={0x0E},position={0x20},lShift={0},rShift={5}},--Z3
["FIL ENV INVERT"]={byte={0x0E},position={0x40},lShift={0},rShift={6}},--Z4
UNISON={byte={0x0E},position={0x80},lShift={0},rShift={7}},--Z5
["LFO SHAPE"]={byte={0x0F},position={0x01},lShift={0},rShift={0}},--Z6  (1=TRI)
["LFO OSC"]={byte={0x0F},position={0x02},lShift={0},rShift={1}},--Z7 
["LFO PULSE"]={byte={0x0F},position={0x04},lShift={0},rShift={2}},--Z8 
["LFO FILTER"]={byte={0x0F},position={0x08},lShift={0},rShift={3}},--Z9 
["FIL HALF"]={byte={0x0F},position={0x10},lShift={0},rShift={4}},--ZA
["FIL FULL"]={byte={0x0F},position={0x20},lShift={0},rShift={5}},--ZB 
}
console('---------------')
counter=1
for k in pairs (modulators) do
n=0
for j,v in ipairs (modulators[k].byte) do
if j == 1 then
n=n+bit.rshift(bit.band(m16:getByte(v),modulators[k].position[j]),modulators[k].rShift[j])
console("right shift "..k.." by "..modulators[k].rShift[j])
else
console("left shift "..k.." by "..modulators[k].lShift[j])
n=n+bit.lshift(bit.band(m16:getByte(v),modulators[k].position[j]),modulators[k].lShift[j])
end
end
console(String(string.format("[%d] n=%d",counter,n)))
console('---------------')
counter=counter+1
--panel:getModulatorByName(k)getComponent():setValue(n,true)
end
end -- is 32 bytes coming in
end -- method

[JT64]

Just as someone said it seem just to be two control messages.

Korg X Series/N364/264/Trinity Series/ Z1/Z1EX

BANK A
Message Value
Controller 0 0
Controller 32 0
Program Change 0-99 (0-127)
BANK B
Message Value
Controller 0 0
Controller 32 1
Program Change 0-99 (0-127)
BANK C
Message Value
Controller 0 0
Controller 32 2
Program Change 0-99 (0-127)
BANK D
Message Value
Controller 0 0
Controller 32 3
Program Change 0-99 (0-127)
BANK S/M (Trinity)
Message Value
Controller 0 0
Controller 32 4
Program Change 0-99 (0-127)
GM BANK (X and N Series)
Message Value
Controller 0 56
Controller 32 0
Program Change 1-128
GM DRUM BANK (X and N Series)
Message Value
Controller 0 62
Controller 32 0
Program Change *

[human fly]

ok nobody’s into this yet.. i’ve reduced it quite a bit here,
but the logic is still infantilistic (…) – i went further
but was getting ahead of things, so here it’s just with
‘pre’-functions for the leds. i got the last version wrong,
because i forgot getComponent(). it is still very long.

https://app.box.com/s/obeo8enfteh3rji87loc4ttpz1ftgl90

are uiTabs ‘just’ components? i get no real benefit declaring
and giving them an ‘alias’ here. and i still think i could do
it as a single method to cover partialOnOff and ‘levelZero’.
(don’t worry, you don’t have to get into this, it’s just my
own log – it’s quite a neat UI device though. i like the use
of text labels for leds instead of having to import graphics..)

[human fly]

don’t forget the vz8m and vz10m. a bit different.
i think it’s the same deal, sending it in chunks.
isn’t it split or something? there was some discussion
on usergroup about it-few years back.

[jasefos]

Hi Atom,

Good to hear you have love also for the CZ101/1000 – CZ101 was my first real synth I got as a kid back in the 80s (unfortunately it was fried beyond repair by a good mate that borrowed it). I have a CZ1000 on evaluation from another friend which I was considering implementing a Panel for however stopped development when I realised it required more than simple single parameter modulators to implement (as you’ve said, requires ‘all at once’ SysEx dumps per tweak which requires Lua skill I don’t have). Keep us posted on this thread if you make progress want beta testers since I think there would be many people keen to get their CZ controlled by CTRLR aside from those already posting here.

Best Wishes,

--> Music: www.soundcloud.com/jasefos
--> DAW: OSX10.10.5 with Live 9.6 x64, UA Apollo Quad
--> Controllers: Push 2, KeyLab61, Maschine mk2, MCU Pro, 2xMCU-Ext
--> Synths: Cyclone Bass Bot TT303, ESQ1, MKS80/MPG80, Matrix 6R, Matrix1000, Mopho, 05RW, DW8000, Virus TI Polar, Voyager Electric Blue, MiniBrute, AN1X, K5000s, FIZMO, ASR10 rack, Kenton ProSolo (controls Sequential Pro-One, Yamaha CS15), Prophecy, EMX1, MonoTribe, SP1200, DX100, KARP Odyssey

[tsundv]

Hi Atom

Did you progress on your project to make a panel for the Cz101/1000 ?
i would be interested as well !
great software by the way !
thanks !

[dasfaker]

A table isn’t necessary. You can use a fixed slider and insert there the mapped values, in field “Slider content”. The format is:

0 = mappedValue1
1 = mappedValue2
…

For negative numbers, maybe you will need to mess with expressions, there are several topics related:
http://ctrlr.org/forums/topic/negative-values-in-hex-which-expression/
http://ctrlr.org/forums/topic/korg-z1-negative-values/
http://ctrlr.org/forums/topic/creating-a-slider-with-positive-and-negative-values/

[reklamchef]

Yamaha:
FB01
Tx81z
TG-77
FS1R

Roland:
D50
Tr505

Kawai:
K5000r
K4

Casio:
VZ1

[valsolo]

Hi!
How’s it going with the Z1, love to see it as I’ve got a Z1 just lying in a corner unused 🙂

[dontwarrior]

getting clear with this :), though it might take time to ring trough

Korg Z1 – Negative Values

[zeoka]

I get it !

label = function(mod, value)

updlbl = panel:getComponent("TrigSel")
lb1 = panel:getComponent("01SoundLabel"):getComponentText()
panel:getComponent("modulator-5"):setText(lb1)

lb2 = panel:getComponent("02SoundLabel"):getComponentText()
panel:getComponent("modulator-7"):setText(lb2)

lb3 = panel:getComponent("03SoundLabel"):getComponentText()
panel:getComponent("modulator-8"):setText(lb3)

lb4 = panel:getComponent("04SoundLabel"):getComponentText()
panel:getComponent("modulator-9"):setText(lb4)

z1 = panel:getComponent("modulator-5"):getProperty("uiLabelText")
z2 = panel:getComponent("modulator-7"):getProperty("uiLabelText")
z3 = panel:getComponent("modulator-8"):getProperty("uiLabelText")
z4 = panel:getComponent("modulator-9"):getProperty("uiLabelText")
 
i = "\n"
lbl = string.format("01: %s%s02: %s%s03: %s%s04: %s",z1,i,z2,i,z3,i,z4) 
updlbl:setPropertyString("uiListBoxContent",string.format("%s",lbl)) 

I need to check inside the label cpp if I see magic formula inside
“Called when the contents of a Label are changed” or in the component
Atom ?

[zeoka]

no
A new panel checked the modulator list names ,vst indexes …

updlbl = panel:getComponent("TrigSel")
lb1 = panel:getComponent("01SoundLabel"):getComponentText()
panel:getComponent("modulator-5"):setText(lb1)
console(lb1)
lb2 = panel:getComponent("02SoundLabel"):getComponentText()
panel:getComponent("modulator-7"):setText(lb2)
console(lb2)
lb3 = panel:getComponent("03SoundLabel"):getComponentText()
panel:getComponent("modulator-8"):setText(lb3)
console(lb3)
lb4 = panel:getComponent("04SoundLabel"):getComponentText()
panel:getComponent("modulator-9"):setText(lb4)
console(lb4)
z1 = panel:getComponent("modulator-5"):getText()
--w1 = string.format("%q",z1)
z2 = panel:getComponent("modulator-7"):getText()
--w2 = string.format("%q",z2)
z3 = panel:getComponent("modulator-8"):getText()
--w3 = string.format("%q",z3)
z4 = panel:getComponent("modulator-9"):getText()
--w4 = string.format("%q",z4)
     --string.gsub(panel:getComponent("modulator-5"):getText(), "(%w+)", print) tried to print :) 
lbl = string.gsub("z1,z2,z3,z4",",","\n") 
i = "\n"
     --lbl = string.format("%q%s%q%s%q%s%q",lb1,i,lb2,i,lb3,i,lb4) no
updlbl:setPropertyString("uiListBoxContent",string.format("%s",lbl)) 
     -- i get row 1:z1  row2:z2 etc.. texts :( but it's a start . how to convert a function to string ? 
     --  string.format ?? :D   
--updlbl:setPropertyString("uiListBoxContent",lb1)

nothing to do ..

[zeoka]

even if I do :

updlbl = panel:getComponent("TrigSel")
lb1 = panel:getComponent("01SoundLabel"):getComponentText()
panel:getComponent("modulator-5"):setText(lb1)
console(lb1)
lb2 = panel:getComponent("02SoundLabel"):getComponentText()
panel:getComponent("modulator-7"):setText(lb2)
console(lb2)
lb3 = panel:getComponent("03SoundLabel"):getComponentText()
panel:getComponent("modulator-8"):setText(lb3)
console(lb3)
lb4 = panel:getComponent("04SoundLabel"):getComponentText()
panel:getComponent("modulator-9"):setText(lb4)
console(lb4)
z1 = panel:getComponent("modulator-5"):getText()
z2 = panel:getComponent("modulator-7"):getText()
z3 = panel:getComponent("modulator-8"):getText()
z4 = panel:getComponent("modulator-9"):getText()
updlbl:setPropertyString("uiListBoxContent",string.format("%s%s%s%s%s%s%s",z1,"\n",z2,"\n",z3,"\n",z4)) 

Same problem. LUA issue ?

[hannasdeli]

Ok I get it now, you multiply the MSB and LSB values!

[hannasdeli]

Excellent! I made one mistake, I took 7f7f as a whole in its decimal value (32639) which obviously is wrong. I need to understand a bit better the conversion of hex pairs to decimal.

But now the posted formula above works for all parameters, -12/12, -50/50 or even -99/99.

Thank you again!

[layzer]

simple, the 7f 7f msb,lsb pair is 16129 in decimal. but 80h*80h is what = 16384
you would think 16129 would be the value that worked, huh?

all the korg Z1 is doing is starting with the 7f 7f value and decreasing the msb by one for every negative increment. go figure!

also, the list i gave would work if you swapped the lsb msb in your sysex string like so…..

Sysex Formula: [f0 42 30 46 41 01 30 00 LS MS f7

either way, glad u figured it out!

• This reply was modified 10 years, 3 months ago by layzer.

[hannasdeli]

Thank you Layzer! I did not use your list, but you pointed me in the right direction. The actual SYSEX formula that works for negatives values in the Korg Z1 is

lt (modulatorValue, 0, 16383 - (abs(modulatorValue)), modulatorValue)

Somehow I did not understand properly how the large numbers are translated to MSB and LSB… I would be grateful if you could explain a bit how you obtained the 16383 value.

Regards and thanx again! Now i am flying with the panel.

[layzer]

enter these values in your modulator’s value contents box

-12=16372
-11=16373
-10=16374
-09=16375
-08=16376
-07=16377
-06=16378
-05=16379
-04=16380
-03=16381
-02=16382
-01=16383
+0=0
+01=1
+02=2
+03=3
+04=4
+05=5
+06=6
+07=7
+08=8
+09=9
+10=10
+11=11
+12=12

• This reply was modified 10 years, 3 months ago by layzer.

[hannasdeli]

Hi!

I am new to the forum, but I have been working with some CTRLR panels for the Waldorf Pulse (easy) and now I wanted to make one for my Korg Z1.

I decided to use the Korg Prophecy panel as a template due to the architecture being very similar or nearly identical. And I managed to make it work for things like the filter, oscillator type etc. A lot of work to do still.

But of course I arrived to some parameter with negative and positive values. I read some expression examples and have been trying and trying but I always manage to get my negative values a bit off from what I really need. I spent a lot of hours and I did not manage to make it work properly, so I guess it is down to some serious misunderstanding of how large numbers are expressed in HEX with MSB and LSB.

Here are the values that I need to obtain:

OSC 1 SEMItone 

Sysex Formula: [f0 42 30 46 41 01 30 01 MS LS f7]

MS LS
0c 00	 12
0b 00	 11
0a 00	 10
09 00	 9
08 00	 8
07 00	 7
06 00	 6
05 00	 5
04 00	 4
03 00    3
02 00    2
01 01    1
00 00	 0
7f 7f	 -1
7e 7f    -2
7d 7f    -3	
7c 7f	 -4	
7b 7f	 -5
7a 7f	 -6
79 7f	 -7
78 7f	 -8
77 7f	 -9
76 7f	 -10
75 7f	 -11
74 7f	 -12

I would really appreciate if you could help me out as solving this would mean I can work again in building the much needed Korg Z1 panel. I think that beast with a proper panel would be fantastic.

Thank you in advance

[kaielsz]

Hi all,

Pretty new to this site but I am very excited for the possibilities of what Ctrlr can do as a stand alone and more so as a VST.

My primary DAW is FL studio versions 9, 10, and 11.

I downloaded and installed Ctrlr this weekend and the micron panel. All i have to say is that as a stand alone this is a GOD send to that synth and programing it. And now it is making me interested to make a couple new custom panels for the Korg z1 and electribe ea-1.

But before I go about making new panels I want to make sure I can get Ctrlr running properly in flstudio so that I can send midi sequences and automation to the synth as I work on creating sounds.

Thats where the problem comes in:

I can open both 32 bit and 64 bit versions on my windows 7 with a lexicon omega audio interface, within fl studio 11. But all the options and choices in the menu bar of Ctrlr are greyed out. I can’t do anything besides load it as a vst.

Not sure if I need to change midi options in FL studio or other the stand alone to fix this problem. I have tried both including sending midi from lexicon through different midi input devices.

Any help would be awesome! and like I said if I can get this panel to work I really want to get started on making some new panels for other synths.

Hit me up for collabs!
Synths: Blofeld, Micron, Korg Z1, Venom, Electribe, Kaosillator.
Daw:FL 11