XYplorer Beta Club
Ooh your script is very interesting! I like that ability to drag and drop the most! And haha yes, can't wait for Virtual Folders. For the longest time, I have been setting the "Label" button and the "Find Label" button and using these two extensively as a "container" for so long. Just got a bit tired of that hehe. Now we have multiple cooler ways of doing it!
Have you also tried my script? One of the things I like about mine is that I thought it was quite straightforward and that you can easily edit the stuff in the containers.
EDIT: Oh yeah. I renamed certain things hoping that it's a bit clearer. No other changes.
Code: Select all
"_Initialize"
Perm $Selections;
Perm $Selections2;
Perm $SelectionStore;
If $SelectionStore == "" {
$SelectionStore = 1; }
"Add Selected Item(s)"
End ("<selitems>"==""),"Nothing Is Selected!";
$CountItems = Get("CountSelected");
If $SelectionStore == 2 {
$Selections2 = "$Selections2"."|".Get("SelectedItemsPathNames","|");
$Selections2 = FormatList("$Selections2","ned"); }
Else {
$Selections = "$Selections"."|".Get("SelectedItemsPathNames","|");
$Selections = FormatList("$Selections","ned"); }
Status "$CountItems Item(s) Added to Selection Store #$SelectionStore.",,"ready";
"Remove Selected Item(s)"
End ("<selitems>"==""),"Nothing Is Selected!";
$CountItems = Get("CountSelected");
Global $SelectionsRemove = Get("SelectedItemsPathNames","|");
If $SelectionStore == 2 {
ForEach($Item,$SelectionsRemove,"|") {
$Selections2 = Replace($Selections2,$Item,,1); }
$Selections2 = FormatList("$Selections2","ned"); }
Else {
ForEach($Item,$SelectionsRemove,"|") {
$Selections = Replace($Selections,$Item,,1); }
$Selections = FormatList("$Selections","ned"); }
Status "$CountItems Item(s) Removed from Selection Store #$SelectionStore.",,"alert";
""
"Edit Store"
If $SelectionStore == 2 {
If $Selections2 > 0 {
$Contents2 = Replace($Selections2,"|","<crlf>");
$Selections2 = Input("Edit Selection Store #2",,$Contents2,m);
$Selections2 = Replace($Selections2,"<crlf>","|");
$Selections2 = FormatList("$Selections2","ned"); }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
Else {
If $Selections > 0 {
$Contents = Replace($Selections,"|","<crlf>");
$Selections = Input("Edit Selection Store #1",,$Contents,m);
$Selections = Replace($Selections,"<crlf>","|");
$Selections = FormatList("$Selections","ned"); }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
"Show Store"
If $SelectionStore == 2 {
If $Selections2 > 0 {
Tag SelectionStoreItems,$Selections2,1;
Goto "*?Tags:SelectionStoreItems /r";
Tag SelectionStoreItems,$Selections2,1,2;
Tab(Rename, "Selection Store #$SelectionStore"); }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
Else {
If $Selections > 0 {
Tag SelectionStoreItems,$Selections,1;
Goto "*?Tags:SelectionStoreItems /r";
Tag SelectionStoreItems,$Selections,1,2;
Tab(Rename, "Selection Store #$SelectionStore"); }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
"Copy Store Item(s) to Clipboard"
If $SelectionStore == 2 {
If $Selections2 > 0 {
Copy $Selections2; }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
Else {
If $Selections > 0 {
Copy $Selections; }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
""
"Copy Store Item(s) to Here"
If $SelectionStore == 2 {
If $Selections2 > 0 == 1 {
CopyTo <curtab>,$Selections2; }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
Else {
If $Selections > 0 == 1 {
CopyTo <curtab>,$Selections; }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
"Move Store Item(s) to Here"
If $SelectionStore == 2 {
If $Selections2 > 0 == 1 {
MoveTo <curtab>,$Selections2; }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
Else {
If $Selections > 0 == 1 {
MoveTo <curtab>,$Selections; }
Else {
Status "No Item(s) in Selection Store #$SelectionStore.",,"alert"; } }
""
"Clear Selection Store #1"
$Clear = Confirm("Are You Sure You Want To Clear Selection Store #1?");
End ($Clear == 0);
Unset $Selections;
Status "Selection Store #1 Cleared!",,"alert";
"Clear Selection Store #2"
$Clear = Confirm("Are You Sure You Want To Clear Selection Store #2?");
End ($Clear == 0);
Unset $Selections2;
Status "Selection Store #2 Cleared!",,"alert";
"Clear All Selection Store"
$Clear = Confirm("Are You Sure You Want To Clear All Selection Store?");
End ($Clear == 0);
Unset $Selections, $Selections2, $SelectionStore;
Msg "All Cleared! Selection Store #1 Will Activate at Next Start.";
""
"Activate Selection Store #1"
$SelectionStore = 1;
Msg "Selection Store #1 Activated.";
"Activate Selection Store #2"
$SelectionStore = 2;
Msg "Selection Store #2 Activated.";
