Furiens.sma:
Code: Select all
#include <amxmodx>#include <cstrike>#include <engine>#include <fun>#include <fakemeta>#include <hamsandwich> #include "furien.inc" #define MAX_PLAYERS 32 #define Ham_Player_ResetMaxSpeed Ham_Item_PreFrame new g_iMaxPlayers#define FIRST_PLAYER_ID 1#define IsPlayer(%1) ( FIRST_PLAYER_ID <= %1 <= g_iMaxPlayers ) new CsTeams:g_iFuriensTeam = CS_TEAM_T // players offsets#define XTRA_OFS_PLAYER 5#define m_iAccount 115#define cs_set_money_value(%1,%2) set_pdata_int(%1, m_iAccount, %2, XTRA_OFS_PLAYER) // "weaponbox" offsets#define XO_WEAPONBOX 4#define m_rgpPlayerItems_wpnbx_Slot5 39#define IsWeaponBoxC4(%1) ( get_pdata_cbase(%1, m_rgpPlayerItems_wpnbx_Slot5, XO_WEAPONBOX) > 0 ) new g_bShouldAnswerMenu, g_bCanModifyCvars#define MarkUserSeeMenu(%1) g_bShouldAnswerMenu |= 1<<(%1&31)#define ClearUserSeeMenu(%1) g_bShouldAnswerMenu &= ~(1<<(%1&31))#define ShouldUserSeeMenu(%1) g_bShouldAnswerMenu & 1<<(%1&31) #define MarkUserCvars(%1) g_bCanModifyCvars |= 1<<(%1&31)#define ClearUserCvars(%1) g_bCanModifyCvars &= ~(1<<(%1&31))#define CanUserCvars(%1) g_bCanModifyCvars & 1<<(%1&31) const CVARS_MENU_KEYS = (1<<0)|(1<<1) new g_iFurienTeamChangeForward new g_iFurienRoundRestartForward, bool:g_bRestarting new Float:g_flFurienGravity = 0.375new g_iInvisFactor = 1new Float:g_flMaxSpeed = 500.0new g_iFurienReward = 1337new g_iAntiReward = 400new g_iAnnounce = 1 new bool:g_bSwitchTeam = truenew bool:g_bSwitchInProgress new Trie:g_tPreventEntityKeyvaluenew g_iPickUp = 2 new g_szSpeedCommand[128] new g_szFurienWinSound[64]new g_szAntiWinSound[64] new g_szGameDescription[32] new g_bitBombPlant new g_iNewMoneynew g_iMsgHookMoney new g_iTextMsg, g_iMoney new HamHook:g_iHhTakeDamage public plugin_natives(){ register_library("furien") register_native("furien_get_user_team", "fr_get_user_team")} public plugin_precache(){ if( !ReadCfgFile() ) { log_amx("Configuration file doesn't exist !!") }} public plugin_init(){ register_plugin("Furiens", FURIEN_VERSION, "ConnorMcLeod") register_dictionary("common.txt") register_dictionary("furiens.txt") new pCvar = register_cvar("furien_version", FURIEN_VERSION, FCVAR_SERVER|FCVAR_EXTDLL|FCVAR_SPONLY) set_pcvar_string(pCvar, FURIEN_VERSION) register_clcmd("say ?", "A_Propos") register_clcmd("say_team ?", "A_Propos") register_clcmd("?", "A_Propos") register_menucmd(register_menuid("Furiens Cvars"), CVARS_MENU_KEYS, "CvarsMenuCallBack") RegisterHam(Ham_Spawn, "player", "Player_Spawn_Post", 1) RegisterHam(Ham_Player_ResetMaxSpeed, "player", "Player_ResetMaxSpeed", 1) register_message(get_user_msgid("SendAudio"), "Message_SendAudio") new iEnt iEnt = create_entity("info_target") set_pev(iEnt, pev_classname, "check_speed") set_pev(iEnt, pev_nextthink, get_gametime() + 0.1) register_think("check_speed", "Set_Furiens_Visibility") iEnt = create_entity("info_target") set_pev(iEnt, pev_classname, "check_cvars") set_pev(iEnt, pev_nextthink, get_gametime() + 10.0) register_think("check_cvars", "Check_Players_Cvars") g_iFurienTeamChangeForward = CreateMultiForward("furien_team_change", ET_IGNORE, FP_CELL) register_event("TextMsg", "Event_TextMsg_Restart", "a", "2&#Game_C", "2&#Game_w") register_event("HLTV", "Event_HLTV_New_Round", "a", "1=0", "2=0") g_iFurienRoundRestartForward = CreateMultiForward("furien_round_restart", ET_IGNORE) register_event("DeathMsg", "Event_DeathMsg", "a") if( get_cvar_float("sv_maxspeed") < g_flMaxSpeed ) { set_cvar_float("sv_maxspeed", g_flMaxSpeed) } formatex(g_szSpeedCommand, charsmax(g_szSpeedCommand), ";cl_forwardspeed %.1f;cl_sidespeed %.1f;cl_backspeed %.1f", g_flMaxSpeed, g_flMaxSpeed, g_flMaxSpeed) g_iMaxPlayers = get_maxplayers() g_iTextMsg = get_user_msgid("TextMsg") g_iMoney = get_user_msgid("Money")} ReadCfgFile(){ new szConfigFile[128] get_localinfo("amxx_configsdir", szConfigFile, charsmax(szConfigFile)) format(szConfigFile, charsmax(szConfigFile), "%s/furien/furien.ini", szConfigFile); new fp = fopen(szConfigFile, "rt") if( !fp ) { return 0 } new szDatas[96], szKey[16], szValue[64] while( !feof(fp) ) { fgets(fp, szDatas, charsmax(szDatas)) trim(szDatas) if(!szDatas[0] || szDatas[0] == ';' || szDatas[0] == '#' || (szDatas[0] == '/' && szDatas[1] == '/')) { continue } parse(szDatas, szKey, charsmax(szKey), szValue, charsmax(szValue)) switch( szKey[0] ) { case 'B': { switch( szKey[1] ) { case 'U': { if( equal(szKey, "BUY") ) { switch( clamp(str_to_num(szValue), 0, 1) ) { case 0: { new iEnt g_tPreventEntityKeyvalue = TrieCreate() TrieSetCell(g_tPreventEntityKeyvalue, "player_weaponstrip", 1) TrieSetCell(g_tPreventEntityKeyvalue, "game_player_equip", 1) TrieSetCell(g_tPreventEntityKeyvalue, "info_map_parameters", 1) iEnt = create_entity("info_map_parameters") DispatchKeyValue(iEnt, "buying", "3") DispatchSpawn(iEnt) register_buy_cmd() } } } } case 'O': { if( equal(szKey, "BOMB_PLANT") ) { g_bitBombPlant = clamp(str_to_num(szValue), 0, 3) if( g_bitBombPlant != 3 ) { RegisterHam(Ham_AddPlayerItem, "player", "Player_AddPlayerItem") } } } } } case 'F': { if( equal(szKey, "FURIEN_ANNOUNCE") ) { g_iAnnounce = str_to_num(szValue) } } case 'G': { switch( szKey[1] ) { case 'A': { if( equal(szKey, "GAMENAME") ) { replace(szValue, charsmax(szValue), "%v", FURIEN_VERSION) copy(g_szGameDescription, charsmax(g_szGameDescription), szValue) register_forward(FM_GetGameDescription, "GetGameDescription") } } case 'R': { if( equal(szKey, "GRAVITY") ) { g_flFurienGravity = floatclamp(str_to_float(szValue), 0.0125, 1.0) } } } } case 'I': { if( equal(szKey, "INVIS_FACTOR") ) { g_iInvisFactor = clamp(str_to_num(szValue), 1, 4) } } case 'K': { switch( szKey[5] ) { case 'A': { if( equal(szKey, "KILL_ANTI_REWARD") ) { g_iAntiReward = str_to_num(szValue) } } case 'F': { if( equal(szKey, "KILL_FURIEN_REWARD") ) { g_iFurienReward = str_to_num(szValue) } } } } case 'M': { if( equal(szKey, "MAXSPEED") ) { g_flMaxSpeed = floatclamp(str_to_float(szValue), 100.0, 2000.0) } } case 'P': { if( equal(szKey, "PICK_UP") ) { g_iPickUp = clamp(str_to_num(szValue), 0, 3) switch( g_iPickUp ) { case 0,1,2: { RegisterHam(Ham_Touch, "weaponbox", "CWeaponBox_Touch") RegisterHam(Ham_Touch, "armoury_entity", "GroundWeapon_Touch") RegisterHam(Ham_Touch, "weapon_shield", "GroundWeapon_Touch") } } } } case 'S': { if( equal(szKey, "SWITCH_TEAMS") ) { g_bSwitchTeam = !!clamp(str_to_num(szValue), 0, 1) if( g_bSwitchTeam ) { g_iHhTakeDamage = RegisterHam(Ham_TakeDamage, "player", "Player_TakeDamage") DisableHamForward( g_iHhTakeDamage ) } } } case 'W': { if( equal(szKey, "WIN_SOUND_", 10) ) { new szFullPath[128] switch(szKey[10]) { case 'F': { formatex(szFullPath, charsmax(szFullPath), "sound/%s", szValue) if( file_exists(szFullPath) ) { copy(g_szFurienWinSound, charsmax(g_szFurienWinSound), szValue) precache_sound(szValue) } } case 'A': { formatex(szFullPath, charsmax(szFullPath), "sound/%s", szValue) if( file_exists(szFullPath) ) { copy(g_szAntiWinSound, charsmax(g_szAntiWinSound), szValue) precache_sound(szValue) } } } } } } } fclose( fp ) return 1} public GetGameDescription(){ forward_return(FMV_STRING, g_szGameDescription) return FMRES_SUPERCEDE} public Event_TextMsg_Restart(){ g_bRestarting = true} public Event_HLTV_New_Round(){ if( g_bRestarting ) { g_bRestarting = false new iRet ExecuteForward(g_iFurienRoundRestartForward, iRet) } if( g_bSwitchInProgress ) { g_bSwitchInProgress = false DisableHamForward( g_iHhTakeDamage ) }} public GroundWeapon_Touch(iWeapon, id){ if( IsPlayer(id) ) { if( !g_iPickUp ) { remove_entity(iWeapon) return HAM_SUPERCEDE } if( !is_user_alive(id) ) { return HAM_SUPERCEDE } new iTeam = __get_user_team(id) if( ( iTeam == -1 ) || (iTeam == Furien && g_iPickUp != 1) || (iTeam == AntiFurien && g_iPickUp != 2) ) { return HAM_SUPERCEDE } } return HAM_IGNORED} public CWeaponBox_Touch(iWeaponBox, id){ if( IsPlayer(id) ) { if( !is_user_alive(id) ) { return HAM_SUPERCEDE } if( IsWeaponBoxC4(iWeaponBox) ) { return HAM_IGNORED } if( !g_iPickUp ) { remove_entity(iWeaponBox) return HAM_SUPERCEDE } new iTeam = __get_user_team(id) if( ( iTeam == -1 ) || (iTeam == Furien && g_iPickUp != 1) || (iTeam == AntiFurien && g_iPickUp != 2) ) { return HAM_SUPERCEDE } } return HAM_IGNORED} register_buy_cmd(){ register_clcmd("buy", "ClientCommand_Buy") register_clcmd("bUy", "ClientCommand_Buy") register_clcmd("buY", "ClientCommand_Buy") register_clcmd("bUY", "ClientCommand_Buy") register_clcmd("Buy", "ClientCommand_Buy") register_clcmd("BUy", "ClientCommand_Buy") register_clcmd("BuY", "ClientCommand_Buy") register_clcmd("BUY", "ClientCommand_Buy")} public ClientCommand_Buy(id){ return PLUGIN_HANDLED_MAIN} public pfn_keyvalue( iEnt ) { if( g_tPreventEntityKeyvalue ) { new szClassName[32], szCrap[2] copy_keyvalue(szClassName, charsmax(szClassName), szCrap, charsmax(szCrap), szCrap, charsmax(szCrap)) if( TrieKeyExists(g_tPreventEntityKeyvalue, szClassName) ) { remove_entity(iEnt) return PLUGIN_HANDLED } } return PLUGIN_CONTINUE} public plugin_cfg(){ if( g_tPreventEntityKeyvalue ) { TrieDestroy(g_tPreventEntityKeyvalue) set_cvar_float("sv_restart", 1.0) }} public fr_get_user_team(/*iPlugin, iParams*/){ return __get_user_team( get_param(1) )} __get_user_team(id){ new CsTeams:iTeam = cs_get_user_team(id) if( CS_TEAM_T <= iTeam <= CS_TEAM_CT ) { if( iTeam == g_iFuriensTeam ) { return Furien } return AntiFurien } return -1} public client_connect(id){ // credit : http://forums.alliedmods.net/showthread.php?p=752203 query_client_cvar(id, "gl_clear", "Client_Cvar_Result")} public Client_Cvar_Result(id, const szCvar[], const szValue[]){ if( szValue[0] == 'B' ) { server_cmd("kick #%d Software video mode forbidden !! Acceleration logicielle interdite !!", get_user_userid(id)) }} public client_putinserver( id ){ MarkUserSeeMenu( id ) ClearUserCvars( id ) if( g_iAnnounce ) { set_task(random_float(11.0, 19.0), "A_Propos", id) }} public Player_Spawn_Post( id ){ if( is_user_alive(id) ) { if( ShouldUserSeeMenu(id) ) { ShowSpeedCvarsMenu(id) } strip_user_weapons(id) if( __get_user_team(id) == Furien ) { set_user_gravity(id, g_flFurienGravity) set_user_footsteps(id, 1) } else { set_user_footsteps(id, 0) set_user_gravity(id, 1.0) } set_user_rendering(id, kRenderFxNone, 0, 0, 0, kRenderNormal, 0) }} ShowSpeedCvarsMenu(id){ new szMenu[256], n n += formatex(szMenu[n], charsmax(szMenu)-n, "%L^n", id, "FURIEN_MENU_CVAR") n += formatex(szMenu[n], charsmax(szMenu)-n, "^n\y1\w. %L", id, "YES") n += formatex(szMenu[n], charsmax(szMenu)-n, "^n\y2\w. %L", id, "NO") show_menu(id, CVARS_MENU_KEYS, szMenu, -1, "Furiens Cvars")} public CvarsMenuCallBack(id, iKey){ switch( iKey ) { case 0: { MarkUserCvars( id ) ClearUserSeeMenu( id ) } case 1: { ClearUserCvars( id ) } } return PLUGIN_HANDLED} public Player_ResetMaxSpeed( id ){ if( is_user_alive(id) && __get_user_team(id) == Furien && get_user_maxspeed(id) != 1.0 ) { set_pev(id, pev_maxspeed, g_flMaxSpeed) }} public Check_Players_Cvars( iEnt ){ entity_set_float(iEnt, EV_FL_nextthink, get_gametime() + 5.0) new iPlayers[MAX_PLAYERS], iNum, id get_players(iPlayers, iNum, "ace", g_iFuriensTeam == CS_TEAM_T ? "TERRORIST" : "CT") for(new i; i<iNum; i++) { id = iPlayers[i] if( CanUserCvars( id ) ) { query_client_cvar(id, "cl_forwardspeed", "CvarResult") query_client_cvar(id, "cl_backspeed", "CvarResult") query_client_cvar(id, "cl_sidespeed", "CvarResult") } }} public CvarResult(const id, const szCvar[], const szValue[]){ if( CanUserCvars( id ) && is_user_connected(id) && str_to_float(szValue) < g_flMaxSpeed ) { client_cmd(id, g_szSpeedCommand) }} public Set_Furiens_Visibility( iEnt ){ entity_set_float(iEnt, EV_FL_nextthink, get_gametime() + 0.1) new iPlayers[MAX_PLAYERS], iNum, id, Float:fVecVelocity[3], iSpeed get_players(iPlayers, iNum, "ae", g_iFuriensTeam == CS_TEAM_T ? "TERRORIST" : "CT") for(new i; i<iNum; i++) { id = iPlayers[i] if( get_user_weapon(id) == CSW_KNIFE ) { entity_get_vector(id, EV_VEC_velocity, fVecVelocity) iSpeed = floatround( vector_length(fVecVelocity) ) if( iSpeed < g_iInvisFactor*255 ) { set_user_rendering(id, kRenderFxNone, 0, 0, 0, kRenderTransAlpha, iSpeed/g_iInvisFactor) } else { set_user_rendering(id, kRenderFxNone, 0, 0, 0, kRenderNormal, 0) } } else { set_user_rendering(id, kRenderFxNone, 0, 0, 0, kRenderNormal, 0) } }} public Message_SendAudio(iMsgId, iMsgDest, id){ if( !id ) { new bool:bAntiWins new bool:bSwitchTeams new szSound[14] get_msg_arg_string(2, szSound, charsmax(szSound)) if( equal(szSound, "%!MRAD_ctwin") ) { if( g_iFuriensTeam == CS_TEAM_T ) { if( g_bSwitchTeam ) { bSwitchTeams = true g_iFuriensTeam = CS_TEAM_CT } bAntiWins = true } } else if( equal(szSound, "%!MRAD_terwin") ) { if( g_iFuriensTeam == CS_TEAM_CT ) { if( g_bSwitchTeam ) { bSwitchTeams = true g_iFuriensTeam = CS_TEAM_T } bAntiWins = true } } else { return } if( get_msg_block(g_iTextMsg) == BLOCK_NOT ) { set_msg_block(g_iTextMsg, BLOCK_ONCE) } new iPlayers[32], iNum, iPlayer get_players(iPlayers, iNum) for(new i; i<iNum; i++) { iPlayer = iPlayers[i] client_print(iPlayer, print_center, "%L", iPlayer, bAntiWins ? "FURIEN_ANTI_WIN_MSG" : "FURIEN_FURIEN_WIN_MSG") } if( bAntiWins ) { if( g_szAntiWinSound[0] ) { set_msg_arg_string(2, g_szAntiWinSound) } if( bSwitchTeams ) { new iRet ExecuteForward(g_iFurienTeamChangeForward, iRet, g_iFuriensTeam) g_bSwitchInProgress = true EnableHamForward( g_iHhTakeDamage ) } } else { if( g_szFurienWinSound[0] ) { set_msg_arg_string(2, g_szFurienWinSound) } } }} public Event_DeathMsg(){ new iKiller = read_data(1) if( IsPlayer(iKiller) && is_user_connected(iKiller) ) { new iVictim = read_data(2) if( iVictim != iKiller ) { new iVicTimTeam = __get_user_team(iVictim) if( __get_user_team(iKiller) == iVicTimTeam ) { return } g_iNewMoney = clamp ( cs_get_user_money(iKiller) + (iVicTimTeam == Furien ? g_iFurienReward : g_iAntiReward), 0, 16000 ) g_iMsgHookMoney = register_message(g_iMoney, "Message_Money") } }} public Message_Money(iMsgId, iMsgDest, id){ unregister_message(g_iMoney, g_iMsgHookMoney) cs_set_money_value(id, g_iNewMoney) set_msg_arg_int(1, ARG_LONG, g_iNewMoney)} public A_Propos(id){ if( is_user_connected(id) ) { client_print(id, print_chat, "%L", id, "FURIEN_CREDIT", FURIEN_VERSION) client_print(id, print_console, "%L", id, "FURIEN_LINK") }} public Player_AddPlayerItem(id , iWeapon){ if( ExecuteHam(Ham_Item_GetWeaponPtr, iWeapon) != iWeapon || cs_get_weapon_id(iWeapon) != CSW_C4 || g_bitBombPlant & __get_user_team(id) ) { return HAM_IGNORED } set_pev(iWeapon, pev_flags, pev(iWeapon, pev_flags) | FL_KILLME) cs_set_user_plant(id, 0) set_pev(id, pev_body, 0) SetHamReturnInteger(0) return HAM_SUPERCEDE} public Player_TakeDamage() // switch teams{ return HAM_SUPERCEDE}Code: Select all
[en]FURIEN_MENU_CVAR:\rFuriens Cvars\w :^n^nTo take full advantage of Furien Mod,^nyou must allow server to change your speed settings.^nDo you accept ?:FURIEN_FURIEN_WIN_MSG = The Furiens have won this round!FURIEN_ANTI_WIN_MSG = The Anti-Furiens have won this round!FURIEN_CREDIT = Furien Mod v%s by ConnorMcLeod, DL link in your console.FURIEN_LINK = Download Furien @ http://forums.alliedmods.net/showthread.php?t=128967
