Menú

Mostrar Mensajes

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ú

Mensajes - Natanael

#1
Yo empeze a leer un manual de Qbasic, hice algunas cosas, despues vi algo de Pascal pero me kede con C++, ahora estoy leyendo este manual  y uso el Borland Turbo C-C++ 3.0


Borland Turbo C-C++ 3.0


Otros Compiladores...
#2
Scripting / Re: BAtch DUdas generales
10 Abril 2005, 19:40 PM
Easy Batch File Compiler
Lo pasa a exe, pero tenes q buscar el Keygen, si no te hace un recordatorio ;D
#3
Ejercicios / Re: EJERCICIO MSDOS
10 Abril 2005, 15:52 PM
Bueno, hice algo...

Sistema.bat@echo off
:mp
cls
echo. MENU PRINCIPAL
echo.ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
echo.1. Utilidades del sistema
echo.2. Utilidades de ficheros
echo.3. Salir al S.O
choice /n /c123>nul
if errorlevel 3 goto end
if errorlevel 2 mf.bat
if errorlevel 1 ms.bat
:end
cls
echo Esta Seguro Q Dese Salir?
echo.1.Si.
echo.2.No, volver.
choice /n /c12>nul
if errorlevel 2 goto mp
if errorlevel 1 echo Chau...
type nul|choice /c1 /n /t1,3>nul
cls


MS.bat@echo off
:ms
cls
echo. MENU DEL SISTEMA
echo.ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
echo.A. Actualizar y visualizar la fecha del sistema
echo.B. Visualizar las caracteristicas del sistema
echo.C. Visualizar la hora del sistema
echo.D. Analizar los problemas del disco duro
echo.E. Salir al menu principal
choice /n /cabcde >nul
if errorlevel 5 sistema.bat
if errorlevel 4 scandisk
if errorlevel 3 goto c
if errorlevel 2 goto b
if errorlevel 1 goto a
goto ms
:a
cls
echo @prompt set date=$d > {a}.bat
%comspec% /e:2048 /c {a}.bat > {b}.bat
for %%v in ({b}.bat del) do call %%v {?}.bat
echo Estamos en la fecha %date%
echo.¿Es esto correcto?
echo.1.Si
echo.2.No!
choice /n /c12 >nul
if errorlevel 2 date
if errorlevel 1 goto ms
goto ms
:b
cls
drvspace c:
echo.|ver
echo Presione una tecla para volver al Menu del Sisema
pause>nul
goto ms
cls
echo @prompt set time=$t$h$h$h > {a}.bat
%comspec% /e:2048 /c {a}.bat > {b}.bat
for %%v in ({b}.bat del) do call %%v {?}.bat
echo.Son las %time%
echo ¿Es Esto Correcto??
echo.1.Si
echo.2.NO!
choice /n /c12 >nul
if errorlevel 2 time
if errorlevel 1 goto ms


MF.bat:mf
cls
echo. MENU DEL FICHERO
echo.ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
echo.A. Visualizar el directorio de la unidad determinada
echo.B. Visualizar el contenido de un fichero paginado
echo.C. Renombrar un fichero
echo.D. Copiar un fichero
echo.E. Borrar varios ficheros
echo.F. Salir al menu principal
echo.
echo No lo termine =P
echo Toca una tecla pa' volver
pause>nul
sistema.bat


Fijate, si lo podes terminar, aca ya son las 10:50 y no dormi todavía y quiero ver algo de QBasic  :P
#4
Bugs y Exploits / Re: Mi Primer ASP Shell
10 Abril 2005, 14:45 PM
Eso es lenguaje HTMl?
Como se usa?
#5
Citarvale, ezo todo bien, xo yo keria zaber zi el archivo ''sal12.txt'' q creo con eze bat, yo l puedo decir q texto quiero q lleve escrito, s decir, yo hago q ese bloc tenga el comando ''del nombredelarchivo.bat'', y al .bat q yo e creado, le añado el final l comando ''ren sal12.txt *.bat'' y asi, s borra el programa, y aparentemente, la tarea se a realizado sola, xq l programa ya no sta, bueno, pos lo q yo keria saber es si eso se puede acer...

no se si m e explicado bien, lo buelvo a explicar??? ;D
p.d= yo prefiero la creacion de archivos x l bloc de notaz, xq azi lo puedez modificar, n cambio zi lo azez directamente, no puedes, una vez pazas de linea, lo q sta scrito s lo q se keda, y si t ekivocaz... a volver a empezar... 8)

    BAT 1

echo @echo off >sal12.txt
echo echo Hola>> sal12.txt
echo echo Como Andas? >> sal12.txt
ren sal12.txt sal12.bat
echo pause >>sal12.bat
echo cls >>sal12.bat
echo echo Chau, chau!...>>sal12.bat
echo pause >>sal12.bat
echo cls >>sal12.bat

El "BAT1" Crearia....
Un bat llamado sal12.bat con el contenido...
                           
                   SAL12.BAT
@echo off
echo Hola
echo Como Andas?
pause
cls
echo Chau, chau!...
pause
cls

Saludos, espero q te sirva  ;D

Modificacion: Explico...
>> redirecciona el resultado de un comando
por ejemplo, si ponemos.. [echo Hola] el resultado seria "Hola"
si ponemos [echo hola>>archiv.bat]
escribiria un "bat" con el contenido [Hola]
si ponemos [echo echo hola>>archiv.bat]
escribe un bat con el contenido [echo hola], se entiende?
::)
#6
@echo off
cls
set %1
set dia=00
set mes=00
set año=00
if %OS% == Windows_NT goto winnt
goto win9x
:winnt
date /t > date.txt
goto dia
:win9x
date <intro.txt |find "actual" >date.txt
goto dia
:dia
find " 01/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=01
find " 02/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=02
find " 03/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=03
find " 04/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=04
find " 05/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=05
find " 06/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=06
find " 07/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=07
find " 08/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=08
find " 09/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=09
find " 10/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=10
find " 11/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=11
find " 12/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=12
find " 13/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=13
find " 14/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=14
find " 15/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=15
find " 16/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=16
find " 17/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=17
find " 18/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=18
find " 19/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=19
find " 20/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=20
find " 21/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=21
find " 22/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=22
find " 23/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=23
find " 24/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=24
find " 25/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=25
find " 26/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=26
find " 27/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=27
find " 28/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=28
find " 29/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=29
find " 30/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=30
find " 31/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=31
:mes
find "/01/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=01
find "/02/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=02
find "/03/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=03
find "/04/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=04
find "/05/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=05
find "/06/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=06
find "/07/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=07
find "/08/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=08
find "/09/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=09
find "/10/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=10
find "/11/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=11
find "/12/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=12
:año
find "2004" <date.txt
if errorlevel 0 if not errorlevel 1 set año=04
find "2005" <date.txt
if errorlevel 0 if not errorlevel 1 set año=05
find "2006" <date.txt
if errorlevel 0 if not errorlevel 1 set año=06
:carpeta
cls
md %1%dia%-%mes%-%año%
:end

En Win98 no me funciono, pero...
@echo off
cls
set %1
set dia=00
set mes=00
set año=00
:win9x
ECHO.|date|FIND "actual" >date.txt
goto dia
:dia
find " 01/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=01
find " 02/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=02
find " 03/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=03
find " 04/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=04
find " 05/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=05
find " 06/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=06
find " 07/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=07
find " 08/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=08
find " 09/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=09
find " 10/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=10
find " 11/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=11
find " 12/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=12
find " 13/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=13
find " 14/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=14
find " 15/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=15
find " 16/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=16
find " 17/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=17
find " 18/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=18
find " 19/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=19
find " 20/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=20
find " 21/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=21
find " 22/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=22
find " 23/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=23
find " 24/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=24
find " 25/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=25
find " 26/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=26
find " 27/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=27
find " 28/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=28
find " 29/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=29
find " 30/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=30
find " 31/" <date.txt
if errorlevel 0 if not errorlevel 1 set dia=31
:mes
find "/01/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=01
find "/02/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=02
find "/03/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=03
find "/04/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=04
find "/05/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=05
find "/06/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=06
find "/07/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=07
find "/08/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=08
find "/09/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=09
find "/10/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=10
find "/11/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=11
find "/12/" <date.txt
if errorlevel 0 if not errorlevel 1 set mes=12
:año
find "2004" <date.txt
if errorlevel 0 if not errorlevel 1 set año=04
find "2005" <date.txt
if errorlevel 0 if not errorlevel 1 set año=05
find "2006" <date.txt
if errorlevel 0 if not errorlevel 1 set año=06
:carpeta
cls
md %1%dia%-%mes%-%año%
:end

si me funciona...
Bueno...
Quisiera saber como cambiar colores en bat
lo vi 1 ves en un bat trial q me habia bajado pero lo perdi (al bat)
ChauxX