Raised This Month: $51 Target: $400
 12% 

Internal error. Help!


Post New Thread Reply   
 
Thread Tools Display Modes
Author Message
Z1PAS
Junior Member
Join Date: Aug 2018
Location: Lithuania
Old 08-29-2018 , 06:05   Internal error. Help!
Reply With Quote #1

i get error message form amxmodx compiler when i run i says internal error how to fix ?

PHP Code:
#include <amxmodx> 
#include <fun> 
#include <cstrike> 
#include <hamsandwich> 
#include <fakemeta> 
#include <engine> 

new const VERSION [] = "1.0"
#define FROST_RADIUS 240.0 
#define FROST_R 0 
#define FROST_G 206 
#define FROST_B 209 
#define MAX_DISTANCE 100.0 
#define MAX_DAMAGE 25.0 

new Floatg_TotemPoleDelay [33]; 

#define is_user (% 1) (1 <=% 1 <maxPlayers) 


new const g_vipflag ADMIN_LEVEL_G 
new boolblockrevive [33], opens [33], u_knife [33], blockopens [33], blockpechmenu knifespeed [33], blockknife [33], blocklight [33], blocklov [33], traps [33
new 
blockhparmorspeedgravitymoneyblockpechexploSprblocklightsblockg_lighton 
new maxPlayersg_ScreenFade

public 
plugin_init () 

register_plugin "VIP MENU""3.0""Credits: Crizzatu / Author: Crash94"

register_clcmd "vip_menu_zona" "open_vipmenu"
register_clcmd "say / vipmenu" "open_vipmenu"
register_clcmd "say / vips""ShowVipsOnline"ADMIN_ALL"Show Vips Online"); 

block register_cvar ("jb_vipmenu_blockopens""10"
blockpech register_cvar ("jb_vipmenu_blockspech"


= Register_cvar ( "
jb_vipmenu_hp", "170") 
Armor = register_cvar ( "
jb_vipmenu_armor", "130") 
speed = register_cvar ( "
jb_vipmenu_speed" "800.0") 
gravity = register_cvar ( "
jb_vipmenu_gravity", "0.4") 
Money = register_cvar ( "
jb_vipmenu_money", "16000") 

RegisterHam (Ham_TraceAttack "
func_door_rotating" "open_door") 
RegisterHam (Ham_TraceAttack "
func_door" "open_door") 
register_event ( "
CurWeapon" "Event_CurWeapon", "be", "") 
register_event (" 
CurWeapon "," switchweapon "," be "," "," 229
register_forward (FM_EmitSound"fw_EmitSound"
RegisterHam (Ham_Spawn"player""Spawn_player"1
RegisterHam (Ham_TakeDamage"Player""Player_TakeDamage"
register_event ("ResetHUD""ResetHUD""abe"

register_message (get_user_msgid ("ScoreAttrib"), "VipStatus"); 
g_ScreenFade get_user_msgid ("ScreenFade"); 

register_dictionary ("vipmenu.txt"); 

maxPlayers get_maxplayers (); 


Public 
Spawn_player (id

if (
is_user_alive (id) && is_user_connected (id)) 

blockrevive [id] = false
blockknife [id] = false








Public 
plugin_precache () 

precache_model "models / JbVipMenu / v_axe.mdl"
precache_model "models / JbVipMenu / v_hammer.mdl"
precache_model "models / JbVipMenu / v_stik.mdl"
precache_model "models / JbVipMenu / v_knifevip .mdl "
precache_model (" models / JbVipMenu / v_kogti.mdl "
precache_model (" models / JbVipMenu / p_axe.mdl "
precache_model (" models / JbVipMenu / p_hammer.mdl "
precache_model (" models / JbVipMenu / p_stik.mdl " 
precache_model (" models / JbVipMenu / p_knifevip.mdl "
precache_model (" models / JbVipMenu / p_kogti.mdl "
precache_model 

precache_sound ("JbVipMenu / hammer / knife_slash1_off.wav"
precache_sound "JbVipMenu / hammer / hit2.wav"
precache_sound "JbVipMenu / hammer / hit1.wav"
precache_sound "JbVipMenu / hammer / knifedeploy.wav"
precache_sound "JbVipMenu / hammer / knife_stab123.wav"

precache_sound "JbVipMenu / strong / knife_slash1.wav"
precache_sound "JbVipMenu / strong / knife_hit1.wav"
precache_sound "JbVipMenu / strong / knife_hit2.wav"
precache_sound "JbVipMenu / strong / knife_stab.wav"
precache_sound "JbVipMenu /strong/knife_deploy1.wav "
precache_sound (" JbVipMenu / strong / frostnova.wav "

precache_sound (" JbVipMenu / ax / knife_slash1.wav " 
precache_sound ("JbVipMenu / ax / knife_hit1.wav"
precache_sound "JbVipMenu / axle / knife_hit2.wav"
precache_sound "JbVipMenu / axle / knife_stab.wav"
precache_sound "JbVipMenu / axle / knife_deploy1.wav"

precache_sound "JbVipMenu / m9co / knife_slash1.wav"
precache_sound "JbVipMenu / m9co / knife_hit1.wav"
precache_sound "JbVipMenu / m9co / knife_hit2.wav"
precache_sound "JbVipMenu / m9co / knife_stab.wav"
precache_sound "JbVipMenu / m9co / knife_deploy1.wav"

precache_sound "JbVipMenu ) Precache_sound 
("
JbVipMenu Skull knife_draw.wav") 
precache_sound ("
JbVipMenu Skull knife_white.wav") 
precache_sound (" 
JbVipMenu Skull knife_hit.wav ")
precache_sound ("
JbVipMenu Skull knife_miss.wav") 
precache_sound ("
JbVipMenu trap trap.wav") 

exploSpr = precache_model ("
sprites shockwave.spr"); 


Stock ChatColor (const id, input const [] Any ...) 

new count = 1, players [32] 
Static msg [191] 
vformat (msg, 190, sector, 3) 

replace_all (msg, 190 ' ! g "
," ^ 4 "
replace_all (msg190"! y ","? 1 "
replace_all (msg190,!" team "," ^ 3 "

if (
idplayers [0] = id; else get_players (playerscount"ch"

for (new 
0<count



message_begin (MSG_ONE_UNRELIABLEget_user_msgid ("SayText"), _players [i]); 
write_byte (players [i]); 
write_string (msg); 
MESSAGE_END (); 





Public 
ResetHUD (id

knifeblock (ID
return 
PLUGIN_CONTINUE 


public 
knifeblock (id

new 
TS
for (
0<= get_maxplayers (); ++) 
if (
is_user_alive (i) && get_user_team (i) == 1
ts ++; 
if (
ts == 1

u_knife [id] = 

return 
PLUGIN_CONTINUE 


Boolis_user_vip (id

if (
id <|| id32
return 
false 

if (! (Get_user_flags (ID) & g_vipflag)) 
return 
false 

return true 


public 
Event_CurWeapon (player

if (! 
U_knife [player 
return 
PLUGIN_CONTINUE 

if (! is_user_viv (player)) 
return 
PLUGIN_CONTINUE 

if (read_data (2) == CSW_KNIFE && u_knife [player] == 1

set_pev (playermodel_viewmodel2models JbVipMenu /v_stik.mdl ") 
set_pev (player, model_weaponmodel2," 
models JbVipMenu p_stik.mdl ") 


if (read_data (2) == CSW_KNIFE && u_knife [player] == 2) 

set_pev (player, model_viewmodel2, models / JbVipMenu / v_axe.mdl) 
set_pev (player, model_weaponmodel2, ) 


if (read_data (2) == CSW_KNIFE && u_knife [player] == 3) 

set_pev (player, model_viewmodel2, "
models JbVipMenu v_hammer.mdl") 
set_pev (player, model_weaponmodel2, models / JbVipMenu / p_hammer. mdl "



if (
read_data (2) && CSW_KNIFE u_knife == [player] == 4

set_pev (player pev_viewmodel2," models / JbVipMenu / v_knifevip.mdl "
set_pev (playermod_weaponmodel2"models / JbVipMenu / p_knifevip.mdl")


if (
read_data (2) == CSW_KNIFE && u_knife [player] == 5

set_pev (playermodel_viewmodel2"models / JbVipMenu / v_kogti.mdl"
set_pev (playermodel_weaponmodel2models JbVipMenu p_kogti.mdl 


return PLUGIN_CONTINUE 


public open_vipmenu (id) 


if (! is_user_vip (id)) 

ChatColor (id,"
", 0," NO_ASSES ") 
return PLUGIN_HANDLED 
} new szText [555 char]; 

formatex (szText, charsmax (szText), "
L", id, "MAIN_MENU_TITLE"); 

new menu = menu_create (szText, "
vipmenu_handler"); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_1"); 
menu_additem (menu, szText, "
1", 0); 

if (get_user_team (id) == 1) 

formatex (szText, charsmax (szText), "
L", id, "ITEM_2"); 
menu_additem (menu, szText, "
2", 0); 
} else { 
formatex (szText, charsmax (szText), "
L", id, "ITEM_2_2"); 
menu_additem (menu, szText, "
2", ADMIN_ADMIN); 


if (! blockrevive [id]) 

formatex (szText, charsmax (szText), "
L", id, "ITEM_3"); 
menu_additem (menu, szText, "
3", 0); 


menu_additem (menu, szText, "
3", ADMIN_ADMIN); 


formatex (szText, charsmax (szText), "
L", id, "ITEM_4"); 
menu_additem (menu, szText, "
4", 0); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_5"); 
menu_additem (menu, szText, "
5", 0); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_6"); 
menu_additem (menu, szText, "
6", 0); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_7"); 
menu_additem (menu, szText, "
7", 0); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_8"); 
menu_additem (menu, szText, "
8", 0); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_9"); 
menu_additem (menu, szText, "
9", 0); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_10"); 
menu_additem (menu, szText, "
10", 0); 

formatex (szText, charsmax (szText), "
L", id, "ITEM_11"); 
menu_additem (menu, szText, "
11", 0); 

menu_setprop (menu, MPROP_EXIT, MEXIT_ALL); 
menu_setprop (menu, MPROP_NEXTNAME, "
Drop") 
menu_setprop (menu, MPROP_BACKNAME, "
Back") 
menu_setprop (menu, MPROP_EXITNAME, "
Input") 

menu_display (id, menu, 0); 

return PLUGIN_CONTINUE; 


public vipmenu_handler (id, menu, 



menu_destroy (menu); 
return PLUGIN_HANDLED; 


new data [6], iName [64], access, callback; 
menu_item_getinfo (menu, item, access, data, charsmax (data), iName, charsmax (iName), callback); 

new key = str_to_num (data); 

switch (key) 

case 1: 

if (is_user_alive (id)) 

weapon (ID) 
ChatColor (id, "
L" 0 "weapons") 

else 

ChatColor (id, "
L" 0, "YOUR_DEAD") 



Case 2: 

if (is_user_alive (id)) 

begmenu (id) 

else 

ChatColor (id, "
L" 0 "YOUR_DEAD ') 



Case 3: 

if (! Is_user_alive (id)) 

ExecuteHamB (Ham_CS_RoundRespawn, id) 
blockrevive [id] = true 
ChatColor (id, "% L", 0, "ALIVE") 

else } 

id ("get_pcvar_num (id,"% L ", 0," YOUR_ALIVE ") 



case 4: 

if_user_alive (id)) 

set_user_health (id, get_pcvar_num (hp 

ChatColor (id, "% L", 0, "HP_AR") 

else 

ChatColor (id, "% L", 0, "YOUR_DEAD" ) 



Case 5: 

if (is_user_alive (id)) 

cs_set_user_money (id, get_pcvar_num (money) 1) 
ChatColor (id, "% L" 0 "MONEY") 

else 

ChatColor (id, "% L" 0, "YOUR_DEAD") 



case 6: 

if (is_user_alive (id)) 

message_begin (MSG_ONE, get_user_msgid ("SetFOV"), {0, 0, 0} id) 
write_byte (180) 
MESSAGE_END () 
ChatColor (id, "% L" 0 "nark") 

else 

ChatColor (id, "% L" 0 "YOUR_DEAD '




Case 
7

if (
is_user_alive (id)) 

give_item (id"weapon_flashbang"
give_item 
id"weapon_flashbang"
give_item (id"weapon_smokegrenade" )
ChatColor (id"% L" "grenade"

else 

ChatColor (id"% L" "YOUR_DEAD ') 



Case 8: 

if (is_user_alive (id)) 

give_item (id "
weapon_shield") 
set_user_armor (id, 100) 
ChatColor (id, "
L" 0 "SPECH") 

else 

ChatColor (id, "
R" 0 "YOUR_DEAD")



Case 9: 

if (is_user_alive (id)) 

set_user_maxspeed (id, get_pcvar_float (speed)) 
ChatColor (id, "
L" 0 "SPEED") 

else 

ChatColor (id, "
L" 0, "YOUR_DEAD") 



case 10: 

if (is_user_alive (id)) 

set_user_gravity (id, get_pcvar_float (gravity)) 
{Id = "
L", 0, "GRAVITY") 

else 

ChatColor (id, "
L", 0, "YOUR_DEAD") 



case 11: 

if_user_alive (id) 

cs_set_user_bpammo , Cs_set_user_bpammo 
(id, CSW_AKMAS, 5000) 
cs_set_user_bpammo (id, CSW_AKMAS, 5000 

cs_set_user_bpammo (id, CSW_AKMAS, 5000) cs_set_user_bpammo 
cs_set_user_bpammo (id, CSW_GALIL, 5000) 
cs_set_user_bpammo (id, CSW_GLOCK18,5000) 
cs_set_user_bpammo (id, CSW_XM1014,5000)    
cs_set_user_bpammo (id, CSW_MP5NAVY, 5000)    
cs_set_user_bpammo (id, CSW_M4A1,5000) 
ChatColor (id, "
L" 0 "AMMO") 

else 

ChatColor (id, "
L" 0 "YOUR_DEAD ') 



return PLUGIN_HANDLED; 




public open_door (this, idattacker, Float: damage, Float: direction [3], tracehandle, damagebits) 

if (Owens [idattacker]) 

dllfunc (DLLFunc_Use, this, idattacker) 
Opens [idattacker] = 0 



public weapon ( id) 

new szText [555 char]; 
formatex (szText, charsmax (szText), "% L", id, "MENU_WEAPON_TITLE", VERSION); 

new menu = menu_create (szText, "weapon_handler"); 

if (get_user_team (id) == 1 && get_user_flags (id) & ADMIN_CVAR) 

formatex (szText, charsmax (szText), "% L", id, "WEAPON_ITEM_1_3"); 
menu_additem (menu, szText, " 
} else 
if (get_user_flags (ID) & ADMIN_CVAR get_user_team && (id) == 2) 

if (blockspechmenu [id] <= 0) 

Formatex (szText, charsmax (szText), "% L" id "WEAPON_ITEM_1" ) 
menu_additem (menu, szText, "1", 0); 
} else { 
formatex (szText, charsmax (szText), "% L", id, "WEAPON_ITEM_1_1", blockpechmenu [id]); 
menu_additem (menu, szText, "1", ADMIN_ADMIN); 

} else { 
formatex (szText, charsmax (szText), "% L", id, "WEAPON_ITEM_1_2"); 
menu_additem (menu, szText, "1", ADMIN_ADMIN); 




formatex (szText, charsmax (szText), "% L", id, "WEAPON_ITEM_2"); 
menu_additem (menu, szText, "2", 0); 
} else { 
formatex (szText, charsmax (szText), "% L", id, "WEAPON_ITEM_2_1"); 
menu_additem (menu, szText, "2", ADMIN_ADMIN); 


menu_display (id, menu, 0); 

menu_setprop (menu, MPROP_EXIT, MEXIT_ALL); 
menu_setprop (menu, MPROP_NEXTNAME, "Drop") 
menu_setprop (menu, MPROP_BACKNAME, "Back") 
menu_setprop (menu, MPROP_EXITNAME, "Input") 

return PLUGIN_CONTINUE; 


public weapon_handler (id, menu, 



menu_destroy (menu); 
return PLUGIN_HANDLED; 


new data [6], iName [64], access, callback; 
menu_item_getinfo (menu, item, access, data, charsmax (data), iName, charsmax (iName), callback); 

new key = str_to_num (data); 

switch (key) 

case 1: 

weaponct (id) 


case 2: 

knifeweapon (id) 


return PLUGIN_CONTINUE; 


public weaponct (id) 

new szText [555 char]; 

formatex (szText, charsmax (szText), "% L", id, "MENU_CPES_TITLE"); 
new menu = menu_create (szText, "weaponct_handler"); 

formatex (szText, charsmax (szText), "% L", id, "CPES_ITEM_1"); 
menu_additem (menu, szText, "1", 0); 

formatex (szText, charsmax (szText), "% L", id, "CPES_ITEM_2"); 
menu_additem (menu, szText, "2", 0); 

formatex (szText, charsmax (szText), "% L", id, "CPES_ITEM_3"); 
menu_additem (menu, szText, "3", 0); 

menu_display (id, menu, 0); 

menu_setprop (menu, MPROP_EXIT, MEXIT_ALL); 
menu_setprop (menu, MPROP_NEXTNAME, " 

menu_setprop (menu, MPROP_EXITNAME, "Input") 

return PLUGIN_CONTINUE; 


public weaponct_handler (id, menu, item) 

if (item == MENU_EXIT) 

menu_destroy (menu); 
return PLUGIN_HANDLED; 


new data [6], iName [64], access, callback; 
menu_item_getinfo (menu, item, access, data, charsmax (data), iName, charsmax (iName), callback); 

new key = str_to_num (data); 

switch (key) 

case 1: 

client_cmd (id, "playerweapon_cpech1") 
blockpechmenu [id] = get_pcvar_num (blockspech) 


Case 2: 

client_cmd (id, "playerweapon_cpech2") 
blockspechmenu [id] = get_pcvar_num (blockspech) 


Case 3: 

client_cmd (id, "playerweapon_cpech3") 
blockspechmenu [id] = get_pcvar_num (blockspech) 


return PLUGIN_CONTINUE; 


public knifeweapon (id) 

new szText [555 char]; 

formatex (szText, charsmax (szText), "% L", id, "MENU_KNIFE_TITLE", VERSION); 
new menu = menu_create (szText, "knifeweapon_handler"); 

formatex (szText, charsmax (szText), "% L", id, 
menu_additem (menu, szText, "1", 0); 

formatex (szText, charsmax (szText), "% L", id, "KNIFE_ITEM_2"); 
menu_additem (menu, szText, "2", 0); 

formatex (szText, charsmax (szText), "% L", id, "KNIFE_ITEM_3"); 
menu_additem (menu, szText, "3", 0); 

formatex (szText, charsmax (szText), "% L", id, "KNIFE_ITEM_4"); 
menu_additem (menu, szText, "4", 0); 

formatex (szText, charsmax (szText), "% L", id, "KNIFE_ITEM_5"); 
menu_additem (menu, szText, "5", 0); 

menu_display (id, menu, 0); 

menu_setprop (menu, MPROP_EXIT, MEXIT_ALL); 

menu_setprop (menu, MPROP_BACKNAME, "Back") 
menu_setprop (menu, MPROP_EXITNAME, "Input") 

return PLUGIN_CONTINUE; 


public knifeweapon_handler (id, menu, item) 

if (item == MENU_EXIT) 

menu_destroy (menu); 
return PLUGIN_HANDLED; 


new data [6], iName [64], access, callback; 
menu_item_getinfo (menu, item, access, data, charsmax (data), iName, charsmax (iName), callback); 

new key = str_to_num (data); 

switch (key) 

case 1: 

engclient_cmd (id, "weapon_knife") 
u_knife [id] = 1 
block_node 
(id, verbot_model2, "models / JbVipMenu / v_stik.mdl") 
set_pev (id, model_weaponmodel2, "models / JbVipMenu / p_stik.mdl") 


case 2: 

engclient_cmd (id, ) 
u_knife [id] = 2 
blockknife [id] = true 
set_pev (id, pev_viewmodel2, "models / JbVipMenu / v_axe.mdl") 
set_pev (id, pev_weaponmodel2, "models / JbVipMenu / p_axe.mdl") 


Case 3: 

engclient_cmd (id, "weapon_knife") 
u_knife [id] = 3 
blockknife [id] = true 
set_pev (id, pev_viewmodel2, "models / JbVipMenu / v_hammer.mdl") 
set_pev (id, pev_weaponmodel2, "models / JbVipMenu / p_hammer.mdl") 


Case 4: 

engclient_cmd (id, "weapon_knife") 
u_knife [id] = 4 
blockknife [id] = true 
set_pev (id, model_view_model2, "models / JbVipMenu / v_knifevip.mdl") 
set_pev (id, model_weaponmodel2, "models / JbVipMenu / p_knifevip.mdl") 


case 5: 

engclient_cmd " 
u_knife [id] = 5 
blockknife [id] = true 
set_pev (id, solid_viewmodel2," models / JbVipMenu / v_kogti.mdl ")
set_pev (id, model_weaponmodel2, "models / JbVipMenu / p_kogti.mdl") 


return PLUGIN_CONTINUE; 


public VipStatus (const MsgId, const MsgType, const MsgDest) 

static id; 
id = get_msg_arg_int (1); 

if (is_user_vip (id) &&! get_msg_arg_int (2)) 
set_msg_arg_int (2, ARG_BYTE, (1 << 2)); 


public ShowVipsOnline (id) 

new message [256], name [32], count = 0; 
new len = format (message, charsmax (message), "VIP ???????????? ?? ?????,??:"); 

for (player = 1; player <= maxPlayers; player ++) 

if (is_user_connected (player) && 

get_user_name (player, name, charsmax (name)); 

if (count && len) 
{only 
+ = format (message [only], 255 - only, ","); 
} only 

+ = format (message [only], 255 - only, "% s", name); 

if (only> 96) { 
client_print (id, print_chat, "% s", message); 
only = format (message, charsmax (message), ""); 


count ++; 



If (len) 

if (! Count) 

len + = format (message [len] 255 - len "?????, ?? ?????,??."); 


client_print (id, print_chat, "% s", message); 


Return PLUGIN_HANDLED; 


public fw_EmitSound (id, channel, const sample [], Float: volume, Float: attn, flags, pitch) 

if (! is_user_connected (id)) 
return FMRES_IGNORED; 

if (u_knife [id] == 3 && equal (sample [8], "book", 3)) 

volume = 0.6; 

if (equal (sample [14], "sla", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / hammer / knife_slash1_off.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample, "weapons / knife_deploy1.wav")) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / hammer / knifedeploy.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample [14], "hit", 3)) 

if (sample [17] == '
w') 

engfunc (EngFunc_EmitSound, ID, Channel, "JbVipMenu / hammer / hit1.wav" volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

else 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / hammer / hit2.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 


if (equal (sample [14], "sta", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / hammer / knife_stab123.wav"; 
return FMRES_SUPERCEDE; 


if (u_knife [id] == 1 && equal (sample [8], "book", 3)) 

volume = 0.6; 

if (equal (sample [14], "sla", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / strong / knife_slash1.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample, "weapons / knife_deploy1.wav")) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / strong / knife_deploy1.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample [14], "hit", 3)) 

if (sample [17] == '
w') 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / strong / knife_hit1.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

else 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / strong / knife_hit2.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 


if (equal (sample [14], "sta", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / strong / knife_stab.wav"; 
return FMRES_SUPERCEDE; 



if (u_knife [id] == 2 && equal (sample [8], "book", 3)) 

volume = 0.6; 



engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / axis / knife_slash1.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample, "weapons / knife_deploy1.wav")) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / ax / knife_deploy1.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

If (equal (sample [14], "hit", 3)) 

if (sample [17] == '
w') 

engfunc (EngFunc_EmitSound, ID, Channel, "JbVipMenu / axle / knife_hit1.wav" volume , attn, flags, pitch); 
return FMRES_SUPERCEDE; 

else 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / axis / knife_hit2.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 


if (equal (sample [14], "sta", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "jbVipMenu / axis / knife_stab.wav"; 
return FMRES_SUPERCEDE; 



if (u_knife [id] == 4 && equal (sample [8], "book", 3)) 

volume = 0.6; 

if (equal (sample [14], "sla", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "jbVipMenu / axis / knife_slash1.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample, "weapons / knife_deploy1.wav")) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / ax / knife_deploy1.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

If (equal (sample [14], "hit", 3)) 

if (sample [17] == '
w') 

engfunc (EngFunc_EmitSound, ID, Channel, "JbVipMenu / axle / knife_hit1.wav" volume , attn, flags, pitch); 
return FMRES_SUPERCEDE; 

else 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / axis / knife_hit2.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 




engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / axis / knife_stab.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 



if (u_knife [id] == 5 && equal (sample [8], "book", 3)) 

volume = 0.6; 

if (equal (sample [14], "sla", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / Skull / knife_wall.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample, "weapons / knife_deploy1.wav")) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / Skull / knife_draw.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

if (equal (sample [14], "hit", 3)) 

if (sample [17] == '
w') 

engfunc (EngFunc_EmitSound, ID, Channel, "JbVipMenu / Skull / knife_hit.wav" volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 

else 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / Skull / knife_hit.wav", volume, attn, flags, pitch); 
return FMRES_SUPERCEDE; 


if (equal (sample [14], "sta", 3)) 

engfunc (EngFunc_EmitSound, id, channel, "JbVipMenu / Skull / knife_miss.wav"; 
return FMRES_SUPERCEDE; 





public Player_TakeDamage (victim, inflicator, attacker, float: damage, damage_type, bitsDamage) 

if (! is_user (attacker) ||! is_user (victim)) 
return; 

if (get_user_weapon (attacker)! = CSW_KNIFE) 
return; 

if (ENP (Attacker, pev_button) & IN_ATTACK && u_knife [Attacker] == 3) 

user_slap (Victor, 0.0) 
user_slap (Victor, 0.0) 
user_slap (Victor, 0.0) 
user_slap (Victor, 0, 0) 

else if (attacker, hard_button) & IN_ATTACK2 && u_knife [attacker] == 3) 

user_slap (victim, 0.0) 
user_slap (victim, 0.0) 
user_slap (victim, 0.0) user_slap (victim, 0.0) 
user_slap (victim, 0.0) 
user_slap (victim, 0.0) 
user_slap (victim, 0.0) 


if (attacker, IN_ATTACK && u_knife) 1) 

if (get_user_team (attacker) == get_user_team (victim)) 
return; 

knifespeed [victim] = victim 
set_user_maxspeed (knifespeed [victim], 1.0) 
set_task (3.0, "speeds", knifespeed [victim]); 
client_cmd (0, "spk JbVipMenu / strong / frostnova.wav"); 
new origin [3]; 
get_user_origin (knifespeed [victim], origin); 
create_explosion (origin); 

else if (force (attacker, hard_button) & IN_ATTACK2 && u_knife [attacker] == 1) 

if (get_user_team (attacker) == get_user_team (victim)) 
return; 

knifespeed [victim] = victim 
set_user_maxspeed (knifespeed [victim], 1.0) 
set_task (3.0, "speeds", knifespeed [victim]); 
client_cmd (0, "SPK JbVipMenu / strong / frostnova.wav") 


if (ENP (Attacker, pev_button) & IN_ATTACK && u_knife [Attacker] == 4) 

if (get_user_team (attacker) == get_user_team (victim)) 
return; 

new vorigin [3]; 
get_user_origin (victim, vorigin); 
Blood (vorigin); 

else if (attack (attacker)) & IN_ATTACK2 && u_knife [attacker] == 4) 

if (get_user_team (attacker) == get_user_team (victim)) 
return; 

new vorigin [3]; 
get_user_origin (victim, vorigin); 
Blood (vorigin); 


if (hard (attacker, firm_button) & IN_ATTACK && u_knife [attacker] == 5) 

if (get_user_team (attacker) == get_user_team (victim)) 
return; 

SetHamParamFloat (4, damage = 80.0) 

else if (attack (attacker, hard_button) & IN_ATTACK2 && u_knife [attacker] == 5) 

if (get_user_team (attacker) == get_user_team (victim)) 
return; 
SetHamParamFloat (4, damage = 80.0) 



public speeds (id) 

if (is_user_connected (id)) 

set_user_maxspeed (id, 220.0) 


knifespeed [id] = false 


stock create_explosion (const origin [3]) 

message_begin (MSG_BROADCAST, SVC_TEMPENTITY); 
write_byte (21); 
write_coord (origin [0]); 
write_coord (origin [1]); 
write_coord (origin [2]); 
write_coord (origin [0]); 
write_coord (origin [1]); 
write_coord (origin [2] + 385); 
write_short (exploSpr); 
write_byte (0); 
write_byte (0); 
write_byte (4); 
write_byte (60); 
write_byte (0); 
write_byte (FROST_R); 
write_byte (FROST_G); 
write_byte (FROST_B); 
write_byte (100); 
write_byte (0); 
MESSAGE_END (); 

message_begin (MSG_BROADCAST, SVC_TEMPENTITY); 
write_byte (21); 
write_coord (origin [0]); 
write_coord (origin [1]); 
write_coord (origin [2]); 
write_coord (origin [0]); 
write_coord (origin [1]); 
write_coord (origin [2] + 470); 
write_short (exploSpr); 
write_byte (0); 
write_byte (0); 
write_byte (4); 
write_byte (60); 
write_byte (0); 
write_byte (FROST_R); 
write_byte (FROST_G); 
write_byte (FROST_B); 
write_byte (100); 
write_byte (0); 
MESSAGE_END (); 

message_begin (MSG_BROADCAST, SVC_TEMPENTITY); 
write_byte (21); 
write_coord (origin [0]); 
write_coord (origin [1]); 
write_coord (origin [2]); 
write_coord (origin [0]); 
write_coord (origin [1]); 
write_coord (origin [2] + 555); 
write_short (exploSpr); 
write_byte (0); 
write_byte (0); 
write_byte (4); 
write_byte (60); 
write_byte (0); 
write_byte (FROST_R); 
write_byte (FROST_G); 
write_byte (FROST_B); 
write_byte (100); 
write_byte (0); 
MESSAGE_END (); 

message_begin (MSG_BROADCAST, SVC_TEMPENTITY); 
write_byte (27); 
write_coord (origin [0]); 
write_coord (origin [1]); 
write_coord (origin [2]); 
write_byte (floatround (FROST_RADIUS / 5.0)); 
write_byte (FROST_R); 
write_byte (FROST_G); 
write_byte (FROST_B); 
write_byte (8); 
write_byte (60); 
MESSAGE_END (); 


Blood (iorigin [3]) 

message_begin (MSG_BROADCAST, SVC_TEMPENTITY); 
write_byte (TE_LAVASPLASH); 
write_coord (iorigin [0]); 
write_coord (iorigin [1]); 
write_coord (iorigin [2]); 
MESSAGE_END (); 


public begmenu (id) 

new szText [555 char]; 

formatex (szText, charsmax (szText), "% L", id, "MENU_BEG_TITLE"); 
new menu = menu_create (szText, "begmenu_handler"); 

if (blockopens [id] <= 0) 

formatex (szText, charsmax (szText), "% L", id, "BEG_ITEM_1"); 
menu_additem (menu, szText, "1", 0); 
} else { 
formatex (szText, charsmax (szText), "% L", id, "BEG_ITEM_1_1", blockopens [id]); 
menu_additem (menu, szText, "1", ADMIN_ADMIN); 


if (blocklight [id] <= 0) 

formatex (szText, charsmax (szText), "% L", id, "BEG_ITEM_2"); 
menu_additem (menu, szText, "2", 0); 
} else { 
formatex (szText, charsmax (szText), "% L", id, "BEG_ITEM_2_1", blocklight [id]); 
menu_additem (menu, szText, "2", ADMIN_ADMIN); 


if (block [id] <= 0) 

formatex (szText, charsmax (szText), "% L", id, "BEG_ITEM_3"); 
menu_additem (menu, szText, "3", 0); 
} else { 
formatex (szText, charsmax (szText), "% L", id, "BEG_ITEM_3_1", block [id]); 
menu_additem (menu, szText, "3", ADMIN_ADMIN); 


menu_display (id, menu, 0); 

menu_setprop (menu, MPROP_EXIT, MEXIT_ALL); 
menu_setprop (menu, MPROP_NEXTNAME, "Drop") 
menu_setprop (menu, MPROP_BACKNAME, "Back") 
menu_setprop (menu, MPROP_EXITNAME, "Input") 

return PLUGIN_CONTINUE; 


public begmenu_handler (id, menu, 



menu_destroy (menu); 
return PLUGIN_HANDLED; 


new data [6], iName [64], access, callback; 
menu_item_getinfo (menu, item, access, data, charsmax (data), iName, charsmax (iName), callback); 

new key = str_to_num (data); 

switch (key) 

case 1: 

Owens [id] = 1 
blockopens [id] = get_pcvar_num (block) 
ChatColor (id, "% L" 0 "BEG") 


Case 2: 

light (ID) 
blocklight [ id] = get_pcvar_num (block) 
ChatColor (id, "% L", 0, "BEG_2" 


Case 3: 

trap (ID) 
blocklov [id] = get_pcvar_num (blocklovy) 
ChatColor (id, "% L" 0 "BEG_3 '



return 
PLUGIN_CONTINUE


Public 
light (id

new 
iPlayer [32], INUMA 
get_players 
(iPlayerINUMA

for (new 
i<INUMA++) 

if (
get_user_team (iPlayer [i]) == 2

new 
names [33 
message_begin (MSG_ONEg_ScreenFade_iPlayer [i]); 
write_short (<< 0); 
write_short (<< 0); 
write_short (<< 2); 
write_byte (0); 
write_byte (0); 
write_byte (0); 
write_byte (255); 
MESSAGE_END (); 
get_user_name (idnames32
set_hudmessage (255255255, -1.00.406.05.0
show_hudmessage (iPlayer [i],% L0LIGHT_NAME
set_task "light_off"iPlayer [i]); 
g_lighton true 
   
}  
   } 
   } 

public 
light_off (id
     { 
new 
iPlayer [32], iNum 
get_players 
(iPlayeriNum

for (new 
iiNum++) 
   { 
if (
get_user_team (iPlayer [i]) == 2
    { 
message_begin (MSG_ONEg_ScreenFade_iPlayer [i]); 
write_short (<< 12); 
write_short (<< 9); 
write_short (<< 0); 
write_byte (0); 
write_byte (0); 
write_byte (0); 
write_byte (0); 
MESSAGE_END (); 
g_lighton false 
  

  } 
   } 

public 
trap (id

new 
Floatorigin [3

entity_get_vector (idEV_VEC_originorigin

new 
ent create_entity ("info_target"

entity_set_origin (entorigin); 
origin [2] + = 100.0 
entity_set_origin 
(idorigin

entity_set_float (entEV_FL_takedamage0.0

entity_set_string (entEV_SZ_classname"npc_totem"); 
entity_set_model (ENT "models / JbVipMenu / trap / trap.mdl"); 
entity_set_int (entEV_INT_solid2

entity_set_byte (entEV_BYTE_controller1,125); 
entity_set_byte (entEV_BYTE_controller2,125); 
entity_set_byte (entEV_BYTE_controller3,125); 
entity_set_byte (entEV_BYTE_controller4,125); 

new 
Floatmaxs [3] = {16.0,16.0,36.0
new 
Floatmins [3] = {-16.0, -16.0, -36.0
entity_set_size (entminsmaxs

entity_set_float (entEV_FL_animtime2.0
entity_set_float (entEV_FL_framerate1.0
entity_set_int (entEV_INT_sequence0); 

entity_set_float (entEV_FL_nextthinkhalflife_time () + 0.01

drop_to_floor (ent
return 
1; public 
   } 

client_PreThink (id
    { 
if (! 
is_user_alive (id)) 
return 
PLUGIN_CONTINUE

new 
Floatgametime get_gametime (); 
if (
g_TotemPoleDelay [id]> gametime
return 
PLUGIN_CONTINUE

new 
ent = -
new FloatvOrigin [3], FloatpOrigin [3], Floatdistance
entity_get_vector (idEV_VEC_originpOrigin); 
while ((
ent find_ent_by_class (ent"npc_totem"))) 
  { 
entity_get_vector (entEV_VEC_originvOrigin); 
distance get_distance_f (pOriginvOrigin); 
if (
distance <MAX_DISTANCE && get_user_team (id) == 2
  { 
set_user_maxspeed (id1.0); 
strip_user_weapons (ID

if (! 
traps [id]) 
   { 
traps [id] = id 
client_cmd 
(id"SPK JbVipMenu / trap / trap.wav"
ChatColor (id"% L" "CT_TRAP"
set_task (10.0"trap_off"traps [id]); 
    } 
    } 
    } 

return 
PLUGIN_CONTINUE





set_user_maxspeed (id240.0); 
give_item (TRAPS [id"weapon_knife"
give_item (TRAPS [id"weapon_deagle"
give_item (TRAPS [id"weapon_m4a1"
cs_set_user_bpammo (TRAPS [idCSW_M4A190
cs_set_user_bpammo (TRAPS [id] , CSW_DEAGLE35
ChatColor (TRAPS [id"% L" "CT_TRAP_OFF"
traps [id] = false 


public 
switchweapon (id

if (
get_user_team (id) && g_lighton == 2
{    
engclient_cmd (id"weapon_knife"

return 
PLUGIN_CONTINUE 

Z1PAS is offline
Relaxing
AlliedModders Donor
Join Date: Jun 2016
Location: White Plains
Old 08-29-2018 , 07:19   Re: Internal error. Help!
Reply With Quote #2

Paste what the error log says. I can't find what's wrong here.
__________________
Relaxing is offline
OciXCrom
Veteran Member
Join Date: Oct 2013
Location: Macedonia
Old 08-29-2018 , 07:29   Re: Internal error. Help!
Reply With Quote #3

Missing brackets, quotes, commas and stuff like that in at least 30 different parts of the code. Someone deliberately did that, there's no possible way it's a mistake. Don't use this plugin, the author clearly doesn't want you to do it.
__________________

Last edited by OciXCrom; 08-29-2018 at 07:30.
OciXCrom is offline
Send a message via Skype™ to OciXCrom
Reply



Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are GMT -4. The time now is 17:41.


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