This is not the complete version of code because it is taken a while to make the media... I tried to compile it without the media to see if anything else was bugged and it says Compilation Failed. Could not understand command at line 132. Line 132 is: IF W$="A" or W$="a" then S$+5
Rem Project: Peter-V Cullerton Senior Project 2012
Rem Created: Tuesday, October 04, 2011
Rem "Zombie Apocalypse Survival Quiz"
Rem AOIT & GD
Rem ***** Main Source File *****
Rem Author: Peter-V Cullerton
Rem Special Thanks to:
Rem
Rem ***** Main Source File *****
// sync on
REM Media
// Set dir "media"
REM _MEDIA_
REM _Animations_
LOAD ANIMATION "intro.wmv",1
LOAD ANIMATION "survey.wmv",2
LOAD ANIMATION "hall-t1.wmv",3
LOAD ANIMATION "t1-t2.wmv",4
LOAD ANIMATION "t2-t3.wmv",5
LOAD ANIMATION "pass.wmv",6
LOAD ANIMATION "fail.wmv",7
LOAD ANIMATION "fail1.wmv",8
LOAD ANIMATION "fail2.wmv",9
LOAD ANIMATION "cred.wmv",10
REM _End_of_Animations
REM _MUSIC_
LOAD MUSIC "opens.mp3",11
LOAD MUSIC "intro.mp3",12
LOAD MUSIC "surveys.mp3",13
LOAD MUSIC "test1.mp3",14
LOAD MUSIC "test2.mp3",15
LOAD MUSIC "test3.mp3",16
LOAD MUSIC "angelas.mp3",17
LOAD MUSIC "ag.mp3",18
LOAD MUSIC "pass.mp3",19
LOAD MUSIC "fail.mp3",20
LOAD MUSIC "fail1.mp3",21
LOAD MUSIC "fail2.mp3",22
LOAD MUSIC "credits.mp3",23
LOAD MUSIC "angelat.mp3",41
REM _End_of_MUSIC
REM _Sounds_
LOAD SOUND "sbc.wav",24
LOAD SOUND "ebp.wav",25
LOAD SOUND "bbp.wav",26
LOAD SOUND "spc.wav",27
LOAD SOUND "fail.wav",28
LOAD SOUND "fail1.wav",29
LOAD SOUND "fail2.wav",30
LOAD SOUND "pass.wav",31
LOAD SOUND "iv.wav",32
LOAD SOUND "tv1.wav",33
LOAD SOUND "tv2.wav",34
LOAD SOUND "tv3.wav",35
LOAD SOUND "clock.wav",36
LOAD SOUND "atv.wav",42
REM sbc is start button clicked
REM ebp is Enter button pressed
REM bbp is Backspace button pressed
REM sbp is Spacebar button pressed
REM iv is Intro voice
REM t1v is Tester 1 voice
REM t2v is Tester 3 voice
REM t3v is Tester 2 voice
REM atv is Angela Tester voice
REM _End_of_Sounds
REM _Images_
LOAD IMAGE "title.png",37
LOAD IMAGE "angela.png",38
LOAD IMAGE "ag.png",39
LOAD IMAGE "retry.png",40
LOAD IMAGE "control.png",43
REM _End_of_Images
CLS
PLAY MUSIC 11
Loop MUSIC 11
TITLE:
Paste Image 37,720,540
Center Text 320, 276, "Start, or Quit?"
Ink RGB(255,255,255),0
SHOW MOUSE
IF MOUSECLICK()
IF MOUSEX()>279
IF MOUSEX()<316
IF MOUSEY()>279
IF MOUSEY()<291
GOTO START
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
IF MOUSEX()>329
IF MOUSEX()<366
IF MOUSEY()>279
IF MOUSEY()<291
END
ENDIF
ENDIF
ENDIF
ENDIF
SET TEXT SIZE 24
START:
HIDE MOUSE
STOP MUSIC 11
CLS
PLAY MUSIC 12
LOOP MUSIC 12
INTRO:
S$="0"
CLS
WAIT 10
PLAY ANIMATION 1
PLAY SOUND 32
WAIT __
STOP ANIMATION 1
Stop SOUND 32
PLAY SOUND 36
LOOP SOUND 36
WAIT 20
CLS
PRINT "You walk up into the building and find yourself in a hospital waiting room. All alone, you walked to the only seat available and sat in it. You look to the piece of paper in front of you and you think to yourself 'a survey really?'."
PRINT
PRINT
PRINT "What will you do?"
PRINT "A. Fill out the survey"
PRINT "B. Don't fill out the survey"
Input "You choose...?", W$
IF W$="A" or W$="a" then S$+5
ENDIF
IF w$="B" then goto FAIL2
ENDIF
CLS
Survey_Choice_is_A:
STOP MUSIC 12
WAIT 10
CLS
PLAY MUSIC 13
LOOP MUSIC 13
CLS
SURVEY:
INPUT "What is your first name?",fn$
Input "What is your last name?",ln$
INPUT "How old are you?",a$
Input "What is today's month?",m$
INPUT "What is today's date?",d$
Input "What is today's year?",y$
INPUT "What is your favorite color?",c$
Input "What is your favorite food?",f$
Input "Do you think you are going to pass or fail?"o$
PRINT
PRINT "Thank you for taking our survey!"
WAIT 20
CLS
STOP MUSIC 13
PLAY MUSIC 14
LOOP MUSIC 14
GOTO MULTIPLE_CHOICE
CLS
STOP SOUND 33
MULTIPLE_CHOICE:
PLAY ANIMATION 3
PLAY SOUND 33
WAIT __
STOP ANIMATION 3
CLS
PRINT "This is the multiple choice part of our quiz. There are 5 questions in this part. DO REMEMBER TO DO WELL TO PASS!!!" Press the space key to continue...", WAITKEY
CLS
PRINT "Q1. What do zombies love to eat?"
PRINT "A.Brains"
PRINT "B.Guts"
PRINT "C.Babies"
PRINT "D. All of the Above"
INPUT "You've chosen...",Q1$
IF Q1$=a THEN S$+5
IF Q1$=b OR Q1$=c OR Q1$=D THEN S$-10
CLS
PRINT "Q2. Which is a temporary medicine for a zombie infection?"
PRINT "A.Zombrex"
PRINT "B.TVirus"
PRINT "C.Gold Bond"
PRINT "D. All of the Above"
INPUT "You've chosen...",Q2$
IF Q2$=a THEN S$+5
IF Q2$=b OR Q2$=c OR Q2$=D THEN S$-10
CLS
PRINT "Q3. If you want a zombie to stay down, you...?"
PRINT "A.shoot/break its head"
PRINT "B.break its spinal cord"
PRINT "C.behead the zombie"
PRINT "D. All of the Above"
INPUT "You've chosen...",Q3$
IF Q3$=d THEN S$+5
IF Q3$=a OR Q3$=b OR Q3$=c THEN S$-10
CLS
PRINT "Q4. If you hear moaning and groaning behind a close door, it could be...?"
PRINT "A.an old couple reliving past memories"
PRINT "B.couple of zombies"
PRINT "C.both A & B"
PRINT "D.neither A or B"
INPUT "You've chosen...",Q4$
IF Q4$=c THEN S$+5
IF Q4$=a OR Q4$=b OR Q4$=d THEN S$-10
CLS
PRINT "Q5. Can a K9 be infected and How?"
PRINT "A.Only by Airborne"
PRINT "B.Only by a direct blood transfusion (bitten)"
PRINT "C.No"
PRINT "D. All of the Above"
INPUT "You've chosen...",Q5$
IF Q5$=b THEN S$+5
IF Q5$=a OR Q5$=c OR Q5$=d THEN S$-10
WAIT 30
CLS
PRINT "So far your Test Score is... ", S$
PRINT "Please press the SPACEKEY to continue..."
WAITKEY
CLS
WAIT 20
PLAY ANIMATION 4
PLAY SOUND 34
WAIT __, STOP ANIMATION 4
STOP SOUND 34
CLS
STOP Music 14
PLAY MUSIC 15
LOOP MUSIC 15
CLS
WAIT 20
GOTO YES_OR_NO
PRINT "This is the 'Yes or No' part of the quiz. There are 15 questions in this part. DO REMEMBER TO DO WELL TO PASS!!!" Press the space key to continue...", WAITKEY
CLS
PRINT "Q6. Your Best friend has an infected bite!"
INPUT "Do you put him/her out of their misery?",Q6$
IF Q6$=yes THEN S$+5
IF Q6$=no THEN S$-10
CLS
PRINT "Q7. You find a dog. You decide to take him along!",Q7$
Input "Do you check him for any zombie bites?"
IF Q7$=yes THEN S$+5
IF Q7$=no THEN S$-10
CLS
PRINT "Q8. You see only one zombie in the street..."
INPUT "Do you kill it?",Q8$
IF Q8$=no THEN S$+5
IF Q8$=yes THEN S$-10
CLS
PRINT "Q9. The group of survivors that you are with begin to disappear!"
INPUT "Do you go looking for them?",Q9$
IF Q9$=no THEN S$+5
IF Q9$=yes THEN S$-10
CLS
PRINT "Q10. The survivors that you are with are slowing you down.."
INPUT "Do you leave them?",Q10$
IF Q10$=no THEN S$+5
IF Q10$=yes THEN S$-10
CLS
PRINT "Q11. You called your family many times, but only hear static..."
INPUT "Do you search for them?",Q11$
IF Q11$=no THEN S$+5
IF Q11$=yes THEN S$-10
CLS
PRINT "Q12. There's a pregnant lady trapped in a car by zombies. Your group decides to save her..."
INPUT "Do you agree with their desicison?",Q12$
IF Q12$=yes THEN S$+5
IF Q12$=no THEN S$-10
CLS
PRINT "Q13. You hear some one calling 'help'!"
INPUT "Do you try to rescue the SOS calling victim?",Q13$
IF Q13$=no THEN S$+5
IF Q13$=yes THEN S$-10
WAIT 10
CLS
PRINT "So far your Test Score is... ", S$
PRINT "Please press the SPACEKEY to continue..."
WAITKEY
CLS
STOP Music 15
PLAY MUSIC 41
LOOP MUSIC 41
CLS
WAIT 20
PRINT "The next couple of questions involve a young helpless 6 years old girl."
Input "Do you wish to continue with this part? Yes or no?",c2$
If c2$=yes then goto ANGELA
If c2$=no then S$-40 and goto TRUE_OR_FALSE
ANGELA:
PRINT "Press the space key to continue..."
Wait key
Stop music 41
Play music 17
Loop music 17
WAIT 10
CLS
PRINT "Q14. You find a helpless young girl, hiding behind a shrub hedge..."
Input "Do you take her as your own?",Q14$
IF Q14$=yes THEN S$+5, PRINT "Her name is Angela!!"
IF Q14$=no THEN S$-15, PRINT "You tried to be an @$$ to her. But you stop before the words came out, because she fixed you with a sad watery gaze. You decide to take her anyways!"
Paste Image 5,__,__,__
CLS
PRINT "Q15. Angela got her clothes tangled in barbwire..."
PRINT "A. Be very perverted..."
PRINT "B. Be a gentleman and untangle her..."
PRINT "C. Leave Her..."
INPUT "WHAT DO YOU DO?",Q15$
IF Q15$= A THEN S$-30 And GOTO FAIL2
IF Q15$= B THEN S$+5
IF Q15$= C THEN S$-50 And goto TRUE_OR_FALSE
WAIT 20
CLS
PRINT "Q16. Angela start complaining about being tired and gets really annoying..."
PRINT "A. Yell at her to shut up..."
PRINT "B. Offer to carry her..."
PRINT "C. Tell her to wait and leave her..."
INPUT "WHAT DO YOU DO?",Q16$
IF Q16$= A THEN S$-10, PRINT "JERK!!>["
IF Q16$= B THEN S$+5, PRINT "Fatherly Figure"
IF Q16$= C THEN S$-50, PRINT "@$$" and goto TRUE_OR_FALSE
WAIT 20
CLS
PRINT "Q17. You and Angela stop for the night on an open plain, with a couple of trees near a pond. As far as your eyes could see there is nothing near you! You build a lean-to shelter, a few walls, and you place a wool rug over the entrance of the shelter. You hear Angela's teeth chattering. You push aside the wool rug that you had hang , to separate Angela from the elements. She sees you checking on her, and she says 'It's Cold!'..."
PRINT "A. Become a pedophile..."
PRINT "B. Use your knowledge that you had learned at Hunters ED..."
PRINT "C. Leave her..."
INPUT "WHAT DO YOU DO?",Q17$
IF Q17$= A THEN S$-35, PRINT "you had a great time that she would never forget!" and goto FAIL2
IF Q17$= THEN S$+5, PRINT "You have done the right thing, and Angela has learned a great deal about hunting safety survival!! FATHERLY FIGURE!!!

"
IF Q17$= THEN S$-50, PRINT "You are truly an @$$", goto TRUE_OR_FALSE
WAIT 20
CLS
PRINT "Q18. You and Angela have been traveling for weeks, out in the country side. You both came across a somewhat fortified farmhouse. The front porch had many bloody corpses!..."
PRINT "What do you do?
PRINT "A. Send Angela to check it out..."
PRINT "B. Grab Angela's hand and keep traveling..."
PRINT "C. Go check the cellar outside doors to gain entry..."
INPUT "WHAT DO YOU DO?",Q18$
IF Q18$= A THEN S$-10, PRINT "Why waste her life!!!"
IF Q18$= B THEN S$+5, PRINT "Smart move! Smartness increased!"
IF Q18$= C THEN S$+2.5, PRINT "You hear something banging on the basement doors. You leave right away!"
WAIT 20
CLS
PRINT "Q19. you and Angela hear the sounds of yelling and gunfire What do you do, so you..."
PRINT "A. Take a white cloth and wave it while walking towards the source of the sounds..."
PRINT "B. Grab Angela and keep traveling..."
PRINT "C. Run towards the source of the sounds..."
INPUT "WHAT DO YOU DO?",Q19$
IF Q19$= A THEN S$+5, PRINT "The soldiers recognized you and Angela as survivors, but they were overwhelmed by the ZEDs that was trying to breach the blockade. You and Angela barely make it away!"
IF Q19$= B THEN S$+10, PRINT "Smartness increased!"
IF Q19$= C THEN S$-75, PRINT "You got yourself and Angela killed" and goto FAIL2
Wait 20
CLS
PRINT "Q20. While traveling for over a lot of weeks, you and Angela arrive at the heavily fortified SAFE HAVEN. You both were brought to the heads of the SAFE HAVEN. The Heads offered to take care of and house both of you, if only you work for them and they told you that Angela was going to be taking care of while you were out on your missions! It seemed too good to be true, but it was True!!!..."
PRINT "Do you..."
PRINT "A. Agree without arguing..."
PRINT "B. Argue until they agree to your demands..."
PRINT "C. Tell them to goto hell..."
INPUT "WHAT DO YOU DO?",Q20$
IF Q20$= A THEN S$+5, goto ANGELA_GRAVE
IF Q20$= C THEN S$-20, PRINT "You saw a guard pull out his pistol, and you quickly changed your mind..."
IF Q20$= B THEN S$+20, PRINT "You argued until they agreed with your demands. Now you can go do your missions, knowing that Angela will be in really good hands!"
Wait 25
CLS
Wait 10
PRINT "Your test score so far is...",S$ ,"!"
Goto TRUE_OR_FALSE
ANGELA_GRAVE:
Stop music 17
Play music 18
Loop music 18
CLS
WAIT 20
PRINT "After your first mission, you arrived back at the SAFE HAVEN with the twenty others that you had rescued. The gate guard captain walks up to and tells that that Angela was killed by a maniac which was watching her...You couldn't believe your ears until the Heads told you the same thing.
PRINT
PRINT "You walked towards the SAFE HAVEN's graveyard. You searched for the graveyard keeper and asked 'um..where..is..Angela's..grav..?' The grave keeper just leaned on his shovel for a couple of seconds, he nodded his head towards the freshest tombstone. You saw that Angela's name was on it, and you tried very hard to keep the tears from flowing but to no luck, they gushed out as you fell to your knees."
PRINT
PRINT "You cried and said that 'she was too young to die, but fate is cruel!'."
PRINT "press the spacebar to see her gravestone...."
Wait key
CLS
PRINT "Angela ",ln$
PRINT "Female____Age 6"
PRINT "October ",d$, " ,",y$+1
PRINT "Parents Unknown"
PRINT "_Some will never Forget!!_"
PRINT
PRINT
PRINT "Press the spacebar to continue..."
WAITKEY
CLS
Stop music 18
Cls
Wait 10
TRUE_OR_FALSE:
Play music 16
Loop music 16
Cls
Play animation 5
play sound 35
wait __
Stop sound 35
Stop animation 5
PRINT "Welcome to the final part of our quiz..."
PRINT "This section is the true or false (t_or_f) questions!"
PRINT "The value of the score for each question is; right=vary (+5,+10,+2.5), wrong=-10,-15,-20,-50!!!"
PRINT "Do well! Good luck! Press the spacebar to continue..."
WAITKEY
CLS
Wait 20
PRINT "Here are some rules before you begin this part!"
PRINT "Rule 1. Don't guess!"
PRINT "Rule 2. If unsure put f"
PRINT "Rule 3. Try to answer all of the questions!"
PRINT "Rule 4. Don't guess!"
PRINT "Rule 5. Do not try to guess..."
PRINT "Rule 6. When in doubt type t!"
PRINT "Rule 7. Don't try anything stupid!!"
PRINT "Rule 8. It doesn't matter if you fail!!"
PRINT "Rule 9. Make sure you don't guess!"
PRINT
PRINT "Press space to continue...After you have reviewed these rules!!!!"
Wait key
CLS
WAIT 20
PRINT "Q21. Zombies don't run.."
Input "T or F?",Q21$
If Q21$=t then S$-20
If Q21$=f then S$+5
CLS
WAIT 20
PRINT "Q22. If a pregnant woman is bitten, then her baby is infected too..."
Input "T or F?",Q22$
If Q22$=t then S$+5
If Q22$=f then S$-35
CLS
WAIT 20
PRINT "Q23. Zombism is cure-able.."
Input "T or F?",Q23$
If Q23$=t then S$-20
If Q23$=f then S$+5
CLS
WAIT 20
PRINT "Q24. The T-Virus starts out as airborne..."
Input "T or F?",Q24$
If Q24$=t then S$-20
If Q24$=f then S$+5
CLS
WAIT 20
PRINT "Q25. Zombies are just re-animated corpses.."
Input "T or F?",Q25$
If Q25$=t then S$-20
If Q25$=f then S$+5
CLS
WAIT 20
PRINT "Q26. Zombies are attracted to only one Race.."
Input "T or F?",Q26$
If Q26$=t then S$-20
If Q26$=f then S$+5
CLS
WAIT 20
PRINT "Q27. Immunes are immune to any disease.."
Input "T or F?",Q27$
If Q27$=t then S$-20
If Q27$=f then S$+5
WAIT 20
CLS
PRINT "Q28. All Zombies are brain-dead.."
Input "T or F?",Q28$
IF Q28$=t then S$-20
IF Q28$=f THEN S$+5
Wait 20
CLS
PRINT "Q29. Zombies don't evole into better killing machines.."
INPUT "T or F?",Q29$
If Q29$=t THEN S$-20
If Q29$=f THEN S$+5
WAIT 20
CLS
PRINT "Q30. In Left4Dead, a Boomer's barf is a zombie attracting slime.."
Input "T or F?",Q30$
If Q30$=t THEN S$+5
If Q30$=f THEN S$-20
WAIT 20
CLS
PRINT "Q31. In Dead Rising 2, Chuck Greene isn't framed for releasing the zombies.."
Input "T or F?",Q31$
If Q31$=t then S$-20
If Q31$=f then S$+5
Wait 20
CLS
PRINT "Q32. In Minecraft, Zombie-pigmen are a neutral mob until attacked.."
Input "T or F?", Q32$
If Q32$=t then S$+5
If Q32$=f then S$-20
Wait 20
CLS
PRINT "Q33. Rule 1 of Zombie Survival is CARDIO..."
Input "T or F?", Q33$
If Q33$=t then S$+5
If Q33$=f then S$-20
Wait 20
CLS
PRINT "34. Zombies are attracted to sounds.."
Input "T or F?", Q34$
If Q34$=t then S$+5
If Q34$=f then S$-20
Wait 20
CLS
PRINT "35. Zombies can't get through doors.."
Input "T or F?", Q35$
If Q35$=t then S$-20
If Q35$=f then S$+5
Wait 20
CLS
PRINT "Q36. Lighting Zombies on fire only makes them less dangerous.."
Input "T or F?", Q36$
If Q36$=t then S$-20
If Q36$=f then S$+5
Wait 20
CLS
PRINT "Q37. Terminators are a metal type of zombies
Input "T or F?", Q37$
If Q37$=t then S$+5
If Q37$=f then S$-20
Wait 20
CLS
PRINT "Q38. It is funny to see a fat zombie run.."
Input "T or F?", Q38$
If Q38$=t then S$+5 and PRINT "yeah..until they get you!"
If Q38$=f then S$-5
Wait 20
CLS
PRINT "Q39. There is a single zombie in plain sight...There's no other zombies that you can see...It is safe..."
Input "T or F?", Q39$
If Q39$=t then S$-20
If Q39$=f then S$+5
Wait 20
CLS
PRINT "Q40. You have been bitten, but you cleaned the cut with hydrogen peroxide ...you won't become one of the infected..."
Input "T or F?", Q40$
If Q40$=t then S$-40
If Q40$=f then S$+5
Wait 20
CLS
PRINT
PRINT "Thank you for taking our quiz!"
PRINT "To continue press the spacebar..."
WAITKEY
CLS
PRINT "Please wait for the test results to process....!"
Stop music 16, stop sound 36
S$/2
SCORE_D:
IF S$>100 AND S$>98 THEN GOTO PASS
IF S$>97 AND S$>67 THEN GOTO FAIL
IF S$<66 AND S$>36 THEN GOTO FAIL1
IF S$<35 AND S$=0 THEN GOTO FAIL2
CLS
Wait 20
PASS:
CLS
Wait 10
Play Animation 6
Play Music 19
Loop Music 19
Wait __
Stop Animation 6
CLS
Wait 10
PRINT "Congratulations!! YOU PASSED WITH A__", S$, "_!!_GREAT JOB...!"
PRINT "Please press the spacebar to go to the credits...Thank you, Come again!"
WAITKEY
CLS
Goto CREDITS
WAIT 10
CLS
FAIL:
WAIT 10
CLS
PLAY ANIMATION 7
PLAY MUSIC 20
PALY SOUND 28
LOOP MUSIC 20
WAIT__
STOP ANIMATION 7
STOP SOUND28
CLS
WAIT 10
PRINT "YOU DIED DUE TO SCORING A __", S$, "_You were mistaken for being a zombie running loose on the ZSSR (Zombie Shot Shooting Range)! Better luck next time!!"
PRINT "Please press the spacebar to go to the credits...Thank you, Come again!"
WAITKEY
CLS
WAIT 15
STOP MUSIC 20
GOTO CREDITS
WAIT 10
CLS
FAIL1:
WAIT 10
CLS
PLAY MUSIC 21
WAIT 10
PLAY ANIMATION 8
PLAT SOUND 29
LOOP MUSIC 21
WAIT __
STOP ANIMATION 8
STOP SOUND 29
CLS
WAIT 10
PRINT "You died because you scored a __", S$, "__You were thrown into a cell that at first appeared to be empty...Opps, the cell wasn't empty! Better luck next time!!!"
PRINT "Please press the spacebar to go to the credits...Thank you, Come again!"
WAITKEY
CLS
STOP MUSIC 21
Goto CREDITS
WAIT 10
CLS
FAIL2:
WAIT 10
CLS
PLAY MUSIC 22
PLAY ANIMATION 9
PLAY SOUND 30
LOOP MUSIC 22
WAIT __
STOP ANIMATION 9
STOP SOUND 30
CLS
WAIT 10
PRINT "You died because you scored a__", S$, "__and you are a heartless person!! Try for some kindness next time!!!"
PRINT "PRESS THE SPACEBAR TO GO TO THE CREDITS...NOW, HEARTLESS WRENCH!!!!!!AND DON'T COME AGAIN!!!"
WAITKEY
CLS
STOP MUSIC 22
Goto CREDITS
WAIT 10
CLS
CREDITS:
PLAY ANIMATION 10
PLAY MUSIC 23
LOOP MUSIC 23
WAIT__
STOP ANIMATION 10
WAIT 10
CLS
Paste Image 37, , ,
Center Text 320, 276, "RETRY, or QUIT?"
Ink RGB(255,255,255),0
SHOW MOUSE
IF MOUSECLICK()
IF MOUSEX()>279
IF MOUSEX()<316
IF MOUSEY()>279
IF MOUSEY()<291
GOTO RESTART
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
IF MOUSEX()>329
IF MOUSEX()<366
IF MOUSEY()>279
IF MOUSEY()<291
END
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
SET TEXT SIZE 24
ENDIF
RESTART:
CLS
WAIT 20
RESTART
LOOP
[i]
Peter-V Machado-Cullerton