Mensajes

Guarda el código fuente en un bloc de notas, con el nombre: loquesea.vbs
y listo, sin necesidad de compilar.

Saludos.

La IP externa no se puede cambiar, la IP interna si.
La IP de un módem es externa.

SaluDoss .

[Binary_Death]

Binary_Death buen aporte, no encontraba nada sobre ANSI.sys (no se, si es uqe no hay nada, o no se buscar XD).

¿porque no funciona en Windows de 64 bits?

[No somos mas que un grotesco juego estilo los sims]

Y aunque no descarto esa existencia de esa tal alma o espiritu (como energia que no hemos podido identificar aun), como una parte primordial de los seres vivientes...pero que estan mortal como quien la albergue.

Electricidad, sinapsis entre químicos neuronales.

Las almas mas puras y fuertes serian las de la naturaleza, como las de arboles que viven miles de años.

Es un alma diferente, no se mucho de botánica pero deben utilizar un sistema nervioso complejo o simple( creo que complejo).

Ademas somos como seres humanos una raza deplorable... imaginense ustedes a una persona de esas que hacen masacres, asesinos, violadores, ladrones, ampones, con vidas inmortales e indestructibles la maldad y sobretodo la maldad humana no es digna de que le sea concebida la vida eterna.

De hecho un pequeño cambio social, político(quitar todo lo que tenga que ver con economía) y de prensa, es suficiente para acabar con los ladrones, violadores, etc.

Que haceis vosotros por las personasven en la calle, que hace la raza humana por esas personas del mundo tercemundista que viven en condiciones de hambre... dejamos que las demas personas pasen por arduas penas, que vivan indignamente y aun asi deberiamos esperar que se nos conceda una vida eterna, un paraiso para nuestras almas lleno de dichas, si tu comes bien, tienes a toda tu familia cerca, y la mayoria de personas de aca deben tener un nivel de vida medio, si alguien mereciera una vida eterna con gosos serian esas personas a quienes la suerte no les sonrio y nacieron en situacion de extrema pobresa.

No existen los países tercermundistas( me parece un termino repugnante, ya que da como superior a un país con mayor nivel económico y/o tecnológico)

Estar aqui debatiendonos sobre si el alma existe o no, es en si mismo señal de que tenemos tiempo de sobra y no nos hace falta nada.
Es un acto egocentrista y petulante estarnos adornando de tener un alma que vivira en un paraiso inmortal.

Todo humano es egocentrismo, trabajo en grupo=egocentrismo colectivo, conseguir una meta=egocentrismo individual, sobrevaloracion(por falta y problemas psicológicos no tratables, ni tenidos en cuenta)=egocentrismo puro; no todo el mundo piensa lo del paraíso inmortal(seria horrible si existiera de todos modos, si existiera, pero no vienen al caso)

El egocentrismo es solo un sistema para lograr metas o llenar vacíos, se da como algo malo o un defecto, ya que solo se ve un punto de una situación.

Si lo piensan viendonos como raza a nivel global teniendo en cuenta esas crudas guerras del medio oriente, esos niños que sufren bombardeos en la franja de gaza, que son reclutados a la fuerza y arrebatados de sus hogares para la guerrilla, los que son explotados sexualmente, etc, y tantas mas infamias que comete el ser humano...

Algunas de esas cosas tambien las hacen algunos animales(haz oído del pigüino, pues ese es uno de elllos)

No somos mas que un grotesco juego estilo los sims, por que si fueramos en verdad concientes como raza ya habria paz hace siglos, pero no evolucionamos para nada, somos guerras y odio.

Revisemos un poco la historia:
Después de la creación de los animales Dios creo  ha Adan y Eva y comieron una fruta maligna que da la inteligencia y estamos condenados a sufrir por siempre, fin para el mayor aprovechamiento de energía unos seres vivos se aprovecharon de otros para sobrevivir, después de millones de años esto se desarrollo tanto que se crearon métodos de defensa y ataque por parte de las diferentes especies, el humano primitivo también se torno así, con una moral barroca y poco desarrollada( pero estable y libre), después para obtener recursos se peleaban diferentes grupos, por los alimentos y/o territorio, etc, para abastecer su grupo, siendo las primeras guerras con una causa noble para un grupo y cruel para el otro, esto se dio antes del habla y por ende no encontraban manera de negociar, después estos objetivos(de alimento y territorio para la comunidad) solo abastecían al monarca o líder del grupo, mas que el grupo en si, el sistema de gobierno, causo que algunos individuos enloquecieran( suena extraño, pero crear leyes es peor que no tenerlas) o quisieran hacer justicia por sus propios medios(algunos robos son para abastecer la familia por ejemplo, algunos asesinatos se dieron por dinero, y problemas económicos inevitables).

Poco a poca la especie humana se fue sometiendo y volviendo sumisa, los problemas psicológicos se acumularon y la racionabilidad se intento suprimir, la historia se altero, los medios moldearon a las personas, hasta volverlas añicos o *****(wow, censura  ). ¿Crees que a todos les conviene que haya paz?

Un saludo.

gracias electro, alguna consideración en especial con los caracteres? se puede cifrar cualquier tecla del teclado incluido los signos raros?

Cualquier símbolo que admita el cmd(algunos simbolos hacen cosas extrañas en la consola, asi que hay que tener cuidado).
Consejos:
1-Ten cuidado con letras como la ñ, que el cmd las visualiza de diferente manera, utiliza MORF. 
http://foro.elhacker.net/scripting/batchaportemorftransforma_texto_unicode_a_ansi-t377748.0.html aun esta en proceso. Pero es funcional.
2-Se recursivo, utiliza parámetros inválidos(como un set que haga una variable inútil), mezcla métodos.
3-Metodos:
Con set=se crean variables de diferentes letras, o se crea una sola variable con todas las letras y/o simbolos, y despues se interpreta,ejemplo:

Código [Seleccionar] Expandir

@echo off
set Navidad=whaoeenll
echo Feliz %Navidad:~1,1%%Navidad:~2,1%%Navidad:~7,2%%Navidad:~3,1%%Navidad:~0,1%%Navidad:~4,3%
pause>NUL
exit /B
Con for=Similar a set, se pueden hacer muchas cosas, así que no daré ejemplos.
Con debug=se coge el símbolo en hexadecimal y se escribe.
ETC, ETC.

SaluDoss.

¿que mensaje te sale? 

[kikeres]

Wikipedia es el único y verdadero Dios   Que Google me perdone  

Por cierto, ¿habéis visto Dark City? Trata este tema de forma bastante curiosa.

No he visto Dark City, pero según la sinopsis, la trama se ve interesante.

kikeres aclarando las cosas, el alma en la antigüedad se veía como fuerza vital, y no se sabia que era, así que se le atribuía a uno que otro ente representativo(en la civilización egipcia le tenían un nombre y pensaban que interactuaba con la sombra y el cuerpo pero no me acuerdo que nombre le daban; en Grecia era solo un don dado por los dioses, que permitía la locomoción, alma o anima) al no tener claro que los mantenía vivos se le dio al alma un origen, función y fin sobrenatural en la mayoría de las civilizaciones.
Por lo que el significado de alma inmaterial viene de ámbitos culturales e históricos.
Ignorando todo lo anterior, aun quedaría la posibilidad de que el alma es inmaterial, si se comprueba que un ente metafísico puede interactuar con un ente físico.

Mi opinión: No creo que un ente metafísico pueda tener contacto con un ente físico y esa es la razón por la que no creo que el alma inmaterial exista.

Saludos.

[tmb90]

El chat, ya esta terminado.
Los archivos por defecto siguen siendo mail.txt y mail.php

Código [Seleccionar] Expandir

@echo off
Rem ChatBox 2.0 Segadorfelix
Rem Basado en el Chat de 3D1
IF ["%~1"]==[""] (Goto:HELP) else IF ["%~2"]==[""] (Goto:HELP)
set demonw=dem%random%
(mode|FIND "as")>%demonw%.ini
for /F "tokens=2" %%_ IN (%demonw%.ini) DO (set "Lineaws=%%_" & Goto:BREAK)
:BREAK
for /F "tokens=2 skip=1" %%_ IN (%demonw%.ini) DO (set "Columw=%%_")
del %demonw%.ini
IF %Lineaws% GEQ 300 set "Lineaws=25"
mode con cols=80 lines=25
set "VALUE=1"
Set "nick=%~2"
set "nick=%nick:<=%"
set "nick=%nick:>=%"
set "nick=%nick:"=%"
set "nick=%nick:(=%"
set "nick=%nick:)=%"
Set "server=%~1"
set "server=%server:<=%"
set "server=%server:>=%"
set "server=%server:"=%"
set "server=%server:(=%"
set "server=%server:)=%"
title ChatBox 2.0
cls
(
echo URLSend = wscript.arguments(0^)
echo MSG = wscript.arguments(1^)
echo Set SendMail = CreateObject("InternetExplorer.Application"^)
echo SendMail.Navigate URLSend ^& MSG
echo Do While SendMail.ReadyState ^<^> 4
echo wscript.sleep 50
echo Loop
)>"%tmp%\SendMail.vbs"
(
echo Set ReadMail = CreateObject("Microsoft.XMLHTTP"^)
echo URLRead = wscript.arguments(0^)
echo ReadMail.Open "Get", URLRead
echo ReadMail.Send
echo Do While ReadMail.ReadyState ^<^> 4
echo wscript.sleep 50
echo Loop
echo wscript.Echo ReadMail.ResponseText
)>"%tmp%\ReadMail.vbs"
set "Dir=%cd%\"
cd "%tmp%"
:Chat
cd %Dir%
set forum=Chat
Cls
echo.
echo.
echo.
echo.
echo NOTA:Escriba "Value(0)"(sin las comillas)para quitar la linea inferior.
echo y "Value(1)" para restaurarla.^|Para salir, escriba "[exit]"
echo.
echo              NICK: %nick%
echo    CONNECT SERVER: %server%
echo.
echo.
CScript //nologo %tmp%\ReadMail.vbs "%server%/mail.txt" 2>NUL
echo.
echo.
echo.
echo                   ÉÍÍÍÍÍÍÍ»
echo  Actualizar Chat: º ENTER º
echo                   ÈÍÍÍÍÍÍͼ
call:simwbols
Set /P "KIll=Escribe un mensaje:"
IF NOT DEFINED KILL Goto:Chat
IF /I ["%KILL%"]==["Value(0)"] set "VALUE=0" & Goto:Chat
IF /I ["%KILL%"]==["Value(1)"] set "VALUE=1" & Goto:Chat
IF /I ["%KILL%"]==["[exit]"] mode con cols=%columw% lines=%lineaws% & exit /B
set "KILL=%KILL:<=%"
set "KILL=%KILL:"=%"
set "KIL=%KILL:(=%"
set "KILL=%KILL:)=%"
Echo Sendding Message...
echo Please Wait...
Set /p"=> ..."<nul
CScript //nologo %tmp%\SendMail.vbs "%server%/mail.php?mail=" "%nick% Dice:"
CScript //nologo %tmp%\SendMail.vbs "%server%/mail.php?mail=" "%KILL%"
Goto:Chat
:::::::::::::::::::::::::::::::::
Rem cuarta linea
:simwbols
IF %VALUE% EQU 0 goto yesw
@(Echo.EB800:E60 "²"06
Echo.EB800:E62 "²"06
Echo.EB800:E64 "²"06
Echo.EB800:E66 "²"06
Echo.EB800:E68 "²"06
Echo.EB800:E6A "²"06
Echo.EB800:E6C "²"06
Echo.EB800:E6E "²"06
Echo.EB800:E70 "²"06
Echo.EB800:E72 "²"06
Echo.EB800:E74 "²"06
Echo.EB800:E76 "²"06
Echo.EB800:E78 "²"06
Echo.EB800:E7A "²"06
Echo.EB800:E7C "²"06
Echo.EB800:E7E "²"06
Echo.EB800:E80 "²"06
Echo.EB800:E82 "²"06
Echo.EB800:E84 "²"06
Echo.EB800:E86 "²"06
Echo.EB800:E88 "²"06
Echo.EB800:E8A "²"06
Echo.EB800:E8C "²"06
Echo.EB800:E8E "²"06
Echo.EB800:E90 "²"06
Echo.EB800:E92 "²"06
Echo.EB800:E94 "²"06
Echo.EB800:E96 "²"06
Echo.EB800:E98 "²"06
Echo.EB800:E9A "²"06
Echo.EB800:E9C "²"06
Echo.EB800:E9E "²"06
Echo.EB800:EA0 "²"06
Echo.EB800:EA2 "²"06
Echo.EB800:EA4 "²"06
Echo.EB800:EA6 "²"06
Echo.EB800:EA8 "²"06
Echo.EB800:EAA "²"06
Echo.EB800:EAC "²"06
Echo.EB800:EAE "²"06
Echo.EB800:EB0 "²"06
Echo.EB800:EB2 "²"06
Echo.EB800:EB4 "²"06
Echo.EB800:EB6 "²"06
Echo.EB800:EB8 "²"06
Echo.EB800:EBA "²"06
Echo.EB800:EBC "²"06
Echo.EB800:EBE "²"06
Echo.EB800:EC0 "²"06
Echo.EB800:EC2 "²"06
Echo.EB800:EC4 "²"06
Echo.EB800:EC6 "²"06
Echo.EB800:EC8 "²"06
Echo.EB800:ECA "²"06
Echo.EB800:ECC "²"06
Echo.EB800:ECE "²"06
Echo.EB800:ED0 "²"06
Echo.EB800:ED2 "²"06
Echo.EB800:ED4 "²"06
Echo.EB800:ED6 "²"06
Echo.EB800:ED8 "²"06
Echo.EB800:EDA "²"06
Echo.EB800:EDC "²"06
Echo.EB800:EDE "²"06
Echo.EB800:EE0 "²"06
Echo.EB800:EE2 "²"06
Echo.EB800:EE4 "²"06
Echo.EB800:EE6 "²"06
Echo.EB800:EE8 "²"06
Echo.EB800:EEA "²"06
Echo.EB800:EEC "²"06
Echo.EB800:EEE "²"06
Echo.EB800:EF0 "²"06
Echo.EB800:EF2 "²"06
Echo.EB800:EF4 "²"06
Echo.EB800:EF6 "²"06
Echo.EB800:EF8 "²"06
Echo.EB800:EFA "²"06
Echo.EB800:EFC "²"06
Echo.EB800:EFE "²"06
Echo.Q)|Debug>nul
:yesw
@(Echo.EB800:1E0 "²"06
Echo.EB800:1E2 "²"06
Echo.EB800:1E4 "²"06
Echo.EB800:1E6 "²"06
Echo.EB800:1E8 "²"06
Echo.EB800:1EA "²"06
Echo.EB800:1EC "²"06
Echo.EB800:1EE "²"06
Echo.EB800:1F0 "²"06
Echo.EB800:1F2 "²"06
Echo.EB800:1F4 "²"06
Echo.EB800:1F6 "²"06
Echo.EB800:1F8 "²"06
Echo.EB800:1FA "²"06
Echo.EB800:1FC "²"06
Echo.EB800:1FE "²"06
Echo.EB800:200 "²"06
Echo.EB800:202 "²"06
Echo.EB800:204 "²"06
Echo.EB800:206 "²"06
Echo.EB800:208 "²"06
Echo.EB800:20A "²"06
Echo.EB800:20C "²"06
Echo.EB800:20E "²"06
Echo.EB800:210 "²"06
Echo.EB800:212 "²"06
Echo.EB800:214 "²"06
Echo.EB800:216 "²"06
Echo.EB800:218 "²"06
Echo.EB800:21A "²"06
Echo.EB800:21C "²"06
Echo.EB800:21E "²"06
Echo.EB800:220 "²"06
Echo.EB800:222 "²"06
Echo.EB800:224 "²"06
Echo.EB800:226 "²"06
Echo.EB800:228 "²"06
Echo.EB800:22A "²"06
Echo.EB800:22C "²"06
Echo.EB800:22E "²"06
Echo.EB800:230 "²"06
Echo.EB800:232 "²"06
Echo.EB800:234 "²"06
Echo.EB800:236 "²"06
Echo.EB800:238 "²"06
Echo.EB800:23A "²"06
Echo.EB800:23C "²"06
Echo.EB800:23E "²"06
Echo.EB800:240 "²"06
Echo.EB800:242 "²"06
Echo.EB800:244 "²"06
Echo.EB800:246 "²"06
Echo.EB800:248 "²"06
Echo.EB800:24A "²"06
Echo.EB800:24C "²"06
Echo.EB800:24E "²"06
Echo.EB800:250 "²"06
Echo.EB800:252 "²"06
Echo.EB800:254 "²"06
Echo.EB800:256 "²"06
Echo.EB800:258 "²"06
Echo.EB800:25A "²"06
Echo.EB800:25C "²"06
Echo.EB800:25E "²"06
Echo.EB800:260 "²"06
Echo.EB800:262 "²"06
Echo.EB800:264 "²"06
Echo.EB800:266 "²"06
Echo.EB800:268 "²"06
Echo.EB800:26A "²"06
Echo.EB800:26C "²"06
Echo.EB800:26E "²"06
Echo.EB800:270 "²"06
Echo.EB800:272 "²"06
Echo.EB800:274 "²"06
Echo.EB800:276 "²"06
Echo.EB800:278 "²"06
Echo.EB800:27A "²"06
Echo.EB800:27C "²"06
Echo.EB800:27E "²"06
Echo.EB800:A0 "±"04
Echo.EB800:A2 "±"01
Echo.EB800:A4 "±"04
Echo.EB800:A6 "±"01
Echo.EB800:A8 "±"04
Echo.EB800:AA "±"01
Echo.EB800:AC "±"04
Echo.EB800:AE "±"01
Echo.EB800:B0 "±"04
Echo.EB800:B2 "±"01
Echo.EB800:B4 "±"04
Echo.EB800:B6 "±"01
Echo.EB800:B8 "±"04
Echo.EB800:BA "±"01
Echo.EB800:BC "±"04
Echo.EB800:BE "±"01
Echo.EB800:C0 "±"04
Echo.EB800:C2 "±"01
Echo.EB800:C4 "±"04
Echo.EB800:C6 "±"01
Echo.EB800:C8 "±"04
Echo.EB800:CA "±"01
Echo.EB800:CC "±"04
Echo.EB800:CE "C"2"h"2"a"2"t"2" "2"B"2"o"2"x"2" "2"2"2"."2"0"2" "2"B"2"Y"2" "2"S"2
Echo.EB800:F0 "e"2"g"2"a"2"d"2"o"2"r"2"f"2"e"2"l"2"i"2"x"02
Echo.EB800:106 "±"01
Echo.EB800:108 "±"04
Echo.EB800:10A "±"01
Echo.EB800:10C "±"04
Echo.EB800:10E "±"01
Echo.EB800:110 "±"04
Echo.EB800:112 "±"01
Echo.EB800:114 "±"04
Echo.EB800:116 "±"01
Echo.EB800:118 "±"04
Echo.EB800:11A "±"01
Echo.EB800:11C "±"04
Echo.EB800:11E "±"01
Echo.EB800:120 "±"04
Echo.EB800:122 "±"01
Echo.EB800:124 "±"04
Echo.EB800:126 "±"01
Echo.EB800:128 "±"04
Echo.EB800:12A "±"01
Echo.EB800:12C "±"04
Echo.EB800:12E "±"01
Echo.EB800:130 "±"04
Echo.EB800:132 "±"01
Echo.EB800:134 "±"04
Echo.EB800:136 "±"01
Echo.EB800:138 "±"04
Echo.EB800:13A "±"01
Echo.EB800:13C "±"04
Echo.EB800:13E "±"01
Echo.EB800:00 "±"04
Echo.EB800:02 "±"01
Echo.EB800:04 "±"04
Echo.EB800:06 "±"01
Echo.EB800:08 "±"04
Echo.EB800:A "±"01
Echo.EB800:C "±"04
Echo.EB800:E "±"01
Echo.EB800:10 "±"04
Echo.EB800:12 "±"01
Echo.EB800:14 "±"04
Echo.EB800:16 "±"01
Echo.EB800:18 "±"04
Echo.EB800:1A "±"01
Echo.EB800:1C "±"04
Echo.EB800:1E "±"01
Echo.EB800:20 "±"04
Echo.EB800:22 "±"01
Echo.EB800:24 "±"04
Echo.EB800:26 "±"01
Echo.EB800:28 "±"04
Echo.EB800:2A "±"01
Echo.EB800:2C "±"04
Echo.EB800:2E "±"01
Echo.EB800:30 "±"04
Echo.EB800:32 "±"01
Echo.EB800:34 "±"04
Echo.EB800:36 "±"01
Echo.EB800:38 "±"04
Echo.EB800:3A "±"01
Echo.EB800:3C "±"04
Echo.EB800:3E "±"01
Echo.EB800:40 "±"04
Echo.EB800:42 "±"01
Echo.EB800:44 "±"04
Echo.EB800:46 "±"01
Echo.EB800:48 "±"04
Echo.EB800:4A "±"01
Echo.EB800:4C "±"04
Echo.EB800:4E "±"01
Echo.EB800:50 "±"04
Echo.EB800:52 "±"01
Echo.EB800:54 "±"04
Echo.EB800:56 "±"01
Echo.EB800:58 "±"04
Echo.EB800:5A "±"01
Echo.EB800:5C "±"04
Echo.EB800:5E "±"01
Echo.EB800:60 "±"04
Echo.EB800:62 "±"01
Echo.EB800:64 "±"04
Echo.EB800:66 "±"01
Echo.EB800:68 "±"04
Echo.EB800:6A "±"01
Echo.EB800:6C "±"04
Echo.EB800:6E "±"01
Echo.EB800:70 "±"04
Echo.EB800:72 "±"01
Echo.EB800:74 "±"04
Echo.EB800:76 "±"01
Echo.EB800:78 "±"04
Echo.EB800:7A "±"01
Echo.EB800:7C "±"04
Echo.EB800:7E "±"01
Echo.EB800:80 "±"04
Echo.EB800:82 "±"01
Echo.EB800:84 "±"04
Echo.EB800:86 "±"01
Echo.EB800:88 "±"04
Echo.EB800:8A "±"01
Echo.EB800:8C "±"04
Echo.EB800:8E "±"01
Echo.EB800:90 "±"04
Echo.EB800:92 "±"01
Echo.EB800:94 "±"04
Echo.EB800:96 "±"01
Echo.EB800:98 "±"04
Echo.EB800:9A "±"01
Echo.EB800:9C "±"04
Echo.EB800:9E "±"01
Echo.Q)|Debug>nul
Goto:EOF
:HELP
Echo ChatBox 2.0 esta basado en el ChatBox de 3D1
Echo.
Echo Sintaxis: %0 [SERVIDOR] [NICK]
ECHO ejemplo: %0 Http://name.webcindario.com USUArio
echo.
echo Copyright 2012 ¸ segadorfelix
Exit /B
PD: Pendiente pantalla visual he interactiva para el SO del chat. Enciado a tmb90

SaluDoss

Aca el chat terminado, funciona por linea de comandos.

Código [Seleccionar] Expandir

@echo off
Rem ChatBox 2.0 Segadorfelix
Rem Basado en el Chat de 3D1
IF ["%~1"]==[""] (Goto:HELP) else IF ["%~2"]==[""] (Goto:HELP)
set demonw=dem%random%
(mode|FIND "as")>%demonw%.ini
for /F "tokens=2" %%_ IN (%demonw%.ini) DO (set "Lineaws=%%_" & Goto:BREAK)
:BREAK
for /F "tokens=2 skip=1" %%_ IN (%demonw%.ini) DO (set "Columw=%%_")
del %demonw%.ini
IF %Lineaws% GEQ 300 set "Lineaws=25"
mode con cols=80 lines=25
set "VALUE=1"
Set "nick=%~2"
set "nick=%nick:<=%"
set "nick=%nick:>=%"
set "nick=%nick:"=%"
set "nick=%nick:(=%"
set "nick=%nick:)=%"
Set "server=%~1"
set "server=%server:<=%"
set "server=%server:>=%"
set "server=%server:"=%"
set "server=%server:(=%"
set "server=%server:)=%"
title ChatBox 2.0
cls
(
echo URLSend = wscript.arguments(0^)
echo MSG = wscript.arguments(1^)
echo Set SendMail = CreateObject("InternetExplorer.Application"^)
echo SendMail.Navigate URLSend ^& MSG
echo Do While SendMail.ReadyState ^<^> 4
echo wscript.sleep 50
echo Loop
)>"%tmp%\SendMail.vbs"
(
echo Set ReadMail = CreateObject("Microsoft.XMLHTTP"^)
echo URLRead = wscript.arguments(0^)
echo ReadMail.Open "Get", URLRead
echo ReadMail.Send
echo Do While ReadMail.ReadyState ^<^> 4
echo wscript.sleep 50
echo Loop
echo wscript.Echo ReadMail.ResponseText
)>"%tmp%\ReadMail.vbs"
set "Dir=%cd%\"
cd "%tmp%"
:Chat
cd %Dir%
set forum=Chat
Cls
echo.
echo.
echo.
echo.
echo NOTA:Escriba "Value(0)"(sin las comillas)para quitar la linea inferior.
echo y "Value(1)" para restaurarla.^|Para salir, escriba "[exit]"
echo.
echo              NICK: %nick%
echo    CONNECT SERVER: %server%
echo.
echo.
CScript //nologo %tmp%\ReadMail.vbs "%server%/mail.txt" 2>NUL
echo.
echo.
echo.
echo                   ÉÍÍÍÍÍÍÍ»
echo  Actualizar Chat: º ENTER º
echo                   ÈÍÍÍÍÍÍͼ
call:simwbols
Set /P "KIll=Escribe un mensaje:"
IF NOT DEFINED KILL Goto:Chat
IF /I ["%KILL%"]==["Value(0)"] set "VALUE=0" & Goto:Chat
IF /I ["%KILL%"]==["Value(1)"] set "VALUE=1" & Goto:Chat
IF /I ["%KILL%"]==["[exit]"] exit /B
set "KILL=%KILL:<=%"
set "KILL=%KILL:"=%"
set "KIL=%KILL:(=%"
set "KILL=%KILL:)=%"
Echo Sendding Message...
echo Please Wait...
Set /p"=> ..."<nul
CScript //nologo %tmp%\SendMail.vbs "%server%/mail.php?mail=" "%nick% Dice:"
CScript //nologo %tmp%\SendMail.vbs "%server%/mail.php?mail=" "%KILL%"
Goto:Chat
:::::::::::::::::::::::::::::::::
Rem cuarta linea
:simwbols
IF %VALUE% EQU 0 goto yesw
@(Echo.EB800:E60 "²"06
Echo.EB800:E62 "²"06
Echo.EB800:E64 "²"06
Echo.EB800:E66 "²"06
Echo.EB800:E68 "²"06
Echo.EB800:E6A "²"06
Echo.EB800:E6C "²"06
Echo.EB800:E6E "²"06
Echo.EB800:E70 "²"06
Echo.EB800:E72 "²"06
Echo.EB800:E74 "²"06
Echo.EB800:E76 "²"06
Echo.EB800:E78 "²"06
Echo.EB800:E7A "²"06
Echo.EB800:E7C "²"06
Echo.EB800:E7E "²"06
Echo.EB800:E80 "²"06
Echo.EB800:E82 "²"06
Echo.EB800:E84 "²"06
Echo.EB800:E86 "²"06
Echo.EB800:E88 "²"06
Echo.EB800:E8A "²"06
Echo.EB800:E8C "²"06
Echo.EB800:E8E "²"06
Echo.EB800:E90 "²"06
Echo.EB800:E92 "²"06
Echo.EB800:E94 "²"06
Echo.EB800:E96 "²"06
Echo.EB800:E98 "²"06
Echo.EB800:E9A "²"06
Echo.EB800:E9C "²"06
Echo.EB800:E9E "²"06
Echo.EB800:EA0 "²"06
Echo.EB800:EA2 "²"06
Echo.EB800:EA4 "²"06
Echo.EB800:EA6 "²"06
Echo.EB800:EA8 "²"06
Echo.EB800:EAA "²"06
Echo.EB800:EAC "²"06
Echo.EB800:EAE "²"06
Echo.EB800:EB0 "²"06
Echo.EB800:EB2 "²"06
Echo.EB800:EB4 "²"06
Echo.EB800:EB6 "²"06
Echo.EB800:EB8 "²"06
Echo.EB800:EBA "²"06
Echo.EB800:EBC "²"06
Echo.EB800:EBE "²"06
Echo.EB800:EC0 "²"06
Echo.EB800:EC2 "²"06
Echo.EB800:EC4 "²"06
Echo.EB800:EC6 "²"06
Echo.EB800:EC8 "²"06
Echo.EB800:ECA "²"06
Echo.EB800:ECC "²"06
Echo.EB800:ECE "²"06
Echo.EB800:ED0 "²"06
Echo.EB800:ED2 "²"06
Echo.EB800:ED4 "²"06
Echo.EB800:ED6 "²"06
Echo.EB800:ED8 "²"06
Echo.EB800:EDA "²"06
Echo.EB800:EDC "²"06
Echo.EB800:EDE "²"06
Echo.EB800:EE0 "²"06
Echo.EB800:EE2 "²"06
Echo.EB800:EE4 "²"06
Echo.EB800:EE6 "²"06
Echo.EB800:EE8 "²"06
Echo.EB800:EEA "²"06
Echo.EB800:EEC "²"06
Echo.EB800:EEE "²"06
Echo.EB800:EF0 "²"06
Echo.EB800:EF2 "²"06
Echo.EB800:EF4 "²"06
Echo.EB800:EF6 "²"06
Echo.EB800:EF8 "²"06
Echo.EB800:EFA "²"06
Echo.EB800:EFC "²"06
Echo.EB800:EFE "²"06
Echo.Q)|Debug>nul
:yesw
@(Echo.EB800:1E0 "²"06
Echo.EB800:1E2 "²"06
Echo.EB800:1E4 "²"06
Echo.EB800:1E6 "²"06
Echo.EB800:1E8 "²"06
Echo.EB800:1EA "²"06
Echo.EB800:1EC "²"06
Echo.EB800:1EE "²"06
Echo.EB800:1F0 "²"06
Echo.EB800:1F2 "²"06
Echo.EB800:1F4 "²"06
Echo.EB800:1F6 "²"06
Echo.EB800:1F8 "²"06
Echo.EB800:1FA "²"06
Echo.EB800:1FC "²"06
Echo.EB800:1FE "²"06
Echo.EB800:200 "²"06
Echo.EB800:202 "²"06
Echo.EB800:204 "²"06
Echo.EB800:206 "²"06
Echo.EB800:208 "²"06
Echo.EB800:20A "²"06
Echo.EB800:20C "²"06
Echo.EB800:20E "²"06
Echo.EB800:210 "²"06
Echo.EB800:212 "²"06
Echo.EB800:214 "²"06
Echo.EB800:216 "²"06
Echo.EB800:218 "²"06
Echo.EB800:21A "²"06
Echo.EB800:21C "²"06
Echo.EB800:21E "²"06
Echo.EB800:220 "²"06
Echo.EB800:222 "²"06
Echo.EB800:224 "²"06
Echo.EB800:226 "²"06
Echo.EB800:228 "²"06
Echo.EB800:22A "²"06
Echo.EB800:22C "²"06
Echo.EB800:22E "²"06
Echo.EB800:230 "²"06
Echo.EB800:232 "²"06
Echo.EB800:234 "²"06
Echo.EB800:236 "²"06
Echo.EB800:238 "²"06
Echo.EB800:23A "²"06
Echo.EB800:23C "²"06
Echo.EB800:23E "²"06
Echo.EB800:240 "²"06
Echo.EB800:242 "²"06
Echo.EB800:244 "²"06
Echo.EB800:246 "²"06
Echo.EB800:248 "²"06
Echo.EB800:24A "²"06
Echo.EB800:24C "²"06
Echo.EB800:24E "²"06
Echo.EB800:250 "²"06
Echo.EB800:252 "²"06
Echo.EB800:254 "²"06
Echo.EB800:256 "²"06
Echo.EB800:258 "²"06
Echo.EB800:25A "²"06
Echo.EB800:25C "²"06
Echo.EB800:25E "²"06
Echo.EB800:260 "²"06
Echo.EB800:262 "²"06
Echo.EB800:264 "²"06
Echo.EB800:266 "²"06
Echo.EB800:268 "²"06
Echo.EB800:26A "²"06
Echo.EB800:26C "²"06
Echo.EB800:26E "²"06
Echo.EB800:270 "²"06
Echo.EB800:272 "²"06
Echo.EB800:274 "²"06
Echo.EB800:276 "²"06
Echo.EB800:278 "²"06
Echo.EB800:27A "²"06
Echo.EB800:27C "²"06
Echo.EB800:27E "²"06
Echo.EB800:A0 "±"04
Echo.EB800:A2 "±"01
Echo.EB800:A4 "±"04
Echo.EB800:A6 "±"01
Echo.EB800:A8 "±"04
Echo.EB800:AA "±"01
Echo.EB800:AC "±"04
Echo.EB800:AE "±"01
Echo.EB800:B0 "±"04
Echo.EB800:B2 "±"01
Echo.EB800:B4 "±"04
Echo.EB800:B6 "±"01
Echo.EB800:B8 "±"04
Echo.EB800:BA "±"01
Echo.EB800:BC "±"04
Echo.EB800:BE "±"01
Echo.EB800:C0 "±"04
Echo.EB800:C2 "±"01
Echo.EB800:C4 "±"04
Echo.EB800:C6 "±"01
Echo.EB800:C8 "±"04
Echo.EB800:CA "±"01
Echo.EB800:CC "±"04
Echo.EB800:CE "C"2"h"2"a"2"t"2" "2"B"2"o"2"x"2" "2"2"2"."2"0"2" "2"B"2"Y"2" "2"S"2
Echo.EB800:F0 "e"2"g"2"a"2"d"2"o"2"r"2"f"2"e"2"l"2"i"2"x"02
Echo.EB800:106 "±"01
Echo.EB800:108 "±"04
Echo.EB800:10A "±"01
Echo.EB800:10C "±"04
Echo.EB800:10E "±"01
Echo.EB800:110 "±"04
Echo.EB800:112 "±"01
Echo.EB800:114 "±"04
Echo.EB800:116 "±"01
Echo.EB800:118 "±"04
Echo.EB800:11A "±"01
Echo.EB800:11C "±"04
Echo.EB800:11E "±"01
Echo.EB800:120 "±"04
Echo.EB800:122 "±"01
Echo.EB800:124 "±"04
Echo.EB800:126 "±"01
Echo.EB800:128 "±"04
Echo.EB800:12A "±"01
Echo.EB800:12C "±"04
Echo.EB800:12E "±"01
Echo.EB800:130 "±"04
Echo.EB800:132 "±"01
Echo.EB800:134 "±"04
Echo.EB800:136 "±"01
Echo.EB800:138 "±"04
Echo.EB800:13A "±"01
Echo.EB800:13C "±"04
Echo.EB800:13E "±"01
Echo.EB800:00 "±"04
Echo.EB800:02 "±"01
Echo.EB800:04 "±"04
Echo.EB800:06 "±"01
Echo.EB800:08 "±"04
Echo.EB800:A "±"01
Echo.EB800:C "±"04
Echo.EB800:E "±"01
Echo.EB800:10 "±"04
Echo.EB800:12 "±"01
Echo.EB800:14 "±"04
Echo.EB800:16 "±"01
Echo.EB800:18 "±"04
Echo.EB800:1A "±"01
Echo.EB800:1C "±"04
Echo.EB800:1E "±"01
Echo.EB800:20 "±"04
Echo.EB800:22 "±"01
Echo.EB800:24 "±"04
Echo.EB800:26 "±"01
Echo.EB800:28 "±"04
Echo.EB800:2A "±"01
Echo.EB800:2C "±"04
Echo.EB800:2E "±"01
Echo.EB800:30 "±"04
Echo.EB800:32 "±"01
Echo.EB800:34 "±"04
Echo.EB800:36 "±"01
Echo.EB800:38 "±"04
Echo.EB800:3A "±"01
Echo.EB800:3C "±"04
Echo.EB800:3E "±"01
Echo.EB800:40 "±"04
Echo.EB800:42 "±"01
Echo.EB800:44 "±"04
Echo.EB800:46 "±"01
Echo.EB800:48 "±"04
Echo.EB800:4A "±"01
Echo.EB800:4C "±"04
Echo.EB800:4E "±"01
Echo.EB800:50 "±"04
Echo.EB800:52 "±"01
Echo.EB800:54 "±"04
Echo.EB800:56 "±"01
Echo.EB800:58 "±"04
Echo.EB800:5A "±"01
Echo.EB800:5C "±"04
Echo.EB800:5E "±"01
Echo.EB800:60 "±"04
Echo.EB800:62 "±"01
Echo.EB800:64 "±"04
Echo.EB800:66 "±"01
Echo.EB800:68 "±"04
Echo.EB800:6A "±"01
Echo.EB800:6C "±"04
Echo.EB800:6E "±"01
Echo.EB800:70 "±"04
Echo.EB800:72 "±"01
Echo.EB800:74 "±"04
Echo.EB800:76 "±"01
Echo.EB800:78 "±"04
Echo.EB800:7A "±"01
Echo.EB800:7C "±"04
Echo.EB800:7E "±"01
Echo.EB800:80 "±"04
Echo.EB800:82 "±"01
Echo.EB800:84 "±"04
Echo.EB800:86 "±"01
Echo.EB800:88 "±"04
Echo.EB800:8A "±"01
Echo.EB800:8C "±"04
Echo.EB800:8E "±"01
Echo.EB800:90 "±"04
Echo.EB800:92 "±"01
Echo.EB800:94 "±"04
Echo.EB800:96 "±"01
Echo.EB800:98 "±"04
Echo.EB800:9A "±"01
Echo.EB800:9C "±"04
Echo.EB800:9E "±"01
Echo.Q)|Debug>nul
Goto:EOF
:HELP
Echo ChatBox 2.0 esta basado en el ChatBox de 3D1
Echo.
Echo Sintaxis: %0 [SERVIDOR] [NICK]
ECHO ejemplo: %0 Http://name.webcindario.com USUArio
echo.
echo Copyright 2012 ¸ segadorfelix
Exit /B

[Binary_Death]

Binary_Death estoy de acuerdo, lo que pasa es que algunas palabras como "alma" tienen varios significados, pero el mas común(y el que esta en wikipedia XD) es el de ente inmaterial o filosófico. Pero se puede utilizar como sinónimo de mente (aunque es mejor utilizar el segundo termino para evitar confusiones).
X

Así que se puede asumir que existe el alma como mente, pero no como ente inmaterial.
Saludos.