AMXX.pl: Support AMX Mod X i SourceMod

#include <amxmodx>
#include <amxmisc>
#include <fakemeta>
#include <fakemeta_util>

#define PLUGIN "Deathrun Shop"
#define VERSION "1.0"
#define AUTHOR "tuty"

#pragma semicolon 1
#define PICKUP_SND	"items/gunpickup2.wav"
#define OFFSET_MONEY	115
#define ADVERTISE_JOIN_TIME 7.0

new gDrShopOn;
new gHeCost;
new gBothGrenadesCost;
new gSilentCost;
new gHealthCost;
new gArmorCost;
new gSpeedCost;
new gGravityCost;
new gInvisCost;
new gMsgMoney;
new gMaxPlayers;
new gMenu;
new gSpeedCvar;
new gGravityCvar;
new gAdvertiseCvar;
new HasHe[ 33 ];
new HasBothGren[ 33 ];
new HasSilent[ 33 ];
new HasHealth[ 33 ];
new HasArmor[ 33 ];
new HasSpeed[ 33 ];
new HasGravity[ 33 ];
new HasInvis[ 33 ];
new bool:bSilent[ 33 ];

public plugin_init()
{
	register_plugin( PLUGIN, VERSION, AUTHOR );
	register_forward( FM_PlayerPreThink, "forward_player_prethink" );
	register_logevent( "logevent_round_start", 2, "1=Round_Start" );
	register_event( "DeathMsg", "Hook_Deathmessage", "a" );

	register_clcmd( "say /sklep", "DeathrunShop" );
	register_clcmd( "say_team /sklep", "DeathrunShop" );
	register_clcmd( "say sklep", "DeathrunShop" );
	register_clcmd( "say_team sklep", "DeathrunShop" );
	register_clcmd( "/sklep", "DeathrunShop" );
	register_clcmd( "sklep", "DeathrunShop" );

	gMenu = register_menuid( "Deathrun Shop" );
	register_menucmd( gMenu, 1023, "menu_shop" );

	gDrShopOn = register_cvar( "deathrun_shop", "1" );
	gHeCost = register_cvar( "deathrun_he_cost", "2500" );
	gBothGrenadesCost = register_cvar( "deathrun_bothgrenades_cost", "5000" );
	gSilentCost = register_cvar( "deathrun_silent_cost", "4000" );
	gHealthCost = register_cvar( "deathrun_health_cost", "6000" );
	gArmorCost = register_cvar( "deathrun_armor_cost", "6000" );
	gSpeedCost = register_cvar( "deathrun_speed_cost", "16000" );
	gGravityCost = register_cvar( "deathrun_gravity_cost", "8000" );
	gInvisCost = register_cvar( "deathrun_invisibility_cost", "16000" );
	gSpeedCvar = register_cvar( "deathrun_speed_power", "400.0" );
	gGravityCvar = register_cvar( "deathrun_gravity_power", "0.5" );
	gAdvertiseCvar = register_cvar( "deathrun_advertise_message", "1" );

	gMsgMoney = get_user_msgid( "Money" );
	gMaxPlayers = get_maxplayers();
	register_dictionary( "deathrunshop.txt" );
}
public plugin_precache()
{
	engfunc( EngFunc_PrecacheSound, PICKUP_SND );
}	
public client_connect( id )
{
	HasHe[ id ] = false;
	HasBothGren[ id ] = false;
	HasSilent[ id ] = false;
	HasHealth[ id ] = false;
	HasArmor[ id] = false;
	HasSpeed[ id ] = false;
	HasGravity[ id ] = false;
	HasInvis[ id ] = false;
}
public client_disconnect( id )
{
	bSilent[ id ] = false;
	HasHe[ id ] = false;
	HasBothGren[ id ] = false;
	HasSilent[ id ] = false;
	HasHealth[ id ] = false;
	HasArmor[ id] = false;
	HasSpeed[ id ] = false;
	HasGravity[ id ] = false;
	HasInvis[ id ] = false;
}
public client_putinserver( id )
{
	if( get_pcvar_num( gAdvertiseCvar ) != 0 )
	{
		set_task( ADVERTISE_JOIN_TIME, "ShowPlayerInfo", id );
	}
}
public forward_player_prethink( id )
{
	if( bSilent[ id ] )
	{
		set_pev( id, pev_flTimeStepSound, 999 );
	}
}
public DeathrunShop( id )
{
	if( get_pcvar_num( gDrShopOn ) != 1 )
	{
		client_print( id, print_chat, "%L", id, "DRSHOP_DISABLED" );
		return PLUGIN_HANDLED;
	}
	if( !is_user_alive( id ) )
	{
		client_print( id, print_chat, "%L", id, "DRSHOP_ONLY_ALIVE" );
		return PLUGIN_HANDLED;
	}
	new szBuffer[ 512 ];
	new iLen;
	
	iLen = formatex( szBuffer, charsmax( szBuffer ), "\r[CS-KOKOS.pl] Deathrun: SKLEP^n^n");
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r1. \wGranat wybuchowy - \y%d$^n", get_pcvar_num( gHeCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r2. \wGranat wybuchowy + Flesh - \y%d$^n", get_pcvar_num( gBothGrenadesCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r3. \wCiche chodzenie - \y%d$^n", get_pcvar_num( gSilentCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r4. \w+250 Zycia - \y%d$^n", get_pcvar_num( gHealthCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r5. \w+250 Armoru - \y%d$^n", get_pcvar_num( gArmorCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r6. \wSzybszy bieg \r(Na 1 runde) \w- \y%d$^n", get_pcvar_num( gSpeedCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r7. \wGrawitacja \r(Na 1 runde) \w- \y%d$^n", get_pcvar_num( gGravityCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r8. \w80(procent) Niewidzialnosci \r(Tylko dla Terrorysty) \w- \y%d$^n^n^n", get_pcvar_num( gInvisCost ) );
	iLen += formatex( szBuffer[ iLen ], charsmax( szBuffer ) - iLen, "\r9. \wWyjdz" );
	
	new keys = ( 1<<0 | 1<<1 | 1<<2 | 1<<3 | 1<<4 | 1<<5 | 1<<6 | 1<<7 | 1<<8 );
	show_menu( id, keys, szBuffer );
	return PLUGIN_CONTINUE;
}
public menu_shop( id, key )
{
	new whichmoney = fm_get_user_money( id );
	switch( key )
	{
		case 0:
		{
			if( HasHe[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gHeCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}
			fm_give_item( id, "weapon_hegrenade" );
			client_print( id, print_chat, "%L", id, "DRSHOP_GRENADE_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gHeCost ) );
			client_sound_play( id );
			HasHe[ id ] = true;
		}
		case 1:
		{
			if( HasBothGren[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gBothGrenadesCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}	
			fm_give_item( id, "weapon_hegrenade" );
			fm_give_item( id, "weapon_flashbang" );
			client_print( id, print_chat, "%L", id, "DRSHOP_BOTHGREN_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gBothGrenadesCost ) );
			client_sound_play( id );
			HasBothGren[ id ] = true;
		}
		case 2:
		{
			if( HasSilent[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gSilentCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}	
			fm_set_user_footsteps( id, 1 );
			client_print( id, print_chat, "%L", id, "DRSHOP_SILENTWALK_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gSilentCost ) );
			client_sound_play( id );
			HasSilent[ id ] = true;
		}
		case 3:
		{
			if( HasHealth[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gHealthCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}	
			fm_set_user_health( id, get_user_health( id ) + 255 );
			client_print( id, print_chat, "%L", id, "DRSHOP_HEALTH_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gHealthCost ) );
			client_sound_play( id );
			HasHealth[ id ] = true;
		}
		case 4:
		{
			if( HasArmor[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gArmorCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}
			fm_set_user_armor( id, get_user_armor( id ) + 255 );
			client_print( id, print_chat, "%L", id, "DRSHOP_ARMOR_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gArmorCost ) );
			client_sound_play( id );
			HasArmor[ id ] = true;
		}
		case 5:
		{
			if( HasSpeed[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gSpeedCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}
			fm_set_user_maxspeed( id, get_pcvar_float( gSpeedCvar ) );
			client_print( id, print_chat, "%L", id, "DRSHOP_SPEED_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gSpeedCost ) );
			client_sound_play( id );
			HasSpeed[ id ] = true;
		}
		case 6:
		{
			if( HasGravity[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gGravityCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}
			fm_set_user_gravity( id, get_pcvar_float( gGravityCvar ) );
			client_print( id, print_chat, "%L", id, "DRSHOP_GRAVITY_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gGravityCost ) );
			client_sound_play( id );
			HasGravity[ id ] = true;
		}
		case 7:
		{
			if( HasInvis[ id ] )
			{
				allready_have( id );
				return PLUGIN_HANDLED;
			}
			if( get_user_team( id ) == 2 )
			{
				client_print( id, print_chat, "%L", id, "DRSHOP_ONLY_T" );
				return PLUGIN_HANDLED;
			}
			if( whichmoney < get_pcvar_num( gInvisCost ) )
			{
				dont_have( id );
				return PLUGIN_HANDLED;
			}
			fm_set_rendering( id, kRenderFxNone, 0, 0, 0, kRenderTransAlpha, 100 );
			client_print( id, print_chat, "%L", id, "DRSHOP_INVISIBILITY_ITEM" );
			fm_set_user_money( id, whichmoney - get_pcvar_num( gInvisCost ) );
			client_sound_play( id );
			HasInvis[ id ] = true;
		}
		case 8:
		{
			client_print( id, print_chat, "%L", id, "DRSHOP_MENU_CLOSED" );
			return PLUGIN_HANDLED;
		}
			
	}
	return PLUGIN_HANDLED;
}
public logevent_round_start()
{
	if( get_pcvar_num( gDrShopOn ) == 1 )
	{
		for( new id = 1; id <= gMaxPlayers; id++ )
		{
			HasHe[ id ] = false;
			HasBothGren[ id ] = false;
			HasSilent[ id ] = false;
			HasHealth[ id ] = false;
			HasArmor[ id] = false;
			HasSpeed[ id ] = false;
			HasGravity[ id ] = false;
			HasInvis[ id ] = false;
			fm_set_user_gravity( id, 1.0 );	
			fm_set_user_maxspeed( id, 0.0 );
			fm_set_user_footsteps( id, 0 );
		}
	}
	return PLUGIN_CONTINUE;
}
public Hook_Deathmessage()
{
	if( get_pcvar_num( gDrShopOn ) == 1 )
	{
		new id = read_data( 2 );
	
		HasHe[ id ] = false;
		HasBothGren[ id ] = false;
		HasSilent[ id ] = false;
		HasHealth[ id ] = false;
		HasArmor[ id] = false;
		HasSpeed[ id ] = false;
		HasGravity[ id ] = false;
		HasInvis[ id ] = false;
		fm_set_rendering( id );
		fm_set_user_gravity( id, 1.0 );	
		fm_set_user_maxspeed( id, 0.0 );
		fm_set_user_footsteps( id, 0 );
	}
	return PLUGIN_CONTINUE;
}
public ShowPlayerInfo( id )
{
	set_hudmessage( 0, 0, 255, -1.0, 0.82, 0, 6.0, 12.0 );
	show_hudmessage( id, "%L", id, "DRSHOP_HUD_INFO" );
}	
allready_have( id)
{
	client_print( id, print_chat, "%L", id, "DRSHOP_ALLREADY_HAVE" );
}	
dont_have( id )
{
	client_print( id, print_chat, "%L", id, "DRSHOP_DONTHAVE_MONEY" );
}
client_sound_play( index )
{
	client_cmd( index, "speak %s", PICKUP_SND );
}	
stock fm_get_user_money( index )
{
	new money = get_pdata_int( index, OFFSET_MONEY );
	return money;
}
stock fm_set_user_money( index, money, flash = 1 )
{
	set_pdata_int( index, OFFSET_MONEY, money );
	fm_set_money( index, money, flash );
	return 1;
}
stock fm_set_money( index, money, flash )
{
	message_begin( MSG_ONE_UNRELIABLE, gMsgMoney, {0, 0, 0}, index );
	write_long( money );
	write_byte( flash ? 1 : 0 );
	message_end();
}
stock fm_set_user_footsteps( index, set = 1 )
{
	if( set )
	{
		set_pev( index, pev_flTimeStepSound, 999 );
		bSilent[ index ] = true;
	}
	else
	{
		set_pev( index, pev_flTimeStepSound, 400 );
		bSilent[ index ] = false;
	}
	return 1;
}