//#define engine
#include <amxmodx>
#include <amxmisc>
#include <fun>
#if defined engine
#include <engine>
#else
#include <fakemeta>
#endif
#define ADMIN_LEVEL_Q ADMIN_LEVEL_C
//Used for Grab
new maxplayers
new grab[33]
new Float:grab_totaldis[33]
new grab_speed_cvar
new grab_enabled_cvar
new bool:has_grab[33]
//Used for Hook
new bool:hook[33]
new hook_to[33][3]
new hook_speed_cvar
new hook_enabled_cvar
new bool:has_hook[33]
//Used for Rope
new bool:rope[33]
new rope_to[33][3]
new Float:rope_totaldis[33]
new rope_speed_cvar
new rope_enabled_cvar
new bool:has_rope[33]
//Used for All
new beamsprite
/****************************
Register Commands and CVARs
****************************/
public plugin_init()
{
register_plugin("Grab + Hook + Rope","1.0","GHW_Chronic")
register_concmd("+grab","grab_on",ADMIN_LEVEL_Q," - Use: bind key +grab")
register_concmd("-grab","grab_off")
register_concmd("grab_toggle","grab_toggle",ADMIN_LEVEL_Q,"Toggles your grab on and off")
register_concmd("+hook","hook_on",ADMIN_LEVEL_Q," - Use: bind key +hook")
register_concmd("-hook","hook_off")
register_concmd("hook_toggle","hook_toggle",ADMIN_LEVEL_Q,"Toggles your hook on and off")
register_concmd("+rope","rope_on",ADMIN_LEVEL_Q," - Use: bind key +rope")
register_concmd("-rope","rope_off")
register_concmd("rope_toggle","rope_toggle",ADMIN_LEVEL_Q,"Toggles your rope on and off")
register_concmd("amx_give_grab","cmd_givetake",ADMIN_LEVEL_Q,"Give a player the ability to grab <nick>")
register_concmd("amx_give_hook","cmd_givetake",ADMIN_LEVEL_Q,"Give a player the ability to hook <nick>")
register_concmd("amx_give_rope","cmd_givetake",ADMIN_LEVEL_Q,"Give a player the ability to rope <nick>")
register_concmd("amx_take_grab","cmd_givetake",ADMIN_LEVEL_Q,"Take a player's ability to grab <nick>")
register_concmd("amx_take_hook","cmd_givetake",ADMIN_LEVEL_Q,"Take a player's ability to hook <nick>")
register_concmd("amx_take_rope","cmd_givetake",ADMIN_LEVEL_Q,"Take a player's ability to rope <nick>")
register_concmd("amx_ghr_menu","menu_cmd",ADMIN_LEVEL_Q,"Shows a menu that allows you to turn on/off non-admin use of grab, hook, or rope")
register_menucmd(register_menuid("ghr_menu"),(1<<0)|(1<<1)|(1<<2)|(1<<9), "Pressedghr")
grab_speed_cvar = register_cvar("grab_speed","5")
grab_enabled_cvar = register_cvar("grab_enabled","0")
hook_speed_cvar = register_cvar("hook_speed","5")
hook_enabled_cvar = register_cvar("hook_enabled","0")
rope_speed_cvar = register_cvar("rope_speed","5")
rope_enabled_cvar = register_cvar("rope_enabled","0")
maxplayers = get_maxplayers()
//CVAR that is only used for tracking servers that use this plugin.
register_cvar("GHW_GHW","1",FCVAR_SERVER)
}
/**********************************
Register beam sprite + Hook Sound
**********************************/
public plugin_precache()
{
beamsprite = precache_model("sprites/dot.spr")
precache_sound("weapons/xbow_hit2.wav")
precache_sound("weapons/xbow_fire1.wav")
}
/*****************************
Reset VARs on client connect
*****************************/
public client_putinserver(id)
{
has_grab[id]=false
has_hook[id]=false
has_rope[id]=false
}
/*****
Menu
*****/
public menu_cmd(id,level,cid)
{
if(cmd_access(id,level,cid,1))
{
show_ghr(id)
console_print(id,"[AMXX] Menu launched.")
}
}
public show_ghr(id)
{
static aaa[32]
static bbb[32]
static ccc[32]
if(get_pcvar_num(grab_enabled_cvar)==0) format(aaa,31,"No")
else format(aaa,31,"Yes")
if(get_pcvar_num(hook_enabled_cvar)==0) format(bbb,31,"No")
else format(bbb,31,"Yes")
if(get_pcvar_num(rope_enabled_cvar)==0) format(ccc,31,"No")
else format(ccc,31,"Yes")
new menuBody[576]
if(colored_menus())
{
new len = format(menuBody,575,"\bAllow Players To Use:^n^n")
len += format(menuBody[len],575-len, "\w1. Grab\R\w%s^n",aaa)
len += format(menuBody[len],575-len, "\w2. Hook\R\w%s^n",bbb)
len += format(menuBody[len],575-len, "\w3. Rope\R\w%s^n",ccc)
len += format(menuBody[len],575-len, "\r0. Exit")
}
else
{
new len = format(menuBody,575,"Allow Players To Use:^n^n")
len += format(menuBody[len],575-len, "1. Grab\R%s^n",aaa)
len += format(menuBody[len],575-len, "2. Hook\R%s^n",bbb)
len += format(menuBody[len],575-len, "3. Rope\R%s^n",ccc)
len += format(menuBody[len],575-len, "0. Exit")
}
show_menu(id,(1<<0)|(1<<1)|(1<<2)|(1<<9),menuBody,-1,"ghr_menu")
return PLUGIN_CONTINUE
}
public Pressedghr(id,key)
{
switch(key)
{
case 0:
{
if(get_pcvar_num(grab_enabled_cvar)==0)
{
set_pcvar_num(grab_enabled_cvar,1)
client_print(0,print_chat,"[AMXX] Admin has enabled Grab for all clients. Use: bind key +grab")
}
else
{
set_pcvar_num(grab_enabled_cvar,0)
client_print(0,print_chat,"[AMXX] Admin has disabled Grab for all non-admins.")
}
show_ghr(id)
}
case 1:
{
if(get_pcvar_num(hook_enabled_cvar)==0)
{
set_pcvar_num(hook_enabled_cvar,1)
client_print(0,print_chat,"[AMXX] Admin has enabled Hook for all clients. Use: bind key +hook")
}
else
{
set_pcvar_num(hook_enabled_cvar,0)
client_print(0,print_chat,"[AMXX] Admin has disabled Hook for all non-admins.")
}
show_ghr(id)
}
case 2:
{
if(get_pcvar_num(rope_enabled_cvar)==0)
{
set_pcvar_num(rope_enabled_cvar,1)
client_print(0,print_chat,"[AMXX] Admin has enabled Rope for all clients. Use: bind key +rope")
}
else
{
set_pcvar_num(rope_enabled_cvar,0)
client_print(0,print_chat,"[AMXX] Admin has disabled Rope for all non-admins.")
}
show_ghr(id)
}
}
}
/****************
Handle Commands
****************/
public cmd_givetake(id,level,cid)
{
if(!cmd_access(id,level,cid,2))
{
return PLUGIN_HANDLED
}
new arg1[32]
read_argv(1,arg1,31)
new target = cmd_target(id,arg1,9)
if(!target)
{
return PLUGIN_HANDLED
}
new name[32]
get_user_name(target,name,31)
if(get_user_flags(target) & ADMIN_LEVEL_Q)
{
console_print(id,"[AMXX] Cannot give/take grab/hook/rope from admin %s.",name)
return PLUGIN_HANDLED
}
new arg0[32]
read_argv(0,arg0,31)
if(containi(arg0,"give")!=-1)
{
if(containi(arg0,"grab")!=-1)
{
if(has_grab[target])
{
console_print(id,"[AMXX] %s already has grab",name)
}
else
{
has_grab[target]=true
console_print(id,"[AMXX] %s has been given grab",name)
client_print(target,print_chat,"[AMXX] An admin has given you grab. Use: bind key +grab")
}
}
else if(containi(arg0,"hook")!=-1)
{
if(has_hook[target])
{
console_print(id,"[AMXX] %s already has hook",name)
}
else
{
has_hook[target]=true
console_print(id,"[AMXX] %s has been given hook",name)
client_print(target,print_chat,"[AMXX] An admin has given you hook. Use: bind key +hook")
}
}
else if(containi(arg0,"rope")!=-1)
{
if(has_rope[target])
{
console_print(id,"[AMXX] %s already has rope",name)
}
else
{
has_rope[target]=true
console_print(id,"[AMXX] %s has been given rope",name)
client_print(target,print_chat,"[AMXX] An admin has given you hook. Use: bind key +rope")
}
}
}
if(containi(arg0,"take")!=-1)
{
if(containi(arg0,"grab")!=-1)
{
if(!has_grab[target])
{
console_print(id,"[AMXX] %s doesn't have grab",name)
}
else
{
has_grab[target]=false
console_print(id,"[AMXX] %s's grab has been taken away.",name)
client_print(target,print_chat,"[AMXX] An admin has taken your grab away.")
}
}
if(containi(arg0,"hook")!=-1)
{
if(!has_hook[target])
{
console_print(id,"[AMXX] %s doesn't have hook",name)
}
else
{
has_hook[target]=false
console_print(id,"[AMXX] %s's hook has been taken away.",name)
client_print(target,print_chat,"[AMXX] An admin has taken your hook away.")
}
}
if(containi(arg0,"rope")!=-1)
{
if(!has_rope[target])
{
console_print(id,"[AMXX] %s doesn't have rope",name)
}
else
{
has_rope[target]=false
console_print(id,"[AMXX] %s's rope has been taken away.",name)
client_print(target,print_chat,"[AMXX] An admin has taken your rope away.")
}
}
}
return PLUGIN_HANDLED
}
/*****
Grab
*****/
public grab_toggle(id,level,cid)
{
if(grab[id]) grab_off(id)
else grab_on(id,level,cid)
return PLUGIN_HANDLED
}
public grab_on(id,level,cid)
{
if(!has_grab[id] && !get_pcvar_num(grab_enabled_cvar) && !cmd_access(id,level,cid,1))
{
return PLUGIN_HANDLED
}
if(grab[id])
{
return PLUGIN_HANDLED
}
grab[id]=-1
static target, trash
target=0
get_user_aiming(id,target,trash)
if(target && is_valid_ent2(target) && target!=id)
{
if(target<=maxplayers)
{
if(is_user_alive(target) && !(get_user_flags(target) & ADMIN_IMMUNITY))
{
client_print(id,print_chat,"[AMXX] Found Target")
grabem(id,target)
}
}
else if(get_solidity(target)!=4)
{
client_print(id,print_chat,"[AMXX] Found Target")
grabem(id,target)
}
}
else
{
client_print(id,print_chat,"[AMXX] Searching for Target")
set_task(0.1,"grab_on2",id)
}
return PLUGIN_HANDLED
}
public grab_on2(id)
{
if(is_user_connected(id))
{
static target, trash
target=0
get_user_aiming(id,target,trash)
if(target && is_valid_ent2(target) && target!=id)
{
if(target<=maxplayers)
{
if(is_user_alive(target) && !(get_user_flags(target) & ADMIN_IMMUNITY))
{
client_print(id,print_chat,"[AMXX] Found Target")
grabem(id,target)
}
}
else if(get_solidity(target)!=4)
{
client_print(id,print_chat,"[AMXX] Found Target")
grabem(id,target)
}
}
else
{
set_task(0.1,"grab_on2",id)
}
}
}
public grabem(id,target)
{
grab[id]=target
set_rendering2(target,kRenderFxGlowShell,255,0,0,kRenderTransAlpha,70)
if(target<=maxplayers) set_user_gravity(target,0.0)
grab_totaldis[id] = 0.0
set_task(0.1,"grab_prethink",id+1000,"",0,"b")
grab_prethink(id+1000)
emit_sound(id,CHAN_VOICE,"weapons/xbow_fire1.wav", 1.0, ATTN_NORM, 0, PITCH_NORM)
}
public grab_off(id)
{
if(is_user_connected(id))
{
if(grab[id]==-1)
{
client_print(id,print_chat,"[AMXX] No Target Found")
grab[id]=0
}
else if(grab[id])
{
client_print(id,print_chat,"[AMXX] Target Released")
set_rendering2(grab[id])
if(grab[id]<=maxplayers && is_user_alive(grab[id])) set_user_gravity(grab[id],1.0)
grab[id]=0
}
}
return PLUGIN_HANDLED
}
public grab_prethink(id)
{
id -= 1000
if(!is_user_connected(id) && grab[id]>0)
{
set_rendering2(grab[id])
if(grab[id]<=maxplayers && is_user_alive(grab[id])) set_user_gravity(grab[id],1.0)
grab[id]=0
}
if(!grab[id] || grab[id]==-1)
{
remove_task(id+1000)
return PLUGIN_HANDLED
}
//Get Id's, target's, and Where Id is looking's origins
static origin1[3]
get_user_origin(id,origin1)
static Float:origin2_F[3], origin2[3]
get_origin(grab[id],origin2_F)
origin2[0] = floatround(origin2_F[0])
origin2[1] = floatround(origin2_F[1])
origin2[2] = floatround(origin2_F[2])
static origin3[3]
get_user_origin(id,origin3,3)
//Create red beam
message_begin(MSG_BROADCAST,SVC_TEMPENTITY)
write_byte(1) //TE_BEAMENTPOINT
write_short(id) // start entity
write_coord(origin2[0])
write_coord(origin2[1])
write_coord(origin2[2])
write_short(beamsprite)
write_byte(1) // framestart
write_byte(1) // framerate
write_byte(1) // life in 0.1's
write_byte(5) // width
write_byte(0) // noise
write_byte(255) // red
write_byte(0) // green
write_byte(0) // blue
write_byte(200) // brightness
write_byte(0) // speed
message_end()
//Convert to floats for calculation
static Float:origin1_F[3]
static Float:origin3_F[3]
origin1_F[0] = float(origin1[0])
origin1_F[1] = float(origin1[1])
origin1_F[2] = float(origin1[2])
origin3_F[0] = float(origin3[0])
origin3_F[1] = float(origin3[1])
origin3_F[2] = float(origin3[2])
//Calculate target's new velocity
static Float:distance[3]
if(!grab_totaldis[id])
{
distance[0] = floatabs(origin1_F[0] - origin2_F[0])
distance[1] = floatabs(origin1_F[1] - origin2_F[1])
distance[2] = floatabs(origin1_F[2] - origin2_F[2])
grab_totaldis[id] = floatsqroot(distance[0]*distance[0] + distance[1]*distance[1] + distance[2]*distance[2])
}
distance[0] = origin3_F[0] - origin1_F[0]
distance[1] = origin3_F[1] - origin1_F[1]
distance[2] = origin3_F[2] - origin1_F[2]
static Float:grab_totaldis2
grab_totaldis2 = floatsqroot(distance[0]*distance[0] + distance[1]*distance[1] + distance[2]*distance[2])
static Float:que
que = grab_totaldis[id] / grab_totaldis2
static Float:origin4[3]
origin4[0] = ( distance[0] * que ) + origin1_F[0]
origin4[1] = ( distance[1] * que ) + origin1_F[1]
origin4[2] = ( distance[2] * que ) + origin1_F[2]
static Float:velocity[3]
velocity[0] = (origin4[0] - origin2_F[0]) * (get_pcvar_float(grab_speed_cvar) / 1.666667)
velocity[1] = (origin4[1] - origin2_F[1]) * (get_pcvar_float(grab_speed_cvar) / 1.666667)
velocity[2] = (origin4[2] - origin2_F[2]) * (get_pcvar_float(grab_speed_cvar) / 1.666667)
set_velo(grab[id],velocity)
return PLUGIN_CONTINUE
}
/*****
Hook
*****/
public hook_toggle(id,level,cid)
{
if(hook[id]) hook_off(id)
else hook_on(id,level,cid)
return PLUGIN_HANDLED
}
public hook_on(id,level,cid)
{
if(!has_hook[id] && !get_pcvar_num(hook_enabled_cvar) && !cmd_access(id,level,cid,1))
{
return PLUGIN_HANDLED
}
if(hook[id])
{
return PLUGIN_HANDLED
}
set_user_gravity(id,0.0)
set_task(0.1,"hook_prethink",id+10000,"",0,"b")
hook[id]=true
hook_to[id][0]=999999
hook_prethink(id+10000)
emit_sound(id,CHAN_VOICE,"weapons/xbow_hit2.wav", 1.0, ATTN_NORM, 0, PITCH_NORM)
return PLUGIN_HANDLED
}
public hook_off(id)
{
if(is_user_alive(id)) set_user_gravity(id)
hook[id]=false
return PLUGIN_HANDLED
}
public hook_prethink(id)
{
id -= 10000
if(!is_user_alive(id))
{
hook[id]=false
}
if(!hook[id])
{
remove_task(id+10000)
return PLUGIN_HANDLED
}
//Get Id's origin
static origin1[3]
get_user_origin(id,origin1)
if(hook_to[id][0]==999999)
{
static origin2[3]
get_user_origin(id,origin2,3)
hook_to[id][0]=origin2[0]
hook_to[id][1]=origin2[1]
hook_to[id][2]=origin2[2]
}
//Create blue beam
message_begin(MSG_BROADCAST,SVC_TEMPENTITY)
write_byte(1) //TE_BEAMENTPOINT
write_short(id) // start entity
write_coord(hook_to[id][0])
write_coord(hook_to[id][1])
write_coord(hook_to[id][2])
write_short(beamsprite)
write_byte(1) // framestart
write_byte(1) // framerate
write_byte(2) // life in 0.1's
write_byte(5) // width
write_byte(0) // noise
write_byte(0) // red
write_byte(0) // green
write_byte(255) // blue
write_byte(200) // brightness
write_byte(0) // speed
message_end()
//Calculate Velocity
static Float:velocity[3]
velocity[0] = (float(hook_to[id][0]) - float(origin1[0])) * 3.0
velocity[1] = (float(hook_to[id][1]) - float(origin1[1])) * 3.0
velocity[2] = (float(hook_to[id][2]) - float(origin1[2])) * 3.0
static Float:y
y = velocity[0]*velocity[0] + velocity[1]*velocity[1] + velocity[2]*velocity[2]
static Float:x
x = (get_pcvar_float(hook_speed_cvar) * 120.0) / floatsqroot(y)
velocity[0] *= x
velocity[1] *= x
velocity[2] *= x
set_velo(id,velocity)
return PLUGIN_CONTINUE
}
/*****
Rope
*****/
public rope_toggle(id,level,cid)
{
if(rope[id]) rope_off(id)
else rope_on(id,level,cid)
return PLUGIN_HANDLED
}
public rope_on(id,level,cid)
{
if(!has_rope[id] && !get_pcvar_num(rope_enabled_cvar) && !cmd_access(id,level,cid,1))
{
return PLUGIN_HANDLED
}
if(rope[id])
{
return PLUGIN_HANDLED
}
set_task(0.1,"rope_prethink",id+100000,"",0,"b")
rope[id]=true
rope_to[id][0]=999999
rope_prethink(id+100000)
emit_sound(id,CHAN_VOICE,"weapons/xbow_hit2.wav", 1.0, ATTN_NORM, 0, PITCH_NORM)
return PLUGIN_HANDLED
}
public rope_off(id)
{
rope[id]=false
return PLUGIN_HANDLED
}
public rope_prethink(id)
{
id -= 100000
if(!is_user_alive(id))
{
rope[id]=false
}
if(!rope[id])
{
remove_task(id+100000)
return PLUGIN_HANDLED
}
//Get Id's origin
static origin1[3]
get_user_origin(id,origin1)
static Float:origin1_F[3]
origin1_F[0] = float(origin1[0])
origin1_F[1] = float(origin1[1])
origin1_F[2] = float(origin1[2])
//Check to see if this is the first time prethink is being run
if(rope_to[id][0]==999999)
{
static origin2[3]
get_user_origin(id,origin2,3)
rope_to[id][0]=origin2[0]
rope_to[id][1]=origin2[1]
rope_to[id][2]=origin2[2]
static Float:origin2_F[3]
origin2_F[0] = float(origin2[0])
origin2_F[1] = float(origin2[1])
origin2_F[2] = float(origin2[2])
static Float:distance[3]
distance[0] = floatabs(origin1_F[0] - origin2_F[0])
distance[1] = floatabs(origin1_F[1] - origin2_F[1])
distance[2] = floatabs(origin1_F[2] - origin2_F[2])
rope_totaldis[id] = floatsqroot(distance[0]*distance[0] + distance[1]*distance[1] + distance[2]*distance[2])
}
//Create green beam
message_begin(MSG_BROADCAST,SVC_TEMPENTITY)
write_byte(1) //TE_BEAMENTPOINT
write_short(id) // start entity
write_coord(rope_to[id][0])
write_coord(rope_to[id][1])
write_coord(rope_to[id][2])
write_short(beamsprite)
write_byte(1) // framestart
write_byte(1) // framerate
write_byte(1) // life in 0.1's
write_byte(5) // width
write_byte(0) // noise
write_byte(0) // red
write_byte(255) // green
write_byte(0) // blue
write_byte(200) // brightness
write_byte(0) // speed
message_end()
//Calculate Velocity
static Float:velocity[3]
get_velo(id,velocity)
static Float:velocity2[3]
velocity2[0] = (rope_to[id][0] - origin1_F[0]) * 3.0
velocity2[1] = (rope_to[id][1] - origin1_F[1]) * 3.0
static Float:y
y = velocity2[0]*velocity2[0] + velocity2[1]*velocity2[1]
static Float:x
x = (get_pcvar_float(rope_speed_cvar) * 20.0) / floatsqroot(y)
velocity[0] += velocity2[0]*x
velocity[1] += velocity2[1]*x
if(rope_to[id][2] - origin1_F[2] >= rope_totaldis[id] && velocity[2]<0.0) velocity[2] *= -1
set_velo(id,velocity)
return PLUGIN_CONTINUE
}
public get_origin(ent,Float:origin[3])
{
#if defined engine
return entity_get_vector(id,EV_VEC_origin,origin)
#else
return pev(ent,pev_origin,origin)
#endif
}
public set_velo(id,Float:velocity[3])
{
#if defined engine
return set_user_velocity(id,velocity)
#else
return set_pev(id,pev_velocity,velocity)
#endif
}
public get_velo(id,Float:velocity[3])
{
#if defined engine
return get_user_velocity(id,velocity)
#else
return pev(id,pev_velocity,velocity)
#endif
}
public is_valid_ent2(ent)
{
#if defined engine
return is_valid_ent(ent)
#else
return pev_valid(ent)
#endif
}
public get_solidity(ent)
{
#if defined engine
return entity_get_int(ent,EV_INT_solid)
#else
return pev(ent,pev_solid)
#endif
}
stock set_rendering2(index, fx=kRenderFxNone, r=255, g=255, b=255, render=kRenderNormal, amount=16)
{
#if defined engine
return set_rendering(index,fx,r,g,b,render,amount)
#else
set_pev(index, pev_renderfx, fx);
new Float:RenderColor[3];
RenderColor[0] = float(r);
RenderColor[1] = float(g);
RenderColor[2] = float(b);
set_pev(index, pev_rendercolor, RenderColor);
set_pev(index, pev_rendermode, render);
set_pev(index, pev_renderamt, float(amount));
return 1;
#endif
}
World of Warcraft
