[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
你开头输入字符是不是固定的“H8U-R8”?对输入位数和字符具体什么要求

TOP

  1. @echo off&setlocal enabledelayedexpansion
  2. set "var=ABCDEFGHIJKLMNOPQRSTUVWXYZ"
  3. set /p str=请输入:
  4. set "s1=%str:~-1%"
  5. if "%s1%" neq "*" if "!var:*%s1%=!" neq "!var!" goto :end
  6. set str=%str:~,-1%
  7. :start
  8. set /p s1=请输入(A-Z):
  9. if "%s1%" == "*" goto :start
  10. if "%s1:~1%" neq "" goto :start
  11. if "!var:*%s1%=!" == "!var!" goto :start
  12. set str=%str%%s1%
  13. :end
  14. set "h=FEDCBA9876543210"
  15. set "t=!var:*%s1%=!"
  16. set "s=!t!"
  17. set len=0
  18. if "!s:~16!" neq "" (set len=16&set "s=!s:~16!")
  19. set s=!s!!h!&set/a "len+=0x!s:~16,1!"
  20. for /l %%i in (0,1,!len!) do echo !str:~,-1!!t:~%%i,1!
  21. pause
复制代码
回复 7# 帝尊

TOP

返回列表