@ECHO OFF

:BUCLE
CLS & ECHO. 
SET /p "PASS=INTRODUCE SOLO SEIS CARACTERES:";

SET SW=#%PASS%
SET SW=%SW:~-6%

IF "%SW%" NEQ "%PASS%" GOTO:BUCLE

ECHO. & ECHO  SW:[%SW%]  PASS: [%PASS%] & PAUSE

@ECHO OFF
:BUCLE
CLS & ECHO. 
SET /p "PASS=INTRODUCE SOLO SEIS CARACTERES:";

SET SW=#%PASS%
SET SW=%SW:~-6%

IF "%SW%" NEQ "%PASS%" GOTO:BUCLE

ECHO. & ECHO  SW:[%SW%]  PASS: [%PASS%] & PAUSE

"......$"

"^.......$"

@ECHO OFF
SET PALABRA=MARICA EL ULTIMO
ECHO.& ECHO  PAL:  %PALABRA%& ECHO.

: BUCLE
     CALL SET PAL=%%PALABRA:~%CONT%,1%%
     SET /A CONT+=1
     IF DEFINED PAL (ECHO  STR:  %PAL%
  GOTO :BUCLE)

PAUSE>NUL

@ECHO OFF
PUSHD %~dp0
set OBJ=http://foro.elhacker.net/scripting/ver_codigo_fuente_de_una_pagina_web_desde_msdos-t324643.0.html
WGet  -O OBJ.HTML -o log.INF %OBJ% && (ECHO  %TIME% INICIO PROCESO: > HTMLPROCE.TXT) ||(COLOR 1F&TYPE LOG.INF &PAUSE&EXIT)

SETLOCAL ENABLEDELAYEDEXPANSION

SET /A LOC1=99& SET /A LOC2=500& SET /A CONT=LOC1

IF %LOC1% EQU 0 (SET LOC1=) ELSE (SET LOC1=skip=%LOC1%)

FOR /F "tokens=* %LOC1%" %%F IN (OBJ.HTML) DO (
SET /A  CONT+=1
CLS & ECHO. & ECHO  PROCESANDO LINEA !CONT!

ECHO !CONT!. PROCESANDO DATOS: %%F >> HTMLPROCE.TXT
IF !CONT! EQU %LOC2% GOTO EOF
) 

:EOF
NOTEPAD HTMLPROCE.TXT
ENDLOCAL