Вообще в начале делал расстановку с применением такого кода
Function FormationSelect(n)
ring = Rand(n)
idx = n - (ring+ring)
If idx >= ring Then
formationX = 2*ring -idx
formationY = ring/2+ idx
Else
formationX = idx
formationY = ring
EndIf
End Function
где n число от 0 до ...???(к примеру 11) ,но чем выше число ,тем дальше значения.
По поводу модуля не совсем понял ,что имеется ввиду ?