At the start of a game, or when you want to reset the game field, you will call this method to set up a new tile set:
1. The new method inside the
game
class will be namedCreateAtomElements
.Method CreateAtomElements:Int()
2. We want to randomize the grid setup. For this we will seed the random number generator with the value of a call to
Millisecs
.Seed = Millisecs()
3. The distance from a collision circle to the center of an atom will be
23
pixels and stored inside a local variable.Local cd:Int = 23
4. Now, we need a grid of 8 x 11 elements. Start two
For
loops for this purpose.For Local y:Int = 1 To 11 For Local x:Int = 1 To 8
5. Next, we determine randomly in the range of 0 to 3 the kind of element which represents the different kinds of atom connectors.
Local ek:Int = (Rnd(0,3)+0.4)
6. As we do not want the game to go on forever, we modify the
ek
value to a different one. This depends on another random number call with a range from 0 to...