PlayerDir();

[ghg]

Script Name: PlayerDir();
Script Description:
A incredibly simple function to return the player direction as an integer to allow for movement calculations etc.
Inspired by: http://forums.soldat.pl/index.php?topic=24320.0
It isn't anything diffult to code or essential but it was the first working function I've made so far.
Original Author(s): ghg/Gradius, inspired by Avarax (obviously I don't give a damn what you do with it due to it's simplicity)
Core Version: 263
Code:

Code: [Select]

function PlayerDir(ID: Byte): integer;
begin
 if(GetPlayerStat(ID,'Direction')='>') then begin
  Result := 1;
 end else begin
  Result := -1;
 end;
end;

[xmRipper]

Simple script.

[Boblekonvolutt]

Good things come in small packages.

Oh yeah, you don't really have to have begin/end for that, you could do

Code: [Select]

function PlayerDir(ID: Byte): Integer;
begin
  if GetPlayerStat(ID, 'Direction') = '>' then
    Result := 1
  else
    Result := -1;
end;

[EnEsCe]

Thats just logic, not really worth posting unless you think scripters were born with brain damage

[chutem]

^^ damn you're harsh...

[ghg]

It's true. I'm not really bothered either way.

[Boblekonvolutt]

So it's settled then, you think all scripters were born with brain damage?

But really, there's should be a sticky or something where people could post short stuff like this.

[danmer]

So it's settled then, you think all scripters were born with brain damage?

But really, there's should be a sticky or something where people could post short stuff like this.

the problem is that people who need this will come up with it in seconds. And people who can't come up with it either don't need it, or won't be able to use it properly anyway

[Boblekonvolutt]

And then there are people who just haven't thought of it...