newswan

回复 5# qd2024

定义每个 order，然后根据 文件数量选择某个 order

set order16=08 09 10 07 06 11 12 05 04 13 14 03 02 15 16 01
set order32=

set order =!order%n%!
set/a i=0
for %%a in ( %order% ) do (
	set/a i+=1
	echo   !i!  %%a
)
复制代码

newswan

分析了一个，规律是这样的

 08  09  10  07
 06  11  12  05
 04  13  14  03
 02  15  16  01
复制代码

newswan

回复 9# qd2024


    首先，不能把批处理放图片文件夹里，图片文件夹作为参数 发给批处理

newswan

把文件夹拖到bat上面

@echo off
SETLOCAL ENABLEDELAYEDEXPANSION

set order16= 08 09 10 07 06 11 12 05 04 13 14 03 02 15 16 01

set f=%1
for /f "delims=" %%i in ('dir /b /s /a-d "%f%" 2^>nul ^| find /c /v ""') do (
	set n=%%i
)

set order=!order%n%!
set/a i=0
for %%a in ( %order% ) do (
	set/a i+=1
	echo ren   测试_!i!.jpg  %%a.jpg
)

pause
复制代码

newswan

@echo off
SETLOCAL ENABLEDELAYEDEXPANSION

set order16= 08 09 10 07 06 11 12 05 04 13 14 03 02 15 16 01

set f=%1
for /f "delims=" %%i in ('dir /b /s /a-d "%f%" 2^>nul ^| find /c /v ""') do (
	set n=%%i
)

echo,
echo folder:     %f%
echo file count: %n%
echo,

set order=!order%n%!
set/a i=0
for %%a in ( %order% ) do (
	set/a i+=1
	echo ren   测试_!i!.jpg  %%a.jpg
)

echo,
echo, complete

pause
复制代码

newswan

回复 14# qd2024


    如果命令显示正确， echo ren 改成 ren

newswan

你对比一下啊

newswan

还有，我看你的文件名，
有的是 01 02
有的是 1 2
？

newswan

加了判断  前面有没有0
有没有三位数的？

@echo off
SETLOCAL ENABLEDELAYEDEXPANSION

cd %~dp0

set order16= 08 09 10 07 06 11 12 05 04 13 14 03 02 15 16 01

set f=%1
for /f "delims=" %%i in ('dir /b /s /a-d "%f%" 2^>nul ^| find /c /v ""') do (
	set n=%%i
)

echo,
echo folder:     %f%
echo file count: %n%
echo,

pushd %f%
cd
set order=!order%n%!
set/a i=0
for %%a in ( %order% ) do (
	set/a i+=1
	if exist 测试_!i!.jpg (set j=!i!) else (set j=0!i!)
	echo ren   测试_!j!.jpg  %%a.jpg
)
popd

echo,
echo, complete

pause
复制代码

newswan

页码规律，powershell

function get-order() {
	param(
		[int]$n
	)

	$r = $n /4
	$c = 4
	
	$order =  [System.Array]::CreateInstance([int], ($n + 1))
	
	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 1
		$x = ($r + 1) - $i
		$y = 4
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}

	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 2
		$x = ($r + 1) - $i
		$y = 1
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}

	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 1 + ( $n / 2 )
		$x = $i
		$y = 2
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}

	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 2 + ( $n / 2 )
		$x = $i
		$y = 3
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}
	return ( $order[1..$n] -join " ")
}

$order = get-order 72

write-host $order
复制代码

newswan

回复 21# qd2024

if exist 测试_!i!.jpg (set j=!i!) else (set j=0!i!)
复制代码

改成

if exist 测试_!i!.jpg (set j=!i!)
if exist 测试_0!i!.jpg (set j=0!i!)
if exist 测试_00!i!.jpg (set j=00!i!)
复制代码

newswan

保存为 xxx.ps1
调用

powershell -file xxx.ps1 128
复制代码

param(
	[int]$n
)

function get-order() {
	param(
		[int]$n
	)

	$r = $n /4
	$c = 4
	
	$order =  [System.Array]::CreateInstance([int], ($n + 1))
	
	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 1
		$x = ($r + 1) - $i
		$y = 4
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}

	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 2
		$x = ($r + 1) - $i
		$y = 1
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}

	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 1 + ( $n / 2 )
		$x = $i
		$y = 2
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}

	for ( $i = 1 ; $i -le $r ; $i++ ) {
		$num = ($i -1) *2 + 2 + ( $n / 2 )
		$x = $i
		$y = 3
		$idx = ( ($x -1) *4 ) + $y
	#	Write-Host $num  $idx
		$order[$idx] = $num
	}
	return ( $order[1..$n] -join " ")
}

if ( $n % 4 -eq 0 ) {
	$order = get-order $n
	write-host $order
}
复制代码

newswan

回复 25# qd2024

@echo off
SETLOCAL ENABLEDELAYEDEXPANSION

cd %~dp0
set folder=%1

set order16= 08 09 10 07 06 11 12 05 04 13 14 03 02 15 16 01
for /f "usebackq delims=" %%i in (` dir /b /a-d "%folder%" 2^>nul ^| find /c /v "" `) do (
	set n=%%i
)
set order=!order%n%!

echo,
echo folder:     %folder%
echo file count: %n%
echo,

pushd %folder%

for /f "usebackq" %%a in (` dir /b .`) do (
	for /f "tokens=2 delims=_" %%a in ("%%~na") do (
		set idxScan=%%a
	)
	call :C_idx_scan_to_real order idxScan idxReal
	echo ren  %%a  !idxReal!%%~xa
)

popd

echo,
echo, ----complete----
echo,

pause
exit/b

:C_idx_scan_to_real
setlocal
set order=!%1!
set idx=!%2!

set /a i=0
for %%a in ( %order% ) do (
	set /a i+=1
	if "!i!" == "%idx%" set idx=%%a
)

(
endlocal
set %3=%idx%
)
goto :eof
复制代码

newswan

删除第25行 echo

newswan

调用

x.ps1 16
复制代码

param(
	[int]$count
)

function get-idxReal() {
	param(
		[int]$count ,
		[int]$idxScan
	)
	$r = [math]::Ceiling( $idxScan / 4 )
	$c = $idxScan - ($r-1)*4
	$idxReal = switch( $c ) {
		1 { $count/2 + 0 - ($r-1)*2 }
		2 { $count/2 + 1 + ($r-1)*2 }
		3 { $count/2 + 2 + ($r-1)*2 }
		4 { $count/2 - 1 - ($r-1)*2 }
	}
	return $idxReal
}

$order =  [System.Array]::CreateInstance([int], ($count + 1))

if ( ($count % 4) -eq 0 ) {
	1..$count | ForEach-Object {
		$order[$_] = get-idxReal $count $_
	}
}
$order[1..$count]  -join ' '
复制代码