function LevelSetup()
SetBackdropColour(0,0,0)
Globals.Agents.SpeedPower=1
Globals.Agents.DamagePower=1
Globals.Asteroids.MaxTrees=2
Globals.Asteroids.MinRadius=300
Globals.Asteroids.MaxRadius=1600
Globals.Asteroids.RadiusPowerRule=2
Globals.Asteroids.SizeFromEnergy=360
Globals.Asteroids.SizeFromStrength=360
Globals.Asteroids.SizeFromSpeed=360
Globals.Asteroids.MinCoreHealth=30
Globals.Asteroids.MaxCoreHealth=30
Globals.Asteroids.CoreHealthPower=2.5
Globals.Asteroids.MinSendDistance=5000
Globals.Asteroids.MaxSendDistance=5000
Globals.Asteroids.SendPowerRule=3.0
Globals.G.EnemyFactionsMin=(10)
Globals.G.EnemyFactionsMax=(10)
Globals.G.MinAsteroidSeparation=1600
Globals.G.MaxAsteroidNeighbourDist=6000
Globals.G.StartingSeedlingsPlayer=40
Globals.G.StartingSeedlings=40
Globals.G.GreysProbability=0
Globals.Agents.MinDamage =10
Globals.Agents.MaxDamage =10
Globals.Structures.MinHealth =2000
Globals.Structures.MaxHealth =2000
Globals.Agents.AttackDist =500
Globals.Agents.MaxSpeed = 400
Globals.Agents.MinSpeed = 400
Globals.Agents.MinHealth = 300
Globals.Agents.MaxHealth = 300
Globals.Agents.NoseLengthMin = 1
Globals.Agents.NoseLengthMax = 1
SetFlowerDefenseButtonAvailable(false)
SetDefenseTreeButtonAvailable(false)
Globals.Structures.FlowerProbability=(0)
Globals.Structures.TreeCost= (1)
Globals.AI.MinScoutTime=0.001
Globals.AI.MaxScoutTime=0.001
Globals.AI.MinScoutableArmy =1
Globals.AI.MinBattleAnalysisTime =0.001
Globals.AI.MaxBattleAnalysisTime =0.001
Globals.AI.Cowardice =1
Globals.AI.BattleSavvy =0
Globals.AI.ReinforcementGreed=1
Globals.AI.AidEnthusiasm=0
Globals.AI.MinExpansionTime=0.001
Globals.AI.MaxExpansionTime=0.001
Globals.AI.MinExpansionForce=1
Globals.AI.ExpandToValuableAsteroidChance=1
Globals.AI.ExpandBlind=1
Globals.AI.MinAttackTime=0.001
Globals.AI.MaxAttackTime=0.001
Globals.AI.MinPlantTime=0.001
Globals.AI.MaxPlantTime=0.001
Globals.AI.MinFlowerTime=0.001
Globals.AI.MaxFlowerTime=0.001
Globals.AI.MinGatherTime=0.001
Globals.AI.MaxGatherTime=0.001
Globals.AI.MinTotalSeedlings= 4000
a = AddAsteroidWithAttribs(20000,20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(20000,-20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-20000,20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-20000,-20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,0, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(0,10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-10000,0, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(0,-10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-10000,-10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-10000,10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,-10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(20000,0, 0.001,0.001,0.001)
a.Owner = 1
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(0,20000, 0.001,0.001,0.001)
a.Owner = 3
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(-20000,0, 0.001,0.001,0.001)
a.Owner = 2
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(0,-20000, 0.001,0.001,0.001)
a.Owner = 4
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(5000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(5000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-10000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-10000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(5000,10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(5000,-10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,-10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,0, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,0, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(0,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(0,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(5000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-10000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(5000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-10000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,-10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,-10000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-20000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-20000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-20000,10000, 0.001,0.001,0.001)
a.Owner = 8
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(-20000,-10000, 0.001,0.001,0.001)
a.Owner = 7
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(-20000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-20000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(20000,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(20000,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(20000,10000, 0.001,0.001,0.001)
a.Owner = 5
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(20000,-10000, 0.001,0.001,0.001)
a.Owner = 6
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(20000,15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(20000,-15000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(5000,-20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,-20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,-20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,-20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,-20000, 0.001,0.001,0.001)
a.Owner = 10
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(-10000,-20000, 0.001,0.001,0.001)
a.Owner = 11
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(5000,20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(15000,20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-15000,20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(10000,20000, 0.001,0.001,0.001)
a.Owner = 9
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(-10000,20000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
s = a:AddDysonTree()
a:AddSeedlings(40)
a = AddAsteroidWithAttribs(0,0, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(0,5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(0,-5000, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(5000,0, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
a = AddAsteroidWithAttribs(-5000,0, 0.001,0.001,0.001)
a.Owner = 0
a.Radius = 500
a.TreeCap = 2
AddAsteroidRing(0, 0, 0, 0, 0)
SetCameraZoomNow(10)
end
function LevelLogic()
Pause()
MessageBox("03a_01")
WaitDialog()
Unpause()
while GameRunning() do
coroutine.yield()
end
end