Forum for XYplorer Users and Developers
https://www.xyplorer.com/xyfc/
I don't know much about the "icon lists" feature. I'll look into it. I like the tagging system you have in place for custom fields and ratings because they're stored in a text file. Easy to batch import, export, and manipulate. Also peace of mind that the data will always be accessible and all that work of rating things won't one day be gone because of a new file format. (which has happened to me 2 times already with mp3 player software.)admin wrote:You could use the new "icon lists" feature (will release 17.90 today) to create a 10 star system (and design your own stars). But I could also extend the current system to 10 stars. Unfortunately there does not seem to be a Unicode character for half-star. But there might be other symbols/solutions.
Exactly why I did it that way.photoman wrote:Also peace of mind that the data will always be accessible and all that work of rating things won't one day be gone because of a new file format. (which has happened to me 2 times already with mp3 player software.)
Yep, looks good to me, too.photoman wrote:Just thinking of a quick solution now, I guess using the empty star as a half might be easy to understand. Looks pretty clean to my eyes.
☆
★
★☆
★★
★★☆
★★★
★★★☆
★★★★
★★★★☆
★★★★★
Code: Select all
$empty = chr(13);
$rating = <<<>>>
$empty
☆
★
★☆
★★
★★☆
★★★
★★★☆
★★★★
★★★★☆
★★★★★
>>>;
$rating = regexreplace($rating, "^[ ]*");
$index = popupmenu($rating, , , , , 1, <crlf>, 0);
if ($index == 0) { end true; }
elseif ($index == 1) { $match = ""; }
else { $match = gettoken($rating, $index, <crlf>); }
tagitems(1, $match);
Thanks highend for your code. I've been trying to hack it a little so that it works more consistently with Don's implementation. Don is saving numerical values and you are saving the stars. The advantage to saving numbers is that you can do a search like this: " Rating: > 3". which is very useful. So, I did a dirty hack on your code (because I don't know the syntax of these user scripts at all) to save the values as numbers.highend wrote:You need to show the extra1 column in your list
Save the script in UTF-8 with BOM
Clicking outside the popupmenu -> nothing will happen
Clicking the first empty entry -> Tag will be nulled (no stars)
Happy tagging^^
Code: Select all
$empty = chr(13);
$rating = <<<>>>
$empty
☆
★
★☆
★★
★★☆
★★★
★★★☆
★★★★
★★★★☆
★★★★★
>>>;
$rating = regexreplace($rating, "^[ ]*");
$index = popupmenu($rating, , , , , 1, <crlf>, 0);
if ($index == 0) { end true; }
elseif ($index == 1) { $match = ""; }
else { $match = gettoken($rating, $index, <crlf>); }
if ($match =="") {$valuetosave=""}
if ($match =="☆") {$valuetosave=".5"}
if ($match =="★") {$valuetosave="1"}
if ($match =="★☆") {$valuetosave="1.5"}
if ($match =="★★") {$valuetosave="2"}
if ($match =="★★☆") {$valuetosave="2.5"}
if ($match =="★★★") {$valuetosave="3"}
if ($match =="★★★☆") {$valuetosave="3.5"}
if ($match =="★★★★") {$valuetosave="4"}
if ($match =="★★★★☆") {$valuetosave="4.5"}
if ($match =="★★★★★") {$valuetosave="5"}
tagitems(1, $valuetosave);
Code: Select all
$empty = chr(13);
$rating = <<<>>>
$empty
☆
★
★☆
★★
★★☆
★★★
★★★☆
★★★★
★★★★☆
★★★★★
>>>;
$rating = regexreplace($rating, "^[ ]*");
$index = popupmenu($rating, , , , , 1, <crlf>, 0);
if ($index == 0) { end true; }
elseif ($index == 1) { $match = ""; }
else { $match = ($index - 1) / 2; }
tagitems(1, $match);
Code: Select all
$rating = "☆|★|★☆|★★|★★☆|★★★|★★★☆|★★★★|★★★★☆|★★★★★";
$tag = tagitems(1, , <cc_item>);
if !($tag) { return; }
else { return gettoken($rating, $tag * 2, "|"); }
Thanks. Given the current state of things, I think I'm going to go with keeping it simple and abandon the stars. Just a 0 or 1 to 10 rating, and 2 keyboard shortcuts, + and - keys to increment and decrement the rating.highend wrote:This can be done a little bit easier
Code: Select all
$empty = chr(13); $rating = <<<>>> $empty ☆ ★ ★☆ ★★ ★★☆ ★★★ ★★★☆ ★★★★ ★★★★☆ ★★★★★ >>>; $rating = regexreplace($rating, "^[ ]*"); $index = popupmenu($rating, , , , , 1, <crlf>, 0); if ($index == 0) { end true; } elseif ($index == 1) { $match = ""; } else { $match = ($index - 1) / 2; } tagitems(1, $match);
Why that?and abandon the stars
Well, because there doesn't seem to be a way to display the stars AND save them as numbers between 1 to 5 in tag.dat. If they aren't saved as numbers, then I can't search for "Rating: > 3", i.e. show me all the mp3s in this folder that have a high rating so I can make a playlist (for example).highend wrote:Why that?and abandon the stars
Code: Select all
foreach($ff, <get selecteditemspathnames |>) {
$x=tagitems(1,,$ff) - 1;
if $x < -1 {$x= -1}
if $x == 0{$x=""}
tagitems(1,$x,$ff);
}
Code: Select all
foreach($ff, <get selecteditemspathnames |>) {
$x=tagitems(1,,$ff) + 1;
if $x > 11 {$x=11}
if $x == 0 {$x=""}
tagitems(1,$x,$ff);
}
But my last posting contains two scripts that do exactly this?Well, because there doesn't seem to be a way to display the stars AND save them as numbers between 1 to 5 in tag.dat.
Maybe I didn't understand a few things about your post. In the first script, there was a popup menu to select stars, but the star column in the listbox didn't display properly.highend wrote:But my last posting contains two scripts that do exactly this?Well, because there doesn't seem to be a way to display the stars AND save them as numbers between 1 to 5 in tag.dat.
The tagging script shows stars in the popupmenu and saves values up to 5 in the tag.db corresponding to the selected stars and the cc script reads these values
and displays stars again. Ofc you can search for Rating: >3 in this case (if you column is named "Rating")...
Regarding your script(s).
Maybe the list is refreshed on each loop? Try to suppress it with the setting command + AutoRefresh / WatchDuringFileOp
Apart from that you could build star rating lists instead of tagitems on each loop (for each found tag value one list that contains the file names)
and then use tagitems on these lists (instead of tagging 100 items you only need to use tagitems only a few times)
Tagging 200 files with one call to tagitems is different from calling it two hundred times...Even with 200 files selected
aaahhh! Now it all makes sense. CC=custom column. I never played with that before.highend wrote:Add a custom column und use my "cc" script with it. That displays the stars as rating...
Yes, I got it now. That is a very true statement! Sorry, this is the first time I've looked at the scripting code so I'm not used to it yet.Tagging 200 files with one call to tagitems is different from calling it two hundred times...
Code: Select all
// Decrement stars by one
$list = "";
foreach($item, <get selecteditemspathnames |>) {
$tag = tagitems(1, , $item) - 1;
if ($tag < -1) { $tag = -1; }
if (!$tag) { $tag = ""; }
$list = $list . $tag . "|" . $item . <crlf>;
}
foreach($rating, formatlist(regexmatches($list, "^[0-9.,]+"), "des")) {
$matches = regexmatches($list, "^$rating\|.*?(?=\r?\n)");
$matches = regexreplace(formatlist($matches, "des"), "^$rating\|");
tagitems(1, $rating, $matches);
}
#485; // Refresh list