Author Topic: Spawner vADMIN  (Read 5228 times)

0 Members and 1 Guest are viewing this topic.

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Spawner vADMIN
« on: April 04, 2010, 10:03:28 am »
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.
« Last Edit: December 18, 2013, 10:09:16 am by dominikkk26 »

Offline Swompie

  • Camper
  • ***
  • Posts: 390
Re: Spawner vADMIN
« Reply #1 on: April 04, 2010, 10:45:47 am »
Remove all the constants and procedures you don't need.
Btw. your signature is way too big.
« Last Edit: April 04, 2010, 10:49:00 am by Swompie »

Offline Stuffy

  • Soldier
  • **
  • Posts: 182
  • Very stuffy.
    • Climb-Zone Forum
Re: Spawner vADMIN
« Reply #2 on: April 04, 2010, 10:58:18 am »
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;
The truth is out there? Does anyone know the URL?
The URL is here

Offline Zapper

  • Major(1)
  • Posts: 31
Re: Spawner vADMIN
« Reply #3 on: April 07, 2010, 08:39:39 am »
Quote
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!

Offline Swompie

  • Camper
  • ***
  • Posts: 390
Re: Spawner vADMIN
« Reply #4 on: April 07, 2010, 09:20:00 am »
Quote
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?

Offline Zapper

  • Major(1)
  • Posts: 31
Re: Spawner vADMIN
« Reply #5 on: April 07, 2010, 09:47:16 am »
Quote
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.

Offline Swompie

  • Camper
  • ***
  • Posts: 390
Re: Spawner vADMIN
« Reply #6 on: April 07, 2010, 09:53:36 am »
But what's wrong with his script? As long as it works..

Offline Zapper

  • Major(1)
  • Posts: 31
Re: Spawner vADMIN
« Reply #7 on: April 07, 2010, 10:10:59 am »
But what's wrong with his script? As long as it works..
omg sry, i feel like i rly ate drugs ;d.

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Re: Spawner vADMIN 1.5.1
« Reply #8 on: July 08, 2010, 12:42:17 pm »
New Version. ChangeLog UP!

Offline Swompie

  • Camper
  • ***
  • Posts: 390
Re: Spawner vADMIN 1.5.1
« Reply #9 on: July 08, 2010, 02:09:25 pm »
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.
« Last Edit: July 08, 2010, 02:12:16 pm by Swompie »

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Re: Spawner vADMIN 1.5.2
« Reply #10 on: July 10, 2010, 05:57:59 am »
New version 1.5.2
Changelog UP.

Offline mich1103

  • Flagrunner
  • ****
  • Posts: 557
  • Did you say chocolate ? O.o
    • ZoMbIe-DeStRoYeR pk server
Re: Spawner vADMIN 1.5.2
« Reply #11 on: July 10, 2010, 08:25:20 am »
I use your script to test the weapon mod of my server more easier !  :D

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Re: Spawner vADMIN 1.5.2
« Reply #12 on: July 10, 2010, 10:18:44 am »
Very very happy!

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Re: Spawner vADMIN 1.5.2
« Reply #13 on: September 02, 2010, 01:43:43 pm »
Soon a new version!  ;D

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Re: Spawner vADMIN 1.5.4
« Reply #14 on: December 26, 2010, 09:08:05 am »
The new version has appeared: Version 1.5.4
Improved the changelog.

Offline tk

  • Soldier
  • **
  • Posts: 235
Re: Spawner vADMIN 1.5.4
« Reply #15 on: December 26, 2010, 09:37:49 am »
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;


Offline dnmr

  • Camper
  • ***
  • Posts: 315
  • emotionally handicapped
Re: Spawner vADMIN 1.5.4
« Reply #16 on: December 26, 2010, 09:11:05 pm »
Quote
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!

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Re: Spawner vADMIN 1.5.4
« Reply #17 on: March 30, 2011, 10:53:34 am »
Update: version 1.5.5
All changes in the changelog they write.

Offline dominikkk26

  • Camper
  • ***
  • Posts: 404
    • PMGsite
Re: Spawner vADMIN 1.5.5
« Reply #18 on: June 15, 2013, 04:16:54 pm »
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.