Parallel LED Game

[initialfresh]

code:

var onezero : int var target : int View.Set ("graphics:470;300,position:center;center,nobuttonbar") put "                         LED GAME! " put "       Please enter LED that you will attempt to hit!" put "                ( anything else to quit ) " .. get target cls loop     Draw.Oval (70, 100, 50, 50, brown)     Draw.Oval (180, 100, 50, 50, brown)     Draw.Oval (290, 100, 50, 50, brown)     Draw.Oval (400, 100, 50, 50, brown)     put "              You are trying to stop on LED ", target     put "                  Press Button to Start! "     loop         onezero := parallelget         exit when onezero = 56     end loop     delay (500)     loop         Draw.FillOval (70, 100, 50, 50, brightred)         parallelput (8)         delay (100)         Draw.FillOval (70, 100, 50, 50, white)         Draw.Oval (70, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------         Draw.FillOval (180, 100, 50, 50, brightred)         parallelput (4)         delay (100)         Draw.FillOval (180, 100, 50, 50, white)         Draw.Oval (180, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------         Draw.FillOval (290, 100, 50, 50, brightred)         parallelput (2)         delay (100)         Draw.FillOval (290, 100, 50, 50, white)         Draw.Oval (290, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------         Draw.FillOval (400, 100, 50, 50, brightred)         parallelput (1)         delay (100)         Draw.FillOval (400, 100, 50, 50, white)         Draw.Oval (400, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------         Draw.FillOval (400, 100, 50, 50, brightred)         parallelput (1)         delay (100)         Draw.FillOval (400, 100, 50, 50, white)         Draw.Oval (400, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------         Draw.FillOval (290, 100, 50, 50, brightred)         parallelput (2)         delay (100)         Draw.FillOval (290, 100, 50, 50, white)         Draw.Oval (290, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------         Draw.FillOval (180, 100, 50, 50, brightred)         parallelput (4)         delay (100)         Draw.FillOval (180, 100, 50, 50, white)         Draw.Oval (180, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------         Draw.FillOval (70, 100, 50, 50, brightred)         parallelput (8)         delay (100)         Draw.FillOval (70, 100, 50, 50, white)         Draw.Oval (70, 100, 50, 50, brown)         onezero := parallelget         exit when onezero = 56         %-------------------------------------------     end loop     if onezero = target then         put "YOU DID IT!"     elsif (target = onezero - 1) or (target = onezero + 1) then         put "YOU JUST MISSED!"     else         put "YOU'RE WAY OFF!"     end if     exit when onezero = 56     cls end loop

[initialfresh]

Hello, i am creating a program so that the user will first enter which LED they will try to stop the cycle on (LED 1, 2, 3, or 4 from left to right). If user input is not valid, then program should exit. If the user is successful in stopping the program on the correct LED, the program should say ?YOU DID IT!?. If they are off by one LED the program should say ?YOU JUST MISSED!?. If they are off by 2 or more LED?s the program should say ?YOU?RE WAY OFF!?. After displaying the result, the program will return to the point where the user has the opportunity to select which LED to stop on. The program must still wait for user to push button before the cycle restarts and cycle will still restart from the beginning. This is my final project, i am not that good at turing and hopefully someone can help me!!

[Euphoracle]

What is up with your post count?!

I think I'm going to call shenanigans on this one.

[Tony]

there were duplicate posts, subsequent deletion of such, and the resulting mess of unsigned integer values. Dan cleaned this up.

[initialfresh]

yea, i know. every time i tried to post something it would give my an error, and it didnt tell me if it was posted or not

[Warchamp7]

So what seems to be your problem? I notice you used parallelget which I really don't see why.