tTh/gadgets-OSC
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

use also the numeric digits

Browse Source
This commit is contained in:
tth 2019-08-28 23:08:53 +02:00
parent 0f386d0d29
commit e540df566a
3 changed files with 19 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
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.

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

17
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(40*1000);
usleep(wait_time*1000);
send_data_button(loa, note, 0);
usleep(80*1000);
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(20*1000);
}
else if (isblank(caractere)) {
usleep(300*1000);
usleep(200*1000);
}
else if (caractere == '!') {
send_data_id(loa, my_id);