A couple of problems.
First, when you are saving the second position you are copying data from the balls position (ballx, bally) instead of the clicked position (x, y). This:
| Turing: |
if b = 1 and turn = 2
then savex2 := ballx savey2 := bally end if |
As opposed to this:
| Turing: |
if b = 1 and turn = 2
then savex2 := x savey2 := y end if |
Second, in your second loop you have the following code:
| Turing: |
if savey > bally then
bally := bally + 2 end if if savey < bally then bally := bally - 2 end if if savex > ballx then ballx := ballx + 2 end if if savex < ballx then ballx := ballx - 2 end if if savey2 > bally then bally := bally + 2 end if if savey2 < bally then bally := bally - 2 end if if savex2 > ballx then ballx := ballx + 2 end if if savex2 < ballx then ballx := ballx - 2 end if |
Because your second loop is about moving the ball towards the second point (savex2, savey2) you do not need to deal with the first point (savex, savey) (hint: only one set of if statements are needed).
I think that is what you want, but you may in fact want to move the ball from point one to point two. If that is the case than you would want to first set the balls position (ballx, bally) to point ones position (savex, savey) and increment the balls position using the vector formed from point one to point two (vectorx=savex2-savex, vectory=savey2-savey).
Also, when you want to print the balls position you should use the ball coordinate variables instead of the mouse coordinate variables. So this:
| Turing: |
put "The ball is at x= ", ballx, " y= ", bally .. |
Instead of this:
| Turing: |
put "The ball is at x= ", x, " y= ", y .. |
Hope that helped.
