Guru
Joined: 29/01/2013
Location: CanadaPosts: 1181
| Posted: 09:36pm 28 Dec 2020 |
Yes, it's potentially addicting. Fortunately there are only 35 levels so you can't keep going and going...
I thought about a move counter. A counter would be easy enough, but the minimum number of moves is harder. Fine for the pre-defined levels, much harder for the randomly generated levels. I took the lazy route.
During development, there was the equivalent of an "OOPS" key. I deliberately took it out for release. If you really want it back, change lines 210-212 with the following: (although I don't guarantee it works.)
case 27 ' [ESC]
DrawBall(0,src,0) ' erase coloured ball above source vial
for j = 1 to 4
if vials(src,j) = 0 then ' find top spot
vials(src,j) = movingball ' put the ball back
DrawBall(movingball,src,j+1) ' re-draw coloured ball in vial
exit do
endif
next j
gameover = 1
exit do
DrawBall(0,src,0) ' erase coloured ball above source vial
for j = 1 to 4
if vials(src,j) = 0 then ' find top spot
vials(src,j) = movingball ' put the ball back
DrawBall(movingball,src,j+1) ' re-draw coloured ball in vial
exit do
endif
next j
gameover = 1
exit do