Szerző Téma: VIP System  (Megtekintve 4138 alkalommal)

Nem elérhető BoSS

  • 816
    • Profil megtekintése
VIP System
« Dátum: 2012. március 30. - 23:06:33 »
+5 Show voters
Sziasztok.
Elsõ \"komolyabb\" scriptem 75%-ban egyedül csináltam,Segítséget MonsterGame-tõl kaptam(õ tanítgat engem scriptelni)
Tehát ez egy VIP System:
Admin Parancsok:
/advip - ezt csak 4-es admin tudja adni(vagy amilyenre te állítod)
/vipel - ezt szintén 4-es admin tudja használni
Vip parancsok
/vcar
/vfegyver
/vgoto
/vjail
/vunjail
/vfix
 
#include <a_samp>
#include <zcmd>
#include <sscanf>
#define FILTERSCRIPTS
#define COLOR_WHITE 0xFFFFFFFF
#define COLOR_RED 0xFF0606FF
new vip[MAX_PLAYERS] = 0;
new AdminLevel[MAX_PLAYERS] = 0;
/**************V.I.P.*****************/
CMD:vcar(playerid, params[])
{
if(vip[playerid] == 1)
{
new carid;
if(sscanf(params,\"i\", carid)) { SendClientMessage(playerid,COLOR_WHITE,\"Használat: /vcar [jármú id]\"); return 1; }
SendClientMessage(playerid,COLOR_RED,\"Sikeresen lekértél egy jármût!\");
if(carid > 611 || carid < 400) { SendClientMessage(playerid,COLOR_RED,\"HIBA: Nincs ilyen jármû id!\"); return 1; }
else {
new Float:x,Float:y,Float:z;
GetPlayerPos(playerid,x,y,z);
new car = CreateVehicle(carid,x,y,z,95.0,0,0,1000);
PutPlayerInVehicle(playerid, car, 0);
}
}
else if(vip[playerid] == 0)
{
SendClientMessage(playerid,COLOR_RED,\"HIBA: Nem vagy V.I.P!\");
}
return 1;
}
CMD:vfegyver(playerid, params[])
{
if(vip[playerid] == 1)
{
new id;
new ammo;
new weapon;
if(sscanf(params,\"uii\",id,weapon,ammo)) SendClientMessage(playerid,COLOR_WHITE,\"Használat: /giveweapon [id] [fegyver id] [lõszer]\");
else if (id == INVALID_PLAYER_ID) SendClientMessage(playerid, COLOR_RED, \"HIBA: Rossz játékos id!\");
else {
new string[128];
if(weapon > 46 || weapon < 0) { SendClientMessage(playerid,COLOR_RED,\"HIBA: Nincs ilyen fegyver id!\"); return 1; }
GetPlayerName(playerid,string,sizeof(string));
format(string,sizeof(string),\"[VIP]%s {FF6600} adott neked fegyvert! {00FF33} (Fegyver id:%d | {FF9966} Lõszer: %d)\",string,weapon,ammo);
SendClientMessage(id,COLOR_RED,string);
GetPlayerName(id,string,sizeof(string));
format(string,sizeof(string),\"{{FF9966}} Adtál %s-nak/nek fegyvert! {00FF33} (Fegyver id:%d | {FF6600} Lõszer: %d)\",string,weapon,ammo);
SendClientMessage(playerid,COLOR_RED,string);
GivePlayerWeapon(id,weapon,ammo);
}
}
else if(vip[playerid] == 0)
{
SendClientMessage(playerid,COLOR_RED,\"HIBA: Nem vagy V.I.P!\");
}
return 1;
}
CMD:vgoto(playerid, params[])
{
if(vip[playerid] == 1)
{
new id;
if(sscanf(params , \"u\" ,id)) SendClientMessage(playerid, COLOR_WHITE, \"Használat : /vgoto [id].\");
else if (id == INVALID_PLAYER_ID) SendClientMessage(playerid, COLOR_RED, \"HIBA: Rossz játékos id!\");
else {
new Float:x;
new Float:y;
new Float:z;
GetPlayerPos(id,x,y,z);
SetPlayerPos(playerid,x+1,y+1,z);
new string[128];
GetPlayerName(id,string,sizeof(string));
format(string,sizeof(string),\"{FF0000} Oda teleportáltál {EECCCC} %s-hoz/hez!\",string);
SendClientMessage(playerid,COLOR_RED,string);
}
}
else if(vip[playerid] == 0)
{
SendClientMessage(playerid,COLOR_RED,\"HIBA: Nem vagy V.I.P\");
}
}
CMD:vjail(playerid, params[])
{
if(vip[playerid] == 1)
{
new id;
if(sscanf(params , \"u\" ,id)) SendClientMessage(playerid, COLOR_WHITE, \"Használat : /vjail [id].\");
else if (id == INVALID_PLAYER_ID) SendClientMessage(playerid, COLOR_RED, \"HIBA: Rossz játékos id!\");
else {
new string[200];
GetPlayerName(playerid,string,sizeof(string));
format(string,sizeof(string),\"{00FFFF} [VIP]%s {FF6600} börtönbe zárt!\",string);
SendClientMessage(id,COLOR_RED,string);
SetPlayerPos(id,223.3760,109.9426,999.0156);
SetPlayerInterior(id,10);
TogglePlayerControllable(id, 0);
GetPlayerName(id,string,sizeof(string));
format(string,sizeof(string),\"{FF6600} Börtönbe zártad {00FFFF} %s-t!\",string);
SendClientMessage(playerid,COLOR_RED,string);
}
}
else if(vip[playerid] == 0)
{
SendClientMessage(playerid,COLOR_RED,\"HIBA: Nem vagy V.I.P\");
}
return 1;
}
CMD:vunjail(playerid, params[])
{
if(vip[playerid] == 1)
{
new id;
if(sscanf(params , \"u\" ,id)) SendClientMessage(playerid, COLOR_WHITE, \"Használat : /vunjail [id].\");
else if (id == INVALID_PLAYER_ID) SendClientMessage(playerid, COLOR_RED, \"HIBA: Rossz játékos id!\");
else {
SpawnPlayer(id);
new string[200];
GetPlayerName(playerid,string,sizeof(string));
format(string,sizeof(string),\"{00FFFF}[VIP]%s {FF6600}kiengedett a börtönbõl!\",string);
SendClientMessage(id,COLOR_RED,string);
TogglePlayerControllable(id, 1);
GetPlayerName(id,string,sizeof(string));
format(string,sizeof(string),\"{FF6600}Kiengedted a {00FFFF}börtönbõl %s-t!\",string);
SendClientMessage(playerid,COLOR_RED,string);
}
}
else if(vip[playerid] == 0)
{
SendClientMessage(playerid,COLOR_RED,\"HIBA: Nem vagy V.I.P\");
}
return 1;
}
CMD:vfix(playerid, params[])
{
if(vip[playerid] == 1)
{
if(IsPlayerInAnyVehicle(playerid))
{
new vehicle = GetPlayerVehicleID(playerid);
RepairVehicle(vehicle);
SetVehicleHealth(vehicle,1000);
SendClientMessage(playerid,COLOR_RED,\"Jármûved javítva!\");
}
else
{
SendClientMessage(playerid,COLOR_RED,\"HIBA: Nem vagy jármûben!\");
}
}
else if(vip[playerid] == 0)
{
SendClientMessage(playerid,COLOR_RED,\"HIBA: Nem vagy V.I.P!\");
}
return 1;
}
CMD:advip(playerid, params[])
{
if(AdminLevel[playerid] >= 4) {
new id;
if(sscanf(params,\"u\", id)) return SendClientMessage(playerid,COLOR_WHITE,\"Használat: /advip [id]\");
if(!IsPlayerConnected(id)) return SendClientMessage(playerid,COLOR_RED,\"HIBA: Rossz játékos id!\");
else {
new string[128];
GetPlayerName(id,string,sizeof(string));
format(string,sizeof(string),\"Kinevezted %s-t V.I.P-nak!\",string);
SendClientMessage(playerid,COLOR_WHITE,string);
vip[id] = 1;
GetPlayerName(playerid,string,sizeof(string));
format(string,sizeof(string), \"[Adminisztrátor]:%s V.I.P jogott adott neked, Gratulálunk!\", string);
SendClientMessage(id,COLOR_WHITE,string);
}
}
else if(AdminLevel[playerid] < 4) {
SendClientMessage(playerid,COLOR_RED,\"HIBA: Túl kicsi az admin szinted ehhez a parancshoz!\");
}
return 1;
}
CMD:vipel(playerid, params[])
{
if(AdminLevel[playerid] >= 4) {
new id;
if(sscanf(params,\"u\", id)) return SendClientMessage(playerid,COLOR_WHITE,\"Használat: /vipel [id]\");
if(!IsPlayerConnected(id)) return SendClientMessage(playerid,COLOR_RED,\"HIBA: Rossz játékos id!\");
else {
new string[126];
GetPlayerName(id,string,sizeof(string));
format(string,sizeof(string),\"Törölted %s V.I.P jogát!\",string);
SendClientMessage(playerid,COLOR_RED,string);
vip[id] = 0;
GetPlayerName(playerid,string,sizeof(string));
format(string,sizeof(string), \"[Adminisztrátor]:%s elvette a V.I.P jogod, sajnáljuk!\", string);
SendClientMessage(id,COLOR_RED,string);
}
}
else if(AdminLevel[playerid] < 4) {
SendClientMessage(playerid,COLOR_RED,\"HIBA: Túl kicsi az admin szinted ehhez a parancshoz!\");
}
return 1;
}

 
 
Letöltõlink : http://data.hu/get/4921551/VIP_.pwn
Használjátok egészséggel :)
A nevemet kérlek tüntesd fel,ha ezt használod!
« Utoljára szerkesztve: 2012. május 23. - 20:27:22 írta BoSS »

Nem elérhető KDDomi

  • 976
    • Profil megtekintése
VIP System
« Válasz #1 Dátum: 2012. március 31. - 10:39:44 »
0 Show voters
Szép Script! Grat! Felhasználok belõle egy kicsike részt. Ment a +!

Nem elérhető BoSS

  • 816
    • Profil megtekintése
VIP System
« Válasz #2 Dátum: 2012. március 31. - 10:51:47 »
0 Show voters
<-\" post=\"247533\" timestamp=\"1333183184\"]
Szép Script! Grat! Felhasználok belõle egy kicsike részt. Ment a +!
 
[/quote]
Köszi
UI az /advip parancsot elírtam modban is /adtvip-re azt írjátok majd át ha használjátok :D

Nem elérhető Neon

  • 300
    • Profil megtekintése
VIP System
« Válasz #3 Dátum: 2012. május 13. - 13:04:35 »
0 Show voters
Grat

Nem elérhető Benceee

  • 4785
    • Profil megtekintése
VIP System
« Válasz #4 Dátum: 2012. május 13. - 13:22:52 »
0 Show voters
Amikor létrehozol egy változót, minek nullázod ki? Alapból 0 az értéke. Továbbá ha van fent egy VIP, és kilép, majd feljön valaki más, és a VIP játékos ID-jét kapja meg, akkor az új játékos is VIP lesz. Tehát OnPlayerConnect alatt nullázd az admin és VIP szintet.
Egyébként szép munka.

VIP System
« Válasz #5 Dátum: 2012. május 13. - 13:33:27 »
0 Show voters
jó script de azt hogy lehet megoldani hogy VIP vagyok és ha kilépek és vissza akkor mentse el hogy VIP vagyok .

Nem elérhető Alvin

  • 1137
    • Profil megtekintése
VIP System
« Válasz #6 Dátum: 2012. május 15. - 18:14:42 »
0 Show voters
szép pont jóljött  :shifty:

Nem elérhető zeteni

  • 1970
  • Ex-Scripter
    • Profil megtekintése
VIP System
« Válasz #7 Dátum: 2012. május 15. - 18:28:42 »
0 Show voters
Nem rossz így tovább!

Nem elérhető ZyZu.

  • Globális moderátor
  • 8939
  • my turbo diesel forum
  • Discord: ZyZu.
    • Profil megtekintése
VIP System
« Válasz #8 Dátum: 2012. május 15. - 18:45:02 »
0 Show voters
Idézetet írta: FastFurious date=1336908807\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"19331\" data-ipsquote-contentclass=\"forums_Topic
jó script de azt hogy lehet megoldani hogy VIP vagyok és ha kilépek és vissza akkor mentse el hogy VIP vagyok .
 
Dini..

Nem elérhető Alvin

  • 1137
    • Profil megtekintése
VIP System
« Válasz #9 Dátum: 2012. május 15. - 18:51:55 »
0 Show voters
hmm ha valaki vip akkor azt honnét is lehet tudni ?:O

VIP System
« Válasz #10 Dátum: 2012. május 16. - 18:55:17 »
0 Show voters
]Köszi! Jobb mint az oxfordos xDD

Bár még van mit javítani.

Üdv,Fuuuhead

Nem elérhető BoSS

  • 816
    • Profil megtekintése
VIP System
« Válasz #11 Dátum: 2012. május 16. - 20:14:00 »
0 Show voters
Dolgozok már a javításán,fogja majd menteni is a VIP-et..Mivel nem vagyok pro és elég sok segítségre szorulok ezért nem tudom mikor fogom frissíteni...meg épp a TDM szerveremen dolgozok és az van az elsõ helyen,de meg próbálok sietni :) És örülök,hogy tetszik.

VIP System
« Válasz #12 Dátum: 2012. május 16. - 20:26:31 »
0 Show voters
/vfix   mire való??

Nem tudok rájönni..


Üdv, Fuuuhead.

Nem elérhető BoSS

  • 816
    • Profil megtekintése
VIP System
« Válasz #13 Dátum: 2012. május 16. - 20:29:55 »
0 Show voters
Idézetet írta: Fuuuhead date=1337192791\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"19331\" data-ipsquote-contentclass=\"forums_Topic
/vfix   mire való??

Nem tudok rájönni..


Üdv, Fuuuhead.

 
/vfix az jármû javítás elméletben :D

VIP System
« Válasz #14 Dátum: 2012. május 17. - 16:48:21 »
0 Show voters
... Köszi!
Üdv, Fuuuhead

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal