#include <amxmodx> 
#include <cstrike> 
#include <engine> 
#include <fun> 
#include <hamsandwich>  
#include <fakemeta> 

#define VIP_LEVEL ADMIN_LEVEL_H  

#define is_valid_player(%1) (1 <= %1 <= 32) 

// Define the Plugin Version 
new const VERSION[] = { "1.1" }; 

// PREFIX 
new const PREFIX[] = { "!g[ Furien-VIP ]!n" }; 

new VipUsed[33]; 
new HasSpeed[33]; 

new Float:fast_speed = 400.0; 
new Float:normal_speed = 250.0;  

new AK_V_MODEL[64] = "models/v_golden_ak47.mdl"; 
new AK_P_MODEL[64] = "models/p_golden_ak47.mdl";  

/* Pcvars */ 
new cvar_dmgmultiplier, cvar_goldbullets,  cvar_custommodel, cvar_uclip;

new bool:g_HasAk[33]; 

new g_hasZoom[ 33 ]; 
new bullets[ 33 ]; 

// Sprite 
new m_spriteTexture; 

const Wep_ak47 = ((1<<CSW_AK47)) 

new nocliptime, godmodetime;

public plugin_init() 
{ 
    register_plugin("Furien: VIP Menu", VERSION, ""); 
    
    RegisterHam(Ham_Spawn, "player", "FwdHamSpawn_Post", 1); 
    RegisterHam(Ham_Item_PreFrame, "player", "FwdPreFrame_Post", 1); 
    RegisterHam(Ham_TakeDamage, "player", "fw_TakeDamage") 
    
    
    register_clcmd("say vipmenu", "cmdVmenu"); 
    register_clcmd("say /vipmenu", "cmdVmenu"); 
    register_clcmd("say_team vmenu", "cmdVmenu"); 
    register_clcmd("say_team /vmenu", "cmdVmenu");   
    
    register_event("DeathMsg", "Death", "a")  
    register_event("WeapPickup","checkModel","b","1=19")   
    register_event("CurWeapon","checkWeapon","be","1=1") 
    register_event("CurWeapon", "make_tracer", "be", "1=1", "3>0")  
    
    register_forward( FM_CmdStart, "fw_CmdStart" ) 
    
    nocliptime = register_cvar("fm_noclip_time", "15.0");  
    godmodetime = register_cvar("dr_godmode_time", "15.0");  
    
    cvar_dmgmultiplier = register_cvar("goldenak_dmg_multiplier", "5") 
    cvar_custommodel = register_cvar("goldenak_custom_model", "1") 
    cvar_goldbullets = register_cvar("goldenak_gold_bullets", "1") 
    cvar_uclip = register_cvar("goldenak_unlimited_clip", "0") 
} 

public FwdPreFrame_Post(id) 
{ 
    if(is_user_alive(id) && HasSpeed[id]) 
        set_user_maxspeed(id, fast_speed); 
} 

public FwdHamSpawn_Post(id) 
{  
    g_HasAk[id] = false 
    HasSpeed[id] = false; 
    VipUsed[id] = false; 
    set_user_maxspeed(id, normal_speed); 
    set_user_rendering( id, _, 0, 0, 0, _, 0 );  
    set_user_noclip(id, 0)     
}  

public plugin_precache() 
{ 
    precache_model(AK_V_MODEL) 
    precache_model(AK_P_MODEL) 
    m_spriteTexture = precache_model("sprites/dot.spr") 
    precache_sound("weapons/zoom.wav") 
} 

public checkModel(id) 
{ 
    if ( !g_HasAk[id] ) 
        return PLUGIN_HANDLED 
    
    new szWeapID = read_data(2) 
    
    if ( szWeapID == CSW_AK47 && g_HasAk[id] == true && get_pcvar_num(cvar_custommodel) ) 
    { 
        set_pev(id, pev_viewmodel2, AK_V_MODEL) 
        set_pev(id, pev_weaponmodel2, AK_P_MODEL) 
    } 
    return PLUGIN_HANDLED 
} 

public checkWeapon(id) 
{ 
    new plrClip, plrAmmo, plrWeap[32] 
    new plrWeapId 
    
    plrWeapId = get_user_weapon(id, plrClip , plrAmmo) 
    
    if (plrWeapId == CSW_AK47 && g_HasAk[id]) 
    { 
        checkModel(id) 
    } 
    else  
    { 
        return PLUGIN_CONTINUE 
    } 
    
    if (plrClip == 0 && get_pcvar_num(cvar_uclip)) 
    { 
        // If the user is out of ammo.. 
        get_weaponname(plrWeapId, plrWeap, 31) 
        // Get the name of their weapon 
        give_item(id, plrWeap) 
        engclient_cmd(id, plrWeap)  
        engclient_cmd(id, plrWeap) 
        engclient_cmd(id, plrWeap) 
    } 
    return PLUGIN_HANDLED 
} 



public fw_TakeDamage(victim, inflictor, attacker, Float:damage) 
{ 
    if ( is_valid_player( attacker ) && get_user_weapon(attacker) == CSW_AK47 && g_HasAk[attacker] ) 
    { 
        SetHamParamFloat(4, damage * get_pcvar_float( cvar_dmgmultiplier ) ) 
    } 
} 

public fw_CmdStart( id, uc_handle, seed ) 
{ 
    if( !is_user_alive( id ) )  
        return PLUGIN_HANDLED 
    
    if( ( get_uc( uc_handle, UC_Buttons ) & IN_ATTACK2 ) && !( pev( id, pev_oldbuttons ) & IN_ATTACK2 ) ) 
    { 
        new szClip, szAmmo 
        new szWeapID = get_user_weapon( id, szClip, szAmmo ) 
        
        if( szWeapID == CSW_AK47 && g_HasAk[id] == true && !g_hasZoom[id] == true) 
        { 
            g_hasZoom[id] = true 
            cs_set_user_zoom( id, CS_SET_AUGSG552_ZOOM, 0 ) 
            emit_sound( id, CHAN_ITEM, "weapons/zoom.wav", 0.20, 2.40, 0, 100 ) 
        } 
        
        else if ( szWeapID == CSW_AK47 && g_HasAk[id] == true && g_hasZoom[id]) 
        { 
            g_hasZoom[ id ] = false 
            cs_set_user_zoom( id, CS_RESET_ZOOM, 0 ) 
            
        } 
        
    } 
    return PLUGIN_HANDLED 
} 


public make_tracer(id) 
{ 
    if (get_pcvar_num(cvar_goldbullets)) 
    { 
        new clip,ammo 
        new wpnid = get_user_weapon(id,clip,ammo) 
        new pteam[16] 
        
        get_user_team(id, pteam, 15) 
        
        if ((bullets[id] > clip) && (wpnid == CSW_AK47) && g_HasAk[id])  
        { 
            new vec1[3], vec2[3] 
            get_user_origin(id, vec1, 1) // origin; your camera point. 
            get_user_origin(id, vec2, 4) // termina; where your bullet goes (4 is cs-only) 
            
            
            //BEAMENTPOINTS 
            message_begin( MSG_BROADCAST,SVC_TEMPENTITY) 
            write_byte (0)     //TE_BEAMENTPOINTS 0 
            write_coord(vec1[0]) 
            write_coord(vec1[1]) 
            write_coord(vec1[2]) 
            write_coord(vec2[0]) 
            write_coord(vec2[1]) 
            write_coord(vec2[2]) 
            write_short( m_spriteTexture ) 
            write_byte(1) // framestart 
            write_byte(5) // framerate 
            write_byte(2) // life 
            write_byte(10) // width 
            write_byte(0) // noise 
            write_byte( 255 )     // r, g, b 
            write_byte( 215 )       // r, g, b 
            write_byte( 0 )       // r, g, b 
            write_byte(200) // brightness 
            write_byte(150) // speed 
            message_end() 
        } 
        
        bullets[id] = clip 
    } 
    
} 

public cmdVmenu(id) 
{ 
    if(!(get_user_flags(id) & VIP_LEVEL)) 
    { 
        client_printc(id, "!t%s !nAcest meniu este rezervat numai pentru !gVIP !n,Vrei si tu VIP?, Scrie !g/vreauvip !n.", PREFIX); 
        
        return PLUGIN_HANDLED; 
    } 
    
    if(VipUsed[id]) 
    { 
        client_printc(id, "!t%s !nAi folosit deja !gVIP Menu!n aceasta runda.", PREFIX); 
        
        return PLUGIN_HANDLED; 
    } 
    
    switch(cs_get_user_team(id)) 
    { 
        case CS_TEAM_T: 
        VipTMenu(id); 
        
        case CS_TEAM_CT: 
        VipCTMenu(id); 
    } 
    
    return PLUGIN_HANDLED; 
} 

public VipCTMenu(id) 
{ 
    new menu = menu_create("\yMeniu VIP \r(Anti-Furien):^n", "VipCTMenu_handler"); 
    
    menu_additem(menu, "\wGravitate 650", "1", 0); 
    menu_additem(menu, "\wNo-Clip \r(\y15 Secunde\r)", "2", 0); 
    menu_additem(menu, "\wViteza 350", "3", 0); 
    menu_additem(menu, "\wGodMode \r(\y15 Secunde\r)", "4", 0); 
    menu_additem(menu, "\wGolden AK47", "5", 0); 
    menu_additem(menu, "\w250HP+250 Aparare", "5", 0);  
    
    menu_setprop(menu, MPROP_EXIT, MEXIT_ALL); 
    menu_display(id, menu, 0); 
} 

public VipCTMenu_handler(id, menu, item) 
{ 
    if( item == MENU_EXIT ) 
    { 
        menu_destroy(menu); 
        return PLUGIN_HANDLED; 
    } 
    
    new data[6], iName[64]; 
    new access, callback; 
    menu_item_getinfo(menu, item, access, data,5, iName, 63, callback); 
    
    new key = str_to_num(data); 
    
    switch(key) 
    { 
        case 1: 
        { 
            set_user_gravity(id, 0.6); 
            VipUsed[id] = true; 
            
            client_printc(id, "%s Zboara,puiule,zboara cu !g650 Gravitatie!n", PREFIX); 
        } 
        case 2: 
        {  
            
            set_user_noclip(id, 1);     
            set_task(float(get_pcvar_num(nocliptime)),"removeNoClip",id); 
            
            VipUsed[id] = true; 
            
            client_printc(id, "%s Ai primit !g!No-Clip!n(15 secunde)", PREFIX); 
        } 
        case 3: 
        { 
            VipUsed[id] = true; 
            HasSpeed[id] = true; 
            
            set_user_maxspeed(id, fast_speed); 
            
            client_printc(id, "!t%s !nai o viteza mai mare ca a lui !g!Michael Shumachern", PREFIX); 
        }  
        
        case 4:  
        {  
            
            set_user_godmode(id,1); 
            set_task(float(get_pcvar_num(godmodetime)),"removeGodMode",id); 
            
            VipUsed[id] = true;  
            
            client_printc(id, "!t%s !nAi primit !gGodMode!n (15 secunde)", PREFIX);  
        }  
        
        case 5:  
        {  
            
            give_item(id, "weapon_ak47") 
            g_HasAk[id] = true 
            
            VipUsed[id] = true;  
            
            client_printc(id, "!t%s !nesti noul !gRambo !n,ai fost echipat cu un !gGolden AK47", PREFIX);  
        }  
        case 6:  
        {  
            set_user_health(id, 250)  
            set_user_armor(id, 250)  
            
            VipUsed[id] = true;   
            
            client_printc(id, "!t%s !nAi primit !g250HP!n + !g250 Aparare", PREFIX); 
        }
    } 
    
    menu_destroy(menu); 
    return PLUGIN_HANDLED; 
} 

public VipTMenu(id) 
{ 
    new menu = menu_create("\yMeniu VIP \r(Furien):^n", "VipTMenu_handler"); 
    
    menu_additem(menu, "\wDeagle \r(2 Gloante)", "1", 0); 
    menu_additem(menu, "\wPachet Grenazi \r(Full)", "2", 0); 
    menu_additem(menu, "\wAWP \r(2 Gloante)", "3", 0);  
    menu_additem(menu, "\w250HP+500 Aparare)", "4",0);  
    
    menu_setprop(menu, MPROP_EXIT, MEXIT_ALL); 
    menu_display(id, menu, 0); 
} 

public VipTMenu_handler(id, menu, item) 
{ 
    if( item == MENU_EXIT ) 
    { 
        menu_destroy(menu); 
        return PLUGIN_HANDLED; 
    } 
    
    new data[6], iName[64]; 
    new access, callback; 
    menu_item_getinfo(menu, item, access, data,5, iName, 63, callback); 
    
    new key = str_to_num(data); 
    
    switch(key) 
    { 
        case 1: 
        { 
            new wID = give_item(id, "weapon_deagle"); 
            cs_set_weapon_ammo(wID, 2); 
            VipUsed[id] = true;  
            
            
            client_printc(id, "!t%s !nAi primit un !gDeagle!n(2 Gloante)", PREFIX); 
            
            VipUsed[id] = true; 
        } 
        case 2: 
        { 
            VipUsed[id] = true; 
            
            give_item(id, "weapon_hegrenade")  
            give_item(id, "weapon_flashbang")  
            give_item(id, "weapon_flashbang")  
            give_item(id, "weapon_smokegrende") 
            
            client_printc(id, "!t%s !nAi primit !gPachet Grenazi!n", PREFIX); 
        } 
        
        case 3: 
        { 
            new wID = give_item(id, "weapon_awp"); 
            cs_set_weapon_ammo(wID, 2); 
            VipUsed[id] = true; 
            
            client_printc(id, "!t%s !nIti place sa te joci de-a lunetistul nebunule?Ai primit un !gAWP!n (2 Gloante)", PREFIX); 
        }  
        case 4:  
        {  
            set_user_health(id, 250)  
            set_user_armor(id, 500) 
        }
    } 
    
    menu_destroy(menu); 
    return PLUGIN_HANDLED; 
}  

public removeNoClip(id) { 
    set_user_noclip(id,0); 
}  

public removeGodMode(id) { 
    set_user_godmode(id,0);      
}   

stock drop_prim(id)  
{ 
    new weapons[32], num 
    get_user_weapons(id, weapons, num) 
    for (new i = 0; i < num; i++) { 
        if (Wep_ak47 & (1<<weapons[i]))  
        { 
            static wname[32] 
            get_weaponname(weapons[i], wname, sizeof wname - 1) 
            engclient_cmd(id, "drop", wname) 
        } 
    } 
} 

// Colour Chat 
stock client_printc(const id, const input[], any:...) 
{ 
    new count = 1, players[32]; 
    static msg[191]; 
    vformat(msg, 190, input, 3); 
    
    replace_all(msg, 190, "!g", "^x04"); // Green Color 
    replace_all(msg, 190, "!n", "^x01"); // Default Color 
    replace_all(msg, 190, "!t", "^x03"); // Team Color 
    
    if (id) players[0] = id; else get_players(players, count, "ch"); 
    { 
        for (new i = 0; i < count; i++) 
        { 
            if (is_user_connected(players[i])) 
            { 
                message_begin(MSG_ONE_UNRELIABLE, get_user_msgid("SayText"), _, players[i]); 
                write_byte(players[i]); 
                write_string(msg); 
                message_end(); 
            } 
        } 
    } 
}