Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 proper format!
Index -> Programming, Turing -> Turing Help
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
bigman9




PostPosted: Tue Jan 18, 2011 7:00 pm   Post subject: proper format!

Hey so im a noob when it comes to formattting,

i finished my trivia game. can someone put like the proper indents and all that in?
THANKS:)




var name:string
var number:real:= 0
var key: string (1)
var score:real:=0
var restart: string (1)
loop
%Home screen
Draw.FillBox(0,0,maxx,maxy,41)
put "WELCOME TO THE ERGONOMICS TRIVIA QUIZ"
put "Click any key to begin the game"
getch (key)
cls

%Enter name screen
Draw.FillBox(0,0,maxx,maxy,40)
put "Please enter your name"
get name
put "Hello ",name
delay (1000)
put "Please select the correct answer for the following questions. Answer by hitting the correct number."
put "click any key to continue"
getch (key)
cls
%Question number 1
Draw.FillBox(0,0,maxx,maxy,9)
put "Q1 - How far away should a computer monitor be from your face?"
put "1) 45cm-65cm"
put "2) 100cm"
put "3) 20cm-40cm"
put "4) 200cm-210cm"
get number
if number = 1 then
put "Good job, that is the correct answer!"
put "Hit any key to continue to the next question"
score:= score+1
end if
if number>1 then
put "sorry, that is not correct"
put "A computer screen should be 45cm - 65cm away from the face (answer 1)"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 2
Draw.FillBox(0,0,maxx,maxy,40)
put "Q2 - The temperature of an ergonomically should be between _________________ Celsius."
put "1) 40 - 50 degrees"
put "2) 0 - 25 degrees"
put "3) 15 - 22 degrees"
put "4) 22 - 35 degrees"
get number
if number = 3 then
put "Nice one! You know your stuff"
put "Hit any key to continue to the next question"
score:= score+1
end if
if number>3 then
put "sorry, that is the wrong answer"
put "The temperature in a workplace should be kept between 15 - 22 degrees Celsius"
put "Hit any key to continue to the next question"
end if
if number<3 then
put "sorry, that is the wrong answer"
put "The temperature in a workplace should be kept between 15 - 22 degrees Celsius"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 3
Draw.FillBox(0,0,maxx,maxy,9)
put "Q3 - True or False? A proper chair should allow the elbows to be bent at a 45 degree angle"
put "1) True"
put "2) False"
get number
if number = 2 then
put "Good job, that is the correct answer"
put "Hit any key to continue to the next question"
score:=score + 1
end if
if number = 1 then
put "Did your finger slip?"
put "The correct answer is false. A chair should allow the elbows to bemd on a 90 degree angle"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 4
Draw.FillBox(0,0,maxx,maxy,40)
put "Q4 - The most appropiate definition for Musculoskeletal Injuries (MSI) is..."
put "1) A nerve in the wrist is used over and over with the wrong equipment and cannot function properly"
put "2) When a worker hurts a part of their body"
put "3) A sports injusry that is related to the joints in the knee"
put "4) When a worker performs the same task over and over, causing stress on nerves, muscles, tendons, or other parts of the body"
get number
if number = 4 then
put "Bingo, that is the right answer"
put "Hit any key to continue to the next question"
score:=score + 1
end if
if number< 4 then
put "Sorry, you anwered this one wrong"
put "The correct answer is number 4. MSI is when a worker performs the same task over and over, causing stress on nerves, muscles, tendons, or other parts of the body"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 5
Draw.FillBox(0,0,maxx,maxy,9)
put "Q5 - CTS is short for..."
put "1) Computer Training Software"
put "2) Carpal Tunnel Syndrome"
put "3) Computer Task System"
put "4) Carpal Tendon Syndrome"
get number
if number = 2 then
put "That is the correct answer!"
put "Hit any key to continue to the next question"
score:= score+1
end if
if number>2 then
put "sorry, that is not correct"
put "CTS is short for Carpal Tunnel Syndrome"
put "Hit any key to continue to the next question"
end if
if number<2 then
put "sorry, that is not correct"
put "CTS is short for Carpal Tunnel Syndrome"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 6
Draw.FillBox(0,0,maxx,maxy,40)
put "Q6 - Yes or no? Eyestrain, headaches, tiredness, allerguies, back aches and poor circulation are all results of a poorlu designed ergonomic workplace"
put "1) Yes"
put "2) No"
get number
if number = 1 then
put "Right on!"
put "Hit any key to continue to the next question"
score:=score + 1
end if
if number = 2 then
put "Hit the books, because that is the wrong answer?"
put "The correct answer is True. A poorly designed ergonomic workplace can lead to many illnesses"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 7
Draw.FillBox(0,0,maxx,maxy,9)
put "Q7 - How many legs should a chair have if it follows the rules of ergonomics"
put "1) Five"
put "2) Two"
put "3) Three"
put "4) Four"
get number
if number = 1 then
put "Good job, that is the correct answer!"
put "Hit any key to continue to the next question"
score:= score+1
end if
if number>1 then
put "sorry, that is not correct"
put "A chair should have five legs for extera stability"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Queastion number 8
Draw.FillBox(0,0,maxx,maxy,40)
put "Q8 - A desk should have ________________ to be safe and proper"
put "1) Sufficient leg room"
put "2) Smooth edges and rounder corners"
put "3) Medium and light coloured finishes"
put "4) All the above"
get number
if number = 4 then
put "Correct!"
put "Hit any key to continue to the next question"
score:=score + 1
end if
if number< 4 then
put "Nope, that is incorrect"
put "The right answer is number 4. All the above answers are important for having a safe desk area"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 9
Draw.FillBox(0,0,maxx,maxy,9)
put "Q9 - True or False? Plently of air circulation is important in a workplace"
put "1) True"
put "2) False"
get number
if number = 1 then
put "Good job, you're almost finished"
put "Hit any key to continue to the next question"
score:=score + 1
end if
if number = 2 then
put "Close, but no cigar!"
put "The correct answer is true. Plently of air circulation is important in a workplace"
put "Hit any key to continue to the next question"
end if
getch (key)
cls

%Question number 10
Draw.FillBox(0,0,maxx,maxy,40)
put "Q10 - What is the best definition of Ergonomics?"
put "1) The study of how the physical health of workers is affected by their workplace"
put "2) The study of how people affect their work enviroment"
put "3) How people hurt themselves while working"
put "4) How much money a worker makes every year"
get number
if number = 1 then
put "You finished the quiz on a good note!"
put "Hit any key to see your final score"
score:= score+1
end if
if number>1 then
put "Sorry, i guess there is no happy ending for you"
put "The correct choice was number 1. The definition of Ergonomics is the study of how the physical health of workers is affected by their workplace"
put "Hit any key to zee your final score"
end if
getch (key)
cls

%Total score
Draw.FillBox(0,0,maxx,maxy,9)
put "You have completed the Ergonomics Trivia Quiz"
put "Your final score is ",score
if score = 1 then
put "You scored 10%. Better luck next time!"
end if
if score = 2 then
put "You scored 20. Better luck next time!%"
end if
if score = 3 then
put "You scored 30%. Better luck next time!"
end if
if score = 4 then
put "You scored 40%. Better luck next time!"
end if
if score = 5 then
put "You scored 50%. Just passed!"
end if
if score = 6 then
put "You scored 60%. Could use some improvement"
end if
if score = 7 then
put "You scored 70%. Decent job!"
end if
if score = 8 then
put "You scored 80%. Nice work!"
end if
if score = 9 then
put "You scored 90%. You're a pro!"
end if
if score = 10 then
put "You scored 100%. Unbelievable!!"
end if

%Return to main
put ""
put "Hit any key to return to the main menu"
getch (restart)
if restart = "y" then
end if
cls
end loop
Sponsor
Sponsor
Sponsor
sponsor
TokenHerbz




PostPosted: Tue Jan 18, 2011 7:15 pm   Post subject: RE:proper format!

just hit the indent button on your turing...
Dragon20942




PostPosted: Tue Jan 18, 2011 7:29 pm   Post subject: RE:proper format!

F2 :/ thats what my teacher told me.
bigman9




PostPosted: Tue Jan 18, 2011 7:40 pm   Post subject: RE:proper format!

thanks:)
Dragon20942




PostPosted: Tue Jan 18, 2011 8:17 pm   Post subject: RE:proper format!

Actually, its the same thing as the indent, but I thought you meant tab, sorry.
Display posts from previous:   
   Index -> Programming, Turing -> Turing Help
View previous topic Tell A FriendPrintable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 5 Posts ]
Jump to:   


Style:  
Search: