AlliedModders

AlliedModders (https://forums.alliedmods.net/index.php)
-   Scripting Help (https://forums.alliedmods.net/forumdisplay.php?f=11)
-   -   Need help a very crab script. (https://forums.alliedmods.net/showthread.php?t=153458)

.Dare Devil. 03-23-2011 18:16

Need help a very crab script.
 
PHP Code:

#include <amxmodx>
#include <amxmisc>
#include <fakemeta>
#define ACCESSMENU ADMIN_KICK
const MENU_KEY_AUTOSELECT 7
const MENU_KEY_BACK 7
const MENU_KEY_NEXT 8
const MENU_KEY_EXIT 9
// Menu keys
const KEYSMENU MENU_KEY_1|MENU_KEY_2|MENU_KEY_3|MENU_KEY_4|MENU_KEY_5|MENU_KEY_6|MENU_KEY_7|MENU_KEY_8|MENU_KEY_9|MENU_KEY_0
// native skin models
native cs_set_user_model(index, const model[]);
// Skin Modelid
const skin_model_1 "models/player/skin1/skin1.mdl"
const skin_model_2 "models/player/skin2/skin2.mdl"
const skin_model_3 "models/player/skin3/skin3.mdl"
// Skin Bool-id
new bool:g_has_Skin01[33]
new 
bool:g_has_Skin02[33]
new 
bool:g_has_Skin03[33]
// Vip Cvars
new cvar_vip_speed
public plugin_init()
{
 
register_plugin"Vip Menu""1.0""Dare-Devil" )
 
register_clcmd("say /vipmenu""clcmd_VipMenu")
 
// Cvars
 
cvar_vip_speed register_cvar("dd_vip_speed""270.0"// Tava m2ngijal 240.0
 // Menu
 
register_menu(Vip Menu", KEYSMENU, "menu_vip")
 register_menu("
Skin Menu", KEYSMENU, "menu_skin")
 register_menu("
Relvade Menu", KEYSMENU, "menu_relv")
 register_menu("
Telli Menu", KEYSMENU, "menu_telli")
 register_dictionary("
VipMenu.txt")
 // eventid
 register_event("
HLTV", "Event_RoundStart", "a", "1=0", "2=0")
 register_forward(FM_PlayerPreThink, "
fw_PlayerPreThink")
}
// Lisame Skin Modelid Server Listi
public plugin_precache()
{
    precache_model(skin_model_1)
    precache_model(skin_model_2)
    precache_model(skin_model_3)
}
public Event_RoundStart()
{
 if (g_has_Skin01[id])
 {
      cs_set_user_model(id, skin_model_1)
 }
 else if (g_has_Skin02[id])
 {
      cs_set_user_model(id, skin_model_2)
 }
 else if (g_has_Skin03[id])
 {
      cs_set_user_model(id, skin_model_3)
 }
}
public fw_PlayerPreThink(id)
{
 if (!is_user_alive(id))
  return FMRES_IGNORED
 
 if(get_user_flags(id) & ACCESSMENU)
 {
  set_pev(id, pev_maxspeed, get_pcvar_float(cvar_vip_speed))  
 }
 return PLUGIN_CONTINUE
}
public clcmd_VipMenu(id)
{
 show_menu_vip(id)
}
 
show_menu_vip(id)
{
 static menu[250], len
 len = 0
 userflags = get_user_flags(id)
 
 // Title
 len += formatex(menu[len], charsmax(menu) - len, "
\y%L^n^n", id, "MENU_TITLE")
 // 1. Skin Menu
 if (userflags & ACCESSMENU)
  len += formatex(menu[len], charsmax(menu) - len, "
\r1.\%L", id, "MENU_SKIN")
 else
  len += formatex(menu[len], charsmax(menu) - len, "
\d1. %L", id, "MENU_SKIN")
 // 2. Relvade Menu
 if (userflags & ACCESSMENU)
  len += formatex(menu[len], charsmax(menu) - len, "
\r2.\%L", id, "MENU_RELV")
 else
  len += formatex(menu[len], charsmax(menu) - len, "
\d2. %L", id, "MENU_RELV")
 // 5. Telli Menu
 len += formatex(menu[len], charsmax(menu) - len, "
\r4.\%L^n", id, "MENU_TELLI")
 
 // 0. Exit
 len += formatex(menu[len], charsmax(menu) - len, "
^n^n\r0.\%L", id, "MENU_EXIT")
 
 show_menu(id, KEYSMENU, menu, -1, "
Vip Menu")
}
show_menu_skin(id)
{
 static menu[250], len
 len = 0
 userflags = get_user_flags(id)
 
 // Title
 len += formatex(menu[len], charsmax(menu) - len, "
\y%L^n^n", id, "MENU_SKIN00")
 // 1. Skin 1
 if (userflags & ACCESSMENU)
  len += formatex(menu[len], charsmax(menu) - len, "
\r1.\%L", id, "MENU_SKIN01)
 else
  
len += formatex(menu[len], charsmax(menu) - len"\d1. %L"id"MENU_SKIN01")
 
// 2. Skin 2
 
if (userflags ACCESSMENU)
  
len += formatex(menu[len], charsmax(menu) - len"\r2.\w %L"id"MENU_SKIN02")
 else
  
len += formatex(menu[len], charsmax(menu) - len"\d2. %L"idMENU_SKIN02")
 // 3. Skin 3
 if (userflags & ACCESSMENU)
  len += formatex(menu[len], charsmax(menu) - len, "
\r3.\%L", id, "MENU_SKIN03")
 else
  len += formatex(menu[len], charsmax(menu) - len, "
\d3. %L", id, "MENU_SKIN03")
 
 // 0. Exit
 len += formatex(menu[len], charsmax(menu) - len, "
^n^n\r0.\%L", id, "MENU_EXIT")
 
 show_menu(id, KEYSMENU, menu, -1, "
Skin Menu")
}
show_menu_relv(id)
{
 static menu[250], len
 len = 0
 userflags = get_user_flags(id)
 
 // Title
 len += formatex(menu[len], charsmax(menu) - len, "
\y%L^n^n", id, "MENU_RELV00")
 // 1. Relv - 1
 if (userflags & ACCESSMENU)
  len += formatex(menu[len], charsmax(menu) - len, "
\r1.\%L", id, "MENU_RELV01)
 else
  
len += formatex(menu[len], charsmax(menu) - len"\d1. %L"id"MENU_RELV01")
 
// 2. Relv - 2
 
if (userflags ACCESSMENU)
  
len += formatex(menu[len], charsmax(menu) - len"\r2.\w %L"id"MENU_RELV02")
 else
  
len += formatex(menu[len], charsmax(menu) - len"\d2. %L"idMENU_RELV02")
 // 3. Relv - 3
 if (userflags & ACCESSMENU)
  len += formatex(menu[len], charsmax(menu) - len, "
\r3.\%L", id, "MENU_RELV03")
 else
  len += formatex(menu[len], charsmax(menu) - len, "
\d3. %L", id, "MENU_RELV03")
 // 4. Relv - 4
 if (userflags & ACCESSMENU)
  len += formatex(menu[len], charsmax(menu) - len, "
\r4.\%L", id, "MENU_RELV04")
 else
  len += formatex(menu[len], charsmax(menu) - len, "
\d4. %L", id, "MENU_RELV04")
 
 // 0. Exit
 len += formatex(menu[len], charsmax(menu) - len, "
^n^n\r0.\%L", id, "MENU_EXIT")
 
 show_menu(id, KEYSMENU, menu, -1, "
Relvade Menu")
}
show_menu_telli(id)
{
 static menu[250], len
 len = 0
 
 // Title
 len += formatex(menu[len], charsmax(menu) - len, "
\y%L^n^n", id, "MENU_TELLI00")
 // 1. Admin
 len += formatex(menu[len], charsmax(menu) - len, "
\r1.\%L^n", id, "MENU_TELLI01")
 // 2. Vip
 len += formatex(menu[len], charsmax(menu) - len, "
\r2.\%L^n", id, "MENU_TELLI02")
 // 0. Exit
 len += formatex(menu[len], charsmax(menu) - len, "
^n^n\r0.\%L", id, "MENU_EXIT")
 
 show_menu(id, KEYSMENU, menu, -1, "
Telli Menu")
}
public menu_vip(id, key)
{
 switch (key)
 {
  case 0: // Skin 1
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   show_menu_skin(id)
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
  case 1: // Skin 2
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   show_menu_relv(id)
 
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
  case 2: // Skin 3
  {
   show_menu_telli(id)
  }
 }
 
 return PLUGIN_HANDLED;
}
public menu_skin(id, key)
{
 switch (key)
 {
  case 0: // Skin 1
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   // Skin 1 Kood
   g_has_Skin01[id] = true
   g_has_Skin02[id] = false
   g_has_Skin03[id] = false
      cs_set_user_model(id, skin_model_1)
 
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
  case 1: // Skin 2
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   // Skin 2 Kood
   g_has_Skin02[id] = true
   g_has_Skin01[id] = false
   g_has_Skin03[id] = false
      cs_set_user_model(id, skin_model_2)
 
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
  case 2: // Skin 3
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   // Skin 3 Kood
   g_has_Skin03[id] = true
   g_has_Skin02[id] = false
   g_has_Skin01[id] = false
      cs_set_user_model(id, skin_model_3)
 
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
 }
 
 return PLUGIN_HANDLED;
}
public menu_relv(id, key)
{
 switch (key)
 {
  case 0: // Relv 1
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   // Relv Kood
   give_item(id, "
weapon_m4a1")
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
  case 1: // Relv 2
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   // Relv Kood
   give_item(id, "
weapon_m4a1")
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
  case 2: // Relv 3
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   // Relv Kood
   give_item(id, "
weapon_m4a1")
   else
   client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
  case 3: // Relv 4
  {
   // Kontollime Kas 6igus Olemas
   if (get_user_flags(id) & ACCESSMENU)
   // Relv Kood
   give_item(id, "
weapon_m4a1")
   else
    client_print(id, print_chat, "
[VIPMENU] %L"), id, "NOT_ACCESS")
  }
 }
 
 return PLUGIN_HANDLED;
}
public menu_telli(id, key)
{
 switch (key)
 {
  case 0: // Skin 1
  {
   show_motd( id, "
Admin.txt")
  }
  case 1: // Skin 3
  {
   show_motd( id, "
Vip.txt")
  }
 }
 
 return PLUGIN_HANDLED;
}
stock fm_set_user_maxspeed(index, Float:speed = -1.0) 
{
 engfunc(EngFunc_SetClientMaxspeed, index, speed);
 set_pev(index, pev_maxspeed, speed);
 return 1;


There are some errors but i dont know what.
Someone can help me? :)

.Dare Devil. 03-23-2011 19:58

Re: Need help a very crab script.
 
Fixed.


All times are GMT -4. The time now is 14:29.

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