
Padekit pridet i vip menu
- laimiukas3
- Moderatorius
- Posts: 4569
- Joined: 2012 Aug 03 01:12
- Skype: laimiukas3
- Location: Vilnius
- Contact:
- valerka221
- O taip. Jis jau surinko 50 žinučių!
- Posts: 66
- Joined: 2013 Jun 22 16:51
- Skype: valer_ka4
Re: Padekit pridet i vip menu
Cesas.lt pilna buvo
bet dabar kai jau cesas.lt uzdare tai nieko neirodysiu. Bet siaip temoi prasiau perdaryt kai ka o cia jau apie slowhack kalba prasidejo. As tiesiog pavyzdi pasakiau kad daug kas zino apie arha tokius darbelius bet nieks nieko nedaro o cia del vieno uzraso uzstumet darykit isvadas zmones 


Re: Padekit pridet i vip menu
Išvados -->valerka221 wrote:Cesas.lt pilna buvobet dabar kai jau cesas.lt uzdare tai nieko neirodysiu. Bet siaip temoi prasiau perdaryt kai ka o cia jau apie slowhack kalba prasidejo. As tiesiog pavyzdi pasakiau kad daug kas zino apie arha tokius darbelius bet nieks nieko nedaro o cia del vieno uzraso uzstumet darykit isvadas zmones
Nėra įrodymų, nėra pakabuko. Bus įrodymai - bus pakabukas.
Code: Select all
#include <amxmodx>#include <amxmisc>#include <cstrike>#include <fun> static const COLOR[] = "^x03"static const CONTACT[] = "" #define PLUGIN "VIP MENU"#define VERSION "1.0"#define AUTHOR "Dunn0" new mpd, mkb, mhbnew nKiller, nKiller_hp, nHp_add, nHp_max, health_add, health_add_hs, health_maxnew AWP_Activenew Hudmsg, Hudmsg2new MsgSayText, maxplayersnew players[32], player, pnum, CurrentRoundnew bool:g_grenadesnew bool:g_vipmenunew Menu_Activenew bool:HasC4[33] public plugin_init(){ register_plugin(PLUGIN, VERSION, AUTHOR) // PINIGAI mpd = register_cvar("amx_vip_mpd", "3") mkb = register_cvar("amx_vip_mkb", "500") mhb = register_cvar("amx_vip_mhb", "200") register_event("Damage", "Damage", "b") register_event("DeathMsg", "death_msg", "a") // END // HP health_add = register_cvar("amx_vip_hp", "15") health_add_hs = register_cvar("amx_vip_hp_hs", "25") health_max = register_cvar("amx_vip_hp_max", "100") register_event("DeathMsg", "hook_death", "a", "1>0") // END // AWP register_event("CurWeapon", "Cur_Weapon", "be", "1=1") AWP_Active = register_cvar("amx_vip_awp_active", "1") register_clcmd("awp", "HandleCmd") register_clcmd("sg550", "HandleCmd") register_clcmd("g3sg1", "HandleCmd") // END // BULLET DAMAGE register_event("Damage", "on_damage", "b", "2!0", "3=0", "4!0") Hudmsg = CreateHudSyncObj() Hudmsg2 = CreateHudSyncObj() // END // MOTD, CHECK register_clcmd("say /vip", "show_vips") MsgSayText = get_user_msgid("SayText") maxplayers = get_maxplayers() register_cvar("amx_contactinfo", CONTACT, FCVAR_SERVER) register_clcmd("say /noriuvip", "ShowMotd") // END // MENU register_logevent("LogEvent_RoundStart", 2, "1=Round_Start" ); new mapname[32] get_mapname(mapname, 31) if (equali(mapname, "cs_", 3) || equali(mapname, "de_", 3) || equali(mapname, "knas_", 3) || equali(mapname, "mini_", 3) || equali(mapname, "surf_", 3)) { g_vipmenu = true g_grenades = true } if (equali(mapname, "35hp_", 3) || equali(mapname, "awp_", 3)) { g_vipmenu = false g_grenades = false } else if (equali(mapname, "aim_", 3) || equali(mapname, "fy_", 3)) { g_vipmenu = true g_grenades = false } Menu_Active = register_cvar("amx_vip_menu_active", "1") // END} public Damage(id){ new weapon, hitpoint, attacker = get_user_attacker(id, weapon, hitpoint) if(attacker <= maxplayers && is_user_alive(attacker) && attacker != id) if(get_user_flags(attacker) & ADMIN_LEVEL_H) { new money = read_data(2) * get_pcvar_num(mpd) if (hitpoint == 1) money += get_pcvar_num(mhb) cs_set_user_money(attacker, cs_get_user_money(attacker) + money) }} public death_msg(){ if (read_data(1) <= maxplayers && read_data(1) && read_data(1) != read_data(2)) cs_set_user_money(read_data(1), cs_get_user_money(read_data(1)) + get_pcvar_num(mkb) - 300)} public hook_death(){ nKiller = read_data(1) if ((read_data(3) == 1) && (read_data(5) == 0)) { nHp_add = get_pcvar_num(health_add_hs) } else nHp_add = get_pcvar_num(health_add) nHp_max = get_pcvar_num(health_max) if(!(get_user_flags(nKiller) & ADMIN_LEVEL_H)) return nKiller_hp = get_user_health(nKiller) nKiller_hp += nHp_add if(nKiller_hp > nHp_max) nKiller_hp = nHp_max set_user_health(nKiller, nKiller_hp) message_begin(MSG_ONE, get_user_msgid("ScreenFade"), {0,0,0}, nKiller) write_short(1<<10) write_short(1<<10) write_short(0x0000) write_byte(0) write_byte(0) write_byte(200) write_byte(75) message_end()} public Cur_Weapon(id){ if (!get_pcvar_num(AWP_Active)) return PLUGIN_CONTINUE new WeaponID = read_data(2) new mapname[32] get_mapname(mapname, 31) if (equali(mapname, "awp_", 3)) return PLUGIN_CONTINUE else { if (WeaponID == CSW_AWP || WeaponID == CSW_SG550 || WeaponID == CSW_G3SG1) { if (!(get_user_flags(id) & ADMIN_LEVEL_H)) { client_print(id, print_center, "* Sniperiniai ginklai tik VIP'ams *") client_cmd(id, "drop") } } } return PLUGIN_HANDLED} public HandleCmd(id){ if (!get_pcvar_num(AWP_Active)) return PLUGIN_CONTINUE if(get_user_flags(id) & ADMIN_LEVEL_H) return PLUGIN_CONTINUE client_print(id, print_center, "* Sniperiniai ginklai tik VIP'ams *") return PLUGIN_HANDLED} public on_damage(id) { static attacker; attacker = get_user_attacker(id) static damage; damage = read_data(2) set_hudmessage(255, 0, 0, 0.45, 0.50, 2, 0.1, 4.0, 0.1, 0.1, -1) ShowSyncHudMsg(id, Hudmsg, "%i^n", damage) if(is_user_connected(attacker)) { if( get_user_flags(attacker) & ADMIN_LEVEL_H ) { set_hudmessage(0, 100, 200, -1.0, 0.55, 2, 0.1, 4.0, 0.02, 0.02, -1) ShowSyncHudMsg(attacker, Hudmsg2, "%i^n", damage) } }} public client_connect(id){ new name[32] get_user_info(id, "name", name, 31) if(get_user_flags(id) & ADMIN_LEVEL_H) { set_dhudmessage( 200,0,0, 0.05, -0.65, 2, 4.0, 5.0, 0.01, 1.5 ) show_dhudmessage(0, "Special VIP %s prisijunge!",name) } if(!(get_user_flags(id) & ADMIN_LEVEL_H)) set_task(35.0, "PrintText", id)} public PrintText(id){ client_print_color(id, print_chat, "^4[VIP]^1 Rasyk:^3 /noriuvip^1 kad pamatytum VIP statusa." )} public show_vips(id) { new vipnames[33][32] new message[256] new contactinfo[256], contact[112] new id, count, x, len for(id = 1; id <= maxplayers; id++) if(is_user_connected(id)) if(get_user_flags(id) & ADMIN_LEVEL_H) get_user_name(id, vipnames[count++], 31) len = format(message, 255, "%s Prisijunge VIP'ai: ", COLOR) if(count > 0) { for(x = 0; x < count; x++) { len += format(message[len], 255-len, "%s%s ", vipnames[x], x < (count - 1) ? ", " : "") if(len > 96) { print_message(id, message) len = format(message, 255, "%s ", COLOR) } } print_message(id, message) } else { len += format(message[len], 255-len, "Nera prisijungusiu VIP'u.") print_message(id, message) } get_cvar_string("amx_contactinfo", contact, 63) if(contact[0]) { format(contactinfo, 111, "%s Contact Server Admin -- %s", COLOR, contact) print_message(id, contactinfo) }} print_message(id, msg[]){ message_begin(MSG_ONE, MsgSayText, {0,0,0}, id) write_byte(id) write_string(msg) message_end()} public ShowMotd(id){ show_motd(id, "vip.txt")} public LogEvent_RoundStart(){ CurrentRound++; get_players(players, pnum, "a"); for(new i = 0; i < pnum; i++) { player = players[i]; if(get_user_flags(player) & ADMIN_LEVEL_H) { give_item(player, "item_kevlar") give_item(player, "item_assaultsuit") if (g_grenades) { give_item(player, "weapon_flashbang") cs_set_user_bpammo(player, CSW_FLASHBANG, 2) give_item(player, "weapon_hegrenade") give_item(player, "weapon_smokegrenade") } give_item(player, "item_thighpack") if(!get_pcvar_num(Menu_Active)) return PLUGIN_CONTINUE if (g_vipmenu) { if (CurrentRound >= 3) { vipmenu(player) } } } } return PLUGIN_HANDLED} public vipmenu(id) { new menu = menu_create("\wVIP GUNS:", "menu_handler"); menu_additem(menu, "\wM4A1 + Deagle", "1", 0); menu_additem(menu, "\wAK47 + Deagle", "2", 0); menu_additem(menu, "\wFamas + Deagle", "3", 0); menu_additem(menu, "\wAWP + Deagle", "4", 0); menu_setprop(menu, MPROP_EXIT, MEXIT_ALL) menu_display(id, menu, 0); } public menu_handler(id, menu, item){ if( item == MENU_EXIT ) { menu_destroy(menu); return PLUGIN_HANDLED; } new data[6], iName[64]; new acess, callback; menu_item_getinfo(menu, item, acess, data,6, iName, 63, callback); new key = str_to_num(data); switch(key) { case 1: { give_weapons(id, CSW_M4A1, 90, CSW_DEAGLE, 35) } case 2: { give_weapons(id, CSW_AK47, 90, CSW_DEAGLE, 35) } case 3: { give_weapons(id, CSW_FAMAS, 90, CSW_DEAGLE, 35) } case 4: { give_weapons(id, CSW_AWP, 30, CSW_DEAGLE, 35) } } menu_destroy(menu); return PLUGIN_HANDLED;} public give_weapons(id, prim, ammo1, sec, ammo2){ if(user_has_weapon(id, CSW_C4) ) HasC4[id] = true; else HasC4[id] = false; new weapon[32] strip_user_weapons (id) get_weaponname(prim, weapon, 31) give_item(id,weapon) cs_set_user_bpammo(id, prim, ammo1) get_weaponname(sec, weapon, 31) give_item(id,weapon) cs_set_user_bpammo(id, sec, ammo2) give_item(id,"weapon_knife") if (g_grenades) { give_item(id, "weapon_flashbang") cs_set_user_bpammo(id, CSW_FLASHBANG, 2) give_item(id, "weapon_hegrenade") give_item(id, "weapon_smokegrenade") } if (HasC4[id]) { give_item(id, "weapon_c4"); cs_set_user_plant( id ); }}
Last edited by ArtHa123 on 2014 Nov 30 11:17, edited 2 times in total.
Re: Padekit pridet i vip menu
Problemos? Aš perašiau didesnę dalį kodo, daugelį dalykų pakeičiau, jis nepadarė nieko, tačiau autorius eurostrike. Žinočiau kas sukūrė, tuomet autorius būtų tas, kuris to nusipelnė.
Re: Padekit pridet i vip menu
ir taip aišku, kad čia Dunn0 pluginas vip viskas tas pats, kintamieji ir t.t, jei perdarinėji kodą vistiek neturi teisės keisti jo autoriaus. Tai aišku mano nuomonė 
edit ----------
+ tik sutraukiai kodą ir viskas. Ir tai šūdo primaliai, aišku nesigilinau tai gal ir klystų bet užmečiau akį, tai g_vipmenu = true ir g_grenades = true visuose mapuose? Nu jaučiu dažnai taip darai, paeditini šiek tiek kodą ir pasisavini pluginą

edit ----------
+ tik sutraukiai kodą ir viskas. Ir tai šūdo primaliai, aišku nesigilinau tai gal ir klystų bet užmečiau akį, tai g_vipmenu = true ir g_grenades = true visuose mapuose? Nu jaučiu dažnai taip darai, paeditini šiek tiek kodą ir pasisavini pluginą

Padėjau? +rep
Re: Padekit pridet i vip menu
Plugin'e, nebuvo parašyta Dunn0, o aš to nežinojau.DYaGesS wrote:ir taip aišku, kad čia Dunn0 pluginas vip viskas tas pats, kintamieji ir t.t, jei perdarinėji kodą vistiek neturi teisės keisti jo autoriaus. Tai aišku mano nuomonė
edit ----------
+ tik sutraukiai kodą ir viskas. Ir tai šūdo primaliai, aišku nesigilinau tai gal ir klystų bet užmečiau akį, tai g_vipmenu = true ir g_grenades = true visuose mapuose? Nu jaučiu dažnai taip darai, paeditini šiek tiek kodą ir pasisavini pluginą
g_vipmenu = true ir g_grenades = true visuose mapuose?
Taip buvo parašyta jo kode, nemačiau prasmės kažko keisti, jai norės, parašys ir bus pakeista.
o dėl Dunn0, tai pakeičiau autorių, jai jis yra jo kūrėjas.
paeditini šiek tiek kodą ir pasisavini pluginą :)
Dėja, tačiau klysti. ;)
Re: Padekit pridet i vip menu
Dėl manęs tai galėjai nekeist, man tiesiog juoko dozė dėl to autoriaus padarei ir tiek
jo plugine:

jo plugine:
Code: Select all
if (equali(mapname, "cs_", 3) || equali(mapname, "de_", 3) || equali(mapname, "knas_", 3) || equali(mapname, "mini_", 3) || equali(mapname, "surf_", 3)) { g_vipmenu = true g_grenades = true } if (equali(mapname, "35hp_", 3) || equali(mapname, "aim_", 3) || equali(mapname, "awp_", 3)) { g_vipmenu = false g_grenades = false } else if (equali(mapname, "aim_", 3) || equali(mapname, "fy_", 3)) { g_vipmenu = true g_grenades = false }
Padėjau? +rep
- valerka221
- O taip. Jis jau surinko 50 žinučių!
- Posts: 66
- Joined: 2013 Jun 22 16:51
- Skype: valer_ka4
Re: Padekit pridet i vip menu
dar pavadinime pacio plugino raso Zeus vipas bet kiek zn tai dunno kurejas 

Who is online
Users browsing this forum: No registered users and 2 guests