CLS
PRINT " Por Favor escribe Tu respuesta igualita para que la compu la pueda leer bien"
COLOR 12.6
PRINT " COMO SE LLAMA TU COLEGIO..."
COLOR 9.2
PRINT " COLEGIO JAVIER"
PRINT " SUPER ESCUELA DE HEROES"
PRINT " JARDIN DE NINOS DE SALTADILLA"
INPUT "", D$
IF D$ = "COLEGIO JAVIER" THEN A = 1

COLOR 12.6
PRINT " PARA EL PROFESOR FACEY...QUE SIGNIFICAN LOS ANUNCIOS.."
COLOR 9.2
PRINT "COSAS IMPORTANTES"
PRINT "ACIDOS Y BASES"
PRINT "VENTA DE MANI"
INPUT "", E$
IF E$ = "VENTA DE MANI" THEN B = 1
COLOR 12.6
PRINT "QUE SIGNIFICA EL SUICIDIO..."
COLOR 9.2
PRINT "SER TRAFICANTE"
PRINT "FALTAR A UN PARCIAL DE BIOLOGIA"
PRINT "ALGO CON CSI"
INPUT "", F$
IF F$ = "FALTAR A UN PARCIAL DE BIOLOGIA" THEN C = 1
COLOR 12.6
PRINT "TUTORIA"
COLOR 9.2
PRINT "NINOS NINAS Y AMIGOBIOS"
PRINT "ESTUDIAR"
PRINT "HORA LIBRE"
INPUT "", G$
IF G$ = "HORA LIBRE" THEN D = 1
COLOR 12.6
PRINT "CUAL ES EL VERDADERO NOMBRE DEL PROFESOR CHICHITO"
COLOR 9.2
PRINT "ERKLIN MOSQUERA"
PRINT "CHCHITO"
PRINT "ORLANDO CASTILLO"
INPUT "", H$
IF H$ = "CHICHITO" THEN E = 1
COLOR 12.6
PRINT " CUAL ES LA CANCION FAVORITA DE MONIQUE"
COLOR 9.2
PRINT "MISS INDEPENDENT"
PRINT "ILARILARIE"
PRINT "QUIEN ES MONIQUE"
INPUT "", I$
IF I$ = "MISS INDEPENDENT" THEN F = 1
COLOR 12.6
PRINT "SEGUN EL PROFESOR MIRANDA USTED..."
COLOR 9.2
PRINT "DEBE BUSCAR A DIOS"
PRINT "PRACTICAR MATEMATICAS"
PRINT "TOOOOOODO LLEVA DIBUJOOOOSS"
INPUT "", J$
IF J$ = "DEBE BUSCAR A DIOS" THEN G = 1
COLOR 12.6
PRINT "CUAL ES EL COLMO DE UN JARDINERO"
COLOR 9.2
PRINT "QUE SI HIJA SE LLAME MARGARITA DE LOS CAMPOS"
PRINT "QUE LO DEJEN PLANTADO"
PRINT "JAJAJAJAJA"
INPUT "", K$
IF K$ = "JAJAJAJAJA" THEN H = 1
COLOR 12.6
PRINT "QUIEN ES LA FULITA DE LAS CHICAS SUPER PODEROSAS"
COLOR 9.2
PRINT "GLOBO"
PRINT "CANDY"
PRINT "BURBUJA"
INPUT "", L$
IF L$ = "BURBUJA" THEN I = 1
COLOR 12.6
PRINT "QUIEN ES MAS WAPO"
COLOR 9.2
PRINT "BETO GARCIA"
PRINT "FACEY"
PRINT "NICK JONAS"
INPUT "", M$
IF M$ = "NICK JONAS" THEN J = 1
COLOR 12.6
PRINT "BELLEZA INDIGENA"
COLOR 9.2
PRINT "PROF MIRANDA"
PRINT "ANIBAL RIOS"
PRINT "SHANIRA"
INPUT "", N$
IF N$ = "PROF MIRANDA" THEN K = 1
COLOR 12.6
PRINT "QUE PIENSAS CUANDO TE DICEN LA PALABRA MAC"
COLOR 9.2
PRINT "HAMBURGUESAS"
PRINT "IPODS"
PRINT "MALTEADA DE ACETATO Y COCO"
INPUT "", O$
IF O$ = "IPODS" THEN L = 1
COLOR 12.6
PRINT "MEJOR COMICA DEL MUNDO"
COLOR 9.2
PRINT "SAMURAI X"
PRINT "DRAGON BALL"
PRINT "AY NOSE"
INPUT "", P$
IF P$ = "AY NOSE" THEN M = 1
COLOR 12.6
PRINT "COMO SE LLAMA EL MORENO DE LA TIENDA DE MIMI"
COLOR 9.2
PRINT "TIENE CARA DE ERNESTO"
PRINT "OSEA YO TRAIGO LONCHERA"
PRINT "QUIEN"
INPUT "", Q$
IF Q$ = "TIENE CARA DE ERNESTO" THEN N = 1
COLOR 12.6
PRINT "QUE PREFIERES..."
COLOR 9.2
PRINT "RETIRO ESPIRITUAL"
PRINT "CONVIVENCIAS"
PRINT "PARTY"
INPUT "", R$
IF R$ = "PARTY" THEN O = 1
COLOR 12.6
PRINT "ESA BOBA NINA NICE..."
COLOR 9.2
PRINT "BELINDA"
PRINT "DANGER MAN"
PRINT "MANUEL ARAUZ"
INPUT "", S$
IF S$ = "BELINDA" THEN P = 1
COLOR 12.6
PRINT "WASH"
COLOR 9.2
PRINT "LAVAR"
PRINT "YO NO HABLAR INGLES"
PRINT "CHELE"
INPUT "", T$
IF T$ = "CHELE" THEN Q = 1
COLOR 12.6
PRINT "CAPSULAS HISTORICAS "
COLOR 9.2
PRINT "AMERICO GARCES"
PRINT "AURELIO"
PRINT "DAVID GUERRA"
INPUT "", U$
IF U$ = "AMERICO GARCES" THEN R = 1
COLOR 12.6
PRINT "AC DC"
COLOR 9.2
PRINT "QUE HAGO EN ESTA PREGUNTA.."
PRINT "BACK IN BLACK"
PRINT "PARA MI SOLDADOS DEL SCARED THEM CREW"
INPUT "", V$
IF V$ = "BACK IN BLACK" THEN S = 1
COLOR 12.6
PRINT "COMO SE LLAMA LA HERMANA DE DEXTER"
COLOR 9.2
PRINT "DEE DEE"
PRINT "BOO"
PRINT "DIGNA MARTINEZ"
INPUT "", W$
IF W$ = "DEE DEE" THEN T = 1

Z = (A + B + C + D + E + F + G + H + I + J + K + L + M + N + O + P + Q + R + S + T)
PRINT "MIRA CUANTOS PUNTOS...", Z
COLOR 6.2
IF Z < 10 THEN PRINT "PONTE A LEER WIKIPEDIA MAN ..." ELSE
COLOR 9.2
IF Z > 10 THEN PRINT "TAS EN ALGO"
X = (20 - Z)
PRINT "TUVISTES TANTAS MALAS...", X