Let's Start
------------------------------------------------------------------------------------------------
ni artikel usang bro... yanguda tau maaf yeah...xaxaxaxaxa
copas ajja di notepad....
trus dikembangin........
Code: |
@echo off : .:: Matauli Cyber Team ::. :Author : OeLaDZz :Mail to : [You must be registered and logged in to see this link.] :password cls color fe rem Warnanya emang sengaja dibikin cerah biar username dan password kita “agak” tersamarkan! title Masukkan User Name dan Password set/p "user=masukkan user name anda:" set/p "pass=masukkan password anda:" if "%user%" == "OeLaDZz" ( set pass=sp if "%pass%" == "MCT is my life" goto pilihan) cls title .:: Matauli Cyber Team ::. [OeLaDZz] color f4 echo woi....loe mau ngapaen buka-buka? kurang ajar loe tak laporkan nanti ke bapakmu. mau minta kode? silakan hubungi erdianta (085262293802) atau masuk ke [You must be registered and logged in to see this link.] pause goto password :pilihan cls title .:: Matauli Cyber Team ::. [OeLaDZz] color f0 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 :==Menampilkan daftar folder di tempat aplikasi ini berada== :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 f2 if exist %dir%\desktop.ini ( attrib -h -r -s -a %dir%\desktop.ini if not exist %dir%\OeLaDZz.scf ( ren %dir%\desktop.ini OeLaDZz.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 f0 echo PILIHAN AKTIVASI Locked-Hidden MODE: set/p "shm=[A]ktifkan/[M]atikan/[K]eluar:" if /i %shm%==A ( set "val=0" goto mode) if /i %shm%==M ( set "val=1" goto mode) if /i %shm%==K goto Pilihan 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%\OeLaDZz.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 |
user OeLaDZz
pass MCT is my life
silakan dikembangin...
jangan lupa disimpan dengan nama
FOLDER DIVERT mct_try.bat
0 komentar:
Posting Komentar