hlmod.hu

Magyar Half-Life Mód közösség!
Pontos idő: 2024.04.28. 08:25



Jelenlévő felhasználók

Jelenleg 521 felhasználó van jelen :: 0 regisztrált, 0 rejtett és 521 vendég

A legtöbb felhasználó (1565 fő) 2020.11.21. 11:26-kor tartózkodott itt.

Regisztrált felhasználók: nincs regisztrált felhasználó az elmúlt 5 percben aktív felhasználók alapján

Utoljára aktív
Ahhoz hogy lásd ki volt utoljára aktív, be kell jelentkezned.



Az oldal teljeskörű
használatához regisztrálj.

Regisztráció

Kereső


Új téma nyitása  Hozzászólás a témához  [ 9 hozzászólás ] 
Szerző Üzenet
 Hozzászólás témája: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.05. 15:44 
Offline
Őskövület
Avatar

Csatlakozott: 2011.09.17. 17:54
Hozzászólások: 2350
Megköszönt másnak: 40 alkalommal
Megköszönték neki: 57 alkalommal
Valaki megnézné mi ezzel a gond?Lefut stb. csak mikor megvenném a menüből nem történik semmi.

Kód:
#include <amxmodx>
#include <fakemeta>
#include <zombieplague>

#define PLUGIN "[ZP] Extra Item : Buy Ammo Packs"
#define VERSION "1.0.5"
#define AUTHOR "Fry!"

#define OFFSET_MONEY 115
#define OFFSET_LINUX 5

new g_ammo_cost, g_ammo_value, g_ammo_cost2, g_ammo_value2, g_ammo_cost3, g_ammo_value3, g_ammo_cost4, g_ammo_value4
new MsgID_Money
new keys = MENU_KEY_1|MENU_KEY_2|MENU_KEY_3|MENU_KEY_4|MENU_KEY_0

public plugin_init()
{
   register_plugin(PLUGIN, VERSION, AUTHOR)
   
   register_cvar("zp_extra_buy_ammo_packs",VERSION,FCVAR_SERVER|FCVAR_EXTDLL|FCVAR_UNLOGGED|FCVAR_SPONLY)
   
   MsgID_Money = get_user_msgid("Money")
   
   g_ammo_cost = register_cvar("zp_ammo_packs_cost", "1500")
   g_ammo_value = register_cvar("zp_ammo_packs_value", "3")
   
   g_ammo_cost2 = register_cvar("zp_ammo_packs_cost2", "3000")
   g_ammo_value2 = register_cvar("zp_ammo_packs_value2", "6")
   
   g_ammo_cost3 = register_cvar("zp_ammo_packs_cost3", "6000")
   g_ammo_value3 = register_cvar("zp_ammo_packs_value3", "9")
   
   g_ammo_cost4 = register_cvar("zp_ammo_packs_cost4", "12000")
   g_ammo_value4 = register_cvar("zp_ammo_packs_value4", "12")
   
   register_clcmd("say /buyammo", "buy_ammo")
   register_clcmd("say_team /buyammo", "buy_ammo")
   
   register_menucmd(register_menuid("Buy Ammo Packs Menu"), keys, "buy_ammo_packs_menu")
}

public client_putinserver(id)
{
   client_print(0, print_chat, "[ZP] A szerveren LCS-t lehet vasarolni $-ert !")
   client_print(0, print_chat, "[ZP] Ha LCS-t szeretnel vasarolni ird : /buyammo")
}

public buy_ammo(id)
{
   if (!is_user_alive(id))
   {
      client_print(id, print_chat, "[ZP] Halott vagy ! Igy nem tudsz vasarolni !")
      return PLUGIN_HANDLED
   }
   
   new menu[192]
   format(menu, 191, "Valassz^n^n1. 3 LCS - $1500^n2. 6 LCS - $3000^n3. 9 LCS - $6000^n4. 12 LCS - $12000^n0. Kilepes.")
   show_menu(id, keys, menu)
   
   return PLUGIN_CONTINUE
}

public buy_ammo_packs_menu(id, keys)
{
   switch(keys)
   {
      case 0:
      {
         new user_cash = fm_get_user_money(id)
         new money_cost = get_pcvar_num(g_ammo_cost)
   
         new user_ammo = zp_get_user_ammo_packs(id)
   
         if (user_cash < money_cost)
         {
            client_print(id, print_chat, "[ZP] Nincs eleg penzed !", money_cost)
            return PLUGIN_HANDLED
         }
   
         fm_set_user_money(id, user_cash - money_cost)
         zp_set_user_ammo_packs(id, user_ammo + get_pcvar_num(g_ammo_value))
      }
      case 1:
      {
         new user_cash = fm_get_user_money(id)
         new money_cost = get_pcvar_num(g_ammo_cost2)
         
         new user_ammo = zp_get_user_ammo_packs(id)
         
         if (user_cash < money_cost)
         {
            client_print(id, print_chat, "[ZP] Nincs eleg penzed !", money_cost)
            return PLUGIN_HANDLED
         }
         
         fm_set_user_money(id, user_cash - money_cost)
         zp_set_user_ammo_packs(id, user_ammo + get_pcvar_num(g_ammo_value2))
      }
      case 2:
      {
         new user_cash = fm_get_user_money(id)
         new money_cost = get_pcvar_num(g_ammo_cost3)
         
         new user_ammo = zp_get_user_ammo_packs(id)
         
         if (user_cash < money_cost)
         {
            client_print(id, print_chat, "[ZP] Nincs eleg penzed !", money_cost)
            return PLUGIN_HANDLED
         }
         
         fm_set_user_money(id, user_cash - money_cost)
         zp_set_user_ammo_packs(id, user_ammo + get_pcvar_num(g_ammo_value3))
      }
      case 3:
      {
         new user_cash = fm_get_user_money(id)
         new money_cost = get_pcvar_num(g_ammo_cost4)
         
         new user_ammo = zp_get_user_ammo_packs(id)
         
         if (user_cash < money_cost)
         {
            client_print(id, print_chat, "[ZP] Nincs eleg penzed !", money_cost)
            return PLUGIN_HANDLED
         }
         
         fm_set_user_money(id, user_cash - money_cost)
         zp_set_user_ammo_packs(id, user_ammo + get_pcvar_num(g_ammo_value4))
      }
      case 4:
      {
         return PLUGIN_HANDLED
      }
   }
   return PLUGIN_HANDLED
}
   
stock fm_set_user_money(index, money, flash=1)
{
   set_pdata_int(index, OFFSET_MONEY, money, OFFSET_LINUX)

   message_begin(MSG_ONE, MsgID_Money, {0,0,0}, index)
   write_long(money)
   write_byte(flash)
   message_end()
}

stock fm_get_user_money(index)
{
   return get_pdata_int(index, OFFSET_MONEY, OFFSET_LINUX)
}


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.05. 16:36 
Offline
Tiszteletbeli
Avatar

Csatlakozott: 2011.09.18. 13:01
Hozzászólások: 4270
Megköszönt másnak: 55 alkalommal
Megköszönték neki: 513 alkalommal
Ez a Plugin csak akkor megy ha bevan kapcsolva a penz:)

_________________
Idk. Csak ugy funbooo.
Kép


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.06. 08:51 
Offline
Őskövület
Avatar

Csatlakozott: 2011.09.17. 17:54
Hozzászólások: 2350
Megköszönt másnak: 40 alkalommal
Megköszönték neki: 57 alkalommal
Be van :)
zp_remove_money 0 ...
És nem megy...


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.06. 13:44 
Offline
Őskövület
Avatar

Csatlakozott: 2011.09.17. 17:54
Hozzászólások: 2350
Megköszönt másnak: 40 alkalommal
Megköszönték neki: 57 alkalommal
Ezzel nem lesz semmi !? KépKép


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.06. 15:19 
Offline
Tiszteletbeli
Avatar

Csatlakozott: 2011.09.18. 13:01
Hozzászólások: 4270
Megköszönt másnak: 55 alkalommal
Megköszönték neki: 513 alkalommal
virtualcfg írta:
Ezzel nem lesz semmi !? KépKép


De lesz megsugom ( Porosodni fog elete vegeig :S) :o :o :o :o :o

_________________
Idk. Csak ugy funbooo.
Kép


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.06. 18:16 
Offline
Őskövület
Avatar

Csatlakozott: 2011.09.17. 17:54
Hozzászólások: 2350
Megköszönt másnak: 40 alkalommal
Megköszönték neki: 57 alkalommal
Csakis Kép


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.06. 19:52 
Offline
Őskövület
Avatar

Csatlakozott: 2011.09.17. 17:54
Hozzászólások: 2350
Megköszönt másnak: 40 alkalommal
Megköszönték neki: 57 alkalommal
Nem lehet hogy az nvault.inc szükségeltetik? KépKép


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.06. 23:42 
Offline
Tiszteletbeli
Avatar

Csatlakozott: 2011.09.18. 13:01
Hozzászólások: 4270
Megköszönt másnak: 55 alkalommal
Megköszönték neki: 513 alkalommal
virtualcfg írta:
Nem lehet hogy az nvault.inc szükségeltetik? KépKép


Minek az?Inc csak a konvertalasnal kell :)

_________________
Idk. Csak ugy funbooo.
Kép


Hozzászólás jelentése
Vissza a tetejére
   
 Hozzászólás témája: Re: [ZP] Extra: Buy Ammo Packs
HozzászólásElküldve: 2012.01.07. 07:28 
Offline
Developer
Avatar

Csatlakozott: 2011.06.01. 21:11
Hozzászólások: 7962
Megköszönt másnak: 295 alkalommal
Megköszönték neki: 535 alkalommal
Max a modul kell:)

_________________
http://www.easyrankup.eu


Hozzászólás jelentése
Vissza a tetejére
   
Hozzászólások megjelenítése:  Rendezés  
Új téma nyitása  Hozzászólás a témához  [ 9 hozzászólás ] 


Ki van itt

Jelenlévő fórumozók: nincs regisztrált felhasználó valamint 59 vendég


Nyithatsz új témákat ebben a fórumban.
Válaszolhatsz egy témára ebben a fórumban.
Nem szerkesztheted a hozzászólásaidat ebben a fórumban.
Nem törölheted a hozzászólásaidat ebben a fórumban.
Nem küldhetsz csatolmányokat ebben a fórumban.

Keresés:
Ugrás:  
Powered by phpBB® Forum Software © phpBB Limited
Magyar fordítás © Magyar phpBB Közösség
Portal: Kiss Portal Extension © Michael O'Toole