Lowering Preditor Time

[Timer]

Here's the script I have for when you toss a flag you recieve a pred. I was wondering how to change the pred time to something lower like 7 secs or 420 ticks... heres the script so far

procedure OnFlagDrop(ID, TeamFlag: byte);

begin
  GiveBonus(ID, 1);
  WriteConsole(ID,'You have recieved a pred on flag throw!', $EE81FAA1);
end;   

[Hacktank]

Impossible, its hardcoded. The only way would be to givebonus something else, like a berserker, in apponidle. But that causes even more problems.

[DorkeyDear]

It may be possible to kill (when the custom pred timer runs out), and attempt to respawn the player with /setteam (not 100% certain if it respawns or not) at the location he died, or MovePlayer`ing him; this probably wouldn't seem very smooth though.

[LORD KILLA]

Do GiveBonus(ID, 1). Then, to disable it, try GiveBonux(ID, 0); (just idea, not sure if works)

[y0uRd34th]

Nice idea, but does not work. Atleast it will force your weapons to deagles, pretty weird!

[Timer]

Here's the script I'm using now
procedure OnFlagDrop(ID, TeamFlag: byte);
  begin
    if TeamFlag = 1 then
      begin
        GiveBonus(ID, 1);
        WriteConsole(ID,'You have recieved a pred on flag throw!', $EE81FAA1);
      end;
  end;   

I would still like to only allow for a 5 sec pred somehow.
If it isn't possible I still appreciate your guys help!

[Hacktank]

Impossible, its hardcoded.

[Timer]

Well ok...So I changed script. (I want the preds to be available but less easy to spam the use of it aka throwing flag, get pred, catch flag, throw again ect...) so here's what I came up with that would not allow players to take the pred spawner (aka alpha teams flag) and spam use of it.

Obviously not right...can you show me what i did wrong here?

procedure OnFlagGrab(ID, TeamFlag: byte;GrabbedInBase: boolean);
  begin
    if TeamFlag = 1 then
      begin
        if GrabbedInBase = True then
          begin
            GiveBonus(ID, 1);
            WriteConsole(ID,'You have recieved a pred on flag throw!', $EE81FAA1);
          end;
      end;
  end;   

[VinceBros]

Well it seems like it can't detect the GrabbedInBase. I tried it in Ash and it can only detect when it not GrabbedInBase.. Strange.

[Hacktank]

Code: [Select]

var rfs,bfs: boolean;

procedure OnMapChange(NewMap: String);
begin
rfs := true;
bfs := true;
end

procedure OnFlagGrab(ID, TeamFlag: byte;GrabbedInBase: boolean);
begin
case teamflag of
1: rfs := false;
2: bfs := false;
end;
end;

procedure OnFlagReturn(ID, TeamFlag: byte);
begin
case teamflag of
1: rfs := true;
2: bfs := true;
end;
end;

procedure OnFlagScore(ID, TeamFlag: byte);
begin
case teamflag of
1: rfs := true;
2: bfs := true;
end;
end;

And only do stuff in the onflaggrab when the correct var is true.

[Gizd]

It may be possible to kill (when the custom pred timer runs out), and attempt to respawn the player with /setteam (not 100% certain if it respawns or not) at the location he died, or MovePlayer`ing him; this probably wouldn't seem very smooth though.

You don't have to kill him, just respawn using /setteam at same position. That's possible.

[DarkCrusade]

But that will look very unsmooth.

[dnmr]

But that will look very unsmooth.

are you serious? You mean killing a player IS smooth?!

[Neosano]

Well, IMod has a skill that lets you "go out of your body" and then come back. (Steyr second skill)
It uses /setteam and it works well, but the problem is that a weapon menu will appear. Any ideas how to make it not showing up?

[y0uRd34th]

well, it can be dis/enabled by TAB, but i dont think it will work via script

[DarkCrusade]

are you serious? You mean killing a player IS smooth?!

No I didn´t say that.

well, it can be dis/enabled by TAB, but i dont think it will work via script

The problem is, that no player is going to use the same weapons all way long so nobody will disable the menu. You got to deal with it.

[Neosano]

Guys, I'm not sure, but when you join another team weapon menu pops again, even if it was TABed. :-S

[dnmr]

Guys, I'm not sure, but when you join another team weapon menu pops again, even if it was TABed. :-S

tried disabling all weapons in soldat.ini and then setweaponactive'ing them on/off?

[Neosano]

nope :-S

[Timer]

Alright so I figured I try something differant anyways. Currently on the server it gives you a pred for a bravo flag return, but problem is you can't use a pred whenever you want. So i figured a good way to do this was to give everyplayer the ability to use a pred whenever they wanted but only 1. So I wanted to make the cluster grenade turn into a pred for only bravo team players... Im just beginning to try and script but I can't figure out what I did wrong here.

function OnPlayerDamage(Victim,Shooter: Byte;Damage: Integer;Weapon: Byte) : integer;
begin
   if GetPlayerStat(Victim, 'Team') = 2 then
   if Damage > 0 then
   if (Weapon = 50) then
      begin
         GiveBonus(Victim, 1)
         WriteConsole(Victim,'Magic Nade!', $EE81FAA1);
      end;
end;