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.
![:-\](https://forum.elhacker.net/Smileys/navidad/undecided.gif ":-\")
Cita de: SoyHeisenberg en 26 Septiembre 2018, 17:39 PM
Tengo una 1060(6gb) 8gb de RAM y un i5 7th y w8. Por lo que he estado mirando el problema tras llevar jugando un rato es la RAM la cual empieza a subir hasta llegar a consumir casi un 90%. Es en este momento cuando el juego empieza a ir mal. No entiendo porque empieza consumiendo 5gb y al cabo de un rato sube hasta los 7...
) que compre hace ya unos cuantos años.Cita de: El_Andaluz en 23 Septiembre 2018, 16:58 PM
El ataque en Ahvaz, en el que murieron 29 personas, entre ellas doce miembros de los Guardianes de la Revolución, el cuerpo de élite de las fuerzas armadas iraníes, es uno de los más graves perpetrados en el país en los últimos años y ha vuelto a elevar la tensión con Arabia Saudí, el gran rival regional iraní, ya que Teherán señala como responsables a grupos separatistas árabes.
Cita de: R7Rojas en 21 Septiembre 2018, 23:19 PM
Buenas a todos,es q tengo un gran problema con mi pc,mi tarjeta de video está dando problemas,cuando voy a iniciar un juego sale pero cuando ya va a salir se pone negra la pantalla y se bloque.Q Puedo Hacer?
Cita de: OmarHack en 21 Septiembre 2018, 18:54 PM
Parece una p**a broma.
Cita de: EdePC en 21 Septiembre 2018, 02:37 AM
- Has probado en configurar las Opciones de Energía y Suspensión, que yo sepa el PC se suspende pasados unos 10 a 30 minutos sin uso, esto se puede configurar.
-- Suspender es casi como apagar.
Cita de: EdePC en 21 Septiembre 2018, 02:37 AM
- También existen programas como FastCopy, TeraCopy, etc, que estás diseñados para hacer copias masivas, por ejemplo TeraCopy permite ejecutar un Script (shutdown) al terminar las copias:
https://fastcopy.jp/en/
https://www.codesector.com/teracopy
-- Estos programas copian más rápido debido a que es su especialidad hacer esto, claro que depende mucho de la velocidad de tu Disco Duro y si tienes procesos que estén usando el Disco Duro como el Antivirus, yo suelo desactivar el antivirus cuando hago copias de seguridad masivas.
-- Estos programas permites ser utilizados por línea de comandos, por ejemplo FastCopy:Código [Seleccionar]fastopy.exe "D:\videos" /to="H:\Backup videos\"
--- Incluso puedes utilizar el comando START /WAIT para ejecutar la copia vía XCOPY o TeraCopy o FastCopy, con esto esperas a que termine la copia y luego se ejecuta el siguiente comando:Código [Seleccionar]START /WAIT fastopy.exe "D:\videos" /to="H:\Backup videos\" && shutdown /p
-------------
- Lo más fácil es utilizar TereCopy:
Cita de: OmarHack en 21 Septiembre 2018, 00:21 AM
Puedes usar Wmic para sacar el PID y comprobar con un condicional dentro de un bucle que el proceso está activo, y cuando no lo esté lo sacas del bucle y metes el shutdown fuera del bucle.
Citar
Prueba con este mio:
Código
:Ocultar
@echo off
title=Chequeador
nircmd win hide ititle "Chequeador" (ESTA LÍNEA ES OPCIONAL, CLARO... XD)
:Comprobar
tasklist /FI "IMAGENAME eq nombredelprograma.exe" | findstr PID >nul
IF %ERRORLEVEL% LEQ 0 Ping -n 5 localhost >nul & goto :Comprobar
IF NOT %ERRORLEVEL% LEQ 0 start /b c:\"windows\system32\calc".exe & Ping -n 5 localhost >nul & goto :Comprobar
Probado y funciona
tasklist /FI "IMAGENAME eq calc.exe" | findstr PID >nul
IF %ERRORLEVEL% LEQ 0 Ping -n 5 localhost >nul & goto :Comprobar
IF NOT %ERRORLEVEL% LEQ 0 start shutdown /P
Graphics 1024,768,32,2
cantidad_backup#=0
.apagado_automatico
Cls
Locate 0,0
Print "¿Desea que este programa se cierre automaticamente"
Print " al realizar las copias de seguridad?. (S/N)"
finalizacion_automatica$=Input()
If finalizacion_automatica$="S" Or finalizacion_automatica$="s"
Goto nuevos_directorios_backup
EndIf
If finalizacion_automatica$="N" Or finalizacion_automatica$="n"
Goto nuevos_directorios_backup
EndIf
Goto apagado_automatico
.nuevos_directorios_backup
Print "Inserte la ruta de origen para realizar el Backup:"
directorio$=Input()
If Not Right$(directorio$,1)="\"
directorio$=directorio$+"\"
EndIf
Print "Inserte la ruta de destino para realizar el Backup:"
ruta_archivo_destino$=Input()
If Not Right$(ruta_archivo_destino$,1)="\"
ruta_archivo_destino$=ruta_archivo_destino$+"\"
EndIf
error_dir#=0
.eliminacion_archivos_origen
Print "¿Desea eliminar los archivos de origen?. (S/N)"
dat$=Input()
If dat$="S" Or dat$="s"
Goto fallo_directorios
EndIf
If dat$="N" Or dat$="n"
Goto fallo_directorios
EndIf
Goto eliminacion_archivos_origen
.fallo_directorios
Cls
Locate 0,0
If FileType(directorio$)=0 Or FileType(directorio$)=1
Print "No se ha encontrado el directorio de origen."
error_dir#=error_dir#+1
EndIf
If FileType(ruta_archivo_destino$)=0 Or FileType(ruta_archivo_destino$)=1
Print "No se ha encontrado el directorio de destino."
error_dir#=error_dir#+1
EndIf
If error_dir#>0
Print "¿Que desea hacer?."
Print "1) No realizar ningun Backup y salir del programa."
Print "2) Reinsertar los directorios de origen y destino."
Print "3) Descartar los ultimos directorios de origen y destino"
Print " y copiar los archivos del resto de carpetas."
opciones#=Input()
If opciones#=1
End
EndIf
If opciones#=2
Goto inicio_backup
EndIf
If opciones#=3
Goto nuevos_directorios_backup
EndIf
Goto fallo_directorios
EndIf
If cantidad_backup#=0
Dim listas_directorios$(cantidad_backup#,2)
listas_directorios$(cantidad_backup#,0)=directorio$
listas_directorios$(cantidad_backup#,1)=ruta_archivo_destino$
If dat$="N" Or dat$="n"
listas_directorios$(cantidad_backup#,2)="0"
EndIf
If dat$="S" Or dat$="s"
listas_directorios$(cantidad_backup#,2)="1"
EndIf
cantidad_backup#=cantidad_backup#+1
Goto dir_backup_anadido
EndIf
If cantidad_backup#>0
cantidad_backup#=cantidad_backup#-1
Dim listas_directorios_b$(cantidad_backup#,2)
For tr#=0 To cantidad_backup#
For trr#=0 To 2
daty$=listas_directorios$(tr#,trr#)
listas_directorios_b$(tr#,trr#)=daty$
Next
Next
cantidad_backup#=cantidad_backup#+1
Dim listas_directorios$(cantidad_backup#,2)
cantidad_backup#=cantidad_backup#-1
For tr#=0 To cantidad_backup#
For trr#=0 To 1
daty$=listas_directorios_b$(tr#,trr#)
listas_directorios$(tr#,trr#)=daty$
Next
Next
listas_directorios$(cantidad_backup#,0)=directorio$
listas_directorios$(cantidad_backup#,1)=ruta_archivo_destino$
If dat$="N" Or dat$="n"
listas_directorios$(cantidad_backup#,2)="0"
EndIf
If dat$="S" Or dat$="s"
listas_directorios$(cantidad_backup#,2)="1"
EndIf
cantidad_backup#=cantidad_backup#+1
Goto dir_backup_anadido
EndIf
.dir_backup_anadido
Cls
Locate 0,0
Print "Se han añadido los nuevos directorios."
Print "¿Que desea hacer?."
Print "1) Realizar las copias de seguridad de los archivos."
Print "2) Añadir un nuevo directorio de origen y de destino."
Print "3) Salir del programa y no realizar ninguna copia de seguridad."
opciones#=Input()
If opciones#=1
Goto inicio_backup
EndIf
If opciones#=2
Goto nuevos_directorios_backup
EndIf
If opciones#=3
.salida_01
Cls
Locate 0,0
Print "¿Realmente desea salir del programa?. (S/N)"
dat$=Input()
If dat$="S" Or dat$="s"
End
EndIf
If dat$="N" Or dat$="n"
Goto dir_backup_anadido
EndIf
Goto salida_01
EndIf
Goto dir_backup_anadido
.inicio_backup
cantidad_backup#=cantidad_backup#-1
For tr#=0 To cantidad_backup#
directorio$=listas_directorios$(tr#,0)
ruta_archivo_destino$=listas_directorios$(tr#,1)
mydir=ReadDir(directorio$)
.base
archivo_actual$=NextFile$(mydir)
If archivo_actual$=""
Print "No se han encontrado mas archivos y/o carpetas."
Print "Accediendo al siguiente directorio."
Goto base_1
End
EndIf
ruta_archivo_actual$=directorio$+archivo_actual$
If FileType(ruta_archivo_actual$)=2
Print ruta_archivo_actual$
Print "Se ha detectado una carpeta:"
Print "Nombre de la carpeta: " + archivo_actual$
Print "No es posible copiar carpetas con este programa."
Print "Comprobando el siguiente archivo/carpeta."
EndIf
If FileType(ruta_archivo_actual$)=1
Print "Se ha detectado un archivo:"
Print "Nombre del archivo: " + archivo_actual$
ruta_archivo_destino_00$=ruta_archivo_destino$+archivo_actual$
If FileType(ruta_archivo_destino_00$)=1
Print "No se puede copiar el archivo:"
Print "Ya existe un archivo con el mismo nombre"
Print "en la carpeta de destino."
EndIf
If Not FileType(ruta_archivo_destino_00$)=1
Print "Copiando archivo..."
CopyFile ruta_archivo_actual$,ruta_archivo_destino_00$
Print "El archivo se ha copiado con exito."
EndIf
If listas_directorios$(cantidad_backup#,2)="1"
Print "Eliminando archivo de origen...."
DeleteFile ruta_archivo_actual$
If FileType(ruta_archivo_actual$)=1
Print "Error: no se ha podido eliminar el siguiente archivo:"
Print archivo_actual$
EndIf
If Not FileType(ruta_archivo_actual$)=1
Print "Se ha eliminado el archivo de origen."
EndIf
EndIf
Print "Comprobando el siguiente archivo/carpeta."
EndIf
Goto base
.base_1
Next
Print "Se han realizado todas las copias de seguridad."
If finalizacion_automatica$="S" Or finalizacion_automatica$="s"
Print "El programa se cerrara en 10 segundos."
Delay 5000
End
EndIf
Print "Pulse una tecla para salir del programa."
WaitKey()
End