#N canvas 119 64 638 465 10; #X obj 74 370 cursor; #X msg 74 335 bang; #X text 105 335 get the current mouse position; #X obj 338 383 pddp/pddplink http://tcl.tk/man/tcl8.4/TkCmd/cursors.htm ; #X text 223 366 Here's a complete list of the available cursors:; #X msg 335 124 boat; #X msg 295 124 clock; #X msg 441 124 dot; #X msg 518 124 gumby; #X msg 561 124 gobbler; #X msg 370 124 coffee_mug; #X msg 471 124 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 227 16 inlet; #X msg 116 192 set \$1 \$2; #X obj 115 220 trigger bang anything; #X connect 0 0 4 0; #X connect 2 0 6 0; #X connect 3 0 2 1; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 6 0 7 0; #X connect 7 0 1 0; #X connect 7 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 74 399 pddp/print; #X msg 110 120 editmode_nothing; #X obj 169 286 cursor; #X text 342 258 <-- this is the actual message to send; #X obj 56 308 metro 100; #X obj 56 286 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 229 398 Here are some pictures of the cursors:; #X obj 337 414 pddp/pddplink http://www.lehigh.edu/~sol0/ptk/cursors.gif ; #X msg 126 139 editmode_connect; #X msg 143 158 editmode_disconnect; #X msg 169 259 editmode_disconnect pirate; #X text 290 55 first pick a cursor:; #X text 189 80 <-- then choose your cursor mode; #X connect 0 0 17 0; #X connect 1 0 0 0; #X connect 5 0 13 1; #X connect 6 0 13 1; #X connect 7 0 13 1; #X connect 8 0 13 1; #X connect 9 0 13 1; #X connect 10 0 13 1; #X connect 11 0 13 1; #X connect 12 0 13 0; #X connect 13 0 28 0; #X connect 14 0 13 0; #X connect 15 0 13 0; #X connect 16 0 13 0; #X connect 18 0 13 0; #X connect 21 0 0 0; #X connect 22 0 21 0; #X connect 26 0 13 0; #X connect 27 0 13 0; #X connect 28 0 19 0;