Major Kicker

[DorkeyDear]

Script Name: Major Kicker
Script Description: When a player with a name set-up like a Major would (Major, Major (1), Major (2), etc.), he / she is automatically kicked. Note that the reason for including Major (1) and Major (2), etc. is because that Major may be an admin, and unkickable.
Original Author: Curt
Core Version: 2.6.2
Code:

Code: [Select]

const
  Color = $FFFFFFFF;

procedure OnJoinTeam(ID, Team: byte);
begin
  if (GetPlayerStat(ID,'Name') = 'Major') or (MaskCheck(GetPlayerStat(ID,'Name'), 'Major(?)')) or (MaskCheck(GetPlayerStat(ID,'Name'), 'Major(??)')) then begin
    WriteConsole(ID,'Please use a unique name.',Color);
    KickPlayer(ID);
  end;
end;_{In request from Ride.}

[mikembm]

The array and for loop are  completely unneeded... Just kick them why they join...

EDIT: Fixed it plus added a message for the player

Code: [Select]

procedure OnJoinTeam(ID, Team: byte);
begin
if (GetPlayerStat(ID,'Name') = 'Major') or (MaskCheck(GetPlayerStat(ID,'Name'), 'Major(?)')) or (MaskCheck(GetPlayerStat(ID,'Name'), 'Major(??)')) then begin
WriteConsole(ID,'Please use a unique name',$FF0000);
KickPlayer(ID);
end;
end;


[DorkeyDear]

I thought to only do it when the player joins the game, not team.. sense kicking doesn't work on joingame, yeah... uhh, urs = less work for server
---
EDIT: edited to be "more efficient"

[Ride]

Thanks DorkeyDear you rule

[mikembm]

Thanks DorkeyDear you rule

Yeah! Good job DorkeyDear!!!  lmao

[Ride]

and teh eagleeye is kool too

[DorkeyDear]

I would think that OnJoinTeam is called also right after OnJoinGame, so you would still be unable to kick then, but apparently you can, which is my reasoning / excuse for using my little thing OnJoinGame and having a variable and AppOnIdle and stuff.

[Geistlort]

thanks DorkeyDear
you rlz.

[ghg]

If Major was an admin I'm sure he'd be intelligent enough to not put an auto-kick script on his server.

[-Major-]

oh what a good script now we can slowly kill soldat and block any new player from soldat! good job keep supporting soldat this way! *ironic*

let the Majors play in the public servers.

[n0b-]

What are you supposed to do on the server if you don't know how to change your nickname?

[DorkeyDear]

Remember that this script was only from a request from Ride, which I would not use on my servers if I were hosting servers myself. I just post pretty much anything I make here.
You can change the message in "WriteConsole(ID,'Please use a unique name.',Color);" to something like 'To change your nickname... ... ...' that way when the player sees the message next time he joins some server, or sees the message, he will known

[Ride]

Yea blame me dont flame dorkey Im teh evil one who want to kick teh Majors 

[-Major-]

that flame was not directed to anybody but the supporter to this script.

[EnEsCe]

I have been blocking Major's from my servers for at least 2 years, it doesn't slowly kill Soldat at all. It simply keeps out the dumbshits.

[Leo]

I have been blocking Major's from my servers for at least 2 years, it doesn't slowly kill Soldat at all. It simply keeps out the dumb****s.

Agree, Majors are also banned from my servers from day one. Why ? Because I don't like to see Major(1), Major(2), Major(3) etc... it looks really stupid. And who the hell wants to play with default name in ANY game anyway   

[Anal]

Ah , I first make server and i dunno where i must paste this about script Major Kicker[quote
Core Version: 2.6.2
Code:

Code: [Select]

const
  Color = $FFFFFFFF;
procedure OnJoinTeam(ID, Team: byte);
begin
  if (GetPlayerStat(ID,'Name') = 'Major') or (MaskCheck(GetPlayerStat(ID,'Name'), 'Major(?)')) or (MaskCheck(GetPlayerStat(ID,'Name'), 'Major(??)')) then begin
    WriteConsole(ID,'Please use a unique name.',Color);
    KickPlayer(ID);
  end;
end;_{In request from Ride.}

Where

[Toumaz]

Create a directory in Soldatserver\scripts, and name it whatever you like. Put that text in a .pas file, and save it in that directory.
Then create another file called includes.txt, in which you type the name of the .pas file.