Author Topic: TM Zombie Survival winning reward  (Read 925 times)

0 Members and 1 Guest are viewing this topic.

Offline Vilde123 [Fin]

  • Major(1)
  • Posts: 4
TM Zombie Survival winning reward
« on: February 07, 2009, 12:46:51 pm »
I am using Snowy's zombie script with Corl45's Weapon Shop script, and I have made a dedicated server and only need to add a reward for the players that survive the round as humans (bravos)... How would I do this? :0

Thanks.

[EDIT]

I also tried editing the script by adding this:

Code: [Select]
procedure AppOnIdle(Ticks: integer)
  begin
    if timeleft = 1 then
      begin
       money[blueplayers] := money[blueplayers] + 3500;
    end;
     end;

Not sure what's wrong =(       (I made this using http://enesce.com/help/ ) XD
« Last Edit: February 08, 2009, 05:37:02 am by Vilde123 [Fin] »

Offline AquaByrd

  • Soldier
  • **
  • Posts: 108
  • Lolwut?
Re: TM Zombie Survival winning reward
« Reply #1 on: February 08, 2009, 09:56:06 am »
Although I'm not sure whether this affects anything, but you want it to look like this:

Code: [Select]
procedure AppOnIdle(Ticks: integer)
begin
    if timeleft = 1 then begin
       money[blueplayers] := money[blueplayers] + 3500;
    end;
end;

Also, if you've created another AppOnIdle procedure it really won't like it. Try putting that under the AppOnIdle that is in the script now, if there is an AppOnIdle procedure.
My sig was 300 x 120, the maximum size is 300 x 125. Check next time will you.

Offline Vilde123 [Fin]

  • Major(1)
  • Posts: 4
Re: TM Zombie Survival winning reward
« Reply #2 on: February 08, 2009, 11:53:13 am »
I got the server now running with that but it didn't give any money... Any ideas? : (

Offline AquaByrd

  • Soldier
  • **
  • Posts: 108
  • Lolwut?
Re: TM Zombie Survival winning reward
« Reply #3 on: February 08, 2009, 03:30:31 pm »
You could check to see if [blueplayers] is the correct variable for the weapon shop script.
My sig was 300 x 120, the maximum size is 300 x 125. Check next time will you.

Offline chutem

  • Veteran
  • *****
  • Posts: 1119
Re: TM Zombie Survival winning reward
« Reply #4 on: February 08, 2009, 10:36:53 pm »
Code: [Select]
procedure AppOnIdle(Ticks: integer);

var
  i: Integer;

begin
  if timeleft = 1 then begin
    for i:= 1 to 32 do begin
      if GetPlayerStat(i, 'Team') = 2 then money[i] := money[i] + 3500;
    end;
  end;
end;
1NK3FbdNtH6jNH4dc1fzuvd4ruVdMQABvs