Script Trik Jahil Menggunakan Notepad

KUMPULAN SCRIPT JAHIL PROGRAM SEDERHANA DENGAN NOTEPAD

Script Trik Jahil Menggunakan Notepad
Selamat Datang di Blog Orang IT . Postingan saya sebelumnya mengenai blablabla kemudian postingan kali hanya sekedar share postingan ringan bagaimana membuat script jahil usil unik dengan menggunakan program notepad dengan tujuan hanya sekedar untuk Joke atau mengerjai teman bukan script berbahaya yang bisa menghapus data teman ya .

Terkadang saat kita lagi senggang pernah terbesit sekilas dalam pikiran kita untuk mengerjai teman salah satunya dengan menggunakan komputer atau laptop mereka . Kita bisa membuat pesan alert yang muncul terus menerus yang berisi kata-kata joke dan kita bisa membuat beberapa tombol tidak berfungsi , kita akan membuatnya menggunakan program Notepad sederhana bawaan Windows.

Notepad adalah sebuah aplikasi sebuah text editor simple yang sudah ada sejak Windows 1.0 di tahun 1985 yang ada di setiap system windows baik xp, vista, seven dan windows 10 . Tentu kode ini sangat penting dan justru mungkin paling sering di gunakan oleh para user, baik kepentingan pribadi ataupun lainnya misal untuk menyimpan catatan atau mengedit script

Berikut Kumpulan Script Jahil dengan program Notepad :

Silahkan buka notepad.exe , jika sulis menemukanya silahkan masukkan pada pencarian explorer ketikkan notepad.exe atau kunjungi lokasi nya yang berada di C:\Windows\System32\Notepad.exe

1. Pesan yang Muncul terus menerus
@ECHO off

:Begin

msg * muka jelek

msg * ngaca dulu

msg * biar ganteng

msg * seperti yang punya

msg * helmykkediri.blogspot.com

GOTO BEGIN
Kemudian simpan script diatas dengan nama terserah diikuti ekstensi .bat misal Pesanjahil.bat dan type file pilih allfiles

2. Pesan Shutdown
@echo off

msg * Komputer Overload

shutdown -s -c "Visit my blog helmykkediri.blogspot.com "
Kemudian simpan script diatas dengan ekstensi .vbs misal shutdown.vbs dan type file pilih allfiles

3. Capslock selalu menyala ON
Set wshShell

=wscript.CreateObject

("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "{CAPSLOCK}"

loop
Kemudian simpan script diatas dengan ekstensi .vbs misal capslockON.vbs dan type file pilih allfiles

4. CD/DVD Buka Tutup secara otomatis
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
Kemudian simpan script diatas dengan ekstensi .vbs misal BukatutupCD.vbs dan type file pilih allfiles

5. Menekan tombol BackSpace Terus menerus
MsgBox "kembali ke menu

sebelumnya"

Set wshShell

=wscript.CreateObject

("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "{bs}"

loop
Kemudian simpan script diatas dengan ekstensi .vbs misal BukatutupCD.vbs dan type file pilih allfiles

6. Otomatis Mengetik di Notepad atau Word
Set wshShell =

wscript.CreateObject

("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "Helmy Ganteng"

loop
Kemudian simpan script diatas dengan ekstensi .vbs misal PesanCinta.vbs dan type file pilih allfiles

7. Membuka 1000 Notepad
@ECHO off

:top

START %SystemRoot%

system32notepad.exe

GOTO top
Kemudian simpan script diatas dengan ekstensi .bat misal 1000notepad.bat dan type file pilih allfiles

8. Membuat 1000 virus sampai komputer hang
option explicit

dim wshshell

set wshshell=wscript.createobject("wscript.shell")

dim x

for x = 1 to 100000000

wshshell.run "tourstart.exe"

next
Kemudian simpan script diatas dengan ekstensi .vbs misal 1000virus.vbs dan type file pilih allfiles

9. Apapun yang diketik akan muncul suara
Dim msg, sapi
msg=InputBox("Silahkan ketik","Mesin Bicara Mirza P.B")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Kemudian simpan script diatas dengan ekstensi .vbs misal bicara.vbs dan type file pilih allfiles

10. Tombol ENTER ON Otomatis
Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "~(enter)" loop
Kemudian simpan script diatas dengan ekstensi .vbs misal EnterON.vbs dan type file pilih allfiles

11. Otomatis buka notepad dan otomatis ngetik
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 "i" WScript.Sleep 50 WshShell.SendKeys "love " WScript.Sleep 50 WshShell.SendKeys "you" WScript.Sleep 50 WshShell.SendKeys "re" WScript.Sleep 50 WshShell.SendKeys " gi" WScript.Sleep 50 WshShell.SendKeys "ta" WScript.Sleep 50 WshShell.SendKeys "beb" WScript.Sleep 50 WshShell.SendKeys " d" WScript.Sleep 50 WshShell.SendKeys "sa" WScript.Sleep 50 WshShell.SendKeys " ya" WScript.Sleep 50 WshShell.SendKeys "ng" WScript.Sleep 50 WshShell.SendKeys "^_^ "
Kemudian simpan script diatas dengan ekstensi .vbs misal Tembak.vbs dan type file pilih allfiles

Pengen bikin sesuatu yang bermanfaat dengan Script Notepad ?

12. Membuat Kuis Sederhana
@echo off

color b4

:menu
cls
echo Hai! Selamat Datang Di Game! Selamat bermain!

echo Game Ini Di Buat oleh:Blog IT

echo Link blog : http://helmykkediri.blogspot.co.id

echo 1) Mulai!

echo 2) cara main

echo 3) Keluar

set /p number=

if %number% == 1 goto Mulai!

if %number% == 2 goto cara main

if %number% == 3 goto keluar


:Mulai!

cls

echo Siapa Nama Mu:

set /p name=

echo Halo %name%!

echo Apakah Kamu akan mulai quiz? (ya/tidak)

set /p start=

if %start% == ya goto level1

if %start% == tidak goto menu

goto Mulai!


:cara main

cls

echo pencet pilihan lalu ketik enter

echo pergi ke menu? (ya/tidak)

set /p menugoto=

if %menugoto% == ya goto menu

if %menugoto% == tidak goto exit

goto cara main


:keluar

cls

echo apakah anda yaking ingin keluar game?(y/t)

set /p keluargoto=

if %keluargoto% == y goto exit

if %keluargoto% == t goto menu

goto keluar


:level1

cls

echo ok sekarang mulai.

echo berapa hasil 10 + 10?

echo a) 100

echo b) 20

echo c) 1010


set /p answer1=

if %answer1% == a goto wrong1

if %answer1% == b goto correct1

if %answer1% == c goto wrong1

goto level1


:correct1

echo betul mau lanjut level 2?(ya/tidak)

set /p NL1=


if %NL1% == ya goto level2

if %NL1% == tidak goto menu

goto correct1


:Wrong1

Echo salah mau ulang? (ya/tidak)

set /p WA1=

if %WA1% == ya goto level1

if %WA1% == tidak goto menu

goto wrong1


:level2


cls

echo Siapa yang ada di uang 100 dollar?

echo a) Ben Franklin

echo b) Tommy King

echo c) Thomas Train

echo d) Jeff Dunham

set /p aa=

if %aa% == a goto correct2

if %aa% == b goto wrong2

if %aa% == c goto wrong2

if %aa% == d goto wrong2

goto level2


:correct2

echo Kamu betul mau Lanjut level 3?(ya/tidak)

set /p NL1=

if %NL1% == ya goto level3

if %NL1% == tidak goto menu

goto correct2


:wrong2

cls

echo SALAH!Mau ulang? (ya/tidak)

set/p retry=

if %retry% == ya goto level1

if %retry% == tidak goto exit

goto wrong2


:level3

cls

echo berapa 5x5?

echo a) 10

echo b) 55

echo c) 25


set /p answer3=

if %answer3% == a goto wrong3

if %answer3% == b goto wrong3

if %answer3% == c goto correct3

goto level3


:correct3

echo betul mau lanjut level 4?(ya/tidak)

set /p NL1=

if %NL1% == ya goto level4

if %NL1% == tidak goto menu

goto correct3


:wrong3

cls

echo salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level3

if %retry% == tidak goto exit

goto wrong3


:level4

cls

echo siapa penemu lampu?

echo a)Thomas Alvadison

echo b)Jokowi Dodo

echo c)BJ Habibie

echo d)Megawati Soekarno

set /p aa=

if %aa% == a goto correct4

if %aa% == b goto wrong4

if %aa% == c goto wrong4

if %aa% == d goto wrong4

goto level4


:correct4

echo betul mau lanjut level 5?(ya/tidak)

set /p NL1=

if %NL1% == ya goto level5

if %NL1% == tidak goto menu

goto correct4


:wrong4

cls

echo salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level4

if %retry% == tidak goto exit

goto wrong4


:level5

cls

echo berapa hasil -20:(-2)?

echo a)10

echo b)5

echo c)20


set /p answer5=

if %answer5% == a goto correct5

if %answer5% == b goto wrong5

if %answer5% == c goto wrong5

goto level5


:correct5

echo betul mau lanjut level 6?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level6

if %NL1% == tidak goto menu

goto correct1


:wrong5

cls

echo Salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level5

if %retry% == tidak goto exit

goto wrong5


:level6

cls

echo Siapa Penemu Bakteri?

echo a)Helmy Kurniawan

echo b)Alexander Fleming

echo c)Alexander Grahambell

echo d)Jokowi Dodo`

set /p aa=

if %aa% == a goto wrong6

if %aa% == b goto correct6

if %aa% == c goto wrong6

if %aa% == d goto wrong

goto level6


:correct6

echo betul mau lanjut level7?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level7

if %NL1% == tidak goto menu

goto correct7


:wrong6

cls

echo Salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level7

if %retry% == tidak goto exit

goto wrong7


:level7

cls

echo berapa hasil -40:2:(-4)?

echo a)13

echo b)20

echo c)5


set/p answer7=

if %answer7% == a goto wrong7

if %answer7% == b goto wrong7

if %answer7% == c goto correct7

goto level7


:correct7

echo betul mau lanjut level8? (ya/tidak)

set/p NL1=


if %NL1% == ya goto level8

if %NL1% == tidak goto menu

goto correct7


:wrong7

cls

echo Salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level7

if %retry% == tidak goto exit

goto wrong7


:level8

cls

echo Siapa Presiden Amerika

echo a)Barrak Obama

echo b)SBY

echo c)Soekarano

echo d)Moh.Hatta

set /p aa=

if %aa% == a goto correct8

if %aa% == b goto wrong8

if %aa% == c goto wrong8

if %aa% == d goto wrong8


:correct8

echo betul mau lanjut level9?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level9

if %NL1% == tidak goto menu

goto correct8


:wrong8

cls

echo Salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level8

if %retry% == tidak goto exit

goto wrong8


:level9

echo berapa hasil 3x(-2)=

echo a)-100

echo b)400

echo c)-6


set /p answer9=

if %answer9% == a goto wrong9

if %answer9% == b goto wrong9

if %answer9% == c goto correct9

goto level9


:correct9

echo betul mau lanjut level 10?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level10

if %NL1% == tidak goto menu

goto correct1


:wrong9

cls

echo Salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level9

if %retry% == tidak goto exit

goto wrong9


:level10

cls

echo Siapa penemu telepon?

echo a)PLN

echo b)Tukang Listrik

echo c)Alexander Grahambell

echo d)Jokowi Dodo

set /p aa=

if %aa% == a goto wrong10

if %aa% == b goto wrong10

if %aa% == c goto correct10

if %aa% == d goto wrong10

goto level10


:correct10

cls

echo SELAMAT KAMU MENANG!

echo KEEP VISIT : http://helmykkediri.blogspot.co.id/

goto correct10


:wrong10

cls

echo KAMU KALAH MAU ULANG GAME!?(y/n)

set/p retry=

if %retry% == y goto level1

if %retry% == n goto exit

goto wrong10



Kemudian simpan script diatas dengan ekstensi .bat misal Kuis.bat dan type file pilih allfiles

13. Membuat Kalkulator sederhana
@echo off
:ulang
echo Kalkulator
set /p A=Masukkan Angka Pertama =
set /p B=Masukkan Angka Kedua =
set /p o=Pilih Operator Hitung (*, +, -, /) =
set /a "jumlah" = A%o%B
echo Jumlah = %jumlah%
pause>null
goto ulang
Kemudian simpan script diatas dengan ekstensi .bat misal Kalkulator.bat dan type file pilih allfiles

14. Pendataan Sederhana
@echo off

Mode 80,40

Color 0a

title Pendata

Msg * Jawab pertanyaan dengan Y/N

Msg * Isikan sesuai dengan keadaan anda

:nama

Echo Masukan nama anda !!!

Set /p nama=

Goto TTL

:TTL

Color 1F

cls

Echo Masukan tanggal lahir anda !!!(HH BB TTTT)(cnth:26 09 2000)

Set /p ttl=

Goto alamat

:alamat

cls

echo Masukan alamat anda dengan jelas!!!

Set /p kota=Kota =

Set /p provinsi=Provinsi =

Set /p Negara=Negara =

Pause

Goto hasil

:hasil

cls

Echo Data Diri Anda !!!

echo.

Echo Nama = %nama%

Echo Tempat Tanggal Lahir = %ttl%

Echo Alamat anda = %kota%,%provinsi%,%negara%

Pause

Cls

echo Keluar %nama% ? (Y/N)

set /p kel=

if %kel% equ Y goto metu

if %kel% equ y goto metu

if %kel% equ N goto Nama

if %kel% equ n goto nama

:metu

exit



Kemudian simpan script diatas dengan ekstensi .bat misal Data.bat dan type file pilih allfiles

15. Merubah Teks ke Suara , buat yang malas baca
Dim speaks, speech
speaks="MASUKKAN KATA-KATA"
Set speech=CreateObject("sapi.spvoice")
speech.Speak speaks
Kemudian simpan script diatas dengan ekstensi .vbs misal baca.vbs dan type file pilih allfiles

Baca Juga : SOftware Perubah Text menjadi suara

Cara menyimpanya cukup simpan dengan nama diikuti ekstensi misal bukatutup.vbs dan pada save as type pilih All Files kemudian simpan

Script Trik Jahil Menggunakan Notepad
Cara Simpan
Script diatas hanyalah kumpulan Joke tidak ada yang sampai membuat data komputer terhapus atau terformat . Jika anda cerdas anda bisa memanfaat kumpulan script notepad diatas dengan tujuan usil , promosi , menyatakan perasaan atau yang lainya. Untuk obat penawarnya cukup matikan proses script tersebut melalui Task Manager Ctrl+Shift+Del cari scrit klik kanan End Proses


Demikian postingan mengenai Kumpulan Script Notepad Jahil Usil semoga bermanfaat dan digunakan secara bijak. Ada yang mau menambah silahkan dikomentar sekian dan terimakasih sudah mampir di blog saya ini

Follow Blog Orang IT dan jangan lupa Like Fanspage helmykkediri serta jangan lupa klik iklan yang ada di blog ini untuk perawatan admin

0 Response to "Script Trik Jahil Menggunakan Notepad"

Posting Komentar

Terimakasih telah membaca artikel di Blog Orang IT , berikut tata cara berkomentar yang baik dan benar

1. Dilarang menyisipkan link aktif dikomentar blog

2. Dilarang meletakkan URL langsung di komentar blog

3. Komentar tidak relevans tidak akan disetujui

4. Berkomentar minimal 5 kata

5. Jangan buang waktu anda untuk nyepam karena tidak akan saya tampilkan komentar anda

6. Komentar sara jangan pake fake akun , kayak pecundang saja

Semoga anda berkenan menaati aturan yang saya buat sekian dan terimakasih