Browse Source

use also the numeric digits

master
tth 3 years ago
parent
commit
e540df566a
  1. 6
      README.md
  2. 2
      chuck/pouet.ck
  3. 15
      text2osc.c

6
README.md

@ -1 +1,5 @@ @@ -1 +1,5 @@
# Gadgets autou du protocole OSC
# Gadgets autour du protocole OSC
Oui, je sais, tout ça n'est pas vraiment clair.

2
chuck/pouet.ck

@ -9,7 +9,7 @@ SqrOsc sl => Envelope envl => dac.left; @@ -9,7 +9,7 @@ SqrOsc sl => Envelope envl => dac.left;
SawOsc sr => Envelope envr => dac.right;
0.5 => sl.gain => sr.gain;
0.02 => envl.time; 0.10 => envr.time;
0.01 => envl.time; 0.06 => envr.time;
OscIn oscin; OscMsg msg;

15
text2osc.c

@ -38,19 +38,28 @@ while (EOF != (caractere=getc(fp))) { @@ -38,19 +38,28 @@ while (EOF != (caractere=getc(fp))) {
char_count++;
if (verbosity) fprintf(stderr, "car = %d\n", caractere);
if (verbosity) fprintf(stderr, "car = %4d %c\n",
caractere, caractere);
if (isalpha(caractere)) {
/* Play a sound */
note=toupper(caractere) - 'A';
// fprintf(stderr, "%c -> %3d\n", caractere, note);
send_data_button(loa, note, 1);
usleep(wait_time*1000);
send_data_button(loa, note, 0);
usleep(40*1000);
}
else if (isdigit(caractere)) {
note = caractere - '0';
send_data_button(loa, note, 1);
usleep(wait_time*1000);
send_data_button(loa, note, 0);
usleep(80*1000);
usleep(20*1000);
}
else if (isblank(caractere)) {
usleep(300*1000);
usleep(200*1000);
}
else if (caractere == '!') {
send_data_id(loa, my_id);

Loading…
Cancel
Save