!================================================================ ! -------------- LEMNISCATA --------------- !================================================================ !================================================================ Constant Historia "Lemniscata"; Release 1; Constant Titular "^La vida es una tómbola, tom tom tómbola.^ Por Depresiv.^"; !================================================================ Constant HAY_CURIOSIDADES; Constant NO_PUNTUACION; Constant NO_LUGARES; Global Personaje=1; Global cancion=0; [ Curiosidades; "^¿Has probado a escuchar repetidas veces en la sala de espera? ^^No hay más curiosidades. Es un juego muy pequeño."; ]; Include "EParser"; [ Inicializar; CambiarJugador(Paciente); localizacion = SalaEspera; Personaje = 1; ]; Include "Acciones"; Include "Gramatica.h"; Include "BajoNivel"; ! Los personajes jugadores. Object Paciente "ti mismo" with descripcion [; if (Personaje == 1) "Eres una mujer joven, de unos 25 años, profesora en un colegio."; if (Personaje == 2) "Eres un niño, de ocho años."; if (Personaje == 3) "Eres un chico de unos 15 años."; "Eres un contable de unos 45 años."; ]; ! El limbo es el lugar donde están los objetos que no ! están en el juego Object Limbo "Limbo" with descripcion "Eh. ¿cómo has llegado aquí? Malditos betatesters...", has luz; !================================================================ ! LOCALIDAD !================================================================ !================================================================ ! SalaEspera !================================================================ Object SalaEspera "Sala de espera de un hospital" with nombre 'sala' 'espera' 'hospital' 'salida', inicial [; if (self hasnt general) { give self general; "^^Hoy no ha sido el mejor de los días. ^^Él ha estado aún más reservado que de costumbre. Has intentado lo que has podido para que te diera alguna pista, algo... a lo que poder agarrarte. No podéis seguir así siempre, y él lo sabe. ^^Que sí, que es complicado, pero... ¿No tienes derecho acaso a querer ser feliz? ^^Además, los críos han estado más traviesos que nunca. Parece que notan tu debilidad y se aprovechan de ella. Dan vueltas por la clase, gritan, se tiran cosas los unos a los otros... Un desastre. Y el resto de profesores, claro, ~Tienes que saber ganártelos...~ ~A un niño de cinco años con un poco de amor le basta...~ ¡Como si fuera tan sencillo! ^^Y para rematar, visita al ginecólogo por la tarde. Hay días que es mejor no sacar el pie fuera de la cama... ^^Mientras meditas en todo esto, tu mirada desciende hasta dar con una bola de papel arrugada, que descansa junto a tu pie... La curiosidad te hace olvidar por un momento tus problemas.^^"; }; ], descripcion "Una sala de espera corriente, con sillones de piel y cuadros de estilo ~decorativo superfluo~. Suena levemente el hilo musical. Al norte se encuentra la única salida de la sala.", antes [; Escuchar: switch (cancion) { 0: cancion ++; "Una versión orquestada de ~Losing my religion~ de REM."; 1: cancion ++; "Una versión orquestada de ~Papa don't preach~ de Madonna."; 2: cancion ++; "Una versión orquestada de ~Corazón partío~ de Alejandro Sanz."; 3: cancion ++; "Una versión orquestada de ~Cien Gaviotas~ de Duncan Dhu."; 4: cancion ++; "Una versión orquestada de ~I've got to change your evil ways~ de Santana."; 5: cancion ++; "Una versión orquestada de ~No debía de quererte~ de Concha Piquer."; 6: cancion ++; "Una versión orquestada de ~Today~ de Smashing Pumpkins."; 7: cancion ++; "Una versión orquestada de ~Thriller~ de Michael Jackson."; 8: cancion ++; "Una versión orquestada de ~Tout les garçons et les filles~ de Françoise Hardy."; 9: cancion ++; "Una versión orquestada de ~The final countdown~ de Europe."; 10: cancion ++; "Una versión orquestada de ~99 Luftballons~ de Nena."; 11: cancion ++; "Una versión orquestada de ~Friday I'm in love~ de The Cure."; 12: cancion ++; "Una versión orquestada de ~Carmina Burana~ de Carl Orrf."; 13: cancion ++; "Una versión orquestada de ~Que canten los niños~ de Jose Luis Perales."; 14: cancion ++; "Una versión orquestada de ~Great balls of fire~ de Jerry Lee Lewis."; 15: cancion ++; "Una versión orquestada de ~I say a little prayer for you~ de Diana Ross."; 16: cancion ++; "Una versión orquestada de ~Michelle~ de The Beatles."; 17: cancion ++; "Una versión orquestada de ~What a wonderful world~ de Frank Sinatra."; 18: cancion ++; "Una versión orquestada de ~Eternal Flame~ de Wilson Phillips."; 19: cancion = 0; "Una versión orquestada de ~Sweet Dreams~ de Eurythmics."; }; Salir: "Mejor será esperar hasta que el doctor te llame..."; ], al_n "Mejor será esperar hasta que el doctor te llame...", has luz; Object Sillones "sillones" SalaEspera with nombre 'sillon' 'sillones', adjetivos 'piel' 'oscura' 'brillante' 'oscuros' 'brillantes', descripcion "Sillones de piel oscura y brillante, de esos que huelen a desinfectante y que hacen sentir enfermo nada más mirarlos.", antes [; Tocar: "Sientes el tacto suave de la piel."; Oler: "Desinfectante."; Meterse: "Ya estás en uno de los sillones."; Recibir: "No tienes intención de ir dejando cosas sobre los sillones."; ], has nombreplural escenario oculto entrable soporte; Object Cuadros "cuadros" SalaEspera with nombre 'cuadro' 'cuadros', adjetivos 'decorativos' 'superfluos' 'decorativo' 'superfluo' 'adorno' 'adornos' 'geométrico' 'geométricos' 'color' 'colores' 'pastel', descripcion "Adornos geométricos, líneas, colores pastel... Apenas dejar de mirarlos ya te olvidas de ellos.", antes [; Tocar: "Por supuesto, no es pintura."; Oler: "Desinfectante."; Empujar, Girar, Agitar: "Mejor deja los cuadros como están, no quieres dar mala imagen al doctor."; ], has nombreplural escenario oculto; Object Papel "papel" SalaEspera with nombre 'papel' 'hoja' 'pajarita' 'bola' 'pedazo', adjetivos 'blanca' 'lisa' 'arrugada' 'roto' 'doblado', descripcion [; if (Personaje == 1) "Una bola de papel, arrugada, en el suelo. ~¿Qué habrá escrito?~ piensas."; if (Personaje == 2) "Un papel roto y como doblado de una forma rara."; if (Personaje == 3) "¡Una pajarita de papel preciosa! Parece que puede haber algo escrito..."; "Una hoja de papel blanca y lisa."; ], antes [; Atacar: "No, romper el papel ahora mismo no me reportaría ningún beneficio."; Examinar: if (Personaje == 1 && uno in jugador) "Está muy arrugada. ¿No sería mejor abrirla?"; if (Personaje == 2 && uno in jugador) "Está escrito, pero te cuesta mucho leerlo. La letra es muy rara. Te duele la cabeza."; if (Personaje == 3 && uno in jugador) "Tal y como está doblada no se puede leer nada."; Abrir, Desdoblar: if ((Personaje == 1 || Personaje == 3) && uno notin jugador) "Deberías tener el papel en la mano."; if (Personaje == 1 && uno in jugador) { Personaje ++; print "Abres el papel y comienzas a leer ávidamente lo que está escrito...^^"; EsperarTecla (); print "¡No puede ser! Es una carta... ¡De él! ¿Qué hace aquí una carta suya? y parece... parece que habla de tí...^^"; EsperarTecla (); print "¡Hijo de la gran puta! No se atreve a decirte esto a la cara y lo pone por escrito. No es justo, no lo es. No después de todo lo que ha pasado...^^"; EsperarTecla (); print "Furiosa, rompes el papel en multitud de pedazos. De repente, la enfermera entra en la sala, indicándote que la sigas. Recoges todos los pedazos, pero uno de ellos resbala hasta el suelo...^^"; EsperarTecla (); print "Nadie lo va a mirar de todas formas.^^"; EsperarTecla (); BorrarPantalla (); tate_callao = 1; ; tate_callao = 0; print "^^¡Por fín viernes! Se acabaron el colegio, los profes y las clases. Se acabó tener que verle la jeta al Luisma y al Toni, que parece que no quieren más que hacerte la puñeta. ^^Pero no ha llegado la libertad todavía. Te tienes que poner la vacuna contra la alergia, que si no luego tu madre te dice que por eso te lloran los ojos y los tienes siempre llenos de legañas. ^^Estás resoplando, impaciente, pensando en todo lo que vas a hacer esta tarde cuando salgas del médico, cuando te das cuenta de un pedazo de papel muy raro que hay en el suelo...^^"; <>; }; if (personaje == 2) "No, justo al contrario. Te apetece jugar con él a inventar cosas. En clase habéis hecho algo de papiroflexia..."; if (Personaje == 3 && uno in jugador) { Personaje ++; print "Desdoblas la pajarita y lees lo que hay escrito, con los dedos temblorosos por la emoción...^^"; EsperarTecla (); print "~Eres lo más bonito que me ha pasado nunca.~^^"; EsperarTecla (); print "¿Sólo eso? ¿Por eso tanto misterio? Por un momento sientes algo de decepción. Sin embargo, te das cuenta de que es parte de un mensaje más largo.^^"; EsperarTecla (); print "¿Una carta de amor que alguien le escribiría a alguien?^^"; EsperarTecla (); print "La enfermera aparece, llamándote para que pases. Escondes el papel en tu bolsillo y sales al exterior...^^"; EsperarTecla (); BorrarPantalla (); move Pluma to jugador; print "^^Te deprimen los médicos. Te deprimen las salas de espera. Te deprime esperar... ^^Eso no tendría ninguna importancia, si no fuera porque ya de por sí TIENES bastantes razones para estar deprimido. Esa mujer no hace más que poner las cosas difíciles. Ahora de repente le ha dado por exigirte que abandones a tu mujer... ^^Y tú AMAS a tu mujer y a tu hija. Son ocho años de matrimonio, y eso no puede olvidarse de la noche a la mañana. ^^Pero tampoco podrías pasar sin... ella. Joven, hermosa, con tanta vida... Es casi la única cosa que te da alegrías. ^^Tienes que hablar con ella. Pero... ¿Qué decirle? Estás hecho un lío... ^^De repente, reparas en que llevas una hoja de papel y una pluma encima. Tal vez escribiendo, ordenarías más tus ideas...^^"; <>; }; if (Personaje == 4) "No está doblado..."; Doblar: if (Personaje == 1 || Personaje == 3) "¿Más aún de lo que está?"; if (Personaje == 2 && uno notin jugador) "Deberías tenerlo en la mano."; if (Personaje == 2 && uno in jugador) { Personaje ++; print "Comienzas a doblar el papel...^^"; EsperarTecla (); print "...¡Y acabas haciendo una pajarita preciosa! ¡Con tus manitas! Tu madre siempre dice que eres un artista.^^"; EsperarTecla (); print "La enfermera aparece y te llama. Te levantas con las dos manos y de dos saltos sales de la habitación. Tras de tí, la pajarita queda en el suelo...^^"; EsperarTecla (); BorrarPantalla (); tate_callao = 1; ; tate_callao = 0; print "^^Los médicos son todos unos putos incompetentes. ^^Te dicen primero que el accidente no ha afectado nada importante, que al cabo de un mes vas a volver a mover la pierna. Pasa un mes y no te quitan la escayola. Pasan dos y tampoco. Al cabo de tres lo hacen al fín... ^^...sólo para que la pierna se haya curado mal y cojees todo el rato. Y no la puedas apoyar fuerte porque te duele. ^^Ahora estás aquí a ver qué te dicen, claro... cuando notas en el suelo, a tu lado, una pajarita de papel preciosa. ¿No parece que tenga algo escrito?^^"; <>; }; if (Personaje == 4) "¿Doblar el papel? ¿Para qué?"; Escribir: if (Personaje == 1 || Personaje == 2 || Personaje == 3) "No tienes nada con lo que escribir en el papel."; if (uno notin jugador) "No tienes el papel en la mano."; if (Pluma notin jugador) "No tienes la pluma en la mano."; Personaje = 1; move Pluma to Limbo; print "Escribes en el papel intentando poner en orden tus ideas. De repente, te parece tenerla enfrente...^^"; EsperarTecla (); print "Sientes la necesidad de decirle todo. La pluma te vuela sobre el papel. Es curioso lo sencillo que te resulta sincerarte en una hoja. Si en la realidad fuera tan fácil...^^"; EsperarTecla (); print "La enfermera aparece y te llama, sobresaltándote. Haces una bola con el papel y la tiras al suelo. Casi mejor que no llegue nunca a leer eso. Te levantas y sales de la habitación...^^"; EsperarTecla (); BorrarPantalla (); tate_callao = 1; ; ; move Pluma to Limbo; tate_callao = 0; print "^^Hoy no ha sido el mejor de los días. ^^Él ha estado aún más reservado que de costumbre. Has intentado lo que has podido para que te diera alguna pista, algo... a lo que poder agarrarte. No podéis seguir así siempre, y él lo sabe. ^^Que sí, que es complicado, pero... ¿No tienes derecho acaso a querer ser feliz? ^^Además, los críos han estado más traviesos que nunca. Parece que notan tu debilidad y se aprovechan de ella. Dan vueltas por la clase, gritan, se tiran cosas los unos a los otros... Un desastre. Y el resto de profesores, claro, ~Tienes que saber ganártelos...~ ~A un niño de cinco años con un poco de amor le basta...~ ¡Como si fuera tan sencillo! ^^Y para rematar, visita al ginecólogo por la tarde. Hay días que es mejor no sacar el pie fuera de la cama... ^^Mientras meditas en todo esto, tu mirada desciende hasta dar con una bola de papel arrugada, que descansa junto a tu pie... La curiosidad te hace olvidar por un momento tus problemas.^^"; <>; ]; Object Pluma "pluma" Limbo with nombre 'pluma', descripcion "Tu pluma de toda la vida.", antes [; Oler: "Tinta."; Abrir, Cerrar: "No es necesario abrirla ni cerrarla."; EscribirCon: <>; ], has femenino; !================================================================ ! VERBOS !================================================================ [ DoblarSub; "No parece algo que puedas doblar..."; ]; [ DesdoblarSub; "No parece algo que puedas desdoblar..."; ]; [ EscribirConSub; "Escribir con ", (el) uno, " no me parece posible."; ]; [ EscribirSub; "No me parece muy práctico escribir en ", (el) uno, "."; ]; Verb 'desdobla' * noun -> Desdoblar; Verb 'dobla' * noun -> Doblar; Verb 'escribe' * noun -> Escribir * 'en' noun -> Escribir * 'con' noun -> EscribirCon; VerboIrregular "escribir" with imperativo 'escribe';