
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.

1
Snippet Showroom / Random Numbers
« on September 28th, 2015, 04:18 PM »
Hello I just make a Snippet It is Easy But it will be liked by Newbies Because they don't know much about random
First Put this on ScriptLoad
Code: [Select]
Now Some Functions
Code: [Select]
Commands
Code: [Select]
Creator:FinchDon
Helper: Beztone Help in FriendlyFire
Here you go..
First Put this on ScriptLoad
tf <- [ "true", "false"];
password <- [ "mypass", "pass", "~", "password", "server", "editor", "@"];
weather <- [ 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15 ];
servername <- [ "VCCNR", "HP", "FBK's", "VU", "DM", "FF"];
maxplayers <- [ 1, 5, 10, 15, 20, 25, 30, 35, 40, 45, 50, 55, 60, 67, 77, 70, 100, 90, 80 ];
timerate <- [ 1000, 2000, 5000, 10000, 0, 1, 100000, 50000];
gm <- [ "v1.0", "VCCNR v1.2", "LW C++++ 1.2", "DM v2.0"];
Now Some Functions
function GetLevel( player )
{
local lvl1 = GetSQLColumnData( QuerySQL( sqliteDB, "SELECT Level FROM Accounts WHERE Name='" + player.Name+"'" ), 0 );
if ( lvl1 ) return lvl1;
else return 0;
}
Commands
if ( cmd == "commands")
{
PrivMessage( player, "Admin Commands");
PrivMessage( player, "timerate, friendlyfire, stuntbike, maxplayers, servername, setweather, stuntbike, serverpass, gamemode" );
}
else if (cmd == "timerate")
{
if ( GetLevel( player ) < 2 ) PrivMessage( player, "No!");
else
{
SetTimeRate(timerate[rand()% timerate.len()]);
Message( " " + player.Name + " set Time Rate : " + timerate[rand()% timerate.len()] + ".");
}
}
if ( cmd == "friendlyfire")
{
local ff = rand() % 2;
if ( GetLevel( player ) < 2 ) PrivMessage(player,"No!")
else if ( ff == 1 )
{
SetFriendlyFire(true)
Message(player.Name+" has set friendly fire true!");
}
else if ( ff == 2 )
{
SetFriendlyFire(false)
Message(player.Name+" has set friendly fire false!");
}
}
if ( cmd == "stuntbike")
{
local ff = rand() % 2;
if ( GetLevel( player ) < 2 ) PrivMessage(player,"No!")
else if ( ff == 1 )
{
SetStuntBike(true)
Message(player.Name+" has set Stunt Bike true!");
}
else if ( ff == 2 )
{
SetStuntBike(false)
Message(player.Name+" has set Stunt Bike false!");
}
}
else if (cmd == "setweather")
{
if ( GetLevel( player ) < 2 ) PrivMessage( player, "No!");
else
{
SetWeather(weather[rand()% weather.len()]);
Message( " " + player.Name + " set Weather : " + weather[rand()% weather.len()] + ".");
}
}
else if (cmd == "maxplayers")
{
if ( GetLevel( player ) < 2 ) PrivMessage( player, "No!");
else
{
SetMaxPlayers(maxplayers[rand()% maxplayers.len()]);
Message( " " + player.Name + " set Max Players : " + maxplayers[rand()% maxplayers.len()] + ".");
}
}
else if (cmd == "serverpass")
{
if ( GetLevel( player ) < 2 ) PrivMessage( player, "No!");
else
{
SetPassword(password[rand()% password.len()]);
Message( " " + player.Name + " set Server Pass : " + password[rand()% password.len()] + ".");
}
}
else if (cmd == "servername")
{
if ( GetLevel( player ) < 2 ) PrivMessage( player, "No!");
else
{
SetServerName(servername[rand()% servername.len()]);
Message( " " + player.Name + " set Server Name : " + servername[rand()% servername.len()] + ".");
}
}
else if (cmd == "gamemode")
{
if ( GetLevel( player ) < 2 ) PrivMessage( player, "No!");
else
{
SetGameModeName(gm[rand()% gm.len()]);
Message( " " + player.Name + " set Server Game Mode: " + gm[rand()% gm.len()] + ".");
}
}
Creator:FinchDon
Helper: Beztone Help in FriendlyFire
Here you go..
2
Scripting and Server Management / SetFriendlyFire
« on September 28th, 2015, 11:19 AM »
Why its not working?
Code: [Select]
Command
Code: [Select]
friendlyfire <- [ "true", "false"];
Command
if ( cmd == "friendlyfire")
{
local ff = friendlyfire[rand()% friendlyfire.len()]
if ( GetLevel( player ) < 2 ) PrivMessage( player, "No!");
else
{
Error here >>>>> SetFriendlyFire(ff);
Message( " " + player.Name + " set Friendly Fire " + ff + ".");
}
}
3
Scripting and Server Management / Error GetTeam
« on September 27th, 2015, 12:02 PM »
I add this onScriptLoad
random <- [ 1, 2, 3, 4 ];
and add this on Player Register
local team = random[rand()% random.len()]
::QuerySQL( dbGlobal, "INSERT INTO Accounts VALUES( '" + team + "' )" );
and this is Command
Code: [Select]
Releated Functions
Code: [Select]
Now When i Registered and check in database it show Group Random sometime 1 or 2 or 3 But when i do /myteam it show nothing i add this on Command
if ( GetTeam( player ) == 0 ) PrivMessage( player, "xD" );
then it show that message but in database it was team 2
random <- [ 1, 2, 3, 4 ];
and add this on Player Register
local team = random[rand()% random.len()]
::QuerySQL( dbGlobal, "INSERT INTO Accounts VALUES( '" + team + "' )" );
and this is Command
if ( cmd == "myteam")
{
if ( GetTeam( player ) == 1 ) MessagePlayer( "[#FF0000]MaaKi", player );
if ( GetTeam( player ) == 2 ) MessagePlayer( "[#66FF33]Fabular", player );
if ( GetTeam( player ) == 3 ) MessagePlayer( "[#6666FF]Cmon Master", player );
if ( GetTeam( player ) == 4 ) MessagePlayer( "[#FFFF00]You are noob", player );
}
Releated Functions
function SetTeam( player, amount )
{
QuerySQL(sqliteDB, "UPDATE Accounts SET Group='" + amount + "' WHERE Name='" + player.Name + "'");
}
function GetTeam( player )
{
local lvl1 = GetSQLColumnData( QuerySQL( sqliteDB, "SELECT Group FROM Accounts WHERE Name='" + player.Name+"'" ), 0 );
if ( lvl1 ) return lvl1;
else return 0;
}
Now When i Registered and check in database it show Group Random sometime 1 or 2 or 3 But when i do /myteam it show nothing i add this on Command
if ( GetTeam( player ) == 0 ) PrivMessage( player, "xD" );
then it show that message but in database it was team 2
4
Script Showroom / Fast and Furious Script v1.2
« on September 24th, 2015, 05:11 AM »
Hello Guys I made a script 2 or 3 months ago I don't use it so i want to share it with you all
I script with bad way but it works 100%
It has Four Worlds
FreeRoam, Race, Derby, DM
Commands its Carry
Code: [Select]
There are some Admin Commands
Code: [Select]
Scripter:FinchDon
Credits: Seby For Custom Menu , Fuzzie For Account System
Link:
Needed Functions : You need to Download IPTOCountry.db
IPtoCountry Link: http://www.mediafire.com/download/3a1jh542rrphi51/IpToCountry.rar
If you find any error Feel Free to ask here
Enjoy :)
I script with bad way but it works 100%
It has Four Worlds
FreeRoam, Race, Derby, DM
Commands its Carry
DM Commands
"(!)team, !buyhp, !Buyarm, !donate, !benefits, !accept, !cash, (/)logout, !credits, !hp, !stats"
"(!)deny, !leaveteam, !aspawn, !buywep, !wep"
"(!)heal, !levelup, !changeskin, !cd, bring, !spree, !myspree"
"(!)giveheal, !visible, !goto, !invisible, !distance"
Derby Commands
"(!)heal, cash, !donate, !benefits, credits, stats, (/)derby, (/)joinderby"
"(!)visible, invisible, distance, (/)logout"
Race Commands
"(!)heal, cash, credits, !donate, !benefits, stats, /race, /joinrace"
"(/)leaverace, !visible, !invisible, !distance, /logout"
FreeRoam Commands
"(!)heal, cash, credits, givecash, withdraw, deposit"
"(!)visible, invisible, !donate, !benefits, distance, admins, (/)logout"
"(!)buycar, sharecar, sellcar, getcar, mycars, delsharecar, sharedcars"
There are some Admin Commands
"unban, ban, kick, exec, mute, unmute"
"ip, donator, warn, unwarn, addadmin"
"removeadmin, setmon, setlevel, setkills, setdeaths"
Scripter:FinchDon
Credits: Seby For Custom Menu , Fuzzie For Account System
Link:
Needed Functions : You need to Download IPTOCountry.db
IPtoCountry Link: http://www.mediafire.com/download/3a1jh542rrphi51/IpToCountry.rar
If you find any error Feel Free to ask here
Enjoy :)
5
Snippet Showroom / Custom Vehicles
« on September 21st, 2015, 12:41 PM »
Hello Everyone i saw many peoples ask me how to Add Custom Vehicle so i am here with complete Instruction
I want to share some Custom Vehicles
Mustang
Galardo
These car's are not created by Me
Credits:FinchDon
Car Creator:IDK
What You need to do?
just add this onPlayerCommand
Code: [Select]


You need to put these files in
serverroot/store/vehicles/here
In the Name of vehicles rar v6461 is ID it is from 6400 to 6499 u can change them but also cmd
t0 mean this is car t1 is bike
p2 is passenger means 2 passenger can sit in car maximum is 4
Topic Updated
I want to share some Custom Vehicles
Mustang
Galardo
These car's are not created by Me
Credits:FinchDon
Car Creator:IDK
What You need to do?
just add this onPlayerCommand
if ( cmd == "galardo" )
{
CreateVehicle( 6461, 0, Vector( player.Pos.x, player.Pos.y+3, player.Pos.z ),player.Angle, 1, 1 );
MessagePlayer( "Wow Galardo in VCMP Omg", player );
}
else if ( cmd == "mustang" )
{
CreateVehicle( 6455, 0, Vector( player.Pos.x, player.Pos.y+3, player.Pos.z ),player.Angle, 0, 0 );
MessagePlayer( "Wow Mustang in VCMP Omg", player );
}
You need to put these files in
serverroot/store/vehicles/here
In the Name of vehicles rar v6461 is ID it is from 6400 to 6499 u can change them but also cmd
t0 mean this is car t1 is bike
p2 is passenger means 2 passenger can sit in car maximum is 4
Topic Updated
6
Scripting and Server Management / VIP
« on September 19th, 2015, 12:13 PM »
I made this function
Code: [Select]
And This Command
Code: [Select]
when i type !buyvip i have everything coins and get logged in it show last PRIVMESSAGE and when i go to database it show True
but when i type !vip
It Show no VIP Online
Code: [Select]
and also use this
Code: [Select]
But when i spawn It is True in db VIP but It Didn't kill me Why?
Code: [Select]
function SetVIP( player, amount )
{
QuerySQL(sqliteDB, "UPDATE Accounts SET VIP='" + amount + "' WHERE Name='" + player.Name + "'");
}
function GetVIP( player )
{
local lvl1 = GetSQLColumnData( QuerySQL( sqliteDB, "SELECT VIP FROM Accounts WHERE Name='" + player.Name+"'" ), 0 );
if ( lvl1 ) return lvl1;
else return 0;
}
And This Command
if ( cmd == "buyvip")
{
if ( pstats[ player.ID ].Logged == false ) PrivMessage( player, "You are not logged in");
else if ( GetCoins( player ) <= 1000 ) PrivMessage( player, "You need to have atleast 1000 BFME Coints for VIP");
else
{
QuerySQL(sqliteDB, "UPDATE Accounts SET VIP= 'true' WHERE Name='" + player.Name + "'");
SetCoins( player, GetCoins( player ) - 1000 );
PrivMessage( player, "Congratulation You Become New VIP");
Message( " " + player.Name + "has become New VIP of a Server");
}
}
when i type !buyvip i have everything coins and get logged in it show last PRIVMESSAGE and when i go to database it show True
but when i type !vip
It Show no VIP Online
else if ( ( cmd == "vip" ) || ( cmd == "vip" ) )
{
local plr, b;
for( local i = 0; i < GetMaxPlayers(); i++ )
{
plr = FindPlayer( i );
if ( ( plr ) && ( GetVIP( plr ) == true ) )
{
if ( b ) b = b + ", " + plr.Name + " "
else b = plr.Name + " "
}
}
if ( b ) Message( "**In Game[ VIP Online: [ " + b + " ] ]" );
else Message( "** In Game [ No VIP Online ]." );
}
and also use this
function onPlayerSpawn( player )
{
if ( GetVIP( player ) == true ) player.Health = 0;
}
But when i spawn It is True in db VIP but It Didn't kill me Why?
7
General Discussion / Suggestion
« on September 19th, 2015, 11:17 AM »
Which Tool is best to open Database?
8
General Discussion / [Request] Dislike
« on September 19th, 2015, 10:05 AM »
Hello I want you guys to add Dislike Button on forum it will be cool if you dont like post Dislike it
9
Scripting and Server Management / Error
« on September 18th, 2015, 11:34 AM »
I make this function to save BFME Coins
Code: [Select]
and add this on PlayerPart
SaveStats( player );
when i do /q
it show error on this line
index Update does not exist
pstats[ player.ID ].Update( player, sqliteDB );
when i remove SaveStats( player ); and do /q no error appear
there is pstats[ player.ID ].Update( player, sqliteDB ); FUnction
Code: [Select]
function SaveStats( player )
{
try{
local id = player.ID;
if ( pstats[ id ].Logged == true )
{
QuerySQL( sqliteDB, "UPDATE Accounts SET Coins='" + pstats[ id ].BFME + "' WHERE Name='" + player.Name.tolower() + "'" );
print( "Saved Stats of Player " + player.Name + "[" + player.ID + "]" );
pstats[ id ] = null;
}
}
catch(e) print( "Save Stats Error: " + e );
}
and add this on PlayerPart
SaveStats( player );
when i do /q
it show error on this line
index Update does not exist
pstats[ player.ID ].Update( player, sqliteDB );
when i remove SaveStats( player ); and do /q no error appear
there is pstats[ player.ID ].Update( player, sqliteDB ); FUnction
function Update( player, dbGlobal ){
::QuerySQL( dbGlobal, "UPDATE Accounts SET Cash=" + Cash + ", Bank=" + Bank + ", Kills=" + Kills + ", Deaths=" + Deaths + ", Level=" + Level + ", LastUsedIP='" + LastUsedIP + "' WHERE Name='" + player.Name + "' AND NameLower='" + player.Name.tolower() + "'" );
}
10
Scripting and Server Management / Array
« on September 17th, 2015, 04:34 PM »
Hello I have added this onScriptLoad
hello <- false;
and make this cmd
Code: [Select]
Now when i do /hell it show you become and then i type !hell it show name FinchDon but when i restart server and i join type !hell it show no hell online How i can store data for permanent?
hello <- false;
and make this cmd
else if ( ( cmd == "hello" ) || ( cmd == "hello" ) )
{
local plr, b;
for( local i = 0; i < GetMaxPlayers(); i++ )
{
plr = FindPlayer( i );
if ( ( plr ) && ( hello ) )
{
if ( b ) b = b + ", " + plr.Name + " (" + hello + ")"
else b = plr.Name + " (" + hello + ")"
}
}
if ( b ) Message( "**In Game[ Hell Online: [ " + b + " ] ]" );
else Message( "** In Game [ No HEll Online ]." );
}
if ( cmd == "hell")
{
if ( pstats[ player.ID ].Logged == false ) PrivMessage( player, "You are not logged in");
else
{
hello = true;
PrivMessage( player, "Congratulation You Become New Hell Gate");
}
}
Now when i do /hell it show you become and then i type !hell it show name FinchDon but when i restart server and i join type !hell it show no hell online How i can store data for permanent?
11
Scripting and Server Management / Sprite
« on September 14th, 2015, 04:35 PM »
Hello i make a sprite of player health body The file is in .png I add this on PlayerMove
if ( player.Health < 100 || player.Health == 100 )
{
b.ShowForPlayer( player );
}
and This on ScriptLoad
b <- CreateSprite("80%.png", 900, 160, 0, 0, 0, 255);
but when i go n server spawn or set my hp no sprite appear what is problem ???
if ( player.Health < 100 || player.Health == 100 )
{
b.ShowForPlayer( player );
}
and This on ScriptLoad
b <- CreateSprite("80%.png", 900, 160, 0, 0, 0, 255);
but when i go n server spawn or set my hp no sprite appear what is problem ???
12
Scripting and Server Management / Can it be possible
« on September 13th, 2015, 04:47 PM »
Hello friends i was playing Unreal Tournament 1999 I saw their if you kill two players at a Time Distance of 2 seconds then it show Double Kill if another kill in 2 seconds it show MultiKill then Ultra. Can it be Possible ? in VCMP
13
Scripting and Server Management / Player.Seat
« on September 13th, 2015, 08:13 AM »
What This function used for? player.Seat I got Example from old Wiki
Code: [Select]
Code: [Select]
function onPlayerCommand( player, cmd, text ) { if ( cmd == "passenger" ) { if ( player.Seat != 255 ) MessagePlayer( "You are curently on seat number " + player.Seat, player ); else MessagePlayer( "You are not in a vehicle.", player ); } }
14
Scripting and Server Management / Top Spree
« on September 6th, 2015, 07:49 AM »
I am trying to make topspree but failed i made a Table at sqliteDB
Spree and his Columns Name and Spree there is function
Code: [Select]
onPlayerKill
Code: [Select]
when someone kill i check out at sqliteDB there is everyone name but spree 0 when i do /topclans
its show all name nulls kills nulls
Code: [Select]
Spree and his Columns Name and Spree there is function
function SetSpree( player, amount )
{
QuerySQL(sqliteDB, "UPDATE Spree SET Spree='" + amount + "' WHERE Name='" + player.Name + "'");
}
function GetSpree( player )
{
local lvl11 = GetSQLColumnData( QuerySQL( sqliteDB, "SELECT Spree FROM Spree WHERE Name='" + player.Name+"'" ), 0 );
if ( lvl11 ) return lvl11;
else return 0;
}
onPlayerKill
SetSpree(killer,GetSpree(killer)+1);
when someone kill i check out at sqliteDB there is everyone name but spree 0 when i do /topclans
its show all name nulls kills nulls
function topspree()
{local query = "SELECT Name,Spree FROM Spree ORDER BY Spree DESC LIMIT 5", //Top 5
q, name1, name2, name3, name4, name5, spree1, spree2, spree3, spree4, spree5, i = 1;
q = QuerySQL( sqliteDB, query );
while( GetSQLColumnData( q, 0 ) )
{switch(i)
{case 1:
name1 = GetSQLColumnData( q, 0 );
spree1 = GetSQLColumnData( q, 1 );
break;
case 2:
name2 = GetSQLColumnData( q, 0 );
spree2 = GetSQLColumnData( q, 1 );
break;
case 3:
name3 = GetSQLColumnData( q, 0 );
spree3 = GetSQLColumnData( q, 1 );
break;
case 4:
name4 = GetSQLColumnData( q, 0 );
spree4 = GetSQLColumnData( q, 1 );
break;
case 5:
name5 = GetSQLColumnData( q, 0 );
spree5 = GetSQLColumnData( q, 1 );
break;
}
GetSQLNextRow( q );
i++;}
FreeSQLQuery(q);
Message(MSG+" ** >> TOP 5 Highest Spree << **" );
Message(RED+"** >> First >> "+PINK+"Name:[ "+name1+" ] Kills:[ "+spree1+" ].");
Message(BLUE+"** >> Second >> "+WHITE+"Name:[ "+name2+" ] Kills:[ "+spree2+" ].");
Message(GREEN+"** >> Third >> "+BROWN+"Name:[ "+name3+" ] Kills:[ "+spree3+" ].");
Message(YELLOW+"** >> Forth >> "+PURPLE+"Name:[ "+name4+" ] Kills:[ "+spree4+" ].");
Message(ORANGE+"** >> Fifth >> "+BLUE+"Name:[ "+name5+" ] Kills:[ "+spree5+" ].");
}
15
Snippet Showroom / UpdateText & Spree & Rank System
« on September 6th, 2015, 07:22 AM »
Hello i add this feature in my server since 1 week ago and i wanna share with you guys
This Text Show
Kills Deaths Spree Rank
First of all
Code: [Select] Code: [Select] Code: [Select]
Functions
Code: [Select]
Criminal Rank
Code: [Select]
Spree System
Code: [Select]
Commands
Code: [Select]
Classes
Code: [Select]
Required Functions
Code: [Select]
Note: This Text system is created by Me and Spree System has been taken from old forum
Good Luck
Updated
This Text Show
Kills Deaths Spree Rank
First of all
function onPlayerDeath( player, reason )
{
if (GetPlayerSpree(player) >= 1) DecPlayerSpree(player,GetPlayerSpree(player)); // spree system
UpdateText(player);
}
function onPlayerKill( killer, player, weapon, bodypart )
{
IncPlayerSpree(killer, 1); //spree system
StartKillingSpree(killer);
EndKillingSpree(player,killer);
if (GetPlayerSpree(player) >= 1) DecPlayerSpree(player,GetPlayerSpree(player));
UpdateText(killer);
UpdateText(player);
}
Functions
function UpdateTextAll()
{
for (local i=0; i<GetMaxPlayers(); i++)
{
local p=FindPlayer(i);
if(p)
{
UpdateText(p);
}
}
}
function UpdateText(player)
{
local id = player.ID;
local kills = pstats[ player.ID ].Kills; // if you have different you can change
local killeds = pstats[ player.ID ].Deaths; // if you have different you can change
local Rank = GetCriminalRank( player );
local spree = GetPlayerSpree( player );
Announce("~t~Kills:~b~["+kills+" ] ~y~Deaths:~x~["+killeds+" ] ~b~Rank:~b~["+Rank+" ] ~y~Spree:~t~["+spree+" ]",player,1);
}
Criminal Rank
function GetCriminalRank( player )
{
local kill=pstats[ player.ID ].Kills,a;
if(kill<=100)
{
a="Begginer";
return a;
}
else if(kill<=200)
{
a="Adventurer";
return a;
}
else if(kill<=300)
{
a="Dangerous";
return a;
}
else if(kill<=350)
{
a="Fighter";
return a;
}
else if(kill<=400)
{
a="Middle One";
return a;
}
else if(kill<460)
{
a="Legolas";
return a;
}
else if(kill<=560)
{
a="Hustler";
return a;
}
else if(kill<=650)
{
a="Bully";
return a;
}
else if(kill<=1000)
{
a="Outlaw";
return a;
}
else if(kill<=1400)
{
a="Assassin";
return a;
}
else if(kill<=1900)
{
a="Murderous";
return a;
}
else if(kill<=2500)
{
a="Psychotic";
return a;
}
else if(kill<=3550)
{
a="Boss";
return a;
}
else if(kill<=5000)
{
a="Don";
return a;
}
else if(kill<=10000)
{
a="Godfather";
return a;
}
return 0;
}
Spree System
function GetPlayerSpree(player)
{
return pstats[player.ID].KillingSpree;
}
function SetPlayerSpree(player)
{
pstats[player.ID].KillingSpree = 0;
}
function IncPlayerSpree(player,amount)
{
pstats[player.ID].KillingSpree = GetPlayerSpree(player) + amount;
}
function DecPlayerSpree(player,amount)
{
pstats[player.ID].KillingSpree = GetPlayerSpree(player) - amount;
}
//==============================================================================
function SetSpree( player, amount )
{
QuerySQL(sqliteDB, "UPDATE Spree SET Spree='" + amount + "' WHERE Name='" + player.Name + "'");
}
function GetSpree( player )
{
local lvl11 = GetSQLColumnData( QuerySQL( sqliteDB, "SELECT Spree FROM Spree WHERE Name='" + player.Name+"'" ), 0 );
if ( lvl11 ) return lvl11;
else return 0;
}
function StartKillingSpree( player )
{
if ( GetPlayerSpree( player ) >= 5 )
{
local kills = GetPlayerSpree(player);
if ( kills == 5 ) Message( player + " is on a Killing Spree with " + kills + " kills in a row! $" + reward + " " );
else if ( kills == 10 ) Message( player + " is Dangerous! Killing Spree with " + kills + " kills in a row! $" + reward + "" );
else if ( kills == 15 ) Message( player + " is Murderous!! Deadly Killing Spree with " + kills + " kills in a row! $" + reward + " " );
else if ( kills == 20 ) Message( player + " is Psychotic!!! Insane Killing Spree with " + kills + " kills in a row! $" + reward + " " );
else if ( kills == 25 ) Message( player + " is an Assassin!!!! Professional Killing Spree with " + kills + " kills in a row! $" + reward + "" );
else if ( ( kills >= 30 ) && ( kills % 5 == 0 ) ) Message( player + " is UNSTOPPABLE!!!! Untouchable Killing Spree with " + kills + " kills in a row! $" + reward + "" );
local reward = GetPlayerSpree(player) * 500;
MessagePlayer("Spree reward: $" + reward + " ", player );
IncCash( player, reward.tointeger() );
}
}
//==============================================================================
function EndKillingSpree( p1, p2 )
{
if ( GetPlayerSpree( p1 ) >= 5 )
{
if ( p2 == 255 )
{
Message(" " + p1.Name + " has ended their own killing spree.");
DecPlayerSpree(p1, GetPlayerSpree(p1));
}
else if ( p2 != 255 )
{
Message( p2.Name + " ended " + p1.Name + "'s Killing Spree of " + GetPlayerSpree(p1) + " kills in a row.");
DecPlayerSpree(p1, GetPlayerSpree(p1));
}
}
}
Commands
else if ( cmd == "spree" )
{
local b, plr;
for( local i = 0; i <= GetMaxPlayers(); i++ )
{
plr = FindPlayer( i );
if ( ( plr ) && ( pstats[ plr.ID ].Logged ) && ( pstats[ plr.ID ].KillingSpree >= 5 ) )
{
if ( b ) b = b + " - " + plr.Name + " (Spree: " + pstats[ plr.ID ].KillingSpree + ")";
else b = plr.Name + " (Spree: " + pstats[ plr.ID ].KillingSpree + " )";
}
}
if ( b ) Message( "[#FF0000]** Players on Spree:[ " + b + " ]" );
else Message( "[#00FFFF]** No Players with Spree" );
}
if ( cmd == "stats" )
{
MessagePlayer( "[#FFFFFF]Your Stats Kills " + pstats[ player.ID ].Kills + " Deaths " + pstats[ player.ID ].Deaths Rank " + GetCriminalRank( player ) + " Spree " + GetPlayerSpree( player ) + ".", player );
}
else if ( cmd == "myspree" )
{
if (GetPlayerSpree(player) <= 4) MessagePlayer("[#FF0000]No Have Spree",player);
else
{
MessagePlayer("[#00FFFF]Your Spree: [ Kills: " + GetPlayerSpree(player) + " ]",player);
}
}
Classes
KillingSpree = 0;
Required Functions
function IncCash( player, amount )
{
local cash = pstats[ player.ID ].Cash;
local add = cash + amount;
pstats[ player.ID ].Cash = add;
player.Cash = add;
}
Note: This Text system is created by Me and Spree System has been taken from old forum
Good Luck
Updated