adding mouser code

hamilr4.pd

@@ -1564,7 +1564,7 @@ patch;
 #X connect 26 0 24 0;
 #X connect 26 1 24 1;
 #X restore 234 288 pd more_sounds;
-#N canvas 501 23 1418 992 more_control 1;
+#N canvas 501 23 1418 1129 more_control 1;
 #N canvas 545 23 1259 1129 keyboard-input 0;
 #X obj 121 157 key;
 #X floatatom 121 185 3 0 0 0 - - -;
@@ -1665,8 +1665,7 @@ to your [r username_control] receive;
 #X obj 68 238 list trim;
 #X msg 68 259 hamilr4 key 1 Meta_L 0;
 #X obj 68 217 list prepend set;
-#X obj 66 359 mouse_osx;
-#X text 33 330 MOUSE CONTROLLER - OSX VERSION;
+#X obj 66 392 mouse_osx;
 #X text 36 102 KEYBOARD CONTROLLER;
 #X obj 366 216 route hamilr4 obamab;
 #X obj 325 245 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@@ -1677,7 +1676,6 @@ to your [r username_control] receive;
 #X obj 443 264 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X obj 366 239 route key;
-#X obj 290 285 print;
 #X obj 366 285 unpack f s f;
 #X floatatom 366 322 5 0 0 0 - - -;
 #X symbolatom 407 323 10 0 0 0 - - -;
@@ -1686,82 +1684,111 @@ to your [r username_control] receive;
 #X floatatom 447 394 5 0 0 0 - - -;
 #X obj 447 420 osc~;
 #X obj 447 443 throw~ hamilr4_audio_1;
-#X msg 209 815 poll;
-#X obj 199 852 cyclone/mousestate, f 39;
-#X msg 199 787 nopoll;
-#X obj 167 810 bng 18 250 50 0 empty empty empty 17 7 0 10 -228856
+#X msg 219 895 poll;
+#X obj 209 932 cyclone/mousestate, f 39;
+#X msg 209 867 nopoll;
+#X obj 177 890 bng 18 250 50 0 empty empty empty 17 7 0 10 -228856
 -1 -1;
-#X text 427 895 delta y;
-#X obj 430 877 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+#X text 437 975 delta y;
+#X obj 440 957 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
 -228856 -1 -1 0 256;
-#X obj 372 877 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+#X obj 382 957 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
 -228856 -1 -1 0 256;
-#X text 369 894 delta x;
-#X obj 314 877 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
--228856 -1 -1 839 256;
-#X obj 256 877 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
--228856 -1 -1 595 256;
-#X text 257 894 x pos;
-#X text 317 894 y pos;
-#X obj 199 875 tgl 18 0 empty empty empty 17 7 0 10 -228856 -1 -1 0
+#X text 379 974 delta x;
+#X obj 324 957 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+-228856 -1 -1 581 256;
+#X obj 266 957 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+-228856 -1 -1 1062 256;
+#X text 267 974 x pos;
+#X text 327 974 y pos;
+#X obj 209 955 tgl 18 0 empty empty empty 17 7 0 10 -228856 -1 -1 0
 1;
-#X text 190 894 click;
-#X obj 262 797 tgl 15 0 empty empty empty 17 7 0 10 -228856 -1 -1 1
+#X text 200 974 click;
+#X obj 272 877 tgl 15 0 empty empty empty 17 7 0 10 -228856 -1 -1 1
 1;
-#X text 280 797 polling on/off with [metro];
-#X msg 127 812 zero;
-#X msg 85 812 reset;
-#X text 31 493 CYCLONE LIBRARY MOUSESTATE - WINDOWS AND OSX VERSION
+#X text 290 877 polling on/off with [metro];
+#X msg 137 892 zero;
+#X msg 95 892 reset;
+#X text 41 573 CYCLONE LIBRARY MOUSESTATE - WINDOWS AND OSX VERSION
 ;
-#X obj 261 820 metro 50;
-#X text 68 588 Mode 0 (default) uses "screen-relative coordinates"
+#X obj 271 900 metro 50;
+#X text 78 668 Mode 0 (default) uses "screen-relative coordinates"
 \, where (0 \, 0) is the top left corner of the primary display.;
-#X msg 134 786 mode \$1;
-#X obj 134 730 vradio 15 1 0 3 empty empty empty 0 -8 0 10 -228856
+#X msg 144 866 mode \$1;
+#X obj 144 810 vradio 15 1 0 3 empty empty empty 0 -8 0 10 -228856
 -1 -1 0;
-#X text 157 729 mode 0: screen relative;
-#X text 157 744 mode 1: patch relative;
-#X text 157 759 mode 2: front-most patch relative;
-#X text 66 541 There are 3 different modes in [mousestate] that define
+#X text 167 809 mode 0: screen relative;
+#X text 167 824 mode 1: patch relative;
+#X text 167 839 mode 2: front-most patch relative;
+#X text 76 621 There are 3 different modes in [mousestate] that define
 what the coordinate (0 \, 0) of the (x \, y) position point is in relation
 to.;
-#X text 68 624 Mode 1 uses "patch-relative coordinates" \, where (0
+#X text 78 704 Mode 1 uses "patch-relative coordinates" \, where (0
 \, 0) is the top left corner of the patch area where the object is.
 ;
-#X text 68 663 Mode 2 uses "front-most patch-relative coordinates"
+#X text 78 743 Mode 2 uses "front-most patch-relative coordinates"
 \, where (0 \, 0) is the top left corner of the front patch - try by
 selectring the parent patch for example.;
+#X obj 1035 664 vradio 15 1 0 3 empty empty empty 0 -8 0 10 -228856
+-1 -1 0;
+#X text 1058 663 mode 0: screen relative;
+#X text 1058 678 mode 1: patch relative;
+#X text 1058 693 mode 2: front-most patch relative;
+#X obj 933 699 tgl 15 0 empty empty empty 17 7 0 10 -228856 -1 -1 0
+1;
+#X text 731 697 polling on/off with [metro];
+#X floatatom 984 666 5 0 0 0 - - -;
+#X text 777 666 Polling speed (50ms default);
+#X text 732 809 outputs list of all values;
+#X obj 933 785 prepend set;
+#X msg 933 809 username mouse 0 1062 581 0 0;
+#X obj 933 761 mouser username;
+#X obj 933 854 r username_control;
+#X obj 933 878 prepend set;
+#X msg 933 902 username mouse 0 1062 581 0 0;
+#X text 33 363 MOUSE CONTROLLER - SIMPLE OSX VERSION;
+#X obj 933 728 tgl 15 0 empty empty empty 17 7 0 10 -228856 -1 -1 1
+1;
+#X text 772 726 polling on/off toggle;
+#X text 600 760 open inlet for messages to cyclone/mousestate;
 #X connect 4 0 7 0;
-#X connect 4 0 14 0;
+#X connect 4 0 13 0;
 #X connect 5 0 6 0;
-#X connect 6 0 13 0;
+#X connect 6 0 12 0;
 #X connect 7 0 5 0;
-#X connect 11 0 12 0;
-#X connect 11 0 16 0;
-#X connect 11 1 15 0;
-#X connect 14 0 11 0;
+#X connect 10 0 11 0;
+#X connect 10 0 15 0;
+#X connect 10 1 14 0;
+#X connect 13 0 10 0;
+#X connect 15 0 16 0;
 #X connect 16 0 17 0;
-#X connect 16 0 18 0;
-#X connect 18 0 19 0;
-#X connect 18 1 20 0;
-#X connect 18 2 21 0;
+#X connect 16 1 18 0;
+#X connect 16 2 19 0;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
 #X connect 21 0 22 0;
-#X connect 22 0 23 0;
-#X connect 23 0 24 0;
-#X connect 26 0 27 0;
-#X connect 27 0 38 0;
-#X connect 27 1 35 0;
-#X connect 27 2 34 0;
-#X connect 27 3 32 0;
-#X connect 27 4 31 0;
-#X connect 28 0 27 0;
-#X connect 29 0 27 0;
-#X connect 40 0 45 0;
-#X connect 42 0 27 0;
-#X connect 43 0 27 0;
-#X connect 45 0 27 0;
-#X connect 47 0 27 0;
-#X connect 48 0 47 0;
+#X connect 24 0 25 0;
+#X connect 25 0 36 0;
+#X connect 25 1 33 0;
+#X connect 25 2 32 0;
+#X connect 25 3 30 0;
+#X connect 25 4 29 0;
+#X connect 26 0 25 0;
+#X connect 27 0 25 0;
+#X connect 38 0 43 0;
+#X connect 40 0 25 0;
+#X connect 41 0 25 0;
+#X connect 43 0 25 0;
+#X connect 45 0 25 0;
+#X connect 46 0 45 0;
+#X connect 53 0 64 4;
+#X connect 57 0 64 2;
+#X connect 59 0 64 3;
+#X connect 62 0 63 0;
+#X connect 64 0 62 0;
+#X connect 65 0 66 0;
+#X connect 66 0 67 0;
+#X connect 69 0 64 1;
 #X restore 227 332 pd more_control;
 #N canvas 0 23 450 300 more_structure 0;
 #X obj 28 50 hamilr4_etude_1 one 2 three;

mouser.pd

@@ -0,0 +1,81 @@
+#N canvas 0 23 1113 647 12;
+#X msg 166 159 poll;
+#X obj 156 196 cyclone/mousestate, f 39;
+#X msg 156 131 nopoll;
+#X obj 124 154 bng 18 250 50 0 empty empty empty 17 7 0 10 -228856
+-1 -1;
+#X text 384 239 delta y;
+#X obj 387 221 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+-228856 -1 -1 0 256;
+#X obj 329 221 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+-228856 -1 -1 0 256;
+#X text 326 238 delta x;
+#X obj 271 221 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+-228856 -1 -1 103 256;
+#X obj 213 221 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
+-228856 -1 -1 443 256;
+#X text 214 238 x pos;
+#X text 274 238 y pos;
+#X obj 156 219 tgl 18 0 empty empty empty 17 7 0 10 -228856 -1 -1 0
+1;
+#X text 147 238 click;
+#X obj 219 141 tgl 15 0 empty empty empty 17 7 0 10 -228856 -1 -1 0
+1;
+#X text 237 141 polling on/off with [metro];
+#X msg 84 156 zero;
+#X msg 42 156 reset;
+#X obj 218 164 metro 50;
+#X msg 643 151 mode \$1;
+#X obj 643 95 vradio 15 1 0 3 empty empty empty 0 -8 0 10 -228856 -1
+-1 0;
+#X text 666 94 mode 0: screen relative;
+#X text 666 109 mode 1: patch relative;
+#X text 666 124 mode 2: front-most patch relative;
+#X obj 618 69 inlet;
+#X obj 568 69 inlet;
+#X obj 518 69 inlet;
+#X obj 160 70 loadbang;
+#X obj 164 283 pack f f f f;
+#X obj 164 384 list prepend \$1;
+#X obj 164 410 s \$1_control;
+#X obj 100 411 outlet;
+#X obj 157 311 list prepend;
+#X obj 156 262 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 164 356 list prepend mouse;
+#X obj 116 70 inlet;
+#X obj 269 70 inlet;
+#X obj 269 94 select 0 1;
+#X connect 0 0 1 0;
+#X connect 1 0 12 0;
+#X connect 1 1 9 0;
+#X connect 1 2 8 0;
+#X connect 1 3 6 0;
+#X connect 1 4 5 0;
+#X connect 2 0 1 0;
+#X connect 3 0 1 0;
+#X connect 5 0 28 3;
+#X connect 6 0 28 2;
+#X connect 8 0 28 1;
+#X connect 9 0 28 0;
+#X connect 12 0 32 1;
+#X connect 12 0 33 0;
+#X connect 14 0 18 0;
+#X connect 16 0 1 0;
+#X connect 17 0 1 0;
+#X connect 18 0 1 0;
+#X connect 19 0 1 0;
+#X connect 20 0 19 0;
+#X connect 24 0 19 0;
+#X connect 25 0 18 1;
+#X connect 26 0 18 0;
+#X connect 27 0 0 0;
+#X connect 28 0 32 0;
+#X connect 29 0 30 0;
+#X connect 29 0 31 0;
+#X connect 32 0 34 0;
+#X connect 34 0 29 0;
+#X connect 35 0 1 0;
+#X connect 36 0 37 0;
+#X connect 37 0 2 0;
+#X connect 37 1 0 0;