[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
随便玩一下:结果值自己套用,看是不是你要的。
  1. @Echo Off  & cd /d "%~dp0"
  2. SetLocal EnableDelayedExpansion
  3. set "Color=0123456789ABCDEF"
  4. set /a n=%random% %% 16
  5. set "BackColor=!Color:~%n%,1!"
  6. for /f "tokens=1,2 delims=%BackColor%" %%a in ("%Color%") do set "Color=%%a%%b"
  7. set/a m=15
  8. :LOOP
  9. set/a n=%random% %% %m%
  10. set "ColTmp=!Color:~%n%,1!"
  11. for /f "tokens=1,2 delims=%ColTmp%" %%a in ("%Color%") do set "Color=%%a%%b"
  12. set "_COL%m%=%BackColor%%ColTmp%"
  13. if %m% geq 2 (set/a m-=1 &goto LOOP)
  14. set _COL
  15. Pause
复制代码
----------PS---------------
  1. $颜色字符 ='0123456789ABCDEF';
  2. $背景色 =Get-Random -input ([Char[]]$颜色字符);
  3. $颜色字符 =$颜色字符 -replace $背景色;
  4. $颜色 = While ( ([Char[]]$颜色字符).Count -gt 0 ) {
  5. $前景色 =Get-Random -input ([Char[]]$颜色字符);
  6. [string]::Concat($背景色,$前景色);
  7. $颜色字符 =$颜色字符 -replace $前景色;
  8. }
  9. $颜色;
  10. cmd /c Pause
复制代码
1

评分人数

TOP

返回列表