hlmod.hu
https://hlmod.hu/

Át írja valaki? PLS
https://hlmod.hu/viewtopic.php?f=9&t=4246
Oldal: 1 / 1

Szerző:  norbee.16 [2012.04.29. 12:44 ]
Hozzászólás témája:  Át írja valaki? PLS

[spoiler]#include <amxmodx>
#include <zombieplague>
#include <fakemeta>

new g_itemhp, Armor, Health, Gravity

public plugin_init()
{
register_plugin("[ZP] Human Pack", "1.3", "zombieplague")

g_itemhp = zp_register_extra_item("Human Pack", 100, ZP_TEAM_HUMAN)

Health = register_cvar("zp_hp_health", "1000"); // Amount of HP
Armor = register_cvar("zp_hp_armor", "300"); // Amount of Armor
Gravity = register_cvar("zp_hp_gravity", "0.7"); // Amount of Gravity
}

public zp_extra_item_selected(player, itemid)
{
if (itemid == g_itemhp)
{

// Health
set_pev(player, pev_health, (pev(player, pev_health) + get_pcvar_float(Health)))

// Armor
set_pev(player, pev_armorvalue, (pev(player, pev_armorvalue) + get_pcvar_float(Armor)))

// Gravity
fm_set_user_gravity(player, get_pcvar_float(Gravity))

// Weapon
fm_give_item(player, "weapon_mp5navy")
fm_give_item(player, "weapon_ak47")
fm_give_item(player, "weapon_m4a1")
fm_give_item(player, "weapon_awp")
fm_give_item(player, "weapon_deagle")

// Item
fm_give_item(player, "weapon_hegrenade")
fm_give_item(player, "weapon_flashbang")
fm_give_item(player, "weapon_smokegrenade")

// BP ammo
fm_set_user_bpammo(player, CSW_DEAGLE, 200)
fm_set_user_bpammo(player, CSW_AK47, 200)
fm_set_user_bpammo(player, CSW_M4A1, 200)
fm_set_user_bpammo(player, CSW_AWP, 200)
fm_set_user_bpammo(player, CSW_MP5NAVY, 200)

fm_set_rendering(player, kRenderFxGlowShell, 10, 5, 0, kRenderNormal, 16);

client_print(player, print_chat, "[ZP] Te Vettel Egy Ember Csomagot!")

}
}

stock fm_set_user_bpammo(id, weaponid, amnt)
{
static offset;
switch(weaponid)
{
case CSW_AWP: offset = 377;
case CSW_SCOUT,CSW_AK47,CSW_G3SG1: offset = 378;
case CSW_M249: offset = 379;
case CSW_FAMAS,CSW_M4A1,CSW_AUG,CSW_SG550,CSW_GALI,CSW_SG552: offset = 380;
case CSW_M3,CSW_XM1014: offset = 381;
case CSW_USP,CSW_UMP45,CSW_MAC10: offset = 382;
case CSW_FIVESEVEN,CSW_P90: offset = 383;
case CSW_DEAGLE: offset = 384;
case CSW_P228: offset = 385;
case CSW_GLOCK18,CSW_MP5NAVY,CSW_TMP,CSW_ELITE: offset = 386;
case CSW_FLASHBANG: offset = 387;
case CSW_HEGRENADE: offset = 388;
case CSW_SMOKEGRENADE: offset = 389;
default: return 0;
}
set_pdata_int(id,offset,amnt,5);

return 1;
}

stock fm_set_user_gravity(index, Float:gravity = 1.0) {
set_pev(index, pev_gravity, gravity);

return 1;
}

stock fm_give_item(id, const item[])
{
static ent
ent = engfunc(EngFunc_CreateNamedEntity, engfunc(EngFunc_AllocString, item))
if (!pev_valid(ent)) return;

static Float:originF[3]
pev(id, pev_origin, originF)
set_pev(ent, pev_origin, originF)
set_pev(ent, pev_spawnflags, pev(ent, pev_spawnflags) | SF_NORESPAWN)
dllfunc(DLLFunc_Spawn, ent)

static save
save = pev(ent, pev_solid)
dllfunc(DLLFunc_Touch, ent, id)
if (pev(ent, pev_solid) != save)
return;

engfunc(EngFunc_RemoveEntity, ent)
}

// Set entity's rendering type (from fakemeta_util)
stock fm_set_rendering(entity, fx = kRenderFxNone, r = 255, g = 255, b = 255, render = kRenderNormal, amount = 16)
{
static Float:color[3]
color[0] = float(r)
color[1] = float(g)
color[2] = float(b)

set_pev(entity, pev_renderfx, fx)
set_pev(entity, pev_rendercolor, color)
set_pev(entity, pev_rendermode, render)
set_pev(entity, pev_renderamt, float(amount))
}[/spoiler]
A fegyverek közül kellene ki venni mindet csak az m4a1-et meg a deagle-t bent hagyni. előre is kösz.

Szerző:  CheeseDave [2012.04.29. 13:18 ]
Hozzászólás témája:  Re: Át írja valaki? PLS

Kód:
  1. public zp_extra_item_selected(player, itemid)

  2. {

  3. if (itemid == g_itemhp)

  4. {

  5.  

  6. // Health

  7. set_pev(player, pev_health, (pev(player, pev_health) + get_pcvar_float(Health)))

  8.  

  9. // Armor

  10. set_pev(player, pev_armorvalue, (pev(player, pev_armorvalue) + get_pcvar_float(Armor)))

  11.  

  12. // Gravity

  13. fm_set_user_gravity(player, get_pcvar_float(Gravity))

  14.  

  15. // Weapon

  16. //fm_give_item(player, "weapon_mp5navy")

  17. //fm_give_item(player, "weapon_ak47")

  18. fm_give_item(player, "weapon_m4a1")

  19. //fm_give_item(player, "weapon_awp")

  20. fm_give_item(player, "weapon_deagle")

  21.  

  22. // Item

  23. fm_give_item(player, "weapon_hegrenade")

  24. fm_give_item(player, "weapon_flashbang")

  25. fm_give_item(player, "weapon_smokegrenade")

  26.  

  27. // BP ammo

  28. fm_set_user_bpammo(player, CSW_DEAGLE, 200)

  29. //fm_set_user_bpammo(player, CSW_AK47, 200)

  30. fm_set_user_bpammo(player, CSW_M4A1, 200)

  31. //fm_set_user_bpammo(player, CSW_AWP, 200)

  32. //fm_set_user_bpammo(player, CSW_MP5NAVY, 200)

  33.  

  34. fm_set_rendering(player, kRenderFxGlowShell, 10, 5, 0, kRenderNormal, 16);

  35.  

  36. client_print(player, print_chat, "[ZP] Te Vettel Egy Ember Csomagot!")

  37.  

  38. }

  39. }

Minden más marad

Szerző:  norbee.16 [2012.04.29. 13:56 ]
Hozzászólás témája:  Re: Át írja valaki? PLS

CheeseDave írta:
Kód:
  1. public zp_extra_item_selected(player, itemid)

  2. {

  3. if (itemid == g_itemhp)

  4. {

  5.  

  6. // Health

  7. set_pev(player, pev_health, (pev(player, pev_health) + get_pcvar_float(Health)))

  8.  

  9. // Armor

  10. set_pev(player, pev_armorvalue, (pev(player, pev_armorvalue) + get_pcvar_float(Armor)))

  11.  

  12. // Gravity

  13. fm_set_user_gravity(player, get_pcvar_float(Gravity))

  14.  

  15. // Weapon

  16. //fm_give_item(player, "weapon_mp5navy")

  17. //fm_give_item(player, "weapon_ak47")

  18. fm_give_item(player, "weapon_m4a1")

  19. //fm_give_item(player, "weapon_awp")

  20. fm_give_item(player, "weapon_deagle")

  21.  

  22. // Item

  23. fm_give_item(player, "weapon_hegrenade")

  24. fm_give_item(player, "weapon_flashbang")

  25. fm_give_item(player, "weapon_smokegrenade")

  26.  

  27. // BP ammo

  28. fm_set_user_bpammo(player, CSW_DEAGLE, 200)

  29. //fm_set_user_bpammo(player, CSW_AK47, 200)

  30. fm_set_user_bpammo(player, CSW_M4A1, 200)

  31. //fm_set_user_bpammo(player, CSW_AWP, 200)

  32. //fm_set_user_bpammo(player, CSW_MP5NAVY, 200)

  33.  

  34. fm_set_rendering(player, kRenderFxGlowShell, 10, 5, 0, kRenderNormal, 16);

  35.  

  36. client_print(player, print_chat, "[ZP] Te Vettel Egy Ember Csomagot!")

  37.  

  38. }

  39. }

Minden más marad

nem értem :D ami pirossal van az marad vagy ami ott van azt töröljem?

Szerző:  Silent [2012.04.29. 13:57 ]
Hozzászólás témája:  Re: Át írja valaki? PLS

norbee.16 írta:
CheeseDave írta:
Kód:
  1. public zp_extra_item_selected(player, itemid)

  2. {

  3. if (itemid == g_itemhp)

  4. {

  5.  

  6. // Health

  7. set_pev(player, pev_health, (pev(player, pev_health) + get_pcvar_float(Health)))

  8.  

  9. // Armor

  10. set_pev(player, pev_armorvalue, (pev(player, pev_armorvalue) + get_pcvar_float(Armor)))

  11.  

  12. // Gravity

  13. fm_set_user_gravity(player, get_pcvar_float(Gravity))

  14.  

  15. // Weapon

  16. //fm_give_item(player, "weapon_mp5navy")

  17. //fm_give_item(player, "weapon_ak47")

  18. fm_give_item(player, "weapon_m4a1")

  19. //fm_give_item(player, "weapon_awp")

  20. fm_give_item(player, "weapon_deagle")

  21.  

  22. // Item

  23. fm_give_item(player, "weapon_hegrenade")

  24. fm_give_item(player, "weapon_flashbang")

  25. fm_give_item(player, "weapon_smokegrenade")

  26.  

  27. // BP ammo

  28. fm_set_user_bpammo(player, CSW_DEAGLE, 200)

  29. //fm_set_user_bpammo(player, CSW_AK47, 200)

  30. fm_set_user_bpammo(player, CSW_M4A1, 200)

  31. //fm_set_user_bpammo(player, CSW_AWP, 200)

  32. //fm_set_user_bpammo(player, CSW_MP5NAVY, 200)

  33.  

  34. fm_set_rendering(player, kRenderFxGlowShell, 10, 5, 0, kRenderNormal, 16);

  35.  

  36. client_print(player, print_chat, "[ZP] Te Vettel Egy Ember Csomagot!")

  37.  

  38. }

  39. }

Minden más marad

nem ertem :D ami pirosal van az marad vagy ami ott van azt töröljem?

Ez már a kész kód részlet. Tudni illik a // jel kommentet jelent tehát ami utána van az olyan mintha nemis lenne

Szerző:  DeteCT0R [2012.04.30. 12:15 ]
Hozzászólás témája:  Re: Át írja valaki? PLS

es ezis kb azt? ;

Szerző:  Silent [2012.04.30. 13:34 ]
Hozzászólás témája:  Re: Át írja valaki? PLS

DeteCT0R írta:
es ezis kb azt? ;

Egyáltalán nem. A ; jel a sor végét jelenti.

Szerző:  VirTuaL ~` [2012.04.30. 13:38 ]
Hozzászólás témája:  Re: Át írja valaki? PLS

SMA-ban sor vég,de ini fájlokban igen, "mintha nem is lenne".

Szerző:  DeteCT0R [2012.04.30. 14:05 ]
Hozzászólás témája:  Re: Át írja valaki? PLS

Igen ini filokra ertemxd

Oldal: 1 / 1 Minden időpont UTC+02:00 időzóna szerinti
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/