slider1:2<0,7,1{22050,24000,44100,48000,88200,96000,176400,192000}>Samplerate
slider2:3<0,4,1{8,16,24,32,64}>Bits
slider3:0<0,10,1>Minutes to record
slider4:1<1,10,1>Num mono tracks

slider6:0,-->>>>>> Bytes
slider7:0,>>>>>> MegaBytes

in_pin:none
out_pin:none

@block
rate = (slider1 == 0 ? 22050 : (slider1 == 1 ? 24000 : (slider1 == 2 ? 44100 : (slider1 == 3 ? 48000 : (slider1 == 4 ? 88200 : (slider1 == 5 ? 96000 : (slider1 == 6 ? 176400 : 192000)))))));
samplerate = rate;
bits = (slider2 == 0 ? 8 : (slider2 == 1 ? 16 : (slider2 == 2 ? 24 : (slider2 == 3 ? 32 : 64))));
bytemultip = bits/8;
minutes = slider3*60;
numtracks = slider4;

bytesrequired=(numtracks*samplerate*bytemultip*minutes);
megsrequired=bytesrequired/1024/1024;
slider6=bytesrequired|0;
sliderchange(slider6);
slider7=ceil(megsrequired*100)/100;
sliderchange(slider7);
