hlmod.hu

#include <amxmodx>
#include <amxmisc>
#include <nvault>  
#include <colorchat>
#include <cstrike>
#include <fun>
#include <hamsandwich>
#include <fakemeta>
 
new Level[33], eXP[33]
new KillXp, HsXp, HeXp/*, KnifeXp*/
new gVault
 
new const szPrefix[] = "[^4Szintrendszer^3] -"
 
#define MaxLevels 10
#define IsPlayer(%1) ( 1 <= %1 <=  g_iMaxPlayers )
#define TASK_SHOW_HUD 10113
 
new g_msgHudSync
new bool:is_user_ignored[ 33 ]
 
new const Levels[MaxLevels] = 
{
	100, // Starter #1
	200, // Noob #2
	400, // Beginner #3
	650, // Knifer #4
	900, // Rambo #5
	1200, // Butcher #6
	1550, // Matrix #7
	1900, // Probhop #8
	2300, // Freak #9
	3000 // Racer #10
 
}
new const Prefix[MaxLevels +1][] =
{
	"Bot", // 0
	"Kezdo", // 1
	"Ujonc",  // 2
	"Lelkes", // 3
	"Tud valamit", // 4
	"Tag",  // 5
	"Fanatikus", // 6
	"Veteran", // 7
	"Isten", // 8
	"Pro", // 9
	"Legenda" // 10
}
 
// Bonus Stuff
new healthperlevel,
	armorperlevel,
	speedperlevel,
	damageperlevel,
	gravityperlvl
 
new g_iMaxPlayers
 
public plugin_init() 
{
	register_plugin("Deathrun XP & Level Mod", "0.0.9", "Freestyle")
 
	RegisterHam ( Ham_Spawn, "player", "Ham_CheckOthers_Bonus", 1);
	RegisterHam ( Ham_TakeDamage, "player", "Ham_CheckDamage_Bonus", .Post = false );
	RegisterHam ( Ham_Item_PreFrame, "player", "Ham_CheckSpeed_Bonus", 1);
 
	g_iMaxPlayers = get_maxplayers( );
 
	register_message(get_user_msgid("SayText"),"perfix")
 
	register_cvar( "XP_Reward_MSG", "1" ); // Message of the XP Gain
 
	// CHAT COMMANDS //
	register_clcmd ( "say /xp", "ShowPlayerXP")
	register_clcmd ( "say_team /xp", "ShowPlayerXP")
	register_clcmd ( "say /level", "ShowPlayerLevel")
	register_clcmd ( "say_team /level", "ShowPlayerLevel")
 
	// XP SYSTEM //
	KillXp	= register_cvar("drxp_per_kill", "1")
	HsXp	= register_cvar("drxp_per_hs", "1")
	HeXp	= register_cvar("drxp_per_nade_kill", "2")
	//KnifeXp	= register_cvar("drxp_per_knife_kill", "2")
 
	// Give & Remove XP //
	register_concmd ( "give_xp", "CmdAddXP", ADMIN_RCON, "<nick, #userid, authid | @all> <xp>" )
	register_concmd ( "remove_xp", "CmdRemoveXP", ADMIN_RCON, "<nick, #userid, authid | @all> <xp>" )
 
	/* Bonus Stuff */
 
	// Health Per Level //
	healthperlevel	= register_cvar("health_per_lvl", "0")
 
	// Armor Per Level //
	armorperlevel	= register_cvar("armor_per_lvl", "0") 
 
	// Speed Per Level //
	speedperlevel	= register_cvar("speed_per_lvl", "0")
 
	// Gravity Per Level //
	gravityperlvl	= register_cvar("gravity_per_lvl", "0") // NERVER MORE THAN 66 PER LVL
 
	// Damage Per Level //
	damageperlevel	= register_cvar("damage_per_lvl", "0")
 
	g_msgHudSync = CreateHudSyncObj()
}
 
public perfix(msgId,msgDest,msgEnt)
{
	new id = get_msg_arg_int(1)
	if(!is_user_connected(id))   
 
	return PLUGIN_CONTINUE
 
	new szTmp[256],szTmp2[256], szText[128]
	get_msg_arg_string(2,szTmp, charsmax( szTmp ) )
	formatex(szText, charsmax(szText), "^x04[%s]", Prefix[Level[id]])
	if(!equal(szTmp,"#Cstrike_Chat_All"))
	{
		add(szTmp2,charsmax(szTmp2),szText)
		add(szTmp2,charsmax(szTmp2)," ")
		add(szTmp2,charsmax(szTmp2),szTmp)
	}
	else
	{
		add(szTmp2,charsmax(szTmp2),szText)
		add(szTmp2,charsmax(szTmp2),"^x03 %s1^x01 :  %s2")
	}
	set_msg_arg_string(2,szTmp2)
	return PLUGIN_CONTINUE
}
 
public plugin_cfg( )
{	
	gVault = nvault_open( "DEATHRUN_XP" )
 
	if ( gVault == INVALID_HANDLE )
		set_fail_state( "Error opening nVault" );
}
 
/*      INFO ABOUT PERSONAL XP/LEVEL      */
public ShowPlayerXP(id)
{
	ColorChat(id, GREY, "%s Neked ^4%i^3 XP-d van es a szinted: ^4%s^3!", szPrefix, eXP[id], Prefix[Level[id]])
}
 
public ShowPlayerLevel(id)
{
	new name[32]
	get_user_name(id, name, sizeof(name) -1)
 
	ColorChat(id, GREY, "%s A te szinted: ^4%s^3  ^4%i^3 XP-vel!", szPrefix, Prefix[Level[id]], eXP[id])
}
 
public Ham_CheckDamage_Bonus( pevVictim, pevInflictor, pevAttacker, Float:flDamage, iDmgBits ) 
{ 
    if( !( 1 <= pevAttacker <= g_iMaxPlayers) ) 
    { 
        return HAM_HANDLED; 
    } 
 
    if( !is_user_alive( pevAttacker )  ) 
    { 
        return HAM_HANDLED; 
    } 
 
    SetHamParamFloat( 4 , flDamage + ( get_pcvar_num( damageperlevel ) * Level[ pevAttacker ] ) ) 
 
    return HAM_IGNORED; 
} 
 
/*      Speed Check      */
public Ham_CheckSpeed_Bonus( id )
{
	if( !is_user_alive( id ) || cs_get_user_team( id ) != CS_TEAM_T )
	{
		return HAM_IGNORED;
	}
 
	set_user_maxspeed( id, 250.0 + ( get_pcvar_num(speedperlevel) * Level[ id ] ) );
 
	return HAM_IGNORED;
}
 
/*      HP & AP & Gravity Check      */
public Ham_CheckOthers_Bonus(id)
{
	if( !is_user_alive( id ) || cs_get_user_team( id ) != CS_TEAM_T )
		return HAM_IGNORED;
 
	// HP Check
	new HPCheck = ( get_user_health(id) + get_pcvar_num(healthperlevel) * Level[ id ] );
	set_user_health( id, HPCheck );
 
	// AP Check
	new APCheck = ( get_user_armor(id) + get_pcvar_num(armorperlevel) * Level[ id ] );
	set_user_armor( id, APCheck );
 
	// Gravity
	new GRAVITYCheck = 800 - ( get_pcvar_num( gravityperlvl ) * Level[ id ] );
 
	if(get_pcvar_num(gravityperlvl) > 66)
	{
		set_user_gravity( id, float( 8 ) / 800.0 );
	}
	else
	{
		set_user_gravity( id, float( GRAVITYCheck ) / 800.0 );
	}
 
	remove_task( TASK_SHOW_HUD + id );		
 
	set_task(0.1, "ShowHud", TASK_SHOW_HUD + id)
 
	return HAM_IGNORED;
}
 
/*      Respected Player Join / Leave Stuff      */
 
public LvL_12_PlayerJoin(id)
{
	new name[32]
	get_user_name(id, name, sizeof(name) -1)
 
	ColorChat(0, GREY, "%s ^4Egy LegenD : ^1%s^4 belepett,^1%i^4 XP-je van!", szPrefix, name, eXP[id])
}
 
public LvL_12_PlayerRemove(id)
{
	new name[32]
	get_user_name(id, name, sizeof(name) -1)
 
	ColorChat(0, GREY, "%s ^4Egy LegenD : %s lelepett %i XP-je van!", szPrefix, name, eXP[id])
}
 
public plugin_end( )
	nvault_close( gVault )
 
public client_putinserver(id)
{
	LoadData(id)
	set_task( 3.0, "ShowHud", id, .flags = "b" );
 
	if(Level[id] == 12)
	{
		set_task(5.0, "LvL_12_PlayerJoin", id)
	}
}
 
public client_disconnect(id)
{
	SaveData(id)
 
	if(Level[id] == 12)
	{
		set_task(1.0, "LvL_12_PlayerRemove", id)
	}
}
 
/*      XP REWARDS      */
public client_death( iKiller, iVictim, wpnindex, hitplace )
{
	new vname[32]
	new kname[32]
 
	get_user_name( iKiller, kname, charsmax( kname ) )
	get_user_name( iVictim, vname, charsmax( vname ) )
 
	if( is_user_ignored[ iKiller ] )
		return PLUGIN_HANDLED_MAIN
 
	get_user_name( iKiller, kname, charsmax( kname ) )
	get_user_name( iVictim, vname, charsmax( vname ) )
 
	if( iKiller != iVictim && ( 1 <= iKiller <= g_iMaxPlayers ) && ( 1 <= iVictim <= g_iMaxPlayers ) && !( hitplace == HIT_HEAD ) && !( wpnindex == CSW_HEGRENADE ) )
	{
		eXP[iKiller] += get_pcvar_num(KillXp)
 
		if( get_cvar_num("XP_Reward_MSG") == 1 ) 
		{
			ColorChat ( iKiller, GREY, "%s Kaptal^4 %i^3 XP-t mert megolted ^4 %s^3-t", szPrefix, get_pcvar_num(KillXp), vname )
		}
	}
 
	if( hitplace == HIT_HEAD )
	{
		eXP[iKiller] += get_pcvar_num(HsXp)
 
		if( get_cvar_num("XP_Reward_MSG") == 1 ) 
		{
			ColorChat ( iKiller, GREY, "%s Kaptal^4 %i^3 XP-t mert megolted ^4 %s^3-t", szPrefix, get_pcvar_num (HsXp), vname )
		}
	}
 
	if( wpnindex == CSW_HEGRENADE && iKiller != iVictim )
	{
		eXP[iKiller] += get_pcvar_num(HeXp)
 
		if( get_cvar_num("XP_Reward_MSG") == 1 ) 
		{
			ColorChat( iKiller, GREEN, "%s Kaptal^4 %i^3 XP-t mert megolted ^4 %s^3-t", szPrefix, get_pcvar_num (HeXp), vname )
		}
	}
	CheckLevel(iKiller)
	SaveData(iKiller)
 
	return PLUGIN_CONTINUE
}
 
public CheckLevel(id)
{
	if(Level[id] < MaxLevels-1)
	{
		while(eXP[id] >= Levels[Level[id]])
		{
			Level[id] += 1 
			ColorChat(id, GREY, "%s Gratulalok szintet leptel, mostani szinted szama : ^4%i^3", szPrefix, Level[id])
		}
	}
	while(eXP[id] < Levels[Level[id]] && Level[id]>1)
	{
		Level[id] --
		ColorChat(id, GREY, "%s Sajnalom visszaestel egy szintet, mostani szinted szama : ^4%i^3", szPrefix, Level[id])
	}
}
 
/*      HUD PERMANENT INFO      */
public ShowHud(task)
{
	new id = task - TASK_SHOW_HUD
 
	if(!is_user_alive(id))
		return;
 
	set_hudmessage(255, 0, 0, 0.02, 0.33, 0, 0.0, 0.3, 0.0, 0.0)
	if(Level[id] < MaxLevels-1)
		ShowSyncHudMsg(id, g_msgHudSync,"[A Te rangod: %s]^n[Következő rangod: %s]^n[XP-d : %i]", Prefix[Level[id]], Prefix[Level[id]+1], eXP[id])
	else
		ShowSyncHudMsg(id, g_msgHudSync,"[A Te rangod: %s]^n[XP-d : %i]", Prefix[Level[id]], eXP[id])
 
	set_task(0.1, "ShowHud", TASK_SHOW_HUD + id)	
}
 
/*      nVault Stuff      */
public SaveData(id) 
{ 
	new AuthID[35]
	get_user_authid(id,AuthID,34) 
	new vaultkey[64],vaultdata[256] 
 
	format(vaultkey,63,"%s-Mod",AuthID) 
	format(vaultdata,255,"%i#%i#",eXP[id],Level[id]) 
 
	nvault_set(gVault,vaultkey,vaultdata) 
 
	return PLUGIN_CONTINUE 
} 
public LoadData(id) 
{ 
	new AuthID[35]
	get_user_authid(id,AuthID,34) 
	new vaultkey[64],vaultdata[256] 
 
	format(vaultkey,63,"%s-Mod",AuthID) 
	format(vaultdata,255,"%i#%i#",eXP[id],Level[id]) 
 
	nvault_get(gVault,vaultkey,vaultdata,255) 
 
	replace_all(vaultdata, 255, "#", " ") 
 
	new playerxp[32], playerlevel[32] 
 
	parse(vaultdata, playerxp, 31, playerlevel, 31) 
 
	eXP[id] = str_to_num(playerxp) 
 
	Level[id] = str_to_num(playerlevel) 
 
	return PLUGIN_CONTINUE 
} 
 
/*      Remove And Add XP      */
public CmdAddXP ( iPlayer, level, cid )
{
	if( !cmd_access( iPlayer, level, cid, 3 ) ) return PLUGIN_HANDLED;
 
	new arg [ 32 ]
	read_argv ( 1, arg, 31 ) 
 
	new AddXP [ 32 ]
	read_argv ( 2, AddXP, charsmax ( AddXP ) )
 
	new XPtoGive = str_to_num ( AddXP )
 
	new AdminName [ 32 ]
	new TargetName [ 32 ]
	get_user_name ( iPlayer, AdminName, charsmax ( AdminName ) )
 
	if( arg[0]=='@' )
	{ 
		if( equali(arg[1],"All") || equali(arg[1],"ALL") )
		{
			new players[32], totalplayers, All
			get_players( players, totalplayers )
 
			for ( new i = 0; i < totalplayers; i++ )
			{
				All = players[ i ]
 
				eXP[ All ] += XPtoGive
			}
 
			CheckLevel( All )
			ColorChat ( 0, GREY, "%s ^1%s^3 adott^1 %i^3 XP-t minden ^1 jatekosnak^3!", szPrefix, AdminName, XPtoGive )
		}
		else if( equali(arg[1],"T") || equali(arg[1],"t") )
		{
			new players[32], totalplayers, T
			get_players( players, totalplayers )
 
			for ( new i = 0; i < totalplayers; i++ )
			{
				if ( get_user_team(players[ i ]) == 1 )
				{
					T = players[ i ]
 
					eXP[ T ] += XPtoGive
				}
			}
 
			CheckLevel( T )
			ColorChat ( 0, GREY, "%s ^1%s^3 adott^1 %i^3 XP-t minden^1 Terrornak^3!", szPrefix, AdminName, XPtoGive )
		}
		else if( equali(arg[1],"CT") || equali(arg[1],"ct") )
		{
			new players[32], totalplayers, CT
			get_players( players, totalplayers )
 
			for( new i = 0; i < totalplayers; i++ )
			{
				if( get_user_team(players[ i ] ) == 2 )
				{
					CT = players[ i ]
 
					eXP[ CT ] += XPtoGive
				}
			}
 
			CheckLevel( CT )
			ColorChat ( 0, GREY, "%s ^1%s^3 adott^1 %i^3 XP-t minden^1 CT-nek^3!", szPrefix, AdminName, XPtoGive )
		}
	}
	else
	{
		new iTarget = cmd_target( iPlayer, arg, 3 )
		get_user_name ( iTarget, TargetName, charsmax ( TargetName ) )
 
		if( iTarget )
		{
			eXP[ iTarget ] += XPtoGive
 
			CheckLevel( iTarget )
			ColorChat ( 0, GREY, "%s ^1%s^3 adott^1 %i^3 XP-t ^1 %s-nek^3", szPrefix, AdminName, XPtoGive, TargetName )
		}
	}
	return PLUGIN_HANDLED
}
 
public CmdRemoveXP ( iPlayer, level, cid )
{
	if( !cmd_access(iPlayer, level, cid, 3) ) return PLUGIN_HANDLED;
 
	new arg [ 32 ]
	read_argv ( 1, arg, 31 ) 
 
	new RemoveXP [ 32 ]
	read_argv ( 2, RemoveXP, charsmax ( RemoveXP ) )
 
	new XPtoRemove = str_to_num ( RemoveXP )
 
	new AdminName [ 32 ]
	new TargetName [ 32 ]
	get_user_name ( iPlayer, AdminName, charsmax ( AdminName ) )
 
	if( arg[0]=='@' )
	{ 
		if( equali(arg[1],"All") || equali(arg[1],"ALL") )
		{
			new players[32], totalplayers, All
			get_players( players, totalplayers )
 
			for ( new i = 0; i < totalplayers; i++ )
			{
				All = players[ i ]
 
				eXP[ All ] -= XPtoRemove
			}
 
			CheckLevel( All )
			ColorChat ( 0, GREY, "%s ^1%s^3 elvett^1 %i^3 XP-t ^1mindenkitol^3!", szPrefix, AdminName, XPtoRemove )
		}
		else if( equali(arg[1],"T") || equali(arg[1],"t") )
		{
			new players[32], totalplayers, T
			get_players( players, totalplayers )
 
			for ( new i = 0; i < totalplayers; i++ )
			{
				if ( get_user_team(players[ i ]) == 1 )
				{
					T = players[ i ]
 
					eXP[ T ] -= XPtoRemove
				}
			}
 
			CheckLevel( T )
			ColorChat ( 0, GREY, "%s ^1%s^3 elvett^1 %i^3 XP-t minden^1 Terroristatol^3!", szPrefix, AdminName, XPtoRemove )
		}
		else if( equali(arg[1],"CT") || equali(arg[1],"ct") )
		{
			new players[32], totalplayers, CT
			get_players( players, totalplayers )
 
			for( new i = 0; i < totalplayers; i++ )
			{
				if( get_user_team(players[ i ] ) == 2 )
				{
					CT = players[ i ]
 
					eXP[ CT ] -= XPtoRemove
				}
			}
 
			CheckLevel( CT )
			ColorChat ( 0, GREY, "%s ^1%s^3 elvett^1 %i^3 XP-t minden^1 CT-tol^3!", szPrefix, AdminName, XPtoRemove )
		}
	}
	else
	{
		new iTarget = cmd_target( iPlayer, arg, 3 )
		get_user_name ( iTarget, TargetName, charsmax ( TargetName ) )
 
		if( !iTarget )
			return PLUGIN_HANDLED
 
		eXP[ iTarget ] -= XPtoRemove
 
		CheckLevel( iTarget )
		ColorChat ( 0, GREY, "%s ^1%s^3 elvett^1 %i^3 XP-t ^1 %s-tol^3", szPrefix, AdminName, XPtoRemove, TargetName )
	}
 
	return PLUGIN_HANDLED
}