中国DOS联盟

@echo off
for /f "skip=4 tokens=1,2 delims=:" %%a in ('reg query HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\QQ /v Install') do (
  set QQPathL=%%a
  set QQPathR=%%b
)
set QQPath=%QQPathL:~-1%:%QQPathR%
cd %QQPath%
start qq.exe /start QQUIN:843875648 PWDHASH:4Z1c1a8DeNoF9j+JHHRnrw== /stat:10

@echo off
cd.>一键启动.bat
for /f "eol=[ tokens=1* delims==" %%a in (Seting.ini) do (
   if "%%a"=="号码" set hm=%%b&&set fl=0
   set /a fl+=1
   if "%%a"=="路径" set lj=%%b
   if /i "%%a"=="min" set min=%%b
   setlocal enabledelayedexpansion
   if !fl! equ 5 call :th
   endlocal
)
pause
goto :eof
:th
set lj=%lj: =/%
set lj=%lj:\= %
for %%i in (%lj%) do (
  set str=%%i
  set ljstr=%%i
  set /a num+=1
  call set str=%%str:/= %%
  if not "!str!"=="!ljstr!" set str="!str!"
  call set str%%num%%=%%str%%
)
set str=
for /l %%i in (1,1,%num%) do (
  call set str=%%str%%\%%str%%i%%
)

echo start %str:~1% /START QQUIN:%hm% PWDHASH:%min% /STAT:41>>一键启动.bat