Pasted

@echo off
Title www.DarkSight.tk  App  -By Dark Sight
Mode con cols=80 lines=45
Color 0c
Cls
Echo Escribe tu nombre y presiona ENTER
Echo.
Set /p nombre=
:genre1
Cls
Echo Hola %nombre% Eres hombre o mujer ?
Echo.
Echo Escribe el NUMERO de la opcion y presiona ENTER
Echo.
Echo 1)Hombre
Echo 2)Mujer
Echo.
Set /p genre=
Cls
If %genre%==1 set trola=Bienvenido
If %genre%==2 set trola=Bienvenida
If %genre% gtr 2 echo Opcion no valida
If %genre% gtr 2 echo.
If %genre% gtr 2 echo Presione cualquier tecla.
If %genre% gtr 2 pause >nul
If %genre% gtr 2 cls
If %genre% gtr 2 goto :genre1
:starter
Cls
Echo ---%trola% %nombre%---
Echo.
Echo Escribe el numero de opcion y presiona ENTER
Echo.
Echo 1)Web
Echo 2)YouTube
echo 3)Twitter
Echo 4)Extras
Echo 5)Salir
Echo.
Set /p option=
Cls
If %option%==dsl goto :secretfound
If %option%==1 goto :web
If %option%==2 goto :youtube
If %option%==3 goto :twitter
If %option%==4 goto :extras
If %option%==5 exit
If %option%==exit exit
If %option%==salir exit
If %option% gtr 5 echo opcion no valida
If %option% gtr 5 echo.
If %option% gtr 5 echo presione cualquier tecla
If %option% gtr 5 pause >nul
If %option% gtr 5 cls
If %option% gtr 5 goto :starter
Cls
:web
Cls
Echo escribe el numero de opcion y presiona enter
Echo.
Echo 1)Visitar Web
Echo 2)Ver hacks disponibles
Echo 3)Ver Descargas disponibles
Echo 4)Regresar al menu pricipal
Echo.
Set /p optionblog=
Cls
If %optionblog%==1 start iexplore www.darksight.tk
If %optionblog%==2 start iexplore http://DarkSight.tk/descargas
If %optionblog%==3 start iexplore http://DarkSight.tk/descargas
If %optionblog%=4 goto :starter
If %optionblog% gtr 4 echo opcion no definida
If %optionblog% gtr 4 echo.
If %optionblog% gtr 4 echo presiona cualquier tecla
If %optionblog% gtr 4 pause >nul
If %optionblog% gtr 4 goto :web
Cls
Exit
:youtube
Cls
Echo escribe el numero de opcion y presiona ENTER
Echo.
Echo 1)Visitar canal
Echo 2)Suscribirse
Echo 3)Regresar al menu principal
Echo.
Set /p optionvideo=
Cls
If %optionvideo%==1 start iexplore www.youtube.com/user/MRHMcp
If %optionvideo%==2 start iexplore [link suscribe]
If %optionvideo%==3 goto :starter
If %optionvideo% gtr 3 echo opcion no definida
If %optionvideo% gtr 3 echo.
If %optionvideo% gtr 3 echo presiona cualquier tecla 
If %optionvideo% gtr 3 pause >nul
If %optionvideo% gtr 3 goto :youtube
Cls
Exit
:twitter
Cls
Echo escribe el numero de  opcion y presiona ENTER
Echo.
Echo 1)Visitar perfil de Dark Sight
Echo 2)Seguir a Dark Sight (Dar Follow)
Echo 3)Visitar Perfil de Linda
Echo 4)Seguir a Linda (Dar Follow)
Echo 5)Regresar al menu principal
Echo.
Set /p tweet=
Cls
If %tweet%==1 start iexplore www.twitter.com/luizitol
If %tweet%==2 start iexplore [link follow luizitol]
If %tweet%==3 start iexplore www.twitter.com/linda_r_r
If %tweet%==4 start iexplore [link follow linda_r_r]
If %tweet%==5 goto :starter
If %tweet% gtr 5 echo  opcion no definida
If %tweet% gtr 5 echo.
If %tweet% gtr 5 echo presione cualquier tecla
If %tweet% gtr 5 pause >nul
If %tweet% gtr 5 goto :twitter
Cls
Exit
:extras
Cls
Echo escribe el numero de opcion y presiona ENTER
Echo.
Echo 1)Ver hora Actual
Echo 2)Ver fecha Actual
Echo 3)Ver informacion de la version de windows
Echo 4)Ver Nombre de la PC
Echo 5)Ver Informacion general disponible
Echo 6)Descargar mas programas
Echo 7)Regresar al menu principal
Echo.
Set /p extra=
Cls
If %extra%==1 goto :time
If %extra%==2 goto :date
If %extra%==3 goto :winver
If %extra%==4 goto :pcname
If %extra%==5 goto :allinfo
If %extra%==6 start iexplore www.cpenguindarkcp.wordpress.com/descargas
If %extra%==6 goto :extras
If %extra%==7 goto :starter
If %extra%==exit exit
If %extra% gtr 7 echo opcion no definida
If %extra% gtr 7 echo.
If %extra% gtr 7 echo presione cualquier tecla
If %extra% gtr 7 pause >nul
If %extra% gtr 7 goto :extras
Cls
Exit
Exit
:secretfound
@echo off
Title  --Secreto-- www.DarkSight.tk App -By Dark Sight
Msg * Encontraste un secreto.!
Cls
Echo  !.Encontraste un secreto.!
Echo.
Echo El secreto es mi correo :)   Att: Dark Sight
Echo.
Echo El correo de Dark Sight es: >>mail-secreto.txt
Echo mr.hackmaster1@hotmail.com >>mail-secreto.txt
Echo. >>mail-secreto.txt
Echo No olvides visitar la web seguido. >>mail-secreto.txt
Echo. >>mail-secreto.txt
Echo www.darksight.tk >>mail-secreto.txt
Start mail-secreto.txt
Cls
Goto :starter
Cls
Exit