@ECHO OFF


echo.
set /p SN=请输入初始字符串:
echo.
echo    请选择生成的数字方向
echo.
echo    A、正序
echo.
echo    B、反序
echo.
echo.
set choice=
choice /c ab /M     请输入选择的字母，不区分大小写，不需要回车：
IF NOT "%Choice%"=="" SET Choice=%Choice:~0,1%
if errorlevel 2 goto fan
if errorlevel 1 goto zheng

:zheng
echo.
set a=%sn%
set var1=%a:~0,-2%
set var2=%a:~12,14%
echo %var1%%var2%

set /a var3=%var2%+1
if %var3% lss 10 (
set "var3=0%var3%")
echo %var1%%var3%

set /a var4=%var2%+2
if %var3% lss 10 (
set "var4=0%var4%")
echo %var1%%var4%

set /a var5=%var2%+3
if %var5% lss 10 (
set "var5=0%var5%")
echo %var1%%var5%

set /a var6=%var2%+4
if %var6% lss 10 (
set "var6=0%var6%")
echo %var1%%var6%

set /a var7=%var2%+5
if %var7% lss 10 (
set "var7=0%var7%")
echo %var1%%var7%

set /a var8=%var2%+6
if %var8% lss 10 (
set "var8=0%var8%")
echo %var1%%var8%

set /a var9=%var2%+7
if %var9% lss 10 (
set "var9=0%var9%")
echo %var1%%var9%

set /a var10=%var2%+8
if %var10% lss 10 (
set "var10=0%var10%")
echo %var1%%var10%

set /a var11=%var2%+9
if %var11% lss 10 (
set "var11=0%var11%")
echo %var1%%var11%

echo.
goto end

:fan
echo.
set a=%sn%
set var1=%a:~0,-2%
set var2=%a:~12,14%
echo %var1%%var2%

set /a var3=%var2%-1
if %var3% lss 10 (
set "var3=0%var3%")
echo %var1%%var3%

set /a var4=%var2%-2
if %var4% lss 10 (
set "var4=0%var4%")
echo %var1%%var4%

set /a var5=%var2%-3
if %var5% lss 10 (
set "var5=0%var5%")
echo %var1%%var5%

set /a var6=%var2%-4
if %var6% lss 10 (
set "var6=0%var6%")
echo %var1%%var6%

set /a var7=%var2%-5
if %var7% lss 10 (
set "var7=0%var7%")
echo %var1%%var7%

set /a var8=%var2%-6
if %var8% lss 10 (
set "var8=0%var8%")
echo %var1%%var8%

set /a var9=%var2%-7
if %var9% lss 10 (
set "var9=0%var9%")
echo %var1%%var9%

set /a var10=%var2%-8
if %var10% lss 10 (
set "var10=0%var10%")
echo %var1%%var10%

set /a var11=%var2%-9
if %var11% lss 10 (
set "var11=0%var11%")
echo %var1%%var11%

echo.
goto end

goto end
:end
pause
复制代码

@echo off
echo.
set /p sn=请输入初始字符串:
echo.
set /p num=请输入生成的序列号数量:
echo.
echo    A、正序  B、反序
echo.
set /p choice=请选择生成的数字方向(A/B，区分大小写):

set a=%sn%
set var1=%a:~0,8%
set var2=%a:~8,6%
if "%choice%"=="A" (
set d=+
) else (
set d=-
)

set c=0
:m
echo %var1%%var2%>>序列号.txt
set /a var2=var2%d%1
set /a c=c+1
if %c% lss %num% goto :m else (
echo 完成
)
pause
复制代码

@echo off
@rem 保存为ANSI格式
set SN=BBC3308Y289263
set "n="
:SN_loop
set n1=%SN:~-1%
if %n1% GEQ 0 if %n1% LEQ 9 (
	set n=%n1%%n%
	set SN=%SN:~0,-1%
	goto :SN_loop
)
echo;
set /a n1=n+10
for /l %%a in (%n%,1,%n1%) do echo;%SN%%%a
echo;
set /a n1=n-10
for /l %%a in (%n%,-1,%n1%) do echo;%SN%%%a
复制代码

@echo off
set /p SN=请输入初始字符串:
set /p NUM=请输入生成数量：
set /p SEQ=请选择正反序（输入字母P为正序，输入其它字母为反）:
set var=%SN:~,8%
set n=%SN:~-6%
if /i %SEQ% equ P (
    set /a SV=%n%
    set /a EV=%n%+%num%-1
) else (
    set /a EV=%n%
    set /a SV=%n%-%num%+1
)
(for /l %%i in (%SV%,1,%EV%) do echo,%var%%%i)
pause
复制代码

<# :
@echo off
powershell -NoProfile -ExecutionPolicy bypass "Get-Content -literal '%~f0' |Out-String|Invoke-Expression"
pause
#>
$a=Read-Host "请输入初始字符串"
$b=Read-Host "请输入生成数量"
$c=Read-Host "请选择正反序(输入1为正序，输入-1为反)"
[int]$a.Substring(8)..([int]$a.Substring(8)+[int]$b*[int]$c-[int]$c)|%{$a.Substring(0,8)+$_.tostring()}
复制代码

@echo off
setlocal enabledelayedexpansion
set /p SN=请输入初始字符串（大于6个字符，后6位必须为数字）:
set /p NUM=请输入生成数量：
set /p SEQ=请选择正反序（输入+为正序，输入-为反序）:
set "var=%SN:~0,-6%"
set /a n1 = 1%SN:~-6%, n2 = n1 %SEQ% ( NUM - 1 )
for /L %%i in (%n1%,%SEQ%1,%n2%) do (
    set "s=%%i"
    echo;%var%!s:~-6!
)
pause
复制代码