The_Bean wrote:
Your initializing the ball to 0 at the beginning of the program.
When you load from the file it doesn't actually change the value, and the loading looks a lot more complicate than it actually needs to be.
No it's being set...
Line : 56
code: |
GolfballXSet := strreal (line) |
line 310
code: |
procedure GolfBallDraw
GolfballXSet += GolfballXincr
GolfballYSet += GolfballYincr
GolfballX1 := GolfballXSet
GolfballY1 := GolfballYSet
Pic.Draw (GolfBall, round (GolfballX1), round (GolfballY1), picMerge)
GolfballX2 := GolfballX1 + Pic.Width (GolfBall)
GolfballY2 := GolfballY1 + Pic.Height (GolfBall)
end GolfBallDraw |