unmark notes before deleting by selection;

make sure to move/copy only selected _active_ notes (ignore inactive, even if they're are marked)

unpunch.pd

@@ -3476,7 +3476,7 @@ by clicking on two coordinates on the grid with Mod-key pressed.;
 #X connect 2 0 0 0;
 #X connect 3 0 2 0;
 #X restore 16 191 pd note.unselect;
-#N canvas 269 466 348 183 delete.selection 0;
+#N canvas 269 532 348 183 delete.selection 0;
 #X obj 11 27 r \$0.delete.selection;
 #N canvas 371 289 393 275 get.selection 0;
 #X obj 20 7 inlet;
@@ -3506,15 +3506,21 @@ by clicking on two coordinates on the grid with Mod-key pressed.;
 #X connect 10 2 6 0;
 #X connect 11 0 8 0;
 #X restore 11 53 pd get.selection;
-#X msg 11 78 note delete \$1;
-#X obj 11 101 s \$0.global.send;
+#X msg 11 108 note delete \$1;
+#X obj 11 131 s \$0.global.send;
+#X msg 183 66 \$1 0;
+#X obj 183 89 s \$0.marked;
+#X obj 11 76 t a a;
 #X connect 0 0 1 0;
-#X connect 1 0 2 0;
+#X connect 1 0 6 0;
 #X connect 2 0 3 0;
+#X connect 4 0 5 0;
+#X connect 6 0 2 0;
+#X connect 6 1 4 0;
 #X restore 243 40 pd delete.selection;
 #X text 244 17 KEY COMMANDS;
 #N canvas 234 180 599 558 move.selection 0;
-#N canvas 371 289 393 275 get.selection 0;
+#N canvas 371 322 355 409 get.selection 0;
 #X obj 20 7 inlet;
 #X msg 20 64 1000;
 #X obj 20 87 until;
@@ -3522,25 +3528,36 @@ by clicking on two coordinates on the grid with Mod-key pressed.;
 #X msg 75 62 0;
 #X obj 20 110 f;
 #X obj 100 119 + 1;
-#X obj 20 156 tabread \$0.marked;
-#X obj 20 229 outlet;
+#X obj 20 356 outlet;
 #X obj 20 179 pack f f;
 #X obj 20 133 t a a a;
 #X obj 20 202 route 1;
+#X obj 20 156 tabread \$0.active;
+#X obj 20 284 pack f f;
+#X obj 20 307 route 1;
+#X obj 20 238 t a a;
+#X obj 20 261 tabread \$0.marked;
+#X text 147 155 only active;
+#X text 144 261 only selected;
 #X connect 0 0 3 0;
 #X connect 1 0 2 0;
 #X connect 2 0 5 0;
 #X connect 3 0 1 0;
 #X connect 3 1 4 0;
 #X connect 4 0 5 1;
-#X connect 5 0 10 0;
+#X connect 5 0 9 0;
 #X connect 6 0 5 1;
-#X connect 7 0 9 0;
+#X connect 8 0 10 0;
 #X connect 9 0 11 0;
-#X connect 10 0 7 0;
-#X connect 10 1 9 1;
-#X connect 10 2 6 0;
+#X connect 9 1 8 1;
+#X connect 9 2 6 0;
+#X connect 10 0 14 0;
 #X connect 11 0 8 0;
+#X connect 12 0 13 0;
+#X connect 13 0 7 0;
+#X connect 14 0 15 0;
+#X connect 14 1 12 1;
+#X connect 15 0 12 0;
 #X restore 48 314 pd get.selection;
 #X obj 17 19 r \$0.move.up.selection;
 #X obj 51 41 r \$0.move.down.selection;