#N canvas 121 272 642 509 10; #X obj 136 401 pddp/print; #X obj 95 342 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0 1; #X obj 74 370 cursor; #X msg 70 318 bang; #X text 111 339 poll the mouse pointer position; #X text 101 318 get the current mouse position; #X obj 346 278 pddp/pddplink http://tcl.tk/man/tcl8.4/TkCmd/cursors.htm ; #X text 231 261 Here's a complete list of the available cursors:; #X msg 169 229 runmode_disconnect gumby; #X msg 322 151 boat; #X msg 282 151 clock; #X msg 428 151 dot; #X msg 505 151 gumby; #X msg 548 151 gobbler; #X msg 357 151 coffee_mug; #X msg 458 151 pirate; #X msg 42 44 runmode_nothing; #N canvas 0 22 462 312 make 0; #X obj 95 9 inlet; #X obj 114 258 outlet; #X obj 116 168 pack symbol symbol; #X obj 221 147 symbol; #X obj 94 51 symbol; #X obj 329 19 inlet; #X obj 126 111 trigger bang anything; #X msg 116 192 set \$1 \$2; #X obj 115 220 trigger bang anything; #X connect 0 0 4 0; #X connect 2 0 7 0; #X connect 3 0 2 1; #X connect 4 0 2 0; #X connect 5 0 6 0; #X connect 6 0 2 0; #X connect 6 1 3 0; #X connect 7 0 8 0; #X connect 8 0 1 0; #X connect 8 1 1 0; #X restore 169 205 pd make message; #X msg 59 63 runmode_clickme; #X msg 75 82 runmode_thicken; #X msg 92 101 runmode_addpoint; #X obj 67 440 pddp/print; #X msg 110 120 editmode_nothing; #X msg 126 139 runmode_connect; #X msg 143 158 runmode_disconnect; #X text 312 128 now pick a cursor:; #X obj 169 266 cursor; #X text 295 229 <-- this is the actual message to send; #X obj 25 244 metro 100; #X obj 25 218 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X text 15 18 set your mouse cursors for this patch:; #X text 201 81 <-- choose your cursor mode; #X text 237 293 Here are some pictures of the cursors:; #X obj 345 309 pddp/pddplink http://www.lehigh.edu/~sol0/ptk/cursors.gif ; #X connect 1 0 2 0; #X connect 2 0 21 0; #X connect 2 1 0 0; #X connect 3 0 2 0; #X connect 8 0 26 0; #X connect 9 0 17 1; #X connect 10 0 17 1; #X connect 11 0 17 1; #X connect 12 0 17 1; #X connect 13 0 17 1; #X connect 14 0 17 1; #X connect 15 0 17 1; #X connect 16 0 17 0; #X connect 17 0 8 0; #X connect 18 0 17 0; #X connect 19 0 17 0; #X connect 20 0 17 0; #X connect 22 0 17 0; #X connect 23 0 17 0; #X connect 24 0 17 0; #X connect 28 0 2 0; #X connect 29 0 28 0;