Level design/ Code questions from a beginner

[InTouch]

i tried making a test map using euclid but it throws an error saying:
Unable to load level
Resources/Maps/test.lua:117:'end'
expected (to close function at line 99)
near'<eof>'
 

[w4tc]

can you have you code?

[Terrial]

I got the level to work.  It wasn't recognizing when the timer = the game time  I fixed it by making it <=

So I'm putting together the asteroids now.  I should have the level up later today.

[annikk.exe]

W4tc,

I have finally got around to reading your post properly, and building a response.

These changes should provide the functionality you described:



You'll need to make an array for this.
So you need to initialise the array first, you do that in function LevelSetup() using this command:

Code: [Select]

seednumber = {}


All the array slots start out with the value nil.  We want them to start with the value 0.  So initialise the needed slots like this:

Code: [Select]

for seedset = 1,33 do
seednumber[seedset] = 0
end



Finally, make sure you have set the initial background colour:

Code: [Select]

SetBackdropColour(255,127,39)



Next, put this code into function LevelLogic, replacing any existing while loops.

Code: [Select]


while GameRunning() do

for i = 1,4 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] then
SetBackdropColour(0,255,0)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end


for i = 5,7 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] then
SetBackdropColour(155,0,0)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end


for i = 8,14 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] then
SetBackdropColour(0,0,0)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end


for i = 15,33 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] then
SetBackdropColour(0,0,255)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end



coroutine.yield()
end




[annikk.exe]

RE King of the hill win condition.


I'm interpreting your requirements to mean the following, if this is not right, please say so:


Asteroid 0 will be the King of the Hill asteroid.

There will be two timers, they are called playertimer and aitimer.

playertimer ticks up for the player (empire 1) for every second they own the asteroid.
aitimer ticks up for the enemy (empire 2) for every second they own the asteroid.
If neither empire 1 or empire 2 own asteroid 0, no timer will tick up.

If playertimer reaches 180 sec, empire 1 (the player) wins, and the game ends.
If aitimer reaches 180 sec, empire 1 (the player) loses, and the game ends.



Is this correct?  Let me know if it is, and I'll show you how to make a win condition like this.  :>

[w4tc]

OYEAAA
that is working =D

but :$ i may only change when you it send
now it also change with if there a born seed is
So there must be a way that that can block

Also :$ i have 2 questions :

how can I that Owner 2 or IA should not be moving with his seeds to ohtere roid
i want it only send a seed of owner 1 or with commend like return to fluffy ( your level ) with that waves ect

and i tried to make me defent and dysontree to level up but it dont works? :s
here is an example

(click to show/hide)

Code: [Select]

-- Asteroid 8 Ziekte 1
c = AddAsteroidWithAttribs(-4800,3500,1,1,1)
c.Owner = 2
c.TreeCap = 11
c:SetRadius(math.random(400,550))
c:AddSeedlings(1)
c.Moveable = False
s= c:AddDysonTree() -- DysonTree 1
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDysonTree() -- DysonTree 2
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDysonTree() -- DysonTree 3
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDysonTree() -- DysonTree 4
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDysonTree() -- DysonTree 5
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDefenseTree() --DefenseTree 1
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDefenseTree() --DefenseTree 2
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDefenseTree() --DefenseTree 3
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDefenseTree() --DefenseTree 4
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDefenseTree() --DefenseTree 5
s:LevelUp()
s:LevelUp()
s:LevelUp()
s= c:AddDefenseTree() --DefenseTree 6
s:LevelUp()
s:LevelUp()
s:LevelUp()

[InTouch]

RE King of the hill win condition.


I'm interpreting your requirements to mean the following, if this is not right, please say so:


Asteroid 0 will be the King of the Hill asteroid.

There will be two timers, they are called playertimer and aitimer.

playertimer ticks up for the player (empire 1) for every second they own the asteroid.
aitimer ticks up for the enemy (empire 2) for every second they own the asteroid.
If neither empire 1 or empire 2 own asteroid 0, no timer will tick up.

If playertimer reaches 180 sec, empire 1 (the player) wins, and the game ends.
If aitimer reaches 180 sec, empire 1 (the player) loses, and the game ends.



Is this correct?  Let me know if it is, and I'll show you how to make a win condition like this.  :>

Actually terrial has found the right code for me and we are currently working on a map using it.
I sent you a pm requesting your help with something

[annikk.exe]

Replied.  Best of luck if you decide to go ahead without me, or thanks for your patience if not.  :>

[annikk.exe]

OYEAAA
that is working =D

but :$ i may only change when you it send
now it also change with if there a born seed is
So there must be a way that that can block

Ok, try this code instead:

Code: [Select]

while GameRunning() do

for i = 1,4 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] and GetAsteroid(i):GetNumTrees() == 0 then
SetBackdropColour(0,255,0)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end


for i = 5,7 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] and GetAsteroid(i):GetNumTrees() == 0 then
SetBackdropColour(155,0,0)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end


for i = 8,14 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] and GetAsteroid(i):GetNumTrees() == 0 then
SetBackdropColour(0,0,0)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end


for i = 15,33 do
if GetAsteroid(i):GetNumSeedlings(1) > seednumber[i] and GetAsteroid(i):GetNumTrees() == 0 then
SetBackdropColour(0,0,255)
end
seednumber[i] = GetAsteroid(i):GetNumSeedlings(1)
end



coroutine.yield()
end

Not ideal I guess, but hopefully this will do...

[annikk.exe]

how can I that Owner 2 or IA should not be moving with his seeds to ohtere roid

Script it so that when Empire 2 owns the asteroid, its send distance drops to 0.  When Empire 1 owns the asteroid, its send distance goes back to normal.

[annikk.exe]

Code: [Select]

s= c:AddDysonTree() -- DysonTree 1

Try this instead:

Code: [Select]

s = c:AddDysonTree() -- DysonTree 1
Dunno if it will make a difference... but maybe.. :>

[w4tc]

sorry annikk that code dont work :$
about this : http://www.dyson-game.com/smf/index.php?topic=774.msg6100#msg6100