How to kill with CreateBullet without using explosive rounds?

[frosty]

title says it all, if i spawnBullet (or whatever it is) on someone it doesnt do any damage, i could do 100 bullets and it still hasnt done any damage,

although my wep mod is set to 999999 damage, which works fine when actually using the weapons,

i want to move away from using explosive rounds as its causing MASSIVE lag issues on my server so, how do i do it?

i know that Dodamage results in a selfkill which isnt what i want

i also want to set up like a turret that auto fires, but how do i get the angle of direction from turret to target and Createbullet with that angle info?

[Gizd]

You need to get angle between turret and player:

Code: [Select]

function arctan2(X, Y: single): single;
begin
  if X < 0 then Result := arctan(Y/X) + Pi else
  if X > 0 then Result := arctan(Y/X) else
  if Y > 0 then Result := 1.5707 else
   Result := -1.5707;
end;

a:= arctan(X2-X1,Y2-Y1);
*arctan2() made by tk.

Code: [Select]

vX:= cos(a)*velocity;
vY:= sin(a)*velocity;
CreateBullet(TurretX,TurretY,vX,vY,Power,Style,ID);
This will create a bullet going from turret to player, you need to find some angle adjustments though if you want low velocity bullets to hit.

[VirtualTT]

CreateBullet function doesn't use any values from weapon mod, you need to manually specify bullet power (~10000 for sure kill). Also resulting damage will be effected by the speed of the bullet. So don't set speed to 0 if bullet is spawned just inside the player.

[Swompie]

CreateBullet function doesn't use any values from weapon mod, you need to manually specify bullet power (~10000 for sure kill). Also resulting damage will be effected by the speed of the bullet. So don't set speed to 0 if bullet is spawned just inside the player.

Aswell don't place bullets with rapid speed near players because they will just fly through them.

Code: [Select]

function arctan2(X, Y: single): single;
begin
  if X < 0 then Result := arctan(Y/X) + Pi else
  if X > 0 then Result := arctan(Y/X) else
  if Y > 0 then Result := 1.5707 else
   Result := -1.5707;
end;


<3 

[frosty]

uhh how exactly do i set bullet "speed" in CreateBullet? someone give me an example plz

theres no "speed" var in the syntax, only VelX and VelY, tried 1000 VelY with HitMultiplier as 10000 and it doesnt kill, so how exactly do i set the speed?

[Hacktank]

1000 for a sold at velocity is ungodly. The bullet would span the entire map in a second.... Try 1.

[Swompie]

Well.. speed would be sqrt(VelX * VelX + VelY * VelY)
And if you don't understand what VelX and VelY means you kinda did miss something..
CreateBullet(x, y, -10, 0, 100, 14, owner); Bullet flys straight up.
CreateBullet(x, y, -10, 10, 100, 14, owner); Would create a bullet which starting angle is 45° (flys ^>)
CreateBullet(x, y, 0, 10, 100, 14, owner); Flys to the right of it's spawning position.

I think this should be enough so you get the idea.

[frosty]

1 VelY doest kill, even with a hit multiplier of 100000, for a kill i need a minimum of 1000 VelY coupled with hitM of 100000

idk wtfh is going on here, but it is irritating

also, VelX and VelY isnt explained in the doc at all if anything so its a bit confusing

and also i need to use GetPlayerStat in VelX and VelY for it to even work

makes more sense now tho but my problem with Vely is an issue :S

[Swompie]

You don't need GetPlayerStat..
Negative VelY: Bullets move up.
Positive VelY: Bullets move down.
The point (0|-5) would be over the point (0|5), it's just how MM coded it.
Hope that's what you wanted to know.
Also why don't you just use DoDamage() >_>'

[frosty]

Because Dodamage results in selfkill of target, like i said earlier, that is not what i wanted

thanks swompie for the explanation, explains a few things that have happened (somewhat randomly(ugh! silly me))

[Gizd]

Because Dodamage results in selfkill of target, like i said earlier, that is not what i wanted

DoDamageBy()

[frosty]

thanks Gizd , im guessing the syntax is DoDamageBy(Target,Owner) ?

also where did you get that function? it isnt on:
http://enesce.com/help/ or http://devs.soldat.pl/wiki/index.php?title=Server_Scripting

[squiddy]

thanks Gizd , im guessing the syntax is DoDamageBy(Target,Owner) ?

also where did you get that function? it isnt on:
http://enesce.com/help/ or http://devs.soldat.pl/wiki/index.php?title=Server_Scripting

I believe it's DoDamageBy(Victim, Shooter, Damage);

[frosty]

thanks squiddy

hmm ill have to stick with CreateBullet, DoDamageBy with 99 set as damage causes way worse lag than createbullet and actually continuosly causes the script to crash and the server to completely hang, hmm

From: July 02, 2010, 01:43:54 amedit: wtf is going on? if i remove the GetplayerStat from VelY in CreateBullet it doesnt kill!! wtf!!!!!!!!

[Gizd]

also where did you get that function? it isnt on:
http://enesce.com/help/ or http://devs.soldat.pl/wiki/index.php?title=Server_Scripting

NOTE: If you wish to be able to specify a player ID doing damage, use DoDamageBy:
 procedure DoDamageBy(ID,Shooter: Byte; Damage: Integer);

hmm ill have to stick with CreateBullet, DoDamageBy with 99 set as damage causes way worse lag than createbullet and actually continuosly causes the script to crash and the server to completely hang, hmm

Lies! Code please.

[frosty]

nevermind, got CreateBullet to work fine, dont need DoDamageBy

[Gizd]

nevermind, got CreateBullet to work fine, dont need DoDamageBy

If player is close to wall it might change.

[frosty]

ok if thats the case

this is in OnPlayerKill, all Vars have been declared, dont understand why this causes the server to hang when this weapon is used, this ONLY started hanging after i put in DoDamageBy (was using the commented out CreateBullet)

Code: (pascal) [Select]

if Weapon = 'Barrett M82A1' then begin
for i := 1 to 32 do
begin
x := GetPlayerStat(Victim,'x');
y := GetPlayerStat(Victim,'y');
x2 := GetPlayerStat(i,'x');
y2 := GetPlayerStat(i,'y');
if RayCast(x,y,x2,y2,Dist,400) then begin
if i <> Killer then begin   
if GetPlayerStat(i,'Alive') = true then begin
//WriteLn(IDtoName(i)+' is in range of Raycast');
//CreateBullet(GetPlayerStat(i,'x'), GetPlayerStat(i,'y') - 0, 0,-1000,100, 3, Killer);
                                                                     DoDamageBy(i, Killer, 99);
BioKills[Killer]:=BioKills[Killer]+1;
end;
end;
end;
end;
WriteConsole(Killer,'Bio-Kills: '+Inttostr(BioKills[Killer]),$EE81FAA1);
BioKills[Killer]:=BioKills[Killer]*0;
end;
this is the only part of the script that has the DoDamageBy

i dont get it, why the hell is it hanging the server? why is it the CreateBullet works fine with barely any lag yet DoDamageBy hangs the server? i dont get it :S also the script crashes 20 times in a row, then i get a crapload of access violations in Panel Log resulting in me needing to reset the server

If player is close to wall it might change.

has now, now that you mention it, i just found that out while in my server

edit: i dont get why the forum has indented DoDamageBy so far to the right....

[Swompie]

Can you show OnPlayerDamage? Before doing so check if it's making an Infinite damage loop.

[croat1gamer]

I would need the whole script to find the problem, because of Weapon and similar stuff.

Also, i cant remember that DoDamageBy exists, it isnt even in the scripting manual. :\
Did you try  DoDamage(i, Killer, 4000)

Also, what is the script supposed to do, or at least this fragment?
Kill the enemy if he is inside a 400 radius while the victim has barrett?
I think you would need to assign with AppOnIdle the weapon check to each player, something like this (youll need to adopt it to the overall script:

Code: (pascal) [Select]

procedure AppOnIdle(Ticks: integer);
var
i: integer;
Weapon: array[1..255] of array[1..32];
begin
for i:= 1 to 32 do Weapon[GetPlayerStat(i, 'Primary')][i];
end;
end;

//and then instead of
if Weapon = 'Barrett M82A1' then begin 
        for i := 1 to 32 do 
//place
for i: 1 to 32 do if Weapon[8][i] then begin 

// or something like that. again, i would need to see the whole script
Also, im not sure if i can assign the double array like that, but i always failed with x[y][z] := x[1][2] and similar, can someone recheck that part?