chose/extra/Fraise/analog/examples/example1.pd

#N canvas 552 121 562 579 10;
#X declare -path Fraise -stdpath Fraise;
#X obj 22 237 analog/parse;
#X obj 22 262 route 0 1 2 3;
#X floatatom 22 371 8 0 0 0 - - -, f 8;
#X floatatom 40 345 8 0 0 0 - - -, f 8;
#X floatatom 59 319 8 0 0 0 - - -, f 8;
#X floatatom 78 293 8 0 0 0 - - -, f 8;
#X obj 22 207 fruit/receive fruit1;
#X text 114 235 Analog capture on connector K1 \, K2 \, K3 and K5.
;
#X obj 19 141 fruit/fruit 1 fruit1 10 example1;
#X text 109 250 (K4 \, K11 and K12 cannot be analog inputs on Versa1)
;
#X msg 236 514 L\$1;
#X obj 236 491 tgl 15 0 empty empty set_LED 18 7 0 10 -4034 -1 -1 0
1;
#X obj 327 455 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 378 430 20;
#X floatatom 378 452 5 2 1000 0 - - -, f 5;
#X msg 408 429 100;
#X obj 327 474 metro 100;
#X obj 131 540 fruit/send2 fruit1;
#X obj 21 38 pied/pied 0 41424;
#X obj 22 399 spigot;
#X obj 80 384 tgl 15 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
1;
#X text 102 382 <- switch this on \, then touch the pins of connector
K1 to drive the led on., f 30;
#X obj 22 474 > 500;
#X obj 21 16 declare -path Fraise -stdpath Fraise;
#X text 135 292 K5 is programmed for capacitive touch measurement \;
connect a small isolated conductive surface \, and you should see the
value decreasing slightly when the surface is touched.;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 1 2 4 0;
#X connect 1 3 5 0;
#X connect 2 0 19 0;
#X connect 6 0 0 0;
#X connect 10 0 17 1;
#X connect 11 0 10 0;
#X connect 12 0 16 0;
#X connect 13 0 14 0;
#X connect 14 0 16 1;
#X connect 15 0 14 0;
#X connect 16 0 11 0;
#X connect 19 0 22 0;
#X connect 20 0 19 1;
#X connect 22 0 11 0;