AlliedModders

AlliedModders (https://forums.alliedmods.net/index.php)
-   Scripting Help (https://forums.alliedmods.net/forumdisplay.php?f=11)
-   -   [EDIT] This Plugin (Excerpt from the idea) (https://forums.alliedmods.net/showthread.php?t=164079)

Sepsis 08-07-2011 04:09

[EDIT] This Plugin (Excerpt from the idea)
 
Hi guys, This code add new menu?
  • 300 Spartan Mode (Open/Close) --> CT & T give Shield + deagle.
  • CT God Mode "Open/Close"
  • Give T Glow (random colors) "Open/close"
  • Zombie Mode "Open/Close" PS: CT zombies seem (models/player/CT_Zombie/CT_Zombie.mdl) ---> CT 2500 HP only knife = give T weapon m4a1 + Deagle and Dark a map , give CT nightvision )
  • Shark Mode "Open/Close" ( Only CT noclip , give T weapons m4a1+ deagle)
  • and last ----> CT's give 10 jb points --> "T" P.S = say /givejb

    Thanx

PHP Code:

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

new g_iChosenOption33 ]; 

new 
bool:g_bBuried33 ]; 

new 
g_pFriendlyFire

enum 

    
FRIENDLY_FIRE 1
    
NEW_CT
    
GIVE_C4
    
BURY
    
UNBURY 
}; 

public 
plugin_init() 

    
register_plugin"CT Menu""1.0""H3avY Ra1n" ); 
     
    
register_clcmd"say /ctmenu""Cmd_CTMenu" ); 
     
    
g_pFriendlyFire get_cvar_pointer"mp_friendlyfire" ); 


public 
client_connectid 

    
g_bBuriedid ] = false
    
g_iChosenOptionid ] = 0



public 
Cmd_CTMenuid 

    if( 
cs_get_user_teamid ) != CS_TEAM_CT 
    { 
        
client_printidprint_chat"You must be a guard to use this item." ); 
        return 
PLUGIN_HANDLED
    } 
     
    new 
hMenu menu_create"CT Menu""CTMenu_Handler" ); 
     
    new 
szFormat32 ]; 
     
    
formatexszFormatcharsmaxszFormat ), "Turn %s Friendly Fire"get_pcvar_numg_pFriendlyFire ) ? "Off" "On" ); 
     
    
menu_additemhMenuszFormat"1" ); 
    
menu_additemhMenu"Choose a new CT""2" ); 
    
menu_additemhMenu"Give C4""3" ); 
    
menu_additemhMenu"Bury Player""4" ); 
    
menu_additemhMenu"Unbury Player""5" ); 
     
    
menu_displayidhMenu); 
     
    return 
PLUGIN_CONTINUE


public 
CTMenu_HandleridhMenuiItem 

    if( 
iItem == MENU_EXIT || cs_get_user_teamid ) != CS_TEAM_CT 
    { 
        
menu_destroyhMenu ); 
        return 
PLUGIN_HANDLED
    } 

    new 
szData]; 
    new 
iAccesshCallback
     
    
menu_item_getinfohMenuiItemiAccessszDatacharsmaxszData ), __hCallback ); 
     
     
    
g_iChosenOptionid ] = str_to_numszData ); 
     
    if( 
g_iChosenOptionid ] == FRIENDLY_FIRE 
        
set_pcvar_numg_pFriendlyFireget_pcvar_numg_pFriendlyFire ) ? ); 
     
    else 
ShowPlayerMenuid ); 
     
    
menu_destroyhMenu ); 
    return 
PLUGIN_HANDLED


public 
ShowPlayerMenuid 

    new 
hMenu menu_create"Choose a Player:""PlayerMenu_Handler" ); 
    new 
szName32 ], szInfo]; 
     
    new 
iPlayers32 ], iNum
    
get_playersiPlayersiNum"a" ); 
     
    for( new 
0iPlayeriNumi++ ) 
    {     
        
iPlayer iPlayers]; 
                 
        switch( 
g_iChosenOptionid ] ) 
        { 
            case 
NEW_CT: if( cs_get_user_teamiPlayer ) != CS_TEAM_T ) continue; 
            case 
BURY: if( g_bBuriediPlayer ] ) continue; 
            case 
UNBURY: if( !g_bBuriediPlayer ] ) continue; 
        } 

        
get_user_nameiPlayerszNamecharsmaxszName ) ); 
         
        
num_to_striPlayerszInfocharsmaxszInfo ) ); 
         
        
menu_additemhMenuszNameszInfo ); 
    } 
     
    
menu_displayidhMenu); 


public 
PlayerMenu_HandleridhMenuiItem 

    if( 
iItem == MENU_EXIT || cs_get_user_teamid ) != CS_TEAM_CT 
    { 
        
menu_destroyhMenu ); 
        return 
PLUGIN_HANDLED
    } 

    new 
szData]; 
    new 
iAccesshCallback
     
    
menu_item_getinfohMenuiItemiAccessszDatacharsmaxszData ), __hCallback ); 
     
    new 
iPlayer str_to_numszData ); 
     
    if( !
is_user_aliveiPlayer ) ) 
    { 
        
client_printidprint_chat"That player is no longer alive." ); 
         
        
menu_destroyhMenu ); 
         
        
ShowPlayerMenuid ); 
         
        return 
PLUGIN_HANDLED
    } 
     
    switch( 
g_iChosenOptionid ] ) 
    { 
        case 
BURYbury_playeridiPlayer ); 
        case 
UNBURYunbury_playeridiPlayer ); 
        case 
GIVE_C4give_itemiPlayer"weapon_c4" ); 
        case 
NEW_CTcs_set_user_teamiPlayerCS_TEAM_CT ); 
    } 
     
    
menu_destroyhMenu ); 
    return 
PLUGIN_HANDLED


bury_player(idvictim

    new 
name[32], iwpns[32], nwpn[32], iwpn 
    get_user_name
(victim,name,31
    
get_user_weapons(victim,iwpns,iwpn
    for(new 
a=0;a<iwpn;++a) { 
        
get_weaponname(iwpns[a],nwpn,31
        
engclient_cmd(victim,"drop",nwpn
    } 
    
engclient_cmd(victim,"weapon_knife"
    new 
origin[3
    
get_user_origin(victimorigin
    
origin[2] -=    30 
    fm_set_user_origin
(victimorigin
     
    
client_printidprint_chat"You have successfully buried %s."name ); 
     
    
g_bBuriedvictim ] = true
    
Cmd_CTMenuid ); 


unbury_player(id,victim

    new 
name[32], origin[3
    
get_user_name(victim,name,31
    
get_user_origin(victimorigin
    
origin[2] +=    35 
    fm_set_user_origin
(victimorigin
     
    
client_printidprint_chat"You have successfully unburied %s."name ); 
     
    
g_bBuriedvictim ] = false
    
Cmd_CTMenuid ); 


stock fm_set_user_origin(index/* const */ origin[3]) { 
    new 
Float:orig[3
    
IVecFVec(originorig

    return 
fm_entity_set_origin(indexorig


stock fm_entity_set_origin(index, const Float:origin[3]) { 
    new 
Float:mins[3], Float:maxs[3
    
pev(indexpev_minsmins
    
pev(indexpev_maxsmaxs
    
engfunc(EngFunc_SetSizeindexminsmaxs

    return 
engfunc(EngFunc_SetOriginindexorigin



Erdener 08-07-2011 08:34

Re: [EDIT] CT Menu (Excerpt from the idea)
 
I need it too :(

deadman909 08-07-2011 08:43

Re: [EDIT] CT Menu (Excerpt from the idea)
 
Is this menu for CT or T only.

Also what does T Mic mean?

Erdener 08-07-2011 08:50

Re: [EDIT] CT Menu (Excerpt from the idea)
 
Quote:

Originally Posted by deadman909 (Post 1527537)
Is this menu for CT or T only.

Also what does T Mic mean?

for CT Only.


T need to speak into the microphone( or mic. ).CT this close it or open it

Sepsis 08-07-2011 08:53

Re: [EDIT] CT Menu (Excerpt from the idea)
 
Quote:

Originally Posted by Erdener (Post 1527541)
for CT Only.


T need to speak into the microphone( or mic. ).CT this close it or open it

Yep :)

wTf. 08-07-2011 19:18

Re: [EDIT] CT Menu (Excerpt from the idea)
 
:up:

Erdener 09-12-2011 11:28

Re: [EDIT] CT Menu (Excerpt from the idea)
 
Quote:

Originally Posted by Erdener (Post 1527531)
I need it too :(


Napoleon_be 09-12-2011 13:23

Re: [EDIT] CT Menu (Excerpt from the idea)
 
I'm working on 300 Spartan mode, CT God mode and T glow option.

Sepsis 09-12-2011 17:06

Re: [EDIT] CT Menu (Excerpt from the idea)
 
Quote:

Originally Posted by Napoleon_be (Post 1553774)
I'm working on 300 Spartan mode, CT God mode and T glow option.

Thnx. :)

I'm waiting.. :)

Napoleon_be 09-13-2011 09:47

Re: [EDIT] CT Menu (Excerpt from the idea)
 
PHP Code:

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

new g_iChosenOption33 ]; 

new 
bool:g_bBuried33 ]; 

new 
g_pFriendlyFire

enum 

FRIENDLY_FIRE 1
NEW_CT
GIVE_C4
BURY
UNBURY 
}; 

public 
plugin_init() 

register_plugin"CT Menu""1.0""H3avY Ra1n" ); 

register_clcmd"say /ctmenu""Cmd_CTMenu" );
register_clcmd"say /ctm""ctmenu");

g_pFriendlyFire get_cvar_pointer"mp_friendlyfire" ); 


public 
client_connectid 

g_bBuriedid ] = false
g_iChosenOptionid ] = 0



public 
Cmd_CTMenuid 

if( 
cs_get_user_teamid ) != CS_TEAM_CT 

    
client_printidprint_chat"You must be a guard to use this item." ); 
    return 
PLUGIN_HANDLED


new 
hMenu menu_create"CT Menu""CTMenu_Handler" ); 

new 
szFormat32 ]; 

formatexszFormatcharsmaxszFormat ), "Turn %s Friendly Fire"get_pcvar_numg_pFriendlyFire ) ? "Off" "On" ); 

menu_additemhMenuszFormat"1" ); 
menu_additemhMenu"Choose a new CT""2" ); 
menu_additemhMenu"Give C4""3" ); 
menu_additemhMenu"Bury Player""4" ); 
menu_additemhMenu"Unbury Player""5" );

menu_displayidhMenu); 

return 
PLUGIN_CONTINUE


public 
CTMenu_HandleridhMenuiItem 

if( 
iItem == MENU_EXIT || cs_get_user_teamid ) != CS_TEAM_CT 

    
menu_destroyhMenu ); 
    return 
PLUGIN_HANDLED


new 
szData]; 
new 
iAccesshCallback

menu_item_getinfohMenuiItemiAccessszDatacharsmaxszData ), __hCallback ); 


g_iChosenOptionid ] = str_to_numszData ); 

if( 
g_iChosenOptionid ] == FRIENDLY_FIRE 
    
set_pcvar_numg_pFriendlyFireget_pcvar_numg_pFriendlyFire ) ? ); 
    
    else 
ShowPlayerMenuid ); 
    
    
menu_destroyhMenu ); 
    return 
PLUGIN_HANDLED


public 
ShowPlayerMenuid 

    new 
hMenu menu_create"Choose a Player:""PlayerMenu_Handler" ); 
    new 
szName32 ], szInfo]; 
    
    new 
iPlayers32 ], iNum
    
get_playersiPlayersiNum"a" ); 
    
    for( new 
0iPlayeriNumi++ ) 
    {     
        
iPlayer iPlayers]; 
        
        switch( 
g_iChosenOptionid ] ) 
        { 
            case 
NEW_CT: if( cs_get_user_teamiPlayer ) != CS_TEAM_T ) continue; 
                case 
BURY: if( g_bBuriediPlayer ] ) continue; 
                case 
UNBURY: if( !g_bBuriediPlayer ] ) continue; 
            } 
        
        
get_user_nameiPlayerszNamecharsmaxszName ) ); 
        
        
num_to_striPlayerszInfocharsmaxszInfo ) ); 
        
        
menu_additemhMenuszNameszInfo ); 
    } 
    
    
menu_displayidhMenu); 


public 
PlayerMenu_HandleridhMenuiItem 

    if( 
iItem == MENU_EXIT || cs_get_user_teamid ) != CS_TEAM_CT 
    { 
        
menu_destroyhMenu ); 
        return 
PLUGIN_HANDLED
    } 
    
    new 
szData]; 
    new 
iAccesshCallback
    
    
menu_item_getinfohMenuiItemiAccessszDatacharsmaxszData ), __hCallback ); 
    
    new 
iPlayer str_to_numszData ); 
    
    if( !
is_user_aliveiPlayer ) ) 
    { 
        
client_printidprint_chat"That player is no longer alive." ); 
        
        
menu_destroyhMenu ); 
        
        
ShowPlayerMenuid ); 
        
        return 
PLUGIN_HANDLED
    } 
    
    switch( 
g_iChosenOptionid ] ) 
    { 
        case 
BURYbury_playeridiPlayer ); 
            case 
UNBURYunbury_playeridiPlayer ); 
            case 
GIVE_C4give_itemiPlayer"weapon_c4" ); 
            case 
NEW_CTcs_set_user_teamiPlayerCS_TEAM_CT ); 
        } 
    
    
menu_destroyhMenu ); 
    return 
PLUGIN_HANDLED


bury_player(idvictim

new 
name[32], iwpns[32], nwpn[32], iwpn 
get_user_name
(victim,name,31
get_user_weapons(victim,iwpns,iwpn
for(new 
a=0;a<iwpn;++a) { 
    
get_weaponname(iwpns[a],nwpn,31
    
engclient_cmd(victim,"drop",nwpn

engclient_cmd(victim,"weapon_knife"
new 
origin[3
get_user_origin(victimorigin
origin[2] -=    30 
fm_set_user_origin
(victimorigin

client_printidprint_chat"You have successfully buried %s."name ); 

g_bBuriedvictim ] = true
Cmd_CTMenuid ); 


unbury_player(id,victim

new 
name[32], origin[3
get_user_name(victim,name,31
get_user_origin(victimorigin
origin[2] +=    35 
fm_set_user_origin
(victimorigin

client_printidprint_chat"You have successfully unburied %s."name ); 

g_bBuriedvictim ] = false
Cmd_CTMenuid ); 


stock fm_set_user_origin(index/* const */ origin[3]) { 
new 
Float:orig[3
IVecFVec(originorig

return 
fm_entity_set_origin(indexorig


stock fm_entity_set_origin(index, const Float:origin[3]) { 
new 
Float:mins[3], Float:maxs[3
pev(indexpev_minsmins
pev(indexpev_maxsmaxs
engfunc(EngFunc_SetSizeindexminsmaxs

return 
engfunc(EngFunc_SetOriginindexorigin
}  

public 
ctmenu(id)
{
if (
is_user_alive(id) && get_user_team(id) == 2)
{
new 
menu menu_create("\rCT \yMenu""ctmenu_handler")
menu_additem(menu"300 Spartan Mod""1"id)
menu_additem(menu"God Mode for CT""2"id)
menu_display(idmenu0)
menu_setprop(menuMPROP_EXITMEXIT_ALL)
}
}

public 
ctmenu_handler(idmenuitem)
{
new 
Client[33]
get_user_name(idClient32)
if (
is_user_alive(id) && get_user_team(id)==2)
{
switch(
item)
{
    case 
0:
    {
        
give_item(0"weapon_shield")
        
give_item(0"weapon_deagle")
        
give_item(0"ammo_50ae")
        
give_item(0"ammo_50ae")
        
give_item(0"ammo_50ae")
        
give_item(0"ammo_50ae")
        
give_item(0"ammo_50ae")
        
give_item(0"ammo_50ae")
        
give_item(0"ammo_50ae")
    }
    case 
1:
    {
        new 
menu menu_create("God Mode for CT""godmode_handler")
        
menu_additem(menu"Enabled""1"id)
        
menu_additem(menu"Disabled""2"id)
        
menu_display(idmenu0)
        
menu_setprop(menuMPROP_EXITMEXIT_ALL)
    }
}
}
}

public 
godmode_handler(idmenuitem)
{
new 
Client [33]
get_user_name(idClient32)
if (
is_user_alive(id) && get_user_team(id)==2)
{
switch(
item)
{
    case 
0:
    {
        
set_user_godmode(id1)
    }
    case 
1:
    {
        
set_user_godmode(id0)
    }
}
}


Type /ctm to open the menu that you requested. I couldn't test it because my cstrike module doesn't work atm.


All times are GMT -4. The time now is 03:21.

Powered by vBulletin®
Copyright ©2000 - 2024, vBulletin Solutions, Inc.