Peršokti į turinį
  • ŽAIDIMAI
  • , ŽAIDIMAI
  • ŽAIDIMAI

Reiktu patvarkyti VIP ar perdaryti [+2Rep]


Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 4847 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Recommended Posts

#include

#include

#include

#include

#include

#define Plugin "VIP"

#define Version "1.0"

#define Author "xFrostas"

#define MaxPlayers 32

static const Color[] = "^x04"

new const Float: g_flCoords[][] =

{

{0.50, 0.40},

{0.56, 0.44},

{0.60, 0.50},

{0.56, 0.56},

{0.50, 0.60},

{0.44, 0.56},

{0.40, 0.50},

{0.44, 0.44}

}

new g_PlayerPos[MaxPlayers+1]

new maxplayers

new Killer_HP, HP_Add

public plugin_init()

{

register_plugin(Plugin, Version, Author)

register_cvar("health_kill", "25")

register_cvar("health_hs", "35")

register_cvar("money_kill", "500")

register_cvar("money_hs", "800")

register_clcmd("say /vip", "ShowVIP_Motd")

register_clcmd("say vip", "ShowVIP_Motd")

register_clcmd("say /vips", "Show_VIPS")

register_clcmd("say vips", "Show_VIPS")

register_event("DeathMsg", "Ev_Death", "a", "1>0")

register_event("Damage", "Ev_Damage", "b", "2>0", "3=0")

register_event("Damage", "Damage", "b")

maxplayers = get_maxplayers()

}

public client_authorized(id)

{

set_task(60.0, "Advert", id)

}

public Ev_DeathMsg()

{

if (read_data(1) <= maxplayers && read_data(1) && read_data(1) != read_data(2))

cs_set_user_money_ul(read_data(1), cs_get_user_money_ul(read_data(1)) + get_cvar_num("money_kill") - 300)

}

public Ev_Death()

{

new attacker = read_data(1)

if ((read_data(3) == 1) && (read_data(5) == 0))

{

HP_Add = get_cvar_num("health_hs")

}

else

{

HP_Add = get_cvar_num ("health_kill")

}

if (!(get_user_flags(attacker) & ADMIN_LEVEL_H))

return

Killer_HP = get_user_health(attacker)

Killer_HP += HP_Add

set_hudmessage(0, 255, 0, -1.0, 0.15, 0, 1.0, 1.0, 0.1, 0.1, -1)

show_hudmessage(attacker, "+%d HP", HP_Add)

}

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) * 3

if (hitpoint == 1)

money += get_cvar_num("money_hs")

cs_set_user_money_ul(attacker, cs_get_user_money_ul(attacker) + money)

}

}

public Ev_Damage(victim)

{

if (read_data(4) || read_data(5) || read_data(6))

{

new id = get_user_attacker(victim)

if ((1 <= id <= maxplayers) && is_user_connected(id))

{

if (get_user_flags(id) & ADMIN_LEVEL_H)

{

new iPos = ++g_PlayerPos[id]

if (iPos == sizeof(g_flCoords))

{

iPos = g_PlayerPos[id] = 0

}

set_hudmessage(0, 100, 200, Float:g_flCoords[iPos][0], Float:g_flCoords[iPos][1], 0, 0.1, 2.5, 0.02, 0.02, -1)

show_hudmessage(id, "%d", read_data(2))

}

}

}

}

public ShowVIP_Motd(id)

{

show_motd(id, "vip.txt")

}

public Advert(id)

{

print_color(id, "/y[/ctrVIP/y] /gRasyk /vip/y, /gkad Suzinotum kokios /gVIP Privilegijos/y.")

}

public Show_VIPS(user)

{

new adminnames[33][32]

new message[256]

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, adminnames[count++], 31)

len = format(message, 255, "%s VIP ONLINE: ", Color)

if (count > 0)

{

for(x = 0 ; x < count ; x++)

{

len += format(message[len], 255-len, "%s%s ", adminnames[x], x < (count-1) ? ", ":"")

if (len > 96 )

{

print_message(user, message)

len = format(message, 255, "%s", Color)

}

}

print_message(user, message)

}

else

{

len += format(message[len], 255-len, "%s NO VIP ONLINE.", Color)

print_message(user, message)

}

}

stock print_color(const id, const input[], any:...)

{

new count = 1, players[32]

static msg[191]

vformat(msg,190,input,3)

replace_all(msg,190,"/g","^4");// green txt

replace_all(msg,190,"/y","^1");// orange txt

replace_all(msg,190,"/ctr","^3");// team txt

replace_all(msg,190,"/w","^2");// team txt

if (id) players[0] = id; else get_players(players,count,"ch")

for (new i=0;i

if (is_user_connected(players))

{

message_begin(MSG_ONE_UNRELIABLE, get_user_msgid("SayText"), _, players)

write_byte(players)

write_string(msg)

message_end()

}

}

print_message(id, msg[])

{

message_begin(MSG_ONE, get_user_msgid("SayText"), {0,0,0}, id)

write_byte(id)

write_string(msg)

message_end()

}

-----------------------------------------------------

Tai vat reikia:

už HS gautu 35hp ir 800$

už KILL gautu 25hp ir 500$

ir kad už žala neduotu money nes zm servas tai ...

-----------------------------------------------------

Čia hp išvis neduoda ;D tik rašo, kad duoda.

O money išvis gryba pjauna, o daugiau viskas lux ;/ tas _ul prie money man reikalingas, del begaliniu pinigu iš anksto pasakau. ;)

-----------------------------------------------------

Tai vat kas sugebes paredaguot iškart dekingas ir [+2Rep]

Nuoroda į komentarą
Dalintis per kitą puslapį

Pazesiu ;)

-- Papildyta --

cs_set_user_money_ul(read_data(1), cs_get_user_money_ul(read_data(1)) + get_cvar_num("money_kill") - 300)

kam tas - 300? Tu pridedi pinigu irkartu atimi.Pagal ideja dar turetu 100$ atimti

Nuoroda į komentarą
Dalintis per kitą puslapį

žinok as apie scriptinga nlb žinau čia man draugas dare bet jis primiršes script tai jam nepavyko gerai padaryt.

--------------------------------------- Bet va ka galiu pasakyt------------------------

Jei neatiminėtu 300 tai gautų tiek pinigų pvz,: pagal cvar yra 800 ir dar + 300 tai 1100 gautu..

o čia taip padaryta, kad ka palei cvar parasai tiek ir gauni ;/

Nuoroda į komentarą
Dalintis per kitą puslapį

A.... supratau

-- Papildyta --

zodziu as net nesuprantu ka jis ce privele.Bu dar net neradau komanddos kad duotu pinigus ar hp :/

Nuoroda į komentarą
Dalintis per kitą puslapį

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 4847 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Svečias
Ši tema yra užrakinta.
  • Šiame puslapyje naršo:   0 nariai

    • Nėra registruotų narių peržiūrinčių šį forumą.

Skelbimai


×
×
  • Sukurti naują...