Bc2000 (for the BCF2000 & BCR2000) group photo

Yahoo Groups archive

Bc2000 (for the BCF2000 & BCR2000)

Index last updated: 2026-04-28 23:16 UTC

Message

Re: [bc2000] Re: MKS-70 Sysex Script

2009-12-31 by ogusa@lava.net

$rev R1  ; for the BCR
$preset
   .name 'MKS 70 Tone A'
   .snapshot off
   .request off
   .egroups 2   ; make the top row of encoders into 2 rows
   .fkeys on
   .lock
   .init    ; clear the preset in the edit buffer

$encoder 1
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2F val $F7  ; MKS 70 Tone A ENV-1 Attack

$encoder 2
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $30 val $F7  ; MKS 70 Tone A ENV-1 Decay

$encoder 3
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $31 val $F7  ; MKS 70 Tone A ENV-1 Sus

$encoder 4
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $32 val $F7  ; MKS 70 Tone A ENV-1 Rel

$encoder 5
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $33 val $F7  ; MKS 70 Tone A  
Env1 Key Follow

$encoder 6
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2C val $F7  ; MKS 70 Tone A LFO Waveform

$encoder 7
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2E val $F7  ; MKS 70 Tone A LFO Speed

$encoder 8
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2D val $F7  ; MKS 70 Tone A LFO Delay

$encoder 9
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $34 val $F7  ; MKS 70 Tone A ENV-2 Attack

$encoder 10
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $35 val $F7  ; MKS 70 Tone A ENV-2 Decay

$encoder 11
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $36 val $F7  ; MKS 70 Tone A  
ENV-2 Sustain

$encoder 12
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $37 val $F7  ; MKS 70 Tone A ENV-2 Rel

$encoder 13
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $38val $F7  ; MKS 70 Tone A  
ENV-2 Key Follow

$encoder 14
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2C val $F7  ; MKS 70 Tone A LFO Waveform

$encoder 15
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2E val $F7  ; MKS 70 Tone A LFO  
Speed Duplicate

$encoder 16
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2D val $F7  ; MKS 70 Tone A LFO  
Delay Duplicate

$encoder 33
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $0D val $F7  ; MKS 70 Tone A DCO-1 Octave

$encoder 34
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $0E val $F7  ; MKS 70 Tone A  
DCO-1 LFO Level

$encoder 35
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $0F val $F7  ; MKS 70 Tone A  
DCO-1 Pitch Env

$encoder 36
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $13 val $F7  ; MKS 70 Tone A DCO-2 Tune

$encoder 37
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $15 val $F7  ; MKS 70 Tone A  
DCO-2 LFO Level

$encoder 38
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $16 val $F7  ; MKS 70 Tone A  
DCO-2 Pitch Env

$encoder 39
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $14 val $F7  ; MKS 70 Tone A  
DCO-2 Fine Tune

$encoder 40
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2B val $F7  ; MKS 70 Chorus Mode

$button 41
     .showvalue on  
     .mode incval 30    
     .default 30
     .minmax   0 3
     .tx  $F0 $41 $36 $07 $24 $20 $01 $0B val $F7  ; MKS 70 Tone A  
DCO-1 Range <33,<65, <93, <127

$encoder 41
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $21 val $F7  ; MKS 70 Tone A VCF  
Hi Pass <33,<65, <93, <127

$button 42
     .showvalue on  
     .mode incval 32   
     .default 1
     .minmax   0 3
     .tx  $F0 $41 $36 $07 $24 $20 $01 $0C val $F7  ; MKS 70 Tone A  
DCO-1 Waveform

$encoder 42
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $22 val $F7  ; MKS 70 Tone A VCF Freq

$encoder 43
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $23 val $F7  ; MKS 70 Tone A VCF Q

$encoder 44
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $24 val $F7  ; MKS 70 Tone A VCF LFO

$button 44
     .showvalue on  
     .mode incval 30   
     .default 30
     .minmax   0 3
     .tx  $F0 $41 $36 $07 $24 $20 $01 $10 val $F7  ; MKS 70 Tone A  
DCO-2 Range <33,<65, <93, <127

$encoder 45
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $25 val $F7  ; MKS 70 Tone A VCF Env

$button 45
     .showvalue on  
     .mode incval 32   
     .default 1
     .minmax   0 3
     .tx  $F0 $41 $36 $07 $24 $20 $01 $11 val $F7  ; MKS 70 Tone A  
DCO-2 Waveform

$encoder 46
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $26 val $F7  ; MKS 70 Tone A VCF  
Key Follow

$button 46
     .showvalue on  
     .mode incval 32   
     .default 1
     .minmax   0 3
     .tx  $F0 $41 $36 $07 $24 $20 $01 $12 val $F7  ; MKS 70 Tone A  
DCO- Crossmod <33,<65, <93, <127

$button 47
     .showvalue on  
     .mode incval 32   
     .default 1
     .minmax   0 3
     .tx  $F0 $41 $36 $07 $24 $20 $01 $1A val $F7  ; MKS 70 Tone A DCO  
Dynamics <33,<65, <93, <127

$encoder 47
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $27 val $F7  ; MKS 70 Tone A VCF Dynamics

$button 48
     .showvalue on  
     .mode incval 32   
     .default 1
     .minmax   0 3
     .tx  $F0 $41 $36 $07 $24 $20 $01 $1B val $F7  ; MKS 70 Tone A DCO  
Env Mode  <33,<65, <93, <127

$encoder 48
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $28 val $F7  ; MKS 70 Tone A VCF Env Mode

$encoder 49
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $1C val $F7  ; MKS 70 Tone A  
DCO-1 Mix Level

$encoder 50
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $1D val $F7  ; MKS 70 Tone A  
DCO-2 Mix Level

$encoder 51
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $1E val $F7  ; MKS 70 Tone A  
DCO-2 Mix Env

$encoder 52
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $1F val $F7  ; MKS 70 Tone A  
DCO-2 Mix Dynamics

$encoder 53
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $20 val $F7  ; MKS 70 Tone A  
DCO-2 Mix Env Mode

$encoder 54
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $29 val $F7  ; MKS 70 Tone A VCA  
Base Level

$encoder 55
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $2A val $F7  ; MKS 70 Tone A VCA Dynamics

$encoder 56
     .showvalue on  
     .mode 1dot       
     .resolution 96 96 96 96
     .default 0
     .minmax   0 127
     .tx  $F0 $41 $36 $07 $24 $20 $01 $38 val $F7  ; MKS 70 Tone A VCA Env Mode

$end


Quoting rpcfender <rpcfender@...>:

> You'll have some trouble loading this
>
>> I think this is it, need to get a PC and upload it and try it out.
>> Programmed it with Filemaker, already had the sysex stuff databased.
>> Toughest part was mapping out the controls to the available knobs.
>> Used the buttons to increment the 4 step values. Would appreciate a
>> quick check to see if I'm missing any bits.
>
>
> $rev R1  ; for the BCR
> $preset
>   .name 'MKS 70 Tone A'
>   .snapshot off
>   .request off
>   .egroups 4       ; make the top row of encoders into 4 rows - only used
> two though- then you should use
>    .egroups 2 ; and this will use just the top two buttons -
>
> ; so the top row will always be usefull otherwise you could press group3
> button and ther top row would stop working
>
>   .fkeys on
>   .lock
>   .init    ; clear the preset in the edit buffer
>
> ; The BC separates each line into a nice formatted code
> $encoder 1
>     .showvalue on
>     .mode 1dot     ; the mode word is missing
>     .resolution 96 96 96 96
>     .default 0
>     .minmax   0 127
>     .tx  $F0 $41 $36 $07 $24 $20 $01 $2F val   $F7    ; MKS 70 Tone A
> ENV-1 Attack
>
> $button 47
>    .showvalue on
>    .mode incval 32     ;I don't think this is right - this says to jump
> by 32 each time the button is pressed
>    .default 1
>    .minmax    0 3
>    .tx  $F0 $41 $36 $07 $24 $20 $01 $1A val $F7  ; MKS 70 Tone A   DCO
> Dynamics
>
> $end
>
>
> Nearly there
>
> Royce
>
>

Attachments

  • No local attachments were found for this message.

Move to quarantaine

This moves the raw source file on disk only. The archive index is not changed automatically, so you still need to run a manual refresh afterward.