Szerző Téma: Pickup keresõ Rcon adminnak  (Megtekintve 908 alkalommal)

Pickup keresõ Rcon adminnak
« Dátum: 2014. június 26. - 13:14:33 »
+1 Show voters
hali.
Készítettem egy \"kincskeresõ\" scriptet, mely nem a szokásos pénzeszsák script, hanem egy rcon admin (igény szerint átírható) leteszi egy elrejtett helyre a kincset, majd azt engedélyezve a játékosok megkeresik. Az admin a /event paranccsal segítheti a játékosokat a kincs megtalálásában.
Spoiler for maga a szkript:


#include <a_samp>
#include <zcmd>
new pick;
new megtalaltak;
new jutalom[512];
new Float:X, Float:Y, Float:Z;
public OnFilterScriptInit()
{
return 1;
}
CMD:event(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new string[512];
format(string, sizeof(string), \"{00ff00}Kincskeresési Infó: {ffea00}%s\", params);
SendClientMessageToAll(-1, string);
}
return 1;
}
CMD:letesz(playerid, params[])
{
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, 0xff0000aa, \"Nem vagy RCON Admin!\");
new string[256];
megtalaltak = 1;
GetPlayerPos(playerid, X, Y, Z);
pick = CreatePickup(1276, 1, X, Y, Z, -1);
format(string, sizeof(string), \"[Kincskeresés] A Kincs elrejtve. Helye:%s.\", params);
SendClientMessageToAll(0x09ff00AA, string);
SetTimer(\"Mehet\", 5000, 0);
return 1;
}
CMD:engedelyez(playerid, params[])
{
megtalaltak = 0;
SendClientMessage(playerid, 0xffffffaa, \"Pickup engedélyezve!\");
return 1;
}
forward Mehet(playerid);
public Mehet(playerid)
{
SetTimerEx(\"pickup\", 500, 1, \"i\", playerid);
return 1;
}
forward pickup();
public pickup()
{
if(megtalaltak != 1)
for(new playerid = 0;playerid<MAX_PLAYERS;playerid++)
{
if(IsPlayerInRangeOfPoint(playerid, 2, X, Y, Z))
{
    DestroyPickup(pick);
switch(random(7))
{
    case 0: GivePlayerMoney(playerid, 25000000), jutalom = \"25 milió dollár\";
    case 1: SetPlayerScore(playerid, GetPlayerScore(playerid)+250), jutalom = \"250 pont\";
    case 2: jutalom = \"Egy szabadon választott ház, amit az adminok adnak meg\";
    case 3: SetPlayerHealth(playerid, 9999999), jutalom = \"örök élet\";
    case 4: jutalom = \"1-es szintû vip, amit az adminok adnak meg\";
    case 5: GivePlayerMoney(playerid, 50000000), jutalom = \"50 millió dollár\";
    case 6: GivePlayerMoney(playerid, 20000000),SetPlayerScore(playerid,GetPlayerScore(playerid)+125), jutalom = \"20 milla, és 125 pont\";
}
new string[512], pname[MAX_PLAYER_NAME];
GetPlayerName(playerid, pname, sizeof(pname));
format(string, sizeof(string), \"{ffffff}%s {09ff00}megtalálta a Kincset! {ffffff}[Jutalma: %s]\", pname, jutalom);
SendClientMessageToAll(0xffffffaa, string);
megtalaltak = 1;
}
}
return 1;
}
stock pName(playerid) {
static getname[24];
GetPlayerName(playerid, getname, 24);
return getname;
}

Nem elérhető Mate.

  • 223
  • Advertising Designer. Video Editor. Ex-Mapper.
    • Profil megtekintése
Pickup keresõ Rcon adminnak
« Válasz #1 Dátum: 2014. június 26. - 17:45:11 »
0 Show voters
Tetszik! :) \"+\"

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal