Naudingos funkcijos

[Blantas]

Naudingos funkcijos

Taigi sukūriau naują temą, kurioje galėsime dalintis savo sukurtomis funkcijomis.

Taisyklės:

• Ne spam'inti.
• Nenukrypti nuo temos.
• Jeigu funkcija nėra sukurta Jūsų, būtinai užrašykite jos autorių.

Funkcijos:

• [iurl=#GPIW]GetPlayersInWorld[/iurl]
• [iurl=#IBN]IsBotName[/iurl]
• [iurl=#getName]GetName[/iurl]
• [iurl=#Sppt]SetPlayerPosTimes[/iurl]
• [iurl=#GSV]GetServerVehicles[/iurl]
• [iurl=#RAV]RespawnAllVehicles[/iurl]
• [iurl=#rsav]RespawnAllVehicles #2[/iurl]
• ClearDeathList

[Blantas]

[anchor=GPIW]GetPlayersInWorld(virtualworld)

stock GetPlayersInWorld(virtualworld)
{
  new PlayersInWorld;
  for(new p=0;p<MAX_PLAYERS;p++)
  {
    if(IsPlayerConnected(p))
    {
      if(GetPlayerVirtualWorld(p) == virtualworld)
      {
        PlayersInWorld++;
      }
    }
  }
  return PlayersInWorld;
}

Funkcija su kuria gauname žaidėjų skaičių pasirinktame virtualiame pasaulyje. Pavyzdys:

new Zaidejai, Stringas[64];
Zaidejai = GetPlayersInWorld(0);
format(Stringas, 64, "Pasaulyje: %d žaidėjų.", Zaidejai);
SendClientMessageToAll(spalva, Stringas);

__________________________________________________ __________________________________________________ ________________

[anchor=IBN]IsBotName(playerid, Name[])

stock IsBotName(playerid, Name[])
{
  new Bot[MAX_PLAYER_NAME];
  GetPlayerName(playerid, Bot, sizeof(Bot));
  if(!strcmp(Bot, Name, true)) return 1;
  return 0;
}

Su funkcija galima patikrinti konkretų NPC ( boto ) vardą. Pavyzdys:

public OnPlayerSpawn(playerid)
{
  if(IsPlayerNPC(playerid)) //Jei žaidėjas yra NPC
  {
    if(IsBotName(playerid, "Doctor")) //Jei jo vardas "Doctor"
    {
      SetPlayerSkin(playerid, 70); //Nustatome išvaizdą į daktaro
    }
    return 1;
  }
  return 1;
}

[Dreftas]

Originally Posted by Blantas ;P*~

IsBotName(playerid, Name[])

stock IsBotName(playerid, Name[])
{
  new Bot[MAX_PLAYER_NAME];
  GetPlayerName(playerid, Bot, sizeof(Bot));
  if(!strcmp(Bot, Name, true)) return 1;
  return 0;
}

Su funkcija galima patikrinti konkretų NPC ( boto ) vardą. Pavyzdys:

Kodėl būtent boto? Ji puikiai tiktų tikrinant žaidėjo vardą, o jei būtent boto nori, tuomet funkcija turėtų būti tokia:

stock IsBotName(botid, name[]) {
	if(!IsPlayerNPC(botid)) return false;
	new BotName[MAX_PLAYER_NAME];
	GetPlayerName(botid, BotName, MAX_PLAYER_NAME);
	if(strcmp(BotName, name, true)) return false;
	return true;
}

[Dreftas]

GetName(playerid);

Funkcija kuri iškarto grąžina(return) žaidėjo vardą, be jokio papildomo string'o, kaip kad GetPlayerName.

[anchor=getName]

stock GetName(playerid) {
	new GName[MAX_PLAYER_NAME];
	GetPlayerName(playerid, GName, MAX_PLAYER_NAME);
	return GName;
}

Pavyzdys:

new str[64];
format(str,sizeof(str),"Tavo vardas yra %s",GetName(playerid));
SendClientMessage(playerid, 0x804000FF, str);

Taip pat galima pasidaryti ir GetPlayerIp funkciją.

--------------------------------------------------------------
[anchor=Sppt]
SetPlayerPosTimes(playerid, x, y, z, a, sekundes)

Funkcija kuri nustatytą sekundžių kiekį laiko žaidėją nurodytoje pozicijoje, taip pat pridėtas ir Angle nustatymas.
Funkcija:

new SpptTimer[MAX_PLAYERS], SpptTicks[MAX_PLAYERS];
stock SetPlayerPosTimes(playerid, Float:x, Float:y, Float:z, Float:a, sekundes) {
	KillTimer(SpptTimer[playerid]);
	SpptTicks[playerid] = 0;
	SpptTimer[playerid] = SetTimerEx("SpptFunc", 500, true, "dffffd", playerid, x, y, z, a, sekundes);
	SetPlayerPos(playerid, x, y, z);
	SetPlayerFacingAngle(playerid, a);
	return 1;
}
forward SpptFunc(playerid, Float:x, Float:y, Float:z, Float:a, sekundes);
public SpptFunc(playerid, Float:x, Float:y, Float:z, Float:a, sekundes) {
	SpptTicks[playerid]++;
	if(SpptTicks >= sekundes * 2) {
		KillTimer(SpptTimer[playerid]);
		SpptTicks[playerid] = 0;
	}
	SetPlayerPos(playerid, x, y, z);
	SetPlayerFacingAngle(playerid, a);
	return 1;
}

Pavyzdžio nerašau, susigalvokit patys
P.S. Šita netestuota
--------------------------------------------------------------

[Blantas]

[anchor=GSV]GetServerVehicles()

stock GetServerVehicles()
{
  new TotalVehicles = 0;
  for(new u=0;u<MAX_VEHICLES;u++)
	{
	  if(GetVehicleModel(u) >= 400 && GetVehicleModel(u) <= 611)
	  {
	    TotalVehicles++;
	  }
	}
	return TotalVehicles;
}

Funkcija, su kuria suskaičiuosite tranporto priemonių serveryje kiekį. Pavyzdys:

new Stringas[64], Masinos;
Masinos = GetServerVehicles();
format(Stringas, 64, "Serveryje yra %d transporto priemonių.", Masinos);
SendClientMessageToAll(spalva, Stringas);

__________________________________________________ __________________________________________________ ________________

[anchor=RAV]RespawnAllVehicles()

stock RespawnAllVehicles()
{
  new VehLimit = GetServerVehicles();
  VehLimit++;
  for(new vhs = 0; vhs < VehLimit; vhs++)
  {
    SetVehicleToRespawn(vhs);
  }
}

Funkcija nukelia visas serverio mašinas į pradinę poziciją. Būtina turėti prieš tai minėtą funkciją GetServerVehicles.

[Dreftas]

Originally Posted by Blantas ;P*~

stock RespawnAllVehicles()
{
  new VehLimit = GetServerVehicles();
  VehLimit++;
  for(new vhs = 0; vhs < VehLimit; vhs++)
  {
    SetVehicleToRespawn(vhs);
  }
}

Stupid. Use this:
[anchor=rsav]

stock RespawnAllVehicles() {
	for(new vhs = 0; vhs < MAX_VEHICLES; vhs++) {
		SetVehicleToRespawn(vhs);
  }
}

Paaiškinsiu kiek galima papraščiau, kodėl mano funkcija geresnė.
Blanto skripte ciklas for() vyksta MAX_VEHICLES kartų, sa-mp 0.3 tai yra 2000 kartų ties funkcija GetServerVehicles().
Paskui funkcijoje RespawnAllVehicles() blanto skripto ciklas for() vyksta dar tiek kartų, kiek yra GetServerVehicles().
Rezultatas: Jeigu žaidėjas turi 2000 mašinų, blanto funkcijos ciklas for() iš viso vyks 4000 kartų. Su mano funkcija ciklas for() iš viso vyks 2000 kartų. Dreft owned

[arnutisz]

Originally Posted by Dreft

GetName(playerid);

Funkcija kuri iškarto grąžina(return) žaidėjo vardą, be jokio papildomo string'o, kaip kad GetPlayerName.

stock GetName(playerid) {
	new GName[MAX_PLAYER_NAME];
	GetPlayerName(playerid, GName, MAX_PLAYER_NAME);
	return GName;
}

Pavyzdys:

new str[64];
format(str,sizeof(str),"Tavo vardas yra %s",GetName(playerid));
SendClientMessage(playerid, 0x804000FF, str);

Taip pat galima pasidaryti ir GetPlayerIp funkciją.

--------------------------------------------------------------
SetPlayerPosTimes(playerid, x, y, z, a, sekundes)

Funkcija kuri nustatytą sekundžių kiekį laiko žaidėją nurodytoje pozicijoje, taip pat pridėtas ir Angle nustatymas.
Funkcija:

new SpptTimer[MAX_PLAYERS], SpptTicks[MAX_PLAYERS];
stock SetPlayerPosTimes(playerid, Float:x, Float:y, Float:z, Float:a, sekundes) {
	KillTimer(SpptTimer[playerid]);
	SpptTicks[playerid] = 0;
	SpptTimer[playerid] = SetTimerEx("SpptFunc", 500, true, "dffffd", playerid, x, y, z, a, sekundes);
	SetPlayerPos(playerid, x, y, z);
	SetPlayerFacingAngle(playerid, a);
	return 1;
}
forward SpptFunc(playerid, Float:x, Float:y, Float:z, Float:a, sekundes);
public SpptFunc(playerid, Float:x, Float:y, Float:z, Float:a, sekundes) {
	SpptTicks[playerid]++;
	if(SpptTicks >= sekundes * 2) {
		KillTimer(SpptTimer[playerid]);
		SpptTicks[playerid] = 0;
	}
	SetPlayerPos(playerid, x, y, z);
	SetPlayerFacingAngle(playerid, a);
	return 1;
}

Pavyzdžio nerašau, susigalvokit patys
P.S. Šita netestuota
--------------------------------------------------------------

Šiaip tai galėtum patikrint funkciją prieš dėdamas ją į šią temą, kam klaidint žmones?
Beja, jei teisingai supratau ką tavo antra funkcija daro, tai kam reikia šitiek šūdo, jei užtenka "užšaldyt" ir "atšildyt" žaidėją? . Dreft owned .

[Dreftas]

Originally Posted by Scott[LT

]
Šiaip tai galėtum patikrint funkciją prieš dėdamas ją į šią temą, kam klaidint žmones?
Beja, jei teisingai supratau ką tavo antra funkcija daro, tai kam reikia šitiek šūdo, jei užtenka "užšaldyt" ir "atšildyt" žaidėją? . Dreft owned .

Šiaip jau parašiau, kad funkcija netestuota jei ponas nemokat skaityt >.>
O man patinka tas šūdas visas, negu užšaldymas >.>
Beje nei vienos iš čia įdėtos mano ar kitų funkcijų nenaudoju..
Dreft ownz

[arnutisz]

Tai jo, kišk visą tą šūdą į serverį ir serveris tikrai nelagins

[Dreftas]

Originally Posted by Scott[LT

]
Tai jo, kišk visą tą šūdą į serverį ir serveris tikrai nelagins

Jo, panašių dalykų yra ir pas mane, lago nejaučiu. =]