Catatan Iradewa

@echo off
:  .:: SATPAM FOLDER ::.
 
cls
color fF
title Masukkan User Name dan Password
set/p "user=User Name:"
set/p "pass=Password :"
if "%user%" == "iradewa" (
set pass=sp
if "%pass%" == "iradewa" goto pilihan)
cls
title .:: SATPAM FOLDER ::.
color f4
echo Maaf, user name atau password yang Anda Masukkan Salah!
echo Warning ! ! ! Penyalah gunaan ! ! ! !
pause
goto password
:pilihan
cls
title .:: PILIHAN ::.
color fF
echo Pilihan Menu program:
echo [1] Kunci Folder
echo [2] Buka Folder
echo [3] Locked-Hidden Mode
echo [4] Keluar
echo.
set/p "pil=Masukkan nomor pilihanmu: "
if %pil%=='' goto Pilihan
if %pil%==1 goto Direktori
if %pil%==2 goto Direktori
if %pil%==3 goto Locked-Hidden
if %pil%==4 goto Keluar
if %errorlevel%==1 goto Pilihan
goto pilihan
 
:Direktori
cls
echo Daftar folder dalam direktori ini:
echo ----------------------------------
dir /a:d /b /p
echo ----------------------------------
echo "Drag and drop" foldernya ke sini, atau
echo ...masukkan path/nama folder dengan
echo ...diapit tanda petik("), contoh: "New Folder"
echo.
set/p "dir=Folder:"
if exist %dir% (
if %pil%==1 goto Kunci
if %pil%==2 goto Buka
if errorlevel 1 goto Pilihan
goto Direktori
:Pilihan tujuan pengalihan
:Kunci
cls
echo Pilih tujuan pengalihan untuk folder %dir%:
echo [1] Gembok (Windows Security)
echo [2] Recycle Bin
echo [3] Control Panel
echo [4] My Computer
echo [5] Browser
echo.
echo [0] Kembali
set/p "met=Masukkan nomor pilihanmu:"
if %met%==1 (
set "clsid=2559a1f2-21d7-11d4-bdaf-00c04f60b9f0"
goto BikinIni)
if %met%==2 (
set "clsid=645FF040-5081-101B-9F08-00AA002F954E"
goto BikinIni)
if %met%==3 (
set "clsid=21EC2020-3AEA-1069-A2DD-08002B30309D"
goto BikinIni)
if %met%==4 (
set "clsid=20D04FE0-3AEA-1069-A2D8-08002B30309D"
goto BikinIni)
if %met%==5 (
set "clsid=871C5380-42A0-1069-A2EA-08002B30309D}"
goto BikinIni)
if %met%==0 (
goto Pilihan)
goto Kunci
:Membuat file desktop.ini
:BikinIni
cls
color fF
if exist %dir%\desktop.ini (
attrib -h -r -s -a %dir%\desktop.ini
if not exist %dir%\RamaSP.scf ( ren %dir%\desktop.ini RamaSP.scf
attrib +h +r +s +a %dir%\RamaSP.scf
) )
(
echo [.ShellClassInfo]
echo clsid={%clsid%}
) > %dir%\desktop.ini
attrib +h +s +r %dir%
attrib +h +s +r %dir%\desktop.ini
echo Folder atau direktori telah terkunci
pause
goto Locked-Hidden
:Penguncian File Tersembunyi
:Locked-Hidden
cls
color fF
echo PILIHAN AKTIVASI Locked-Hidden MODE:
set/p "shm=[A]ktifkan/[M]atikan/[K]eluar:"
if /i %shm%==A (
set
goto Locked-Hidden
:buka
attrib -h -s -a -r %dir%
if not exist %dir%\desktop.ini (
echo Folder atau direktori ini tidak terkunci...
echo Coba gunakan untuk membuka folder lain
pause
goto Direktori)
if exist %dir%\RamaSP.scf (
attrib -h -s -a -r %dir%\desktop.ini
del /f /q %dir%\desktop.ini
attrib -h -s -r -a %dir%\RamaSP.scf
ren %dir%\RamaSP.scf desktop.ini
attrib +h +s %dir%\desktop.ini
)
echo Folder %dir% telah terbuka.
pause
goto pilihan
:Mode
if %val%==0 (set "status=On") else (set "status=Off")
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /v Hidden /t
reg_dword /d 2 /f
reg add
"hklm\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWAL
L" /v CheckedValue /t reg_dword /d %val% /f
cls
echo Locked-Hidden Mode: %status%
pause
goto pilihan
:keluar