GTA Közösség - A magyar GTA fórum

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => A témát indította: Rexii - 2012. április 05. - 18:52:00

Cím: Részegeskedés
Írta: Rexii - 2012. április 05. - 18:52:00
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!
Cím: Részegeskedés
Írta: Gabor.. - 2012. április 05. - 20:38:59
Az érték 0-50000-ig van. :D Nem baj az, kezdõnek jól jöhet.
 
#include <a_samp>
#include <zcmd>
CMD:bor(playerid, params[])
{
SetPlayerDrunkLevel(playerid, 10000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Ittál egy üveg bort!Ha berúgtál:/reszegoff\");
return 1;
}
CMD:sor(playerid, params[])
{
SetPlayerDrunkLevel(playerid, 30000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Ittál egy doboz sört!Ha berúgtál:/reszegoff\");
return 1;
}
CMD:vodka(playerid, params[])
{
SetPlayerDrunkLevel(playerid, 40000);
SendClientMessage(playerid, 0xAFAFAFAA, \"Ittál egy üveg Vodkát!Ha berúgtál:/reszegoff\");
return 1;
}
CMD:palinka(playerid, params[])
{
SetPlayerDrunkLevel(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;
}
Cím: Részegeskedés
Írta: CANNONN - 2012. április 05. - 21:08:51
Nem nagy valami, de gyakorlásnak megfelelõ.
Cím: Részegeskedés
Írta: Rexii - 2012. április 06. - 11:32:26
Köszi Gabor,módosítva , ment a +!
Cím: Részegeskedés
Írta: Benceee - 2012. április 06. - 15:12:12
Ha kicsit bonyolítani akarod, akkor nem módosítod a berúgási szintet, hanem hozzáadsz.
 
SetPlayerDrunkLevel(playerid, GetPlayerDrunkLevel(playerid) +5000);

 
Mert elég durva, hogy csont részegre iszod magad, aztán iszol gyengébbet, és már nem is vagy olyan részeg. :)
Cím: Részegeskedés
Írta: Rexii - 2012. április 06. - 17:42:04
Ebben igazad van! :D
Nem néztem át annyira,hanem rögtön felraktam és kész :D
Mingyárt javítom!

Dupla hozzászólás automatikusan összefûzve. ( 2012. április 06. - 17:44:53 )

Javítva!Szerintem több hiba már nincs benne!Köszi mindenkinek a segítséget!
Mindenkinek ment a + a javításért!
Zárok!