TheGameCreators - CodeBase - White and Nerdy

Return to the CodeBase listing

Category: Text

Version: 1.1

Information

Uploaded: 12th Feb 2010 10:13

Modified: 13th Mar 2010 09:41

Author: Nerd In Training

Summary

A quiz to tell if you are White and Nerdy.

Full Description

A quiz to tell if you are White and Nerdy, with questions ranging from Bubble wrap to Star Trek.

DarkBASIC Professional Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

print "Hello. You are now taking the White and Nerdy Test. What is your name?"

input "> ";name$

print " Hello "+name$+" how nerdalicious. Let the testing begin!"

correct=0

score=100

num1=1

num2=2

num3=3

num4=4

print "In the movie 'Star Wars the Holiday Special' what type of food did the trader"

print "ask Malla about?"

print "Was it (1) 'Crab Stakes' (2) 'Wokkie Stake' (3) 'Wokkie Okkie' or (4)"

print "'He didn't ask for anything' ?"

input "> ";answer1

if answer1=num3

print "That is correct "+name$+"!"

correct=correct+1

endif

if answer1<num3

print "Sorry wrong answer  "+name$+" the correct answer was 3."

score=score-12.5

endif

if answer1>num3

print "Sorry wrong answer  "+name$+" the correct answer was 3."

score=score-12.5

endif

print "In Star Trek the Next Generation what episode did Minuet make her first"

print "appearance?"

print "Was it (1) '11001001' (2) '10101001' (3) 'Future Imperfect' or (4) 'Minuet' ?"

input "> ";answer2

if answer2=num1

print "That is correct "+name$+"!"

correct=correct+1

endif

if answer2>num1

print "Sorry wrong answer  "+name$+" the correct answer was 1."

score=score-12.5

endif

print "In Minesweeper what is the max number of available mines on custom?"

print "Is it (1) '600 mines' (2) '641 mines' (3) '764 mines' or (4) '677 mines' ?"

input "> ";answer3

if answer3=num4

print "That is correct "+name$+"!"

correct=correct+1

endif

if answer3<num4

print "Sorry wrong answer  "+name$+" the correct answer  was 4."

score=score-12.5

endif

print "In X-Men what is Wolverine's power?"

print "Is it (1) 'the power to shoot venom form his fingernails' (2) 'the power to heal'"

print "(3) 'the power to make metal come out between his fingers' (4) 'he is in charge and has no power'"

input "> ";answer4

if answer4=num2

print "That is correct "+name$+"!"

correct=correct+1

endif

if answer4>num2

print "Sorry wrong answer  "+name$+" the correct answer  was 2."

score=score-12.5

endif

if answer4<num2

print "Sorry wrong answer  "+name$+" the correct answer  was 2."

score=score-12.5

endif

print "What is the 999,999th digit of pi?"

print "Is it (1) '9' (2) '4' (3) '5' or (4) '6'"

input "> ";answer5

if answer5=num3

print "That is correct "+name$+"!"

correct=correct+1

endif

if answer5>num3

print "Sorry wrong answer  "+name$+" the correct answer  was 3."

score=score-12.5

endif

if answer5<num3

print "Sorry wrong answer  "+name$+" the correct answer  was 3."

score=score-12.5

endif

print "What is the the smallest bubble possible on bubble wrap"

print "Is it (1) '1/4 inch' (2) '2/3 inch' (3) '3/8 inch' or (4) '2/6 inch'"

input "> ";answer6

if answer6=num1

print "That is correct "+name$+"!"

correct=correct+1

endif

if answer6>num1

print "Sorry wrong answer  "+name$+" the correct answer  was 1."

score=score-12.5

endif

if correct>4

print name$+" you are nerdy!"

endif

if correct<5

print name$+" you are not nerdy."

endif

print name$+" your score is "+str$(score)+"%."

wait key

Download

Please login to download

Comments

No comments yet.

Author Name:	Nerd In Training
CodeBase Entries:	1

CodeBase - White and Nerdy

Information

Summary

Full Description

DarkBASIC Professional Source Code

Download

Screen Shot

Author

Comments