Sziasztok!
Elkészítettem gyorsan egy FilterScriptet a részegségrõl!
Különbözõ italokat lehet inni,és be tudtok rúgni!
Parancsok:
/bor -> Iszol egy üveg bort,rásegítessz a berúgásra!(Leggyengébb pia!)
/vodka -> Iszol egy üveg vodkát,rásegítessz a berúgásra!
/sor -> Iszol egy doboz sört!Rásegítessz a berúgásra!
/palinka ->Iszol egy pálinkát,rásegítessz a berúgásra!(Leghatásosabb!)
/reszeg -> Berúgsz
/reszegoff -> Kikapcsolod a részeg módot
Itt a pawno kód:
#include <a_samp>
#include <zcmd>
CMD:bor(playerid, params[])
{
SetPlayerDrunkLevel(playerid, GetPlayerDrunkLevel(playerid) +10000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Ittál egy üveg bort!Ha berúgtál:/reszegoff\");
return 1;
}
CMD:sor(playerid, params[])
{
SetPlayerDrunkLevel(playerid, GetPlayerDrunkLevel(playerid) +30000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Ittál egy doboz sört!Ha berúgtál:/reszegoff\");
return 1;
}
CMD:vodka(playerid, params[])
{
SetPlayerDrunkLevel(playerid, GetPlayerDrunkLevel(playerid) +20000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Ittál egy üveg Vodkát!Ha berúgtál:/reszegoff\");
return 1;
}
CMD:palinka(playerid, params[])
{
SetPlayerDrunkLevel(playerid, GetPlayerDrunkLevel(playerid) +50000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Ittál egy üveg páleszt!Ha berúgtál:/reszegoff\");
return 1;
}
CMD:reszegoff(playerid, params[])
{
SetPlayerDrunkLevel(playerid, 0);
SendClientMessage(playerid, 0xAFAFAFAA, \"Egy tartós,jó alvástól kijózanodtál!\");
return 1;
}
CMD:reszeg(playerid, params[])
{
SetPlayerDrunkLevel(playerid, 50000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Na most aztán jól leittad magad!/reszegoff!\");
return 1;
}
Nem töltöm fel semmilyen honlapra,mert nem akarok gázt a számítógépemmel!
Másoljátok ki ctrl + c,másoljátok be egy új pawnoba,ctrl + v!
Nem teszteltem,de szerintem mûködik!
Használjátok egészséggel!