批处理之家 - Powered by Discuz! Board

标题: [文本处理] 求助批处理任意两个字母组合五位 [打印本页]

作者: 1147605696 时间: 2021-9-29 18:08 标题: 求助批处理任意两个字母组合五位

批处理任意两个字母生成五位组合

例如
abbba
ababb
acaaa

作者: idwma 时间: 2021-9-29 18:43

本帖最后由 idwma 于 2021-9-29 18:45 编辑

set aa=c
set bb=d

set a=abbba
set b=ababb
set c=abaaa
call set abc=%%a:a=%aa%%%
call set abc=%%abc:b=%bb%%%
echo %abc%
call set abc=%%b:a=%aa%%%
call set abc=%%abc:b=%bb%%%
echo %abc%
call set abc=%%c:a=%aa%%%
call set abc=%%abc:b=%bb%%%
echo %abc%
复制代码

作者: qixiaobin0715 时间: 2021-9-29 19:38

怎么感觉有点新手练功或出题挑战中，大佬们给大家出题的意味。

作者: qixiaobin0715 时间: 2021-9-29 19:41

不知这位仁兄想要达到最终目的是什么？

作者: taofan712 时间: 2021-9-30 10:19

@echo off
:loop 
for %%a in (a1 a2) do call :rnd %%a
if a1==a2 goto loop
echo;随机两个字母为：%a1%  %a2%

setlocal enabledelayedexpansion
for /l %%a in (1 1 5) do (
set /a n=!random!%%2
if !n! equ 0 (set ok=!ok!!a1!) else (set ok=!ok!!a2!)
)
echo;%ok%&pause>nul
exit

:rnd
set str=abcdefghijklmnopqrstuvwxyz
setlocal enabledelayedexpansion
set /a rnd=%random%%%26
call set  str=%%str:~%rnd%,1%%
endlocal&set %1=%str%
goto :eof
复制代码

作者: taofan712 时间: 2021-9-30 10:32

应该在for /l里加个计数循环set /a num=num+n，后面判断num等于0或者等于5就得重来，避免某个字母重复出现5次。

作者: idwma 时间: 2021-10-1 01:26

本帖最后由 idwma 于 2021-10-1 01:30 编辑

国庆快乐

@powershell "type '%~0'|select -skip 1|out-string|iex"&pause&exit
$a=[char](97..122)[(random 25)]
$b=[char](97..122)[(random 25)]
(1..5|%{get-random -input $a,$b}) -join ''
复制代码

欢迎光临批处理之家 (http://www.bathome.net/)