[PLUGIN] Advanced Snow With Menu [New] [EDIT4] [Final Version]

ZPLegendary · Last edited by ZPLegendary on 03-05-2017, 20:15:49; edited 3 times in total

EDIT: 29.04.07 @ 14:00
EDIT2: 29.04.07 @ 19:12
EDIT3: 29.04.07 @ 19:28
EDIT4: 03.05.07 @ 21:15

► Nume Subiect: [PLUGIN] Advanced Snow With Menu [New]
► Nume Plugin: Advanced Snow
► Descriere: Acest plugin contine un meniu din care puteti activa/dezactiva ninsoarea pe server si puteti de asemenea sa mariti/miciti internsitatea acesteia.
► Pentru mod: orice
► Info: Meniul se deschide folosind comanda /snow in chat.
► Instalare: Compilati codul dupa care puneti fisierul compilat .amxx in folderul plugins apoi il treceti in plugins.ini din folderul configs
► Descarcare:

Spoiler:

Code:

#include amxmodx
#include amxconst
#include amxmisc
#include fakemeta
#include engine
#include colorchat
#include xs

new Snow[33];
new CVAR[2];

public plugin_init() {

register_plugin( "Snow", "1.3", "Legendary" );

register_menu("SnowMenu", (1<<0|1<<1|1<<9), "SnowSettings");

register_clcmd("say /snow", "SnowSystem", _, "- Meniu Snow");
register_clcmd("say_team /snow", "SnowSystem", _, "- Meniu Snow");

CVAR[0] = register_cvar("snow", "1")
CVAR[1] = register_cvar("snow_speed", "1");
}

public plugin_precache() {

new pEnt = create_entity("env_snow");

if(!pEnt)
set_fail_state("Failed to create entity");

pEnt = -1;

while((pEnt = find_ent_by_class(pEnt, "env_rain")))
remove_entity(pEnt);
}

public client_putinserver(id)
{
Snow[id] = get_pcvar_num(CVAR[1]
client_cmd(id, "cl_weather %d", Snow[id])
}

public SnowSystem(id) {

if(!(get_user_flags(id) & ADMIN_CHAT))
return PLUGIN_HANDLED;

new menu[512], len;

len += formatex(menu[len], 511-len, "\y-= \w[ \rSnow Settings \w] \y=-^n^n")
len += formatex(menu[len], 511-len, "\r1. \wSnow Status \r[%s]^n", get_pcvar_num(CVAR[0]) >= 1 ? "ON" : "OFF");

if(get_pcvar_num(CVAR[0]) > 0)
len += formatex(menu[len], 511-len, "\r2. \wSnow Speed \r[%s]^n", Snow[id] == 1 ? "Low" : (Snow[id] == 2 ? "Medium" : "Fast"));
else
len += formatex(menu[len], 511-len, "\r2. \dSnow Speed \r[%s]^n", Snow[id] == 1 ? "Low" : (Snow[id] == 2 ? "Medium" : "Fast"));

len += formatex(menu[len], 511 - len, "^n^n\r0. \yAnulare")

show_menu(id, (1<<0|1<<1|1<<9), menu, -1, "SnowMenu")

return PLUGIN_CONTINUE;
}

public SnowSettings(id, key)
{
new name[32];
get_user_name(id, name, 31)

switch (key)
{
case 0:
{
if(get_pcvar_num(CVAR[0]) >= 1)
{
ColorChat(0, RED, "^4[Snow System] ^3Adminul^4 %s ^3a ^4dezactivat^3 ninsoarea.", name)

Snow[id] = 0
client_cmd(id, "cl_weather %d", Snow[id])
set_pcvar_num(CVAR[0], 0)
SnowSystem(id)
}
else
{
ColorChat(0, RED, "^4[Snow System] ^3Adminul^4 %s ^3a ^4activat^3 ninsoarea.", name)

Snow[id]++
client_cmd(id, "cl_weather %d", Snow[id])
set_pcvar_num(CVAR[0], 1)
SnowSystem(id)
}
}
case 1:
{
if(get_pcvar_num(CVAR[0]) > 0)
{
if(get_pcvar_num(CVAR[1]) == 1)
{
ColorChat(0, RED, "^4[Snow System] ^3Adminul^4 %s ^3a marit ^4viteza ^3ninsorii.", name)
Snow[id]++
client_cmd(id, "cl_weather %d", Snow[id])
set_pcvar_num(CVAR[1], 2)
SnowSystem(id)
}
else if(get_pcvar_num(CVAR[1]) == 2)
{
ColorChat(0, RED, "^4[Snow System] ^3Adminul^4 %s ^3a marit ^4viteza ^3ninsorii.", name)
Snow[id]++
client_cmd(id, "cl_weather %d", Snow[id])
set_pcvar_num(CVAR[1], 3)
SnowSystem(id)
}
else if(get_pcvar_num(CVAR[1]) == 3)
{
ColorChat(0, RED, "^4[Snow System] ^3Adminul^4 %s ^3a micit ^4viteza ^3ninsorii.", name)
Snow[id] = 1
client_cmd(id, "cl_weather %d", Snow[id])
set_pcvar_num(CVAR[1], 1)
SnowSystem(id)
}
}
else
{
ColorChat(id, RED, "^4[Snow System] ^3Ninsoarea este ^4dezactivata^3, nu-i poti schimba ^4viteza^3.")
SnowSystem(id)
}
}
}
return PLUGIN_CONTINUE;
}

► Poze:

Spoiler:

► Alte mentiuni: Momentan, doar adminii cu flagul "i" pot sa intre in meniu.
Pluginul este scris in proportie de 100% de mine.
Cine doreste sa ma acuze de ceva sa vina cu dovezi ca sa nu-si raceasca gura degeaba, as putea foarte bine sa pastrez pluginurile pentru mine, oricum n-am nimic de castigat din asta.

Stock ColorChat:Click

Be the one, not anyone.
Currently working on Zombie Legendary 8.1

ZPLegendary · Posted: 29-04-2017, 18:17:37 | Translate post to: ... (Click for more languages)

BUMP
COD IMBUNATATIT

Be the one, not anyone.
Currently working on Zombie Legendary 8.1

ZPLegendary · Posted: 03-05-2017, 20:15:28 | Translate post to: ... (Click for more languages)

COD ACTUALIZAT LA VERSIUNEA FINALA

Be the one, not anyone.
Currently working on Zombie Legendary 8.1