Herramientas de usuario

Diferencias

Muestra las diferencias entre dos versiones de la página.

Enlace a la vista de comparación

Ambos lados, revisión anteriorRevisión previa
Próxima revisión		Revisión previa
eliza.bas [2022/08/03 19:00] – peroneliza.bas [2026/04/21 16:06] (actual) – editor externo 127.0.0.1
Línea 1: Línea 1:
-<code freebasic>+<code freebasic eliza.bas>
 5 PRINT TAB(16);"**************************" 5 PRINT TAB(16);"**************************"
 10 PRINT TAB(26);"ELIZA" 10 PRINT TAB(26);"ELIZA"
 20 PRINT TAB(20);"CREATIVE COMPUTING" 20 PRINT TAB(20);"CREATIVE COMPUTING"
 30 PRINT TAB(18);"MORRISTOWN, NEW JERSEY":PRINT 30 PRINT TAB(18);"MORRISTOWN, NEW JERSEY":PRINT
-40 PRINT TAB(19);"ADAPTADI PARA IBM PC POR" +40 PRINT TAB(19);"ADAPTADO PARA IBM PC POR" 
-50 PRINT TAB(20);"PATRICIA DANIELSON AND PAUL HASHFIELD"+50 PRINT TAB(20);"PATRICIA DANIELSON, PAUL HASHFIELD Y PERON"
 52 PRINT TAB(21);"ASEGURESE QUE CAPS LOCK ESTA ENCENDIDO" 52 PRINT TAB(21);"ASEGURESE QUE CAPS LOCK ESTA ENCENDIDO"
 53 PRINT:PRINT TAB(16);"POR FAVOR NO USE COMAS O PUNTOS EN LO QUE ESCRIBA":PRINT 53 PRINT:PRINT TAB(16);"POR FAVOR NO USE COMAS O PUNTOS EN LO QUE ESCRIBA":PRINT
Línea 85: Línea 85:
 1030 REM *********KEYWORDS************** 1030 REM *********KEYWORDS**************
 1049 REM ******************************* 1049 REM *******************************
-1050 DATA "PEDES ","PUEDO ","TU ERES ","USTED ES ","YO NO ","YO SIENTO "+1050 DATA "PUEDE ","PUEDO ","TU ERES ","USTED ES ","YO NO ","YO SIENTO "
 1060 DATA "PORQUE USTED NO ","PORQUE NO PUEDO ","ES USTED ","YO NO PUEDO ","YO SOY ","SOY " 1060 DATA "PORQUE USTED NO ","PORQUE NO PUEDO ","ES USTED ","YO NO PUEDO ","YO SOY ","SOY "
 1070 DATA "USTED ","YO QUIERO ","QUE ","COMO ","QUIEN ","DONDE ","CUANDO ","PORQUE " 1070 DATA "USTED ","YO QUIERO ","QUE ","COMO ","QUIEN ","DONDE ","CUANDO ","PORQUE "
Línea 95: Línea 95:
 1220 REM ********************************* 1220 REM *********************************
 1230 DATA " ESTOY "," SOY "," ERAMOS "," FUE "," USTED "," YO "," SU"," MI " 1230 DATA " ESTOY "," SOY "," ERAMOS "," FUE "," USTED "," YO "," SU"," MI "
-1235 DATA " YO HE "," USTED HA "," YO ESTA "," USTED ESTA "+1235 DATA " YO HE "," USTED HA "," YO ESTOY "," USTED ESTA "
 1240 DATA " YO "," USTED " 1240 DATA " YO "," USTED "
 1300 REM ****************************** 1300 REM ******************************
 1310 REM *********REPLIES************** 1310 REM *********REPLIES**************
 1320 REM ****************************** 1320 REM ******************************
-1330 DATA "DON'T YOU BELIEVE THAT I CAN*"+1330 DATA "NO CREE USTED QUE YO PUEDO*"
 1340 DATA "TAL VEZ USTED QUERRIA SER COMO YO*" 1340 DATA "TAL VEZ USTED QUERRIA SER COMO YO*"
 1350 DATA "USTED QUIERE QUE SEA CAPAZ DE*" 1350 DATA "USTED QUIERE QUE SEA CAPAZ DE*"
 1360 DATA "TAL VEZ USTED NO QUIERE*" 1360 DATA "TAL VEZ USTED NO QUIERE*"
-1365 DATA "QUIERE SER CAPAZA DE*"+1365 DATA "QUIERE SER CAPAZ DE*"
 1370 DATA "QUE LO HACE PENSAR QUE SOY*" 1370 DATA "QUE LO HACE PENSAR QUE SOY*"
 1380 DATA "LE AGRADA PENSAR QUE SOY*" 1380 DATA "LE AGRADA PENSAR QUE SOY*"
Línea 123: Línea 123:
 1530 DATA "PORQUE ESTA USTED INTERESADO EN SI YO SOY O NO*" 1530 DATA "PORQUE ESTA USTED INTERESADO EN SI YO SOY O NO*"
 1540 DATA "PREFERIRIA QUE NO FUESE*" 1540 DATA "PREFERIRIA QUE NO FUESE*"
-1550 DATA "TAL VEZ EN SUS FANTASIAS YO SOY*"+1550 DATA "TAL VEZ USTED FANTASEA QUE YO SOY*"
 1560 DATA "COMO SABE USTED QUE NO PUEDE*" 1560 DATA "COMO SABE USTED QUE NO PUEDE*"
-1570 DATA "HA USTED INTENTADO?"+1570 DATA "HA USTED INTENTADO*"
 1580 DATA "TAL VEZ USTED PUEDE AHORA*" 1580 DATA "TAL VEZ USTED PUEDE AHORA*"
 1590 DATA "VINO A MI PORQUE USTED ES*" 1590 DATA "VINO A MI PORQUE USTED ES*"

Este sitio web utiliza cookies para guardar datos esenciales de su actividad, como su autenticación. Al entrar acepta el uso de cookies.

Más información