XYplorer\Scripts\rhoelzl.xys
Code: Select all
$Base = "<curbase>"; $array=""; sel 1; while(1){ if ("<curbase>"==$Base){$array =
$array . "|<curname>";} sel +1; if("<curname>"==""){break;} } selfilter($array);#121;Code: Select all
|"Rename file set ''<curbase>''" *>::load "rhoelzl";EDIT: wait.
This didn't works with some other test files, it still selects to much.
DSC_1234.bak.JPG
DSC_1234.bak.NEF
DSC_1234.bak.PNG
DSC_1234.bak.PSD
DSC_1234.bak.XMP
DSC_1234.JPG
DSC_1234.NEF
DSC_1234.PNG
DSC_1234.PSD
DSC_1234.XMP
Test.DSC_1234.JPG
Test.DSC_1234.NEF
Test.DSC_1234.PNG
Test.DSC_1234.PSD
Test.DSC_1234.XMP
XYplorer Beta Club