REM Joseph Gray
REM 12/10/02
CLS
COLOR 1
PRINT "Welcome to the Simpsons Trivia Challenge"
PRINT "You will go through a series of questions to determine your knowledge"
PRINT "There are 7 questions "
SLEEP 7
CLS
start:
CLS
PRINT "1.Start Game"
PRINT "2.Extra Stuff"
PRINT "3.Exit "
INPUT "Make A selection please"; a$
IF a$ = "1" THEN GOTO Quiz:
IF a$ = "2" THEN GOTO Extra:
IF a$ = "3" THEN PRINT "Thanks for playing, Goodbye"
END

Quiz:
CLS
PRINT "Please choose one of the following"
PRINT "1. Easy"
PRINT "2. Medium"
PRINT "3. Hard"
INPUT "Please make a selection"; a2$
IF a2$ = "1" THEN GOTO Easy:
IF a2$ = "2" THEN GOTO Medium:
IF a2$ = "3" THEN GOTO Hard:
Easy:
CLS
PRINT "1.Blue"
PRINT "2.Green"
PRINT "3.Teal"
PRINT "4.Red"
PRINT "5.Magenta"
PRINT "6.Brown"
PRINT "7.Gray"

INPUT "Please make a selection"; B$
IF B$ = "1" THEN GOTO EasyB:
IF B$ = "2" THEN GOTO EasyG:
IF B$ = "3" THEN GOTO EasyC:
IF B$ = "4" THEN GOTO EasyR:
IF B$ = "5" THEN GOTO EasyM:
IF B$ = "6" THEN GOTO EasyBr:
IF B$ = "7" THEN GOTO EasyW:
END
REM INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
REM INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
REM INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
REM INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
REM INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
REM INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
REM INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

EasyB:
COLOR 1
INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

EasyG:
COLOR 2
INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

EasyC:
COLOR 3
INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

EasyR:
COLOR 4
INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

EasyM:
COLOR 5
INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

EasyBr:
COLOR 3
INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

EasyW:
COLOR 7
INPUT "What is the name of the school bus driver"; Q$
IF Q$ = "otto" THEN PRINT "You got it right!"
IF Q$ < "otto" THEN GOTO start:
INPUT "What is the name of the simpsons cat"; Q1$
IF Q1$ = "snow ball" THEN PRINT "Correct"
IF Q1$ < "snow ball" THEN GOTO start:
INPUT "Who is homers boss"; Q2$
IF Q2$ = "mr. burns" THEN PRINT "You got it right"
IF Q2$ = "mr. burns" THEN GOTO start:
INPUT "What school does Bart go to"; Q3$
IF Q3$ = "spring field elemetry" THEN PRINT "correct"
IF Q3$ < "spring field elemetry" THEN GOTO start:
INPUT "What is Bart and lisa's favorite cartoon"; Q4$
IF Q4$ = "itchy and scratchy" THEN PRINT "Good Job"
IF Q4$ < "itchy and scratchy" THEN GOTO start:
INPUT "Who is the Principal of Spring Field elementary"; Q5$
IF Q5$ = "principal skinner" THEN PRINT "Right"
IF Q5$ = "principal skinner" THEN GOTO start:
INPUT "Who is Krusty the Clowns evil side kick "; Q6$
IF Q6$ = "side show bob" THEN PRINT "Good Job"
IF Q6$ < "side show bob" THEN GOTO start:
GOTO start:

Medium:
PRINT "1.Blue"
PRINT "2.Green"
PRINT "3.Teal"
PRINT "4.Red"
PRINT "5.Magenta"
PRINT "6.Brown"
PRINT "7.Gray"

INPUT "Please make a selection"; B$
IF B$ = "1" THEN GOTO MedB:
IF B$ = "2" THEN GOTO MedG:
IF B$ = "3" THEN GOTO MedC:
IF B$ = "4" THEN GOTO MedR:
IF B$ = "5" THEN GOTO MedM:
IF B$ = "6" THEN GOTO MedBr:
IF B$ = "7" THEN GOTO MedW:
END


INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:

Hard:
PRINT "1.Blue"
PRINT "2.Green"
PRINT "3.Teal"
PRINT "4.Red"
PRINT "5.Magenta"
PRINT "6.Brown"
PRINT "7.Gray"

INPUT "Please make a selection"; B$
IF B$ = "1" THEN GOTO HardB:
IF B$ = "2" THEN GOTO HardG:
IF B$ = "3" THEN GOTO HardC:
IF B$ = "4" THEN GOTO HardR:
IF B$ = "5" THEN GOTO HardM:
IF B$ = "6" THEN GOTO HardBr:
IF B$ = "7" THEN GOTO HardW:
END

INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start

MedB:
COLOR 1
INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:

MedG:
COLOR 2
INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:


MedC:
COLOR 3
INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:


MedR:
COLOR 4
INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:

MedM:
COLOR 5
INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:

MedBr:
COLOR 6
INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:

MedW:
COLOR 8
INPUT "What color shoes does marge have"; Q7$
IF Q7$ = "red" THEN PRINT "way to go"
IF Q7$ < "red" THEN GOTO start:
INPUT "How many hairs does homer have on the top of his head"; Q8$
IF Q8$ = "two" THEN PRINT "way to go"
IF Q8$ < "two" THEN GOTO start:
INPUT "Whats the name of the bar that Homer goes to"; Q9$
IF Q9$ = "Moes" THEN PRINT "Correct"
IF Q9$ < "Moes" THEN GOTO start:
INPUT "What is Crusty the clowns religion"; Q10$
IF Q10$ = "jewish" THEN PRINT "good job"
IF Q10$ < "jewish" THEN GOTO start:
INPUT "What Mrs. Croboples first name"; Q11$
IF Q11$ = "Edna" THEN PRINT "Correct"
IF Q11$ > "Edna" THEN GOTO start:
INPUT "Who is Mr. Burns assistant"; Q12$
IF Q12$ = "Smithers" THEN PRINT "Good job"
IF Q12$ = "Mr. Smithers" THEN PRINT "Good job"
IF Q12$ < "Smithers" THEN GOTO start:
INPUT "Who is the Mayor of spring field"; Q13$
IF Q13$ = "Mayor Quimby" THEN PRINT "Correct"
GOTO start:

HardB:
INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start

HardG:
INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start

HardC:
INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start

HardR:
INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start

HardM:
INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start

HardBr:
INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start

HardW:
INPUT "How many kids does Apu have"; Q14
IF Q14 = 8 THEN PRINT "You got it right"
IF Q14 < 8 THEN GOTO start:
IF Q14 > 8 THEN GOTO start:
INPUT "What is the name of barts evil twin"; Q15$
IF Q15$ = "hugo" THEN PRINT "Good Job"
IF Q15$ < "hugo" THEN GOTO start:
INPUT "What is the name of the street that the simpsons live on"; Q16$
IF Q16$ = "evergreen terrace" THEN PRINT "Right"
IF Q16$ < "evergreen terrace" THEN GOTO start:
INPUT "What is the name of patty and selmas pet iguana"; Q17$
IF Q17$ = "jub jub" THEN PRINT "Alright"
IF Q17$ < "jub jub" THEN GOTO start:
INPUT "How many pounds does Homer simpson weigh"; Q18
IF Q18 = 239 THEN PRINT "How did u know"
IF Q18 < 239 THEN GOTO start:
IF Q18 > 239 THEN GOTO start:
INPUT "Who is Radio-active mans side kick"; Q19$
IF Q19$ = "fall out boy" THEN PRINT "your right"
IF Q19$ < "fall out boy" THEN GOTO start:
INPUT "How old is Maggie Simpson"; Q20
IF Q20 = 3 THEN PRINT "You did it"
IF Q20 < 3 THEN GOTO start:
IF Q20 > 3 THEN GOTO start:
PRINT "Wow you sure do watch alot of the simpsonsto have made it all the way"
SLEEP 4
GOTO start




Extra:
CLS
menu:
CLS
RESTORE
PRINT "   MENU   "
PRINT "1. NAMES "
PRINT "2. NUMBER  "
PRINT "3. DATALINE  "
PRINT "4. EVEN  "
PRINT "5. REPEAT  "
PRINT "6. USER  "
PRINT "7. HAPPY "
PRINT "8. QUIT"
SLEEP 3
INPUT "WHICH SECTION DO YOU WANT TO GO TO"; N1
SLEEP 2
CLS
IF N1 = 1 THEN GOTO NAMES
IF N1 = 2 THEN GOTO NUMBER
IF N1 = 3 THEN GOTO DATALINE
IF N1 = 4 THEN GOTO EVEN
IF N1 = 5 THEN GOTO REPEAT
IF N1 = 6 THEN GOTO USER
IF N1 = 7 THEN GOTO HAPPY
IF N1 = 8 THEN GOTO QUIT

NAMES:
LOCATE 11, 35
PRINT "Joe"
SLEEP 2
CLS
INPUT "WHAT IS YOUR NAME"; N$
INPUT "WHAT IS YOUR AGE"; A1
INPUT "WHAT IS YOUR BIRTHDAY"; B$
LOCATE 22, 70
PRINT N$
SLEEP 10
CLS
PRINT LEFT$(N$, 1)
PRINT MID$(N$, 3, 1)
SLEEP 3
CLS
GOTO menu

NUMBER:
INPUT "ENTER A NUMBER"; M1
INPUT "ENTER ANOTHER NUMBER"; M2
T = M1 + M2
PRINT T
SLEEP 2
TOL = T * 6.3
PRINT TOL
SLEEP 2
IF A1 > 16 THEN PRINT "YOU ARE OLDER THAN ME"
IF A1 < 16 THEN PRINT "YOU ARE YOUNGER THAN ME"
IF A1 = 16 THEN PRINT "WE ARE THE SAME AGE"
SLEEP 3
CLS
GOTO menu

DATALINE:
DIM X(15)
CLS
FOR X = 1 TO 10
READ J(X)
NEXT X
FOR X = 1 TO 10
TTL = TTL + J(X)
NEXT X
LOCATE 11, 35
PRINT TTL
SLEEP 3
DATA 1
DATA 2
DATA 3
DATA 4
DATA 5
DATA 6
DATA 7
DATA 8
DATA 9
DATA 10
SLEEP 3
CLS
GOTO menu

EVEN:
INPUT "WHAT IS YOUR NAME"; NA$
FOR X = 1 TO 12
PRINT NA$
NEXT X
SLEEP 3
CLS
FOR X = 100 TO 65 STEP -1
PRINT X
NEXT X
SLEEP 3
CLS
FOR X = 6 TO 24 STEP 2
PRINT X
NEXT X
SLEEP 3
CLS
GOTO menu

REPEAT:
CLS
START1:
FOR P = 1 TO 10
READ F
NEXT P
START2:
READ NAS$
PRINT NAS$
IF NAS$ = "BOZO" THEN GOTO menu
GOTO START2
DATA TERRY
DATA JIM
DATA BOB
DATA LISA
DATA BOZO
SLEEP 3
CLS
GOTO menu

USER:
FOR X = 1 TO 10
INPUT " ENTER A NUMBER PLEASE"; P1
TAL = TAL + P1
PRINT "TOTAL"; TAL
NEXT X
SLEEP 1
CLS
GOTO menu

HAPPY:
SCREEN 7
REM HEAD
CIRCLE (150, 50), 25, 1
REM EYES
CIRCLE (140, 50), 3, 7
CIRCLE (160, 50), 3, 7
REM MOUTH
LINE (145, 65)-(155, 65), 4
SLEEP 10
CLS
GOTO menu

QUIT:
PRINT "BYE!!!"
GOTO start: