Spawner vADMIN

[dominikkk26]

Script Name: Spawner vADMIN
Author: dominikk26
Script Version: 1.5.6
Compile Test: Passed
Core Version: 2.7.6
Full Description:
The script works only for admins!
This script allows you to give yourself bonuses, weapons, heal, take another weapon to change to other weapons. More information in the changelog after downloading.

DOWNLOAD NEW VERSION Spawner vADMIN 1.5.6:
-Repair minor bugs
-Now works on 2.7.3 and 2.7.6
To download, click on this text. or download the annexes.

[Swompie]

Remove all the constants and procedures you don't need.
Btw. your signature is way too big.

[Stuffy]

Try this, less code but same effect.

Code: [Select]

function OnCommand(ID: Byte; Text: string): boolean;

begin

if LowerCase(GetPiece(Text,' ',0)) = '/spawn' then
SpawnObject(GetPlayerStat(ID,'x'),GetPlayerStat(ID,'y'),StrToInt(GetPiece(Text,' ',1)));

end;

[Zapper]

function OnCommand(ID: Byte; Text: string): boolean;

Parameter Info:
ID (Byte): ID of the player who sent the command. (255 = Server)
Text (String): Command which has been sent.

Description:
This procedure will be called every time an ingame Admin or TCP Admin send a / command.
You may add your own commands here.

Examples:
begin
    if Text = '/test' then begin
       WriteLn('Test successful!');
    end;
    Result := false; // Return true if you want to ignore the command typed.
end;

RTFM!

[Swompie]

function OnCommand(ID: Byte; Text: string): boolean;

Parameter Info:
ID (Byte): ID of the player who sent the command. (255 = Server)
Text (String): Command which has been sent.

Description:
This procedure will be called every time an ingame Admin or TCP Admin send a / command.
You may add your own commands here.

Examples:
begin
    if Text = '/test' then begin
       WriteLn('Test successful!');
    end;
    Result := false; // Return true if you want to ignore the command typed.
end;

RTFM!

Did you eat drugs?

[Zapper]

function OnCommand(ID: Byte; Text: string): boolean;

Parameter Info:
ID (Byte): ID of the player who sent the command. (255 = Server)
Text (String): Command which has been sent.

Description:
This procedure will be called every time an ingame Admin or TCP Admin send a / command.
You may add your own commands here.

Examples:
begin
    if Text = '/test' then begin
       WriteLn('Test successful!');
    end;
    Result := false; // Return true if you want to ignore the command typed.
end;

RTFM!

Did you eat drugs?

nope
RTFM = Read The Fecking manual.

[Swompie]

But what's wrong with his script? As long as it works..

[Zapper]

But what's wrong with his script? As long as it works..

omg sry, i feel like i rly ate drugs ;d.

[dominikkk26]

New Version. ChangeLog UP!

[Swompie]

That's all you need and also the most efficient way:

Code: [Select]

RegExpMatch('^/(steyr|aug)$', lowercase(Text))
Remove this unnecessary message aswell all the constants and unused procedures.

Code: [Select]

WriteConsole(ID,'A command has been entered',$EEFF0000);No one will ever miss it.

[dominikkk26]

New version 1.5.2
Changelog UP.

[mich1103]

I use your script to test the weapon mod of my server more easier ! 

[dominikkk26]

Very very happy!

[dominikkk26]

Soon a new version! 

[dominikkk26]

The new version has appeared: Version 1.5.4
Improved the changelog.

[tk]

Yea, maybe improved the changelog, but nothing else.

Try this, less code but same effect.

Code: [Select]

function OnCommand(ID: Byte; Text: string): boolean;
begin
if LowerCase(GetPiece(Text,' ',0)) = '/spawn' then
SpawnObject(GetPlayerStat(ID,'x'),GetPlayerStat(ID,'y'),StrToInt(GetPiece(Text,' ',1)));
end;

[dnmr]

regExpMatch('^/(flame god|Flame god|Flame God|Flamegod|FlameGod|flame|Flame|flamegodmode|Flamegodmode|FlameGodMode|flame god mode|Flame god mode|Flame God mode|Flame God Mode|bon3|Bon3|bon 3|Bon 3|bon-3|Bon-3)$',lowercase(Text))

because fuck you, common sense!

[dominikkk26]

Update: version 1.5.5
All changes in the changelog they write.

[dominikkk26]

DOWNLOAD NEW VERSION Spawner vADMIN 1.5.6:
-Repair minor bugs
-Now works on 2.7.3
To download, click on this text. or download the annexes.