Para apreciar esta página correctamente, debes instalar Fa-122Doc.ttf en tu computadora

Título: Ouija
Autor: Jorge Cevallos Manzano 
Modelo: CFX9850 (Hecho en CFX9850Ga+)
Descripción: Hay un espiritu dentro de la Casio :-) Pregúntale cualquier cosa y ella te contestará.

Bajar programa

• Para escribir puede usar las letras (A~Z) ("Ñ" con la tecla ), coma (con ) y punto.
• Cuando se presente el mensaje: "Teclee su pregunta:", deberás escribir siempre lo siguiente: "LIZA, POR FAVOR RESPÓNDEME"
• Seguido a esto, deberás presionar , pronunciar su pregunta oralmente, y presionar nueva- mente para ver la respuesta escrita.
• Cuando la hayas leído presiona para hacer una nueva pregunta.

• Cuando se presente el mensaje: "Teclee su pregunta:", presiona la teclea y luego la RESPUESTA a la pregunta que vas a decir oralmente. Lo interesante es que en la pantalla seguirá apareciendo el mensaje: "LIZA, POR FAVOR RESPONDEME", una letra a cada presión del teclado. Todo el mundo verá la pantalla y no las teclas presionadas! :-)
• Al terminar de escribir la respuesta, presiona otra vez , luego de esto volverá a aparecer en la pantalla, las teclas que presiones (Pudiendo así cambiar el final del mensaje).
• Luego continúas normalmente, presionas , dices tu pregunta y vuelve a presionar para ver tu respuesta.

• Cuando no se ha presionado , es decir cuando no se ha escrito la respuesta, el programa sortea entre 10 respuestas predeterminadas: "A veces es mejor callar", "Prefiero no herirte", etc. y las presenta letra por letra.
• Este programa esta hecho para asustar a UN amigo, por lo que agregue una función: Si al hacer el juego, un tercero se acerca, puedes presionar con el pulgar y hacerlo rodar hasta el botón , manteniendo este ultimo presionado como por un segundo luego de escribir "LIZA, POR FAVOR RESPONDEME". (Sin haber presionado para el mensaje. Si haces esto, un mensaje de "ALGUIEN NO CREE EN MÍ" o "ALEJEN A QUIEN NO CREE" aparecerá. Tus amigos se sorprenderán más ya que no puede haber tanta coincidencia como para que cada vez que se acerca la tercera persona aparezca exacta- mente estos mensajes: ("No pueden ser oraciones grabadas!").
• Tus respuestas pueden tener hasta 26 letras

ClrGraph·
AxesOff·
Orange Text 2,28,"OUIJA ELECTRONICA"·
Text 15,1,"HECHA POR:"·
Green Text 15,42,"JORGE CEVALLOS M."·
Orange Text 30,1,"ADVERTENCIA!!"·
Text 37,5,"LA RESPONSABILIDAD DE LOS E-"·
Text 44,1,"FECTOS QUE PUEDA PRODUCIR EL"·
Text 51,1,"USO DE ESTA OUIJA ES SUYA"»·
Cls·
Green Text 11,1,"ANTES DE PODER LOGRAR QUE LIZA"·
Green Text 18,1,"RESPONDA A SUS PREGUNTAS, DE-"·
Green Text 25,1,"BERA GANARSE SU CONFIANZA."»·
Lbl 0·
-1‡–·
0‡r·
Cls·
Text 10,1,"DESEA FORMULAR UNA"·
Text 17,1,"PREGUNTA [S/N]"·
Do·
Getkey·
LpWhile Ans¬43 Ans Ans¬64·
Ans=43îOrange Text 17,42,"S"·
If Ans=64·
Then Orange Text 17,50,"N"·
For 1‡A To 100·
Next·
ClrText·
Cls·
""·
ClrList·
Stop·
IfEnd·
{25,55,71,76,51,73,54,53,1,26,76,62,54,53,1,53,36,43,73,54,64,46,36,74,36,29‡List 2·
26‡Dim List 1·
Green Text 24,1,"TECLEE SU PREGUNTA:"·
31‡A·
1‡B~C·
Lbl 1·
Do·
Getkey‡T~U·
LpWhile T=0 And r¬2·
C=1îT=31î1‡r·
r=1îT‡List 1[C·
r=1îList 2[C‡T·
r=2îList 1[C‡T~U·
T=31îGoto 2·
T=76îText A,B,"A"·
T=66îText A,B,"B"·
T=56îText A,B,"C"·
T=46îText A,B,"D"·
T=36îText A,B,"E"·
T=26îText A,B,"F"·
T=75îText A,B,"G"·
T=65îText A,B,"H"·
T=55îText A,B,"I"·
T=45îText A,B,"J"·
T=35îText A,B,"K"·
T=25îText A,B,"L"·
T=74îText A,B,"M"·
T=64 Or T= 44îText A,B,"N"·
T=44îPxlOn A-1,B+1·
T=44îPxlOn A-1,B+2·
T=54îText A,B,"O"·
T=73îText A,B,"P"·
T=63îText A,B,"Q"·
T=53îText A,B,"R"·
T=43îText A,B,"S"·
T=33îText A,B,"T"·
T=72îText A,B,"U"·
T=62îText A,B,"V"·
T=52îText A,B,"W"·
T=42îText A,B,"X"·
T=32îText A,B,"Y"·
T=71îText A,B,"Z"·
T=29îPxlOn A+1,B·
T=29îPxlOn A+3,B·
T=51îText A,B,","·
T=61îText A,B,"."·
T=35 Or T=64 Or T=63 Or T=44 Or T=72îIsz B·
T=74 Or T=52îB+2‡B·
T=51 Or T=61îB+4‡B·
TîB+4‡B·
U=31îC>1î0‡r·
UîIsz C·
T¬29îC<29îGoto 1·
If 31¬List 1[1·
Then Int 8Ran#‡–·
Getkey=39îInt 2Ran#+8‡–·
0=–î{31,64,54,1,63,72,55,63,53,54,1,53,36,43,73,54,64,46,36,53,0‡List 1·
1=–î{31,76,72,64,1,64,54,1,73,72,36,46,54,1,56,54,64,26,55,76,53,1,36,64,1,33,55,0‡List 1·
2=–î{31,76,1,62,36,56,36,43,1,36,43,1,74,36,45,54,53,1,56,76,25,25,76,53,0‡List 1·
3=–î{31,73,53,36,26,55,36,53,54,1,56,54,1,65,36,53,55,53,33,36,0‡List 1·
4=–î{31,56,53,36,54,1,63,72,36,1,64,76,46,55,36,1,46,36,43,36,76,1,43,76,66,36,53,0‡List 1·
5=–î{31,46,36,66,36,43,1,33,36,64,36,53,1,74,76,43,1,26,36,1,36,64,1,74,55,0‡List 1·
6=–î{31,46,72,46,54,1,63,72,36,1,56,53,36,76,43,1,36,64,1,64,54,43,54,33,53,54,43,0‡List 1·
7=–î{31,33,72,1,26,36,1,36,43,1,72,64,1,36,64,75,76,44,54,0‡List 1·
8=–î{31,76,25,75,72,55,36,64,1,64,54,1,56,53,36,36,1,36,64,1,74,55,0‡List 1·
9=–î{31,76,25,36,45,36,64,1,76,1,63,72,55,36,64,1,64,54,1,56,53,36,36,0‡List 1·
IfEnd·
Do·
LpWhile Getkey¬29·
Orange Horizontal -.6·
For 1‡A To 9·
Text 41,10,"BUSCANDO ALMAS..."·
Text 41,10," "·
Next·
–<0îGreen Text 41,1,"ENCONTRADA UNA RESPUESTA,"·
–¯0îGreen Text 41,1,"NINGUN ALMA ENCONTRADA,"·
31‡List 1[Dim List 1·
2‡r·
50‡A·
1‡B·
2‡C·
Goto 1·
Lbl 2·
Do·
LpWhile Getkey¬29·
Goto 0