From ff463ef0c72560f9c5a3cff311105cd0188485f1 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Mon, 12 Jun 2006 22:46:27 +0000 Subject: changed [file_status] to [stat] since that's all it does; got [stat] working, still need to get error messages to work properly; created file_type Pd object svn path=/trunk/externals/hcs/; revision=5205 --- file_type.pd | 46 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 46 insertions(+) create mode 100644 file_type.pd (limited to 'file_type.pd') diff --git a/file_type.pd b/file_type.pd new file mode 100644 index 0000000..80a6d6c --- /dev/null +++ b/file_type.pd @@ -0,0 +1,46 @@ +#N canvas 15 102 585 375 10; +#X obj 28 8 inlet; +#X obj 29 34 stat; +#X obj 29 65 list; +#X obj 29 85 list split 2; +#X obj 29 105 list split 1; +#X msg 10 235 fifo; +#X obj 197 312 symbol; +#X obj 197 333 outlet; +#X msg 47 235 character; +#X msg 121 235 folder; +#X msg 175 235 block; +#X msg 226 235 file; +#X msg 268 235 symlink; +#X msg 329 235 socket; +#X msg 384 235 whiteout; +#X obj 442 325 outlet; +#X text 433 342 bang if no match; +#X obj 69 140 & 61440; +#X obj 35 178 route 4096 8192 16384 24576 32768 40960 49152 57344; +#X obj 394 205 print [file_type]_ERROR; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 1 1 15 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 1 17 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 8 0 6 0; +#X connect 9 0 6 0; +#X connect 10 0 6 0; +#X connect 11 0 6 0; +#X connect 12 0 6 0; +#X connect 13 0 6 0; +#X connect 14 0 6 0; +#X connect 17 0 18 0; +#X connect 18 0 5 0; +#X connect 18 1 8 0; +#X connect 18 2 9 0; +#X connect 18 3 10 0; +#X connect 18 4 11 0; +#X connect 18 5 12 0; +#X connect 18 6 13 0; +#X connect 18 7 14 0; +#X connect 18 8 19 0; -- cgit v1.2.1