[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off&setlocal enabledelayedexpansion
  2. set /a "Md=12*63+10000,$=1000"
  3. set "Hx=FEDCBA9876543210"
  4. for /l %%i in (1 1 5) do (
  5.     set /a i+=$*10000
  6.     set Len=!i!!Hx!
  7.     set /a "N=0x!Len:~16,1!,Len=!i:~,8!%%Md,S=!i:~,8!/Md"
  8.     for /l %%j in (8 1 !N!) do (
  9.         set/a "Tem=!Len!!i:~%%j,1!/Md,Len=!Len!!i:~%%j,1!%%Md"
  10.         set "S=!S!!Tem!"
  11.     )
  12.         set "Emp="
  13.         for /l %%j in (0 1 3) do (
  14.             set /a Len*=10,Tem=Len/md,Len%%=md
  15.             set "Emp=!Emp!!Tem!"
  16.         )
  17.         set i=!S!!Emp!
  18. )
  19.         echo !S!.!Emp!
  20. pause
复制代码

TOP

返回列表