@Echo Off 
title 极度沉沦第一次尝试,最小的QQ强制聊天工具
color 5b
echo by 【极度沉沦创作】
tasklist |findstr /i QQ.exe >nul 2>nul 
::查看QQ进程
if %errorlevel% == 0 goto chenlun
::存在QQ进程就转向chenlun
if %errorlevel% == 1 msg console QQ尚未登录！！ 
::不存在QQ进程,程序向下进行
echo QQ正在启动请稍等......
for %%a in (c d e f h) do for /f "tokens=*" %%b in ('dir /s/b/a-d %%a:\QQ.exe') do (echo %%b & start "" "%%b")
::找出QQ所在项,并启动QQ
:chenlun 
:send 
Set /p num=输入有效的QQ号码: 
If /I "%num%"=="n"  exit
start tencent://Message/?Uin=%num% 
cls
Goto send
复制代码