Browse Source

use also the numeric digits

master
tth 2 years ago
parent
commit
e540df566a
3 changed files with 18 additions and 5 deletions
  1. +5
    -1
      README.md
  2. +1
    -1
      chuck/pouet.ck
  3. +12
    -3
      text2osc.c

+ 5
- 1
README.md View File

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

+ 1
- 1
chuck/pouet.ck View File

@ -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;


+ 12
- 3
text2osc.c View File

@ -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