•[ReA]xZummyTha™
Membru-
Posts
35 -
Joined
-
Last visited
Never
Content Type
Profiles
Forums
News
Documentation
Everything posted by •[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!
-
Personal Cars System by Mee! xD
•[ReA]xZummyTha™ replied to •[ReA]xZummyTha™'s topic in Filterscript-uri
Nu am zis ca l-am facut eu! Eu doar l-am postat pt voi! -
Personal Cars System by Mee! xD
•[ReA]xZummyTha™ replied to •[ReA]xZummyTha™'s topic in Filterscript-uri
Absolut tot! -
Personal Cars System by Mee! xD
•[ReA]xZummyTha™ replied to •[ReA]xZummyTha™'s topic in Filterscript-uri
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!
-
I-le-am rezolvat eu cu TW. Mai are un Warnings inofensiv. :-) Cu placere Dane!
-
Parca ti-le rezolvasem eu pe Mess. ( Imi pare chiar rau pt ca au reaparut! :-( Sper sa le rezolvi cat de repede cu putiinta. :-)
-
Thanks. :kiss:
-
Multumesc ca mi-ai zis! Si thanks pt nota. :kiss: Am adaugat FS si pe Pastebin.
-
Buna dimineata. Am terminat primul meo FS pe care il Postez. Ce contine?: » Este un System de Masini! » Contine: 29 de Masini. » Se mai pot adauga masini! :-) » FS-ul are 366 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 Cars Zummy! :-) » Apoi deschideti server-ul si ii faceti un test la FS! :cool: Cand creati o masina va apare pe ecran urmatorul Text: Unde 411 este ID de la Vehiculul: Infernus! Care sunt Comenzile?: » Cu comanda /cars puteti vedea lista cu masini! :-) » Iar pt a creea un vehicul scrieti: /cars NumeVeh » de Ex: /cars infernus! ID: 411 [download]http://www.solidfiles.com/d/a188eba5df[/download] [download]http://pastebin.com/EAJgGVjy[/download] Astept de la voi: » Note! » Sugestii! Va multumesc pt timpul acordat! :-) Va rog nu schimbati Creditele! :|
-
Am gasit eu un sistem cu tot cu Poarta + Comanda. [pawn]#include <a_samp> new armygate[2];//0 = ID-ul obiectului, 1 = variabila pentru verificarea porti (0 = inchisa, 1 = deschisa) public OnFilterScriptInit() { armygate[0] = CreateObject(975, 213.3999, 1874.6995, 13.8000, 0.0000, 0.0000, 0.0000);//Poarta inchisa armygate[1] = 0;//Setam variabila de verificare 0 return 1; } public OnFilterScriptExit() { DestroyObject(armygate[0]);//Distrugem obiectul return 1; } public OnPlayerCommandText(playerid, cmdtext[]) { if(strcmp("/armygate", cmdtext, true) == 0) { if(IsPlayerInRangeOfPoint(playerid, 7.5, 214.0703, 1875.0997, 13.1470))//Verificam daca jucatorul este langa poarta (de preferat sa nu fie la fel ca cele cand poarta este inchisa) { if(armygate[1] == 0)//Verificam daca poarta este inchisa { MoveObject(armygate[0], 205.6000, 1874.6999, 13.8000, 5.0);//Mutam poarta catre pozitia deschis armygate[1] = 1;//Setam variabila de verificare 1 } else if(armygate[1] == 1)//Verificam daca poarta este deschisa { MoveObject(armygate[0], 213.3999, 1874.6995, 13.8000, 5.0);//Mutam poarta catre pozitia inchis armygate[1] = 0;//Setam variabila de verificare 0 } } return 1; } return 0; }[/pawn] Daca te-am ajutat nu uita un +1 Respect pt mene. ID la poarta este 975! :-)
-
No problemo! Te ajut oricand.
-
Cu placere cred ca merit si eo un +1 la Respect no?
-
Schimba ZCMD.ini cu unu-l mai nou! Ial de pe Net, si bagal in pawno/include! O sa iti mearga. Vezi ca ZCMD-ul sa fie mai nou.
-
Te ajut eu! Da-mi ID tau prin PM sau ial tu pe al meu de la Profil si dami Add.