Szerző Téma: Hó Filterszkript  (Megtekintve 3309 alkalommal)

Hó Filterszkript
« Dátum: 2012. november 15. - 19:41:40 »
0 Show voters
Sziasztok!!

Ebben, egy jó kis hó filterszkriptet hoztam el nem tudom, van e ilyen téma ha van elnézést kérek.


Szóval információk:


Nem magyar


Készítette: Kwarde


Eredeti téma linkje:
http://forum.sa-mp.com/showthread.php?t=296904

Parancsok:


1. /snow


2. /allsnowon


3. /allsnowoff


Letöltés((Pastebin.com)):


((pwn))
http://pastebin.com/Dw7f4PCB

Pawno Tag:




#include <a_samp>
#include <streamer>
#include <zcmd>
#undef MAX_PLAYERS
#define MAX_SLOTS           -1
#define MAX_SNOW_OBJECTS    8
#define UPDATE_INTERVAL     750
#if MAX_SLOTS == -1
#error Change MAX_SLOTS to the max players of your server! (At line 6)
#endif
#define ploop(%0)         for(new %0 = 0; %0 < MAX_SLOTS; %0++) if(IsPlayerConnected(%0))
#define CB:%0(%1)           forward %0(%1); public %0(%1)
new bool:snowOn[MAX_SLOTS char],
snowObject[MAX_SLOTS][MAX_SNOW_OBJECTS],
updateTimer[MAX_SLOTS char]
;
public OnFilterScriptExit()
{
ploop(i)
{
    if(snowOn{i})
    {
        for(new j = 0; j < MAX_SNOW_OBJECTS; j++) DestroyDynamicObject(snowObject[j]);
   KillTimer(updateTimer{i});
}
}
return 1;
}
public OnPlayerDisconnect(playerid)
{
if(snowOn{playerid})
{
    for(new i = 0; i < MAX_SNOW_OBJECTS; i++) DestroyDynamicObject(snowObject[playerid]);
snowOn{playerid} = false;
KillTimer(updateTimer{playerid});
}
return 1;
}
CB:UpdateSnow(playerid)
{
if(!snowOn{playerid}) return 0;
new Float:pPos[3];
GetPlayerPos(playerid, pPos[0], pPos[1], pPos[2]);
for(new i = 0; i < MAX_SNOW_OBJECTS; i++) SetDynamicObjectPos(snowObject[playerid], pPos[0] + random(25), pPos[1] + random(25), pPos[2] - 5 + random(10));
return 1;
}
stock CreateSnow(playerid)
{
if(snowOn{playerid}) return 0;
new Float:pPos[3];
GetPlayerPos(playerid, pPos[0], pPos[1], pPos[2]);
for(new i = 0; i < MAX_SNOW_OBJECTS; i++) snowObject[playerid] = CreateDynamicObject(18864, pPos[0] + random(25), pPos[1] + random (25), pPos[2] - 5 + random(10), random(280), random(280), 0, -1, -1, playerid);
snowOn{playerid} = true;
updateTimer{playerid} = SetTimerEx(\"UpdateSnow\", UPDATE_INTERVAL, true, \"i\", playerid);
return 1;
}
stock DeleteSnow(playerid)
{
if(!snowOn{playerid}) return 0;
for(new i = 0; i < MAX_SNOW_OBJECTS; i++) DestroyDynamicObject(snowObject[playerid]);
KillTimer(updateTimer{playerid});
snowOn{playerid} = false;
return 1;
}
CMD:snow(playerid, params[])
{
if(snowOn{playerid})
{
    DeleteSnow(playerid);
    SendClientMessage(playerid, 0x00FF00AA, \"* It\'s not snowing anymore now.\");
}
else
{
    CreateSnow(playerid);
    SendClientMessage(playerid, 0x00FF00AA, \"* Let it snow, let it snow, let it snow!\");
}
return 1;
}
CMD:allsnowon(playerid, params[])
{
    if(!IsPlayerAdmin(playerid)) return 0;
    ploop(i) //This is included in my FS! It\'s the \'#define ploop(%0)\' thing.
    {
        if(snowOn{i}) continue;
        CreateSnow(i);
    }
    return 1;
}
CMD:allsnowoff(playerid, params[])
{
    if(!IsPlayerAdmin(playerid)) return 0;
    ploop(i)
    {
        if(!snowOn{i}) continue;
        DeleteSnow(i);
    }
    return 1;
}

 
 
Remélem, tetszik valakinek!!

Sok szerencsét kívánok a hó filterszkripthez!!


Üdvözlettel: Bajnok!!

Nem elérhető Amf

  • 1459
    • Profil megtekintése
Hó Filterszkript
« Válasz #1 Dátum: 2012. november 15. - 20:49:56 »
0 Show voters
Ezt nem Y-Less készítette? :hmmm:

Nem elérhető b1s

  • 2212
  • Faszidegbénulás
    • Profil megtekintése
Hó Filterszkript
« Válasz #2 Dátum: 2012. november 15. - 21:22:28 »
0 Show voters
Teszteltem, mûködik :)

Hó Filterszkript
« Válasz #3 Dátum: 2012. november 15. - 21:28:47 »
0 Show voters
Ezt nem Y-Less készítette?[/quote]
Nem tudom...

Én úgy tudom nem õ készítette!!

Nem elérhető JackBronson

  • 1499
  • ??
    • Profil megtekintése
Hó Filterszkript
« Válasz #4 Dátum: 2012. november 16. - 09:21:36 »
0 Show voters
Ezt tavaly hasznaltam :D

Nem elérhető pisti525

  • 906
  • One Shot, One Kill
    • Profil megtekintése
Hó Filterszkript
« Válasz #5 Dátum: 2012. november 16. - 22:48:23 »
0 Show voters
Ez mindenkinek látszódik vagy csak magamnak látszódik ?

Nem elérhető ObiWan

  • 596
    • Profil megtekintése
Hó Filterszkript
« Válasz #6 Dátum: 2012. november 18. - 22:04:37 »
0 Show voters
Nekem errort ír a 12. sorra :S
Valaki valami megoldás?

Nem elérhető Axe9

  • 131
    • Profil megtekintése
Hó Filterszkript
« Válasz #7 Dátum: 2012. november 19. - 00:26:31 »
0 Show voters
a 12sorra nekem is errort ír. :S Help pls
Erroros sor:
 
        #error MAX_SLOTS to the max players of your server! (At line 6)

 
Error:
 
snows.pwn(12) : fatal error 111: user error: MAX_SLOTS to the max players of your server! (At line 6)

Nem elérhető JackBronson

  • 1499
  • ??
    • Profil megtekintése
Hó Filterszkript
« Válasz #8 Dátum: 2012. november 19. - 06:25:59 »
0 Show voters
#error MAX_SLOTS IDE egy számot irj pl 30
Ahány slotos a szeród annyit írj oda.

Nem elérhető Jippy

  • 618
    • Profil megtekintése
Hó Filterszkript
« Válasz #9 Dátum: 2012. november 19. - 11:19:58 »
0 Show voters
Ezt tavaly használtam, amikor ismerõsömmel játszottam házi szerón. Nagyon jó kis script, köszi hogy felraktad mert eltûnt..   :thumbsup:

Nem elérhető Axe9

  • 131
    • Profil megtekintése
Hó Filterszkript
« Válasz #10 Dátum: 2012. november 19. - 22:37:42 »
0 Show voters
Error::S
 
D:\\Játékdvd-cd\\GTA SA SCRIPT\\samp03e_svr_R2_win32\\pawno\\snows.pwn(12) : fatal error 111: user error: MAX_SLOTS 200
 
Compilation aborted.Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
1 Error.

Nem elérhető Jippy

  • 618
    • Profil megtekintése
Hó Filterszkript
« Válasz #11 Dátum: 2012. november 20. - 21:44:20 »
0 Show voters
A szervered 200 slotos összesen?
Mert úgy kell oda írni ahány slotos
Nekem 10 slotos házi szerveren így van: MAX_SLOTS 10
és mûködik..

Nem elérhető ZyZu.

  • Globális moderátor
  • 8939
  • my turbo diesel forum
  • Discord: ZyZu.
    • Profil megtekintése
Hó Filterszkript
« Válasz #12 Dátum: 2012. november 21. - 15:15:33 »
0 Show voters
Idézetet írta: Axe9 date=1353361062\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29874\" data-ipsquote-contentclass=\"forums_Topic
Error::S
 
D:\\Játékdvd-cd\\GTA SA SCRIPT\\samp03e_svr_R2_win32\\pawno\\snows.pwn(12) : fatal error 111: user error: MAX_SLOTS 200
 
Compilation aborted.Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
1 Error.

 

Szerintem nagy számot írtál oda amennyi a szervered férõhelye anyit írj oda..

Hó Filterszkript
« Válasz #13 Dátum: 2012. november 21. - 17:00:17 »
0 Show voters
200 Slottos a szerverem.

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal