•[ReA]xZummyTha™

Care este diferenta? :| ARTIST: [pawn]//////////////////////////////////////////////////////////////////////////////// // Ninsoare pe Server, versiune functionala by ARTIST // // Data proiectarii: 30/11/2011 // //////////////////////////////////////////////////////////////////////////////// #include <a_samp> #include <streamer> #include <zcmd> #undef MAX_PLAYERS #define MAX_SLOTS 50 //Indicam numarul sloturilor pe serverul nostru #define MAX_SNOW_OBJECTS 20 #define UPDATE_INTERVAL 750 #if MAX_SLOTS == -1 #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:ShowOn[MAX_SLOTS char], snowObject[MAX_SLOTS][MAX_SNOW_OBJECTS], updateTimer[MAX_SLOTS char] ; public OnFilterScriptExit() { ploop(i) { if(ShowOn{i}) { for(new j = 0; j < MAX_SNOW_OBJECTS; j++) DestroyDynamicObject(snowObject[j]); KillTimer(updateTimer{i}); } } return true; } public OnPlayerDisconnect(playerid) { if(ShowOn{playerid}) { for(new i = 0; i < MAX_SNOW_OBJECTS; i++) DestroyDynamicObject(snowObject[playerid]); ShowOn{playerid} = false; KillTimer(updateTimer{playerid}); } return true; } CB:UpdateSnow(playerid) { if(!ShowOn{playerid}) return false; 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); return true; } stock CreateSnow(playerid) { if(ShowOn{playerid}) return false; 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(100), random(100), random(100), -1, -1, playerid); ShowOn{playerid} = true; updateTimer{playerid} = SetTimerEx("UpdateSnow", UPDATE_INTERVAL, true, "i", playerid); return true; } stock DeleteSnow(playerid) { if(!ShowOn{playerid}) return false; for(new i = 0; i < MAX_SNOW_OBJECTS; i++) DestroyDynamicObject(snowObject[playerid]); KillTimer(updateTimer{playerid}); ShowOn{playerid} = false; return true; } CMD:snow(playerid, params[]) { if(ShowOn{playerid}) { DeleteSnow(playerid); SendClientMessage(playerid, 0x00FF00AA, "Ninsoarea a incetat..."); } else { CreateSnow(playerid); SendClientMessage(playerid, 0x00FF00AA, "A inceput sa ninga! A venit Iarna !!!"); } return true; } CMD:snowon(playerid, params[]) //Activeaza ninsoarea pentru toti jucatorii { if(!IsPlayerAdmin(playerid)) return false; ploop(i) { if(ShowOn{i}) continue; CreateSnow(i); } return true; } CMD:snowoff(playerid, params[]) //Dezactiveaza ninsoarea la toti jucatorii { if(!IsPlayerAdmin(playerid)) return false; ploop(i) { if(!ShowOn{i}) continue; DeleteSnow(i); } return true; }[/pawn] Tu: [pawn]#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 Schimba MAX_SLOTS pentru cati jucatori ai pe serverul tau! #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, "* Numai ninge acum."); } else { CreateSnow(playerid); SendClientMessage(playerid, 0x00FF00AA, "* Incepe sa ninga!"); } return 1; } CMD:allsnowon(playerid, params[]) { if(!IsPlayerAdmin(playerid)) return 0; ploop(i) { 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; }[/pawn] Foarte greu copy+paste. )

Destul de bun! Ai un+1!

Hmmm ... il stiu! Nu e facut de Tine!

Nu am zis ca l-am facut eu! Eu doar l-am postat pt voi!

Absolut tot!

Nu e facut de MaxXx! Nu ma int ce zici Tu pa!

O sa ma apuc sa iti rezolv toate problemele si bugurile din el! Pana atunci ai un 2.5/5 maxim! :-( Nu am ce sa ii fac e full bug's...

Buna dimineata. Am revenit cu cel de al 2-lea FS pe care il Postez. Ce contine?: » Este un System de Masini Personale! » Contine: 3 Masini Personale. » Se mai pot adauga masini! :-) » FS-ul are 252 de Lini. :embarrassed: Cum se instaleaza?: » Se extrage Fisierul [.pwn si .amx] din Arhiva si se baga in [filterscripts] din Server-ul vostru! » Se intra in fisierul: server.cfg si se cauta linia: filterscripts, acolo adaugati [PersCars]! :-) » Apoi deschideti server-ul si ii faceti un test la FS! :cool: Poze Masina Personala nr. 1: [img width=500 height=375] [img width=500 height=375] Aceasta este prima masina personala. Mai sunt inca 2 dar nu le-am facut poze! Care sunt Comenzile?: » Commands ~ /mycars [download]http://www.solidfiles.com/d/f1027bb550/[/download] [download]http://pastebin.com/h37pWBAp[/download] Astept de la voi: » Note! » Sugestii! Va multumesc pt timpul acordat! :-) Va rog nu schimbati Creditele! :|

Multumesc ca il folositi! Ma bucur foarte mult!

Nu, nu ramane! Dispare dupa Restart. Multumesc ca il folositi!

Frumos! Imi place. Nota 5/5 pt ca l-ai postat si 11/10 pt ca ai explicat foarte bine. :-)

Nu e primul meu FS! Am ogramada de FS-uri. Este primu FS postat pe Forumu asta! Si multumesc de nota!

Mda multi sunt incepatori...:-) Thanks pt nota.

Gata sefu am modificat! :-) Multumesc de nota.

L-am ajutat pe TW. Nu mai are nici o erroare si ii Merge bn Serverul acuma! :-) Sa te bucuri de el Alex! Si incearca sa nu il mananci asa de repede si pe asta!