FORMWEXPDATATBTTNScriptWSHK GLFLBTTNWSHK GLFLBTTNScriptWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTN!to lowerWSHK GLFL,5collect,NfilelistEmpty(0) == trueprestart,1{f},@collecttruecollect,6prestart,/0,6{size 0},J0Changing filenames to lower,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},Q#echo "{top 0}" | tr '[A-Z]' '[a-z]',s?( "{top 0}" != "{top 1}" ) && ( ?{test -e "{p}/{top 1}"} != 0 )rename,.,.,<starttruestart,4rename&mv "{pop 0}" "{pop 1}",<starttruestart,1endBTTN!to upperWSHK GLFL,5collect,NfilelistEmpty(0) == trueprestart,1{f},@collecttruecollect,6prestart,/0,6{size 0},J0Changing filenames to upper,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},Q#echo "{top 0}" | tr '[a-z]' '[A-Z]',s?( "{top 0}" != "{top 1}" ) && ( ?{test -e "{p}/{top 1}"} != 0 )rename,.,.,<starttruestart,4rename&mv "{pop 0}" "{pop 1}",<starttruestart,1endBTTN'to lower (rec)WSHK GLFL,.,5collect,NfilelistEmpty(0) == trueprestart,1{F},@collecttruecollect,6prestart,/0,6{size 0},J0Changing filenames to lower,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},Secho -n "`dirname "{top 0}"`/"; echo -n "`basename "{top 0}"`" | tr '[A-Z]' '[a-z]',o;( "{top 0}" != "{top 1}" ) && ( ?{test -e "{top 1}"} != 0 )rename,.,.,<starttruestart,4rename&mv "{pop 0}" "{pop 1}",<starttruestart,1endBTTN'to upper (rec)WSHK GLFL,.,5collect,NfilelistEmpty(0) == trueprestart,1{F},@collecttruecollect,6prestart,/0,6{size 0},J0Changing filenames to lower,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},Secho -n "`dirname "{top 0}"`/"; echo -n "`basename "{top 0}"`" | tr '[a-z]' '[A-Z]',o;( "{top 0}" != "{top 1}" ) && ( ?{test -e "{top 1}"} != 0 )rename,.,.,<starttruestart,4rename&mv "{pop 0}" "{pop 1}",<starttruestart,1endBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTN)Change extensionWSHK GLFL,X*{Rs{Enter new extension (without dot):}{}},5collect,NfilelistEmpty(0) == trueprestart,2{uf},2{fE},@collecttruecollect,6prestart,/0,6{size 0},>0Changing suffix,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},{G( "{top 0}" != "{top 1}" ) && ( ?{test -e "{p}/{top 1}.{top 4}"} != 0 )rename,.,.,<starttruestart,4rename.mv "{pop 0}" "{pop 1}.{top 4}",<starttruestart,1endBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTN" NumberingWSHK GLFL,J{Rs{begin of numbering:}{1}},@"{top 4}" == ""end,\.{Rs{String between filename and numbering:}{}},5collect,NfilelistEmpty(0) == trueprestart,1{f},@collecttruecollect,6prestart,IisEmpty(1) == true realstart,5{pop 1},Bprestarttrueprestart,7 realstart,/0,6{size 0},80 Numbering,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},6findnext,_+?{test -e "{p}/{top 0}{top 5}{top 4}"} != 0rename,>expr {pop 4} + 1,Bfindnexttruefindnext,4rename4$mv "{top 0}" "{pop 0}{top 5}{top 4}",>expr {pop 4} + 1,<starttruestart,1endBTTN4Num New Name/Same ExtensionWSHK GLFL,J{Rs{Begin of numbering:}{1}},@"{top 4}" == ""end,A{Rs{Prefix:}{pre-}},5collect,NfilelistEmpty(0) == trueprestart,1{f},@collecttruecollect,6prestart,IisEmpty(1) == true realstart,5{pop 1},Bprestarttrueprestart,7 realstart,/0,6{size 0},80 Numbering,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},j<echo "{top 0}" | sed -n s/'[^\\.]*\\.\\([^\\.]*\\)'/'\\1'/gp,6findnext,`,?{test -e "{p}/{top 5}{top 4}.{top 6}"} != 0rename,>expr {pop 4} + 1,Bfindnexttruefindnext,4rename5%mv "{pop 0}" "{top 5}{top 4}.{pop 6}",>expr {pop 4} + 1,<starttruestart,1endBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTN:!Num New Name/Same Ext/fix decimal/WSHK GLFL,J{Rs{Begin of numbering:}{1}},@"{top 4}" == ""end,E {Rs{decimal count:}{3}},@"{top 9}" == ""end,A{Rs{Prefix:}{pre-}},5collect,NfilelistEmpty(0) == trueprestart,1{f},@collecttruecollect,6prestart,IisEmpty(1) == true realstart,5{pop 1},Bprestarttrueprestart,7 realstart,/0,6{size 0},80 Numbering,3start,>expr {pop 2} + 1,CisEmpty(0) == trueend,Lexpr {top 2} \\* 100 / {top 3},j<echo "{top 0}" | sed -n s/'[^\\.]*\\.\\([^\\.]*\\)'/'\\1'/gp,6findnext,5{top 4},/1,: countdecimal,E"{top 7}" < 10 buildnum1,>expr {pop 8} + 1,?expr {pop 7} / 10,J countdecimaltrue counddecimal,7 buildnum1,5 {top 4},7 buildnum2,H"{top 8}" >="{top 9}"etest,7 0{top 10},>expr {pop 8} + 1,D buildnum2true buildnum2,3etest,a-?{test -e "{p}/{top 5}{top 10}.{top 6}"} != 0rename,>expr {pop 4} + 1,Bfindnexttruefindnext,4rename6&mv "{pop 0}" "{top 5}{top 10}.{pop 6}",>expr {pop 4} + 1,<starttruestart,1endBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTN" GoGo-ListWSHK GLFL,O!{Rs{Enter bitrate in KBit:}{128}}#gogo {f} -b {top 0}BTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFLBTTNWSHK GLFL