Jump to content
Ménemszól.hu
  • 0

Pedal - MIDI cc - synth cutoff


Jaydee

Kérdés

Sziasztok! Ismertek olyan MAC-es MIDI Shaper / MIDI cc curve draw programot, amivel egy MIDI cc jel (Volume,Expression,VCFs cutoff,modulation,stb) erzekenyseget lehet modositani? Az a problemam,hogy a cutoff-ot vezerlo lab-pedal elmozdulasa nem linearis a plug-in-ben hozzakotott fader/slide elmozdulasaval. Tehat egy intervallumon par millimeteres dolesszogvaltozassal a poti gyorsabban elfordul, a feletol majdnem a szeleig, mig a tobbi reszen lassabb,centimeterek kellenek a pedalon.

PC-re talaltam erre tokjo alternativat. MAC-re sajnos nem. Es ott is kene.

 
Link to comment
Share on other sites

válasz erre a kérdésre

Recommended Posts

És a Jesusonic plugineknek utánanéztél amit javasoltam mint lehetséges megoldás a problémádra vagy csak a reflexből beszólás megy?

 

Nekem nem JS script kell, abban már megoldottam pillanatok alatt összeszedtem egy scriptet, 766 sor, ami ezt megoldja, eddig én is eljutottam.

VST plugint kerestem, ami unverzálisan mukodik minden DAW alatt.

Azért irtam be 3 helyre, hogy nojon a valoszinusége annak,hogy valaki észreveszi, mivel az X évvel ezelőtti képhez képest mostanában eléggé döglött ez a fórum. 

Ha normálisan írtad volna , nem mintha valami CEO Strazsamester volnál, akkor elképzelhető,hogy elnézést kérek, feltéve ha úgy ítélem meg, hogy igazad van.De nemvolt, mivel a fórum eléggé nem élénk, és lehet,hogyha csak egy helyre küldöm be, még te sem veszed észre. Vagy nem olyan, aki tudja a választ. Így most is beírnám 3 helyre, ha visszamehetnék az időben. Akkoris,ha 49 -1 pontot kap. :-)

Ha kell valakinek, a jövőben itt egy Reaper Only megoldás.

 

desc: midi cc map
 
 
in_pin:none
out_pin:none
 
@init
 
 
ext_noinit = 1.0;
 
//Variablen
 
timer = 1;
tap = 1;
 
 
 
helper = 1024;
helper_ende = helper + 650;
index = 0;
a= 0;
loop (128,
  loop (5,
    helper[index] = a;
    index += 1;
  );
  a += 1;
);
 
 
 
map_ghost = helper_ende;
map_ghost_ende = map_ghost + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map_ghost[index] = a;
    a += 1;
  );
  //map cc_in cc_out channel
  index == 128 ? (map_ghost[index] = 1;);
  index == 129 ? (map_ghost[index] = 1;);
  index == 130 ? (map_ghost[index] = 1;);
  index == 131 ? (map_ghost[index] = 1;);
   
  index += 1;
);
 
 
 
map1 = map_ghost_ende;
map1_ende = map1 + 135;
index = 0;
a = 0;
loop (132,
 
  index < 128 ? (
    map1[index] = a;
    a += 1;
  );
  
  index == 128 ? (map1[index] = 1;);
  index == 129 ? (map1[index] = 1;);
  index == 130 ? (map1[index] = 1;);
  index == 131 ? (map1[index] = 1;);
   
  index += 1;
);
 
 
 
map2 = map1_ende;
map2_ende = map2 + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map2[index] = a;
    a += 1;
  );
  //map cc_in cc_out channel 
  index == 128 ? (map2[index] = 2;);
  index == 129 ? (map2[index] = 2;);
  index == 130 ? (map2[index] = 1;);
  index == 131 ? (map2[index] = 1;);
  
  index += 1;
);
 
 
 
map3 = map2_ende;
map3_ende = map3 + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map3[index] = a;
    a += 1;
  );
 
  index == 128 ? (map3[index] = 3;);
  index == 129 ? (map3[index] = 3;);
  index == 130 ? (map3[index] = 1;);
  index == 131 ? (map3[index] = 1;);
  
  index += 1;
);
 
 
 
map4 = map3_ende;
map4_ende = map4 + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map4[index] = a;
    a += 1;
  );
  //map cc_in cc_out channel 
  index == 128 ? (map4[index] = 4;);
  index == 129 ? (map4[index] = 4;);
  index == 130 ? (map4[index] = 1;);
  index == 131 ? (map4[index] = 1;);
  
  index += 1;
);
 
 
 
map5 = map4_ende;
map5_ende = map5 + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map5[index] = a;
    a += 1;
  );
  //map cc_in cc_out channel 
  index == 128 ? (map5[index] = 5;);
  index == 129 ? (map5[index] = 5;);
  index == 130 ? (map5[index] = 1;);
  index == 131 ? (map5[index] = 1;);
 
  index += 1;
);
 
 
 
 
map6 = map5_ende;
map6_ende = map6 + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map6[index] = a;
    a += 1;
  );
  //map cc_in cc_out channel 
  index == 128 ? (map6[index] = 6;);
  index == 129 ? (map6[index] = 6;);
  index == 130 ? (map6[index] = 1;);
  index == 131 ? (map6[index] = 1;);
  
  index += 1;
);
 
 
 
map7 = map6_ende;
map7_ende = map7 + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map7[index] = a;
    a += 1;
  );
  //map cc_in cc_out channel 
  index == 128 ? (map7[index] = 7;);
  index == 129 ? (map7[index] = 7;);
  index == 130 ? (map7[index] = 1;);
  index == 131 ? (map7[index] = 1;);
  
  index += 1;
);
 
 
 
map8 = map7_ende;
map8_ende = map8 + 135;
index = 0;
a = 0;
loop (132,
  //cc werte
  index < 128 ? (
    map8[index] = a;
    a += 1;
  );
  //map cc_in cc_out channel 
  index == 128 ? (map8[index] = 8;);
  index == 129 ? (map8[index] = 8;);
  index == 130 ? (map8[index] = 1;);
  index == 131 ? (map8[index] = 1;);
  
  index += 1;
);
 
//==============================================================================
//init line 1
//==============================================================================
 
line = map8_ende;
line_ende = line + 9;
index = 0;
loop (9,
  line[index] = 0;
  index += 1;
);
 
//==============================================================================
//init line 2
//==============================================================================
 
line2 = line_ende;
line2_ende = line2 + 9;
index = 0;
loop (9,
  line2[index] = 0;
  index += 1;
);
 
//==============================================================================
//init active
//==============================================================================
 
map_active = line2_ende;
map_active_ende = map_active + 9;
index = 0;
loop (9,
  map_active[index] = 0;
  index += 1;
);
 
//==============================================================================
//Daten Speichern
@serialize
//==============================================================================
 
file_mem(0,0,5000);
 
//==============================================================================
//Midi Senden
@block
//==============================================================================
 
 
while 
(
  midirecv(mpos,msg1_orig,msg23_orig) ? 
  (
    type = msg1_orig & 240;
    channel = msg1_orig & 15;
    msg3 = (msg23_orig/256)|0;
    msg2 = msg23_orig-(msg3*256);
    
    type == 176 ? (
      
      msg2 != map1[128] ? (
        msg2 != map2[128] ? (
          msg2 != map3[128] ? (
            msg2 != map4[128] ? (
              msg2 != map5[128] ? (
                msg2 != map6[128] ? (
                  msg2 != map7[128] ? (
                    msg2 != map8[128] ? (
                      midisend(mpos, msg1_orig, msg23_orig);
                    );
                  );
                );
              );
            );
          );
        );
      );
      
      
      //MAP1
      msg2 == map1[128] ? (
        map_active[0] == 1 ? (
          channel == (map1[130]-1) ? (
            map_out_cc =map1[129];
            map_out_value = map1[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map1[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        ); 
         
      //MAP2  
      
      msg2 == map2[128] ? (
        map_active[1] == 1 ? (
          channel == (map2[130]-1) ? (
            map_out_cc =map2[129];
            map_out_value = map2[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map2[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        );
                
      //MAP3  
      msg2 == map3[128] ? (
        map_active[2] == 1 ? (
          channel == (map3[130]-1) ? (
            map_out_cc =map3[129];
            map_out_value = map3[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map3[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        ); 
         
      //MAP4
      msg2 == map4[128] ? (
        map_active[3] == 1 ? (
          channel == (map4[130]-1) ? (
            map_out_cc =map4[129];
            map_out_value = map4[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map4[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        );  
                  
      //MAP5
      msg2 == map5[128] ? (
        map_active[4] == 1 ? (
          channel == (map5[130]-1) ? (
            map_out_cc =map5[129];
            map_out_value = map5[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map5[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        );  
        
      //MAP6
      msg2 == map6[128] ? (
        map_active[5] == 1 ? (
          channel == (map6[130]-1) ? (
            map_out_cc =map6[129];
            map_out_value = map6[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map6[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        );   
                 
      //MAP7 
      msg2 == map7[128] ? (
        map_active[6] == 1 ? (
          channel == (map7[130]-1) ? (
            map_out_cc =map7[129];
            map_out_value = map7[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map7[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        );  
        
      //MAP8
      msg2 == map8[128] ? (
        map_active[7] == 1 ? (
          channel == (map8[130]-1) ? (
            map_out_cc =map8[129];
            map_out_value = map8[msg3];
            map_data = (map_out_value*256+map_out_cc);
            channel_out = type+(map8[131]-1);
            midisend(mpos, channel_out, map_data);
            );
          ):(
          midisend(mpos, msg1_orig, msg23_orig);
          ); 
        );           
                 
      
    //type end  
    );
    
    type != 176 ? (
      midisend(mpos,msg1_orig,msg23_orig);
      );
          
    1;
  );
);
 
//==============================================================================
@gfx 820 417
//==============================================================================
 
mouse_cap == 0 ? (
    //Maus null setzten
    status = 0;
    workstatus = 0;
    );
    
//Funktions
 
//======================
//Draw Maps
//======================
 
function draw_map(x1 y1 r g b r1 g1 b1)
  (
  
  gfx_x = x1;
  gfx_y = y1;
    
  loop (128, 
    gfx_r=r1;gfx_g=g1;gfx_b=b1;
    gfx_rectto(gfx_x+4,y1-128);
    gfx_x += 1;
    gfx_y = y1;
    );
    
  gfx_x = x1;
  gfx_y = y1;
  gfx_a = 1;
  map_array = 0;
  loop (128, 
  
    gfx_r=r;gfx_g=g;gfx_b=b;
    
    line[line_index] == 1 ? (
      (map_array == 0 || map_array == 127) ? (
        gfx_r=0;gfx_g=0;gfx_b=0;
        );
      );
      
    line2[line_index] == 1 ? (
      (map_array == 0 || map_array == 31 || map_array == 63 || map_array == 95 || map_array == 127) ? (
        gfx_r=0;gfx_g=0;gfx_b=0;
        );
      );
      
    gfx_rectto(gfx_x+4,(y1-map_ghost[map_array]));
    gfx_x += 1;
    gfx_y = y1;
    map_array += 1;
    );
       
  //Beschriftung
   
  gfx_r=0.8;gfx_g=0.8;gfx_b=0.8;
  
  gfx_x = x1-11;
  gfx_y = y1+8;
  gfx_drawnumber(0,0);
  gfx_x = x1+630;
  gfx_drawnumber(127,0);
  gfx_x = x1-30;
  gfx_y = y1-127;
  gfx_drawnumber(127,0);
  
  gfx_x = x1+290;
  gfx_y = y1+8; 
  gfx_drawchar($'I');
  gfx_drawchar($'N');
  
  gfx_x = x1-30;
  gfx_y = y1-70;
  gfx_drawchar($'O');
  gfx_drawchar($'U');
  gfx_drawchar($'T');
  );
//======================
//Taps
//======================
function taps(id tap_id x1 y1 x2 y2 r g b r1 g1 b1)
  (
  
  gfx_x = x1;
  gfx_y = y1;
  gfx_r =r;gfx_b=b;gfx_g=g;
     
  //Ueberprfe ob Maus auf dem Button ist 
  (mouse_x > x1 && mouse_x < x1+x2 && mouse_y > y1 && mouse_y < y1+y2) ? (
  
    //Zeichne die Box heller wenn Maus sich darauf Befindet
    mouse_cap == 0 ? (
      gfx_r =r+0.05;gfx_b=b+0.05;gfx_g=g+0.05;
      );
      
    (mouse_cap == 1 && status == 0) ? (
    
      status = id;
      gfx_r =r+0.2;gfx_b=b+0.2;gfx_g=g+0.2;
      
      tap = tap_id;
      
      );
    );
    
  tap == tap_id ? (
    gfx_r =r1;gfx_b=b1;gfx_g=g1;
    );
    
  gfx_rectto(gfx_x+x2,gfx_y+y2);
  
  //Name the Taps
  
  gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
  gfx_x = x1+10;
  gfx_y = floor(y2/2)-4;
  gfx_drawchar($'M');
  gfx_drawchar($'a');
  gfx_drawchar($'p');
  gfx_drawchar($' ');
  gfx_drawnumber(tap_id,0);
  
  );
  
//======================
//Edit Maps
//======================
  
function hand_draw_map(id line_index x1 y1 x2 y2)
  (
  
  //Berechne Linie
  
  line[line_index] == 1 ? (
  
    line_1 = map_ghost[0];
    line_2 = map_ghost[127];
    steigung = (line_2 - line_1)/128;
    index = 1;
    loop (126,
      map_ghost[index] = map_ghost[index-1] + steigung;
      index += 1;
      ); 
    
    index = 0;
    loop (128,
      map_ghost[index] = floor(map_ghost[index]);
      index += 1;
      );
    );
      
  line2[line_index] == 1 ? (
    
    line_1 = map_ghost[0];
    line_2 = map_ghost[31];
    steigung = (line_2 - line_1)/32;
    index = 1;
    loop (30,
      map_ghost[index] = map_ghost[index-1] + steigung;
      index += 1;
      ); 
    
    line_1 = map_ghost[31];
    line_2 = map_ghost[63];
    steigung = (line_2 - line_1)/32;
    index = 32;
    loop (31,
      map_ghost[index] = map_ghost[index-1] + steigung;
      index += 1;
      );
    
    line_1 = map_ghost[63];
    line_2 = map_ghost[95];
    steigung = (line_2 - line_1)/32;
    index = 64;
    loop (31,
      map_ghost[index] = map_ghost[index-1] + steigung;
      index += 1;
      );
    
    line_1 = map_ghost[95];
    line_2 = map_ghost[127];
    steigung = (line_2 - line_1)/32;
    index = 96;
    loop (31,
      map_ghost[index] = map_ghost[index-1] + steigung;
      index += 1;
      );    
    
    index = 0;
    loop (128,
      map_ghost[index] = floor(map_ghost[index]);
      index += 1;
      );
    
    );
  
  (mouse_x > x1 && mouse_x < x1+x2 && mouse_y > y1-5 && mouse_y < y1+y2+5) ? (
    mouse_cap == 1 ? (
          
      (status == 0 || status == id) ? (
      
        status = id;
    
        index = helper[(mouse_x-x1)];
        
        //wenn line tools aus, dann zeichne alle
         
        (line[line_index] == 0 && line2[line_index] == 0) ? (
          map_ghost[index] = (y1+y2-mouse_y);
          );
        
        line[line_index] == 1 ? (
          
          (index == 0 || index == 127) ? (
            map_ghost[index] = (y1+y2-mouse_y);
            );
          
          );
        
        line2[line_index] == 1 ? (
        
          (index == 0 || index == 31 || index == 63 || index == 95 || index == 127) ? (
            map_ghost[index] = (y1+y2-mouse_y); 
            );
            
          );
        //Verhindere geringere oder hoehere werte
        
        map_ghost[index] < 0 ? ( map_ghost[index] = 0;);
        map_ghost[index] >= 127 ? ( map_ghost[index] = 127;);
        
        //zeichne Info box
        gfx_r=0;gfx_g=0;gfx_b=0;gfx_a=0.5;
        gfx_x = mouse_x+17;
        gfx_y = mouse_y+14;
        gfx_rectto(gfx_x+62,gfx_y+30);
        
        gfx_r=1;gfx_g=1;gfx_b=0.7;gfx_a=1;
        gfx_x = mouse_x+14;
        gfx_y = mouse_y+10;
        gfx_rectto(gfx_x+62,gfx_y+30);
        gfx_r=0.2;gfx_g=0.2;gfx_b=0.2;gfx_a=1;
        gfx_x = mouse_x+16;
        gfx_y = mouse_y+13;
        gfx_drawchar($'I');
        gfx_drawchar($'N');
        gfx_drawchar($' ');
        gfx_drawchar($' ');
        gfx_drawnumber(index,0);
        gfx_x = mouse_x+16;
        gfx_y = mouse_y+28;
        gfx_drawchar($'O');
        gfx_drawchar($'U');
        gfx_drawchar($'T');
        gfx_drawchar($' ');
        gfx_drawnumber(map_ghost[index],0);
        
        (line[line_index] == 0 && line2[line_index] == 0) ? (
        
          index == (last_index + 2) ? (
            map_ghost[(index-1)] = floor((map_ghost[index]+map_ghost[last_index])/2);    
            );
          index == (last_index - 2) ? (
            map_ghost[(index+1)] = floor((map_ghost[index]+map_ghost[last_index])/2);    
            );
          
          index == (last_index + 3) ? (
            map_ghost[(index-1)] = floor((map_ghost[index]+map_ghost[last_index])/2);
            map_ghost[(index-2)] = floor((map_ghost[index]+map_ghost[last_index])/2);    
            );
          index == (last_index - 3) ? (
            map_ghost[(index+1)] = floor((map_ghost[index]+map_ghost[last_index])/2);
            map_ghost[(index+2)] = floor((map_ghost[index]+map_ghost[last_index])/2);    
            );
            
          last_index = index;
          );
           
        
        );
      );
    ); 
  
  );
 
//======================
//Smooth
//======================
 
function smooth_invert(id funct x1 y1 x2 y2 r g B)
  (
  
  gfx_r=r;gfx_g=g;gfx_b=b;
  
  (mouse_x > x1 && mouse_x < x1+x2 && mouse_y > y1 && mouse_y < y1+y2) ? (
  
    gfx_r=r+0.05;gfx_g=g+0.05;gfx_b=b+0.05;
  
    mouse_cap == 1 ? (
    
      status == 0 ? (
        index = 0;
        loop (128,
          
          //Smooth the Curve
          funct == 0 ? (
            (index < 127 && index > 0) ? (
              map_ghost[index] = floor((map_ghost[index+1]+map_ghost[index-1])/2);
              );
            );
           
          //invert the curve 
          funct == 1 ? (
            map_ghost[index] = 127 - map_ghost[index];
            );
           
          index += 1;
          );
        );
        
      gfx_r=r+0.2;gfx_g=g+0.2;gfx_b=b+0.2;
      status = id;
      
      );
    );
    
  gfx_x=x1;gfx_y=y1;
  gfx_rectto(gfx_x+x2,gfx_y+y2);
  ); 
 
//======================
//"Slider"
//====================== 
 
function button_slider(id index speed low high x1 y1 x2 y2 r g B)
  (
  
  gfx_r=r;gfx_g=g;gfx_b=b;
  (mouse_x > x1 && mouse_x < x1+x2 && mouse_y > y1 && mouse_y < y1+y2) ? (
  
    gfx_r=r+0.05;gfx_g=g+0.05;gfx_b=b+0.05;
    
    (mouse_cap == 1 && status == 0) ? (
      status = id;
      );
    );
    
  status == id ? (
  
    gfx_r=r+0.2;gfx_g=g+0.2;gfx_b=b+0.2;
    
    mouse_y <= steps-speed ? (
      map_ghost[index] += 1;
      steps = mouse_y;
      );
      
    mouse_y >= steps+speed ? (
      map_ghost[index] -= 1;
      steps = mouse_y;
      );
      
    map_ghost[index] > high ? (
      map_ghost[index] = high;
      );
    
    map_ghost[index] < low ? (
      map_ghost[index] = low;
      );
        
    );
    
  gfx_x=x1;gfx_y=y1;
  gfx_rectto(gfx_x+x2,gfx_y+y2);
  
  gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
  gfx_x=x1+3;gfx_y=y1+6;
  gfx_drawnumber(map_ghost[index],0);
  );
 
//======================
//Plus Minus Button
//====================== 
 
function plus_minus(id mode low high index x1 y1 x2 y2 r g B)
  (
  
  gfx_r=r;gfx_g=g;gfx_b=b;
  (mouse_x > x1 && mouse_x < x1+x2 && mouse_y > y1 && mouse_y < y1+y2) ? (
  
    gfx_r=r+0.05;gfx_g=g+0.05;gfx_b=b+0.05;
    
    (mouse_cap == 1 && status == 0) ? (
    
      gfx_r=r+0.2;gfx_g=g+0.2;gfx_b=b+0.2;
      
      mode == 1 ? (
        map_ghost[index] += 1;
        
        map_ghost[index] > high ? (
          map_ghost[index] = high;
          );
           
        ); 
         
      mode == 2 ? (
        map_ghost[index] -= 1;
        
        map_ghost[index] < low ? (
          map_ghost[index] = low;
          );
         
        );
        
      status = id;
      );
      
    );
      
  gfx_x=x1;gfx_y=y1;
  gfx_rectto(gfx_x+x2,gfx_y+y2);
  
  gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
  gfx_x=x1+6;gfx_y=y1+6;
  
  mode == 1 ? (
    gfx_drawchar($'+');
    );
    
  mode == 2 ? (
    gfx_drawchar($'-');
    );
  
  );
  
  
//================
// Function Line
//================
 
function line12(id index mode x1 y1 x2 y2 r g b r1 g1 b1)
  (
  
  mode == 1 ? (
    line[index] == 0 ? (
      gfx_r=r;gfx_g=g;gfx_b=b;
      );  
    line[index] == 1 ? (
      gfx_r=r1;gfx_g=g1;gfx_b=b1;
      );
    
    );
    
  mode == 2 ? (  
    line2[index] == 0 ? (
      gfx_r=r;gfx_g=g;gfx_b=b;
      ); 
    line2[index] == 1 ? (
      gfx_r=r1;gfx_g=g1;gfx_b=b1;
      );
    );   
      
  (mouse_x > x1 && mouse_x < x1+x2 && mouse_y > y1 && mouse_y < y1+y2) ? (
    (mouse_cap == 1 && status == 0) ? (
      status = id;
      
      mode == 1 ? (
        
        (line[index] == 0 && workstatus == 0) ? (
          
          line[index] = 1;
          line2[index] = 0;
          workstatus = 1;
          );
          
        (line[index] == 1 && workstatus == 0) ? (
          line[index] = 0;
          line2[index] = 0;
          workstatus = 1;
          );
          
        );
        
      mode == 2 ? (
      
        (line2[index] == 0 && workstatus == 0) ? (
        
          line[index] = 0;
          line2[index] = 1;
          workstatus = 1;
          );
          
        (line2[index] == 1 && workstatus == 0) ? (
          line[index] = 0;
          line2[index] = 0;
          workstatus = 1;
          );
          
        );    
      ); 
    );
    
  gfx_x=x1;gfx_y=y1;
  gfx_rectto(gfx_x+x2,gfx_y+y2);
  
  );
  
  
//================
// Function Actuve map
//================
 
function activate_map(id x1 y1 x2 y2 r g b r1 g1 b1)
  (
  
  map_active[line_index] == 0 ? (
    gfx_r=r;gfx_g=g;gfx_b=b;
    );
    
  map_active[line_index] == 1 ? (
    gfx_r=r1;gfx_g=g1;gfx_b=b1;
    );  
    
  (mouse_x > x1 && mouse_x < x1+x2 && mouse_y > y1 && mouse_y < y1+y2) ? (
    
    (mouse_cap == 1 && status == 0) ? (
      status = id;
    
      (map_active[line_index] == 0 && workstatus == 0) ? (
      
        map_active[line_index] = 1;
        workstatus = 1;
        );
      
      (map_active[line_index] == 1 && workstatus == 0) ? (
        map_active[line_index] = 0;
        workstatus = 1;
        );  
      
      );
    );
    
  gfx_x=x1;gfx_y=y1;
  gfx_rectto(gfx_x+x2,gfx_y+y2);
  
  );  
  
//================
// Blinki Blinki
//================
 
function color(r g b r1 g1 b1 time_a time_B)
  (
  (timer >= time_a && timer <=time_B) ? (
    gfx_r =r;gfx_g=g;gfx_b=b;
    ) : (
    gfx_r =r1;gfx_g=g1;gfx_b=b1;
    );
 
  );
  
//===============================================================================
//===============================================================================
 
gfx_a=1;
gfx_w = 820;
gfx_h = 400;
 
//===============================================================================
//Hintergrund zeichnen
//Farbe
gfx_r=0.2;gfx_g=0.2;gfx_b=0.2;gfx_a=1;
//Position
gfx_x=0;gfx_y=0;
//Rechteck
gfx_rectto(850,500);
 
//Farbe
gfx_r=0.06;gfx_g=0.06;gfx_b=0.06;gfx_a=1;
//Position
gfx_x=0;gfx_y=0;
//Rechteck
gfx_rectto(850,50);
 
//Trennlinien
 
gfx_r=0.18;gfx_g=0.18;gfx_b=0.18;gfx_a=1;
gfx_x=0;gfx_y=78;
gfx_rectto(850,gfx_y+21);
 
gfx_r=0.15;gfx_g=0.15;gfx_b=0.15;gfx_a=1;
gfx_x=0;gfx_y=79;
gfx_rectto(850,gfx_y+19);
 
gfx_r=0.1;gfx_g=0.1;gfx_b=0.1;gfx_a=1;
gfx_x=0;gfx_y=80;
gfx_rectto(850,gfx_y+17);
 
 
 
gfx_r=0.18;gfx_g=0.18;gfx_b=0.18;gfx_a=1;
gfx_x=0;gfx_y=293;
gfx_rectto(850,gfx_y+21);
 
gfx_r=0.15;gfx_g=0.15;gfx_b=0.15;gfx_a=1;
gfx_x=0;gfx_y=294;
gfx_rectto(850,gfx_y+19);
 
gfx_r=0.1;gfx_g=0.1;gfx_b=0.1;gfx_a=1;
gfx_x=0;gfx_y=295;
gfx_rectto(850,gfx_y+17);
 
//Taps aufrufen
 
taps(1,1,0,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
taps(2,2,65,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
taps(3,3,130,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
taps(4,4,195,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
taps(5,5,260,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
taps(6,6,325,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
taps(7,7,390,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
taps(8,8,455,0,60,50,0.12,0.12,0.12,0.2,0.2,0.2);
 
//Ghost map werte geben, Tap benennung aendern
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=30;gfx_y=85;
gfx_drawchar($'M');
gfx_drawchar($'A');
gfx_drawchar($'P');
gfx_drawchar($' ');
tap == 1 ? (
  map_ghost = map1;
  gfx_drawchar($'1');
  line_index = 0;
  ); 
tap == 2 ? (
  map_ghost = map2;
  gfx_drawchar($'2');
  line_index = 1;
  );
tap == 3 ? (
  map_ghost = map3;
  gfx_drawchar($'3');
  line_index = 2;
  );
tap == 4 ? (
  map_ghost = map4;
  gfx_drawchar($'4');
  line_index = 3;
  );
tap == 5 ? (
  map_ghost = map5;
  gfx_drawchar($'5');
  line_index = 4;
  );
tap == 6 ? (
  map_ghost = map6;
  gfx_drawchar($'6');
  line_index = 5;
  );
tap == 7 ? (
  map_ghost = map7;
  gfx_drawchar($'7');
  line_index = 6;
  );
tap == 8 ? (
  map_ghost = map8;
  gfx_drawchar($'8');
  line_index = 7;
  );
 
 
//Map Darstellen
 
draw_map(100,250,0.65,0.65,0.65,0.3,0.3,0.3);
 
//map Bearbeiten
 
hand_draw_map(9,line_index,100,122,640,128);
smooth_invert(10,0,100,320,20,20,0.4,0.4,0.4);
smooth_invert(11,1,100,344,20,20,0.4,0.4,0.4);
 
button_slider(12,128,4,0,127,434,320,30,20,0.4,0.4,0.4);
button_slider(13,129,4,0,127,434,344,30,20,0.4,0.4,0.4);
button_slider(14,130,4,1,16,434,368,30,20,0.4,0.4,0.4);
button_slider(15,131,4,1,16,434,392,30,20,0.4,0.4,0.4);
 
plus_minus(16,2,0,127,128,410,320,20,20,0.4,0.4,0.4);
plus_minus(17,2,0,127,129,410,344,20,20,0.4,0.4,0.4);
plus_minus(18,2,1,16,130,410,368,20,20,0.4,0.4,0.4);
plus_minus(19,2,1,16,131,410,392,20,20,0.4,0.4,0.4);
 
plus_minus(20,1,0,127,128,468,320,20,20,0.4,0.4,0.4);
plus_minus(21,1,0,127,129,468,344,20,20,0.4,0.4,0.4);
plus_minus(22,1,1,16,130,468,368,20,20,0.4,0.4,0.4);
plus_minus(23,1,1,16,131,468,392,20,20,0.4,0.4,0.4);
 
 
line12(24,line_index,1,100,368,20,20,0.6,0.2,0.2,0.2,0.6,0.2);
line12(25,line_index,2,100,392,20,20,0.6,0.2,0.2,0.2,0.6,0.2);
 
 
activate_map(26,600,293,40,21,0.6,0.2,0.2,0.2,0.6,0.2);
 
//Werte zu den Maps zurueckfuehren
 
tap == 1 ? (
  map1 = map_ghost;
  );
tap == 2 ? (
  map2 = map_ghost;
  );
tap == 3 ? (
  map3 = map_ghost;
  );
tap == 4 ? (
  map4 = map_ghost;
  );
tap == 5 ? (
  map5 = map_ghost;
  );
tap == 6 ? (
  map6 = map_ghost;
  );
tap == 7 ? (
  map7 = map_ghost;
  );
tap == 8 ? (
  map8 = map_ghost;
  );
  
  
  
//Beschriftung
 
gfx_r =0.8;gfx_g=0.5;gfx_b=0.5;
gfx_x=30;gfx_y=300;
gfx_drawchar($'T');
gfx_drawchar($'o');
gfx_drawchar($'o');
gfx_drawchar($'l');
gfx_drawchar($'s');
gfx_drawchar($':');
 
gfx_x=300;gfx_y=300;
gfx_drawchar($'R');
gfx_drawchar($'o');
gfx_drawchar($'u');
gfx_drawchar($'t');
gfx_drawchar($'i');
gfx_drawchar($'n');
gfx_drawchar($'g');
gfx_drawchar($':');
 
gfx_x=530;gfx_y=300;
gfx_drawchar($'A');
gfx_drawchar($'c');
gfx_drawchar($'t');
gfx_drawchar($'i');
gfx_drawchar($'v');
gfx_drawchar($'e');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=30;gfx_y=326;
gfx_drawchar($'S');
gfx_drawchar($'m');
gfx_drawchar($'o');
gfx_drawchar($'o');
gfx_drawchar($'t');
gfx_drawchar($'h');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
gfx_x=30;gfx_y=350;
gfx_drawchar($'I');
gfx_drawchar($'n');
gfx_drawchar($'v');
gfx_drawchar($'e');
gfx_drawchar($'r');
gfx_drawchar($'t');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
gfx_x=30;gfx_y=374;
gfx_drawchar($'L');
gfx_drawchar($'i');
gfx_drawchar($'n');
gfx_drawchar($'e');
gfx_drawchar($'1');
gfx_drawchar($' ');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
gfx_x=30;gfx_y=398;
gfx_drawchar($'L');
gfx_drawchar($'i');
gfx_drawchar($'n');
gfx_drawchar($'e');
gfx_drawchar($'2');
gfx_drawchar($' ');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
 
 
 
 
gfx_x=300;gfx_y=326;
gfx_drawchar($'C');
gfx_drawchar($'C');
gfx_drawchar($' ');
gfx_drawchar($'I');
gfx_drawchar($'N');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
gfx_x=300;gfx_y=350;
gfx_drawchar($'C');
gfx_drawchar($'C');
gfx_drawchar($' ');
gfx_drawchar($'O');
gfx_drawchar($'U');
gfx_drawchar($'T');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($' ');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
 
gfx_x=300;gfx_y=374;
gfx_drawchar($'C');
gfx_drawchar($'h');
gfx_drawchar($'a');
gfx_drawchar($'n');
gfx_drawchar($'n');
gfx_drawchar($'e');
gfx_drawchar($'l');
gfx_drawchar($' ');
gfx_drawchar($'I');
gfx_drawchar($'N');
gfx_drawchar($' ');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
gfx_x=300;gfx_y=398;
gfx_drawchar($'C');
gfx_drawchar($'h');
gfx_drawchar($'a');
gfx_drawchar($'n');
gfx_drawchar($'n');
gfx_drawchar($'e');
gfx_drawchar($'l');
gfx_drawchar($' ');
gfx_drawchar($'O');
gfx_drawchar($'U');
gfx_drawchar($'T');
gfx_drawchar($'-');
gfx_drawchar($'>');
 
//map1
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=530;gfx_y=326;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'1');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[0] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[0] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[0] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
//map2
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=530;gfx_y=350;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'2');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[1] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[1] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[1] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
 
//map3
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=530;gfx_y=374;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'3');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[2] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[2] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[2] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
//map4
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=530;gfx_y=398;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'4');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[3] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[3] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[3] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
 
//map5
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=640;gfx_y=326;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'5');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[4] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[4] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[4] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
//map6
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=640;gfx_y=350;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'6');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[5] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[5] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[5] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
 
//map7
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=640;gfx_y=374;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'7');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[6] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[6] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[6] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
//map8
 
gfx_r =0.8;gfx_g=0.8;gfx_b=0.8;
gfx_x=640;gfx_y=398;
gfx_drawchar($'M');
gfx_drawchar($'a');
gfx_drawchar($'p');
gfx_drawchar($' ');
gfx_drawchar($'8');
gfx_drawchar($' ');
gfx_r =0.8;gfx_g=0.2;gfx_b=0.2;
map_active[7] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,1,10);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[7] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,10,20);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
map_active[7] == 1 ? (
  color(0,0.7,0,0.8,0.8,0.8,20,30);
  );
gfx_drawchar($'-');
gfx_drawchar($'>');
 
timer += 1;
  timer > 30 ? (
    timer = 1;
    );
Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...