Szerző Téma: VIP Rendszer  (Megtekintve 570 alkalommal)

Nem elérhető Dfoglalo

  • 4069
  • Globális Moderátor
    • Profil megtekintése
VIP Rendszer
« Dátum: 2013. Február 01. - 16:05:53 »
0 Show voters
Sziasztok!
Hónapok óta keresgélek a VIP Rendszerek között, hátha van egy, ami menti a fájlokat. Eddig egyet találtam, ami ténylegesen mentett, de annak meg a parancsai voltak bugosak. Más FS-ek pedig bugosan mentettek, vagy pedig egyáltalán nem mentettek. Nem arról van szó, hogy lusta vagyok keresni, hanem arról, hogy egyszerûen nem találok megfelelõ VIP Rendszert sem itt, sem a forum.sa-mp.com-on, sem bárhol máshol a weben. :/ Esetleg valaki készíthetne is, de az már szkript kérés, arról itt nem írok, de úgysem készítene senki, mert valaki csak tud egy jót linkelni...
Aki tud, pls linkeljen nekem egy olyat, amelyik BIZTOSAN, BUGTALANUL MENTI a VIP Szintet egy fájlba, illetve a PARANCSOK SEM BUGOLNAK benne!
Köszönöm a figyelmet, remélem, hogy segítõmre akadok. Üdv: Dfoglalo

Nem elérhető instant

  • 2778
  • ZzzzzZ
    • Profil megtekintése
VIP Rendszer
« Válasz #1 Dátum: 2013. Február 01. - 16:41:16 »
0 Show voters
#include a_samp
#include sscanf2
#include zcmd
#include dini
#include dudb
#include dutils
#include colors
#pragma unused ret_memcpy
enum pInfo
{
VIP
};
new PlayerInfo[MAX_PLAYERS][pInfo];
new file[128],str[128];
new player1;
CMD:vips(playerid,params[])
{
new string[250];
SendClientMessage(playerid,COLOR_GREEN,\"____]Online V.I.P Tagok [_____\");
for(new v;v<GetMaxPlayers();v++)
{
if(GetPVarInt(v,\"VIP\") > 0)
{
format(string,250,\"%s V.I.P Szint:%d\",pName(v),GetPVarInt(v,\"VIP\"));
SendClientMessage(playerid,COLOR_GREEN,string);
}
}
return 1;
}
CMD:setvip(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new
string[350],
vlevel;
if(sscanf(params,\"ui\",playerid, vlevel)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /setvip id level (1-3)!\");
if(vlevel <0  || vlevel > 3) return SendClientMessage(playerid,COLOR_RED,\"Csak 1 - 3 VIP SZINT Közt van!\");
if( playerid == INVALID_PLAYER_ID ) return SendClientMessage( playerid, COLOR_RED, \"HIBA: Nem létezõ azonosító!\" );
SetPVarInt(playerid,\"VIP\",vlevel);
format(string,350,\"***%s(%d) {00f7ff}nevû admin kinevezett téged {ff0000}%d V.I.P-nak!\",pName(playerid),playerid,GetPVarInt(playerid,\"VIP\"));
SendClientMessage( playerid,COLOR_GREEN,string);
if(vlevel > GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szinted növekedett!\");
if(vlevel < GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szintedet elvonták!\");
PlayerPlaySound(playerid, 1056, 0, 0, 0);
SetPlayerColor(player1,COLOR_YELLOW);
format(file,sizeof(file),\"%s.ini\",pName(playerid));
dini_IntSet(file,\"VIP\",vlevel);
}
else SendClientMessage( playerid, COLOR_RED, \"Nem vagy RCON Admin!\" );
return 1;
}
CMD:vkick(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 3)
{
new target,reason[50];
if(sscanf(params,\"us[50]\",target,reason)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /kick <Játékos> < Indok>\");
if(target == INVALID_PLAYER_ID)return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(target == playerid) return SendClientMessage(playerid,COLOR_RED,\"Magadat nem rughatod ki balfácán!\");
    format(str,sizeof(str),\"V.I.P :%s kickelte %s játékost! Indoka : %s\",pName(playerid),pName(target),reason);
    SendClientMessageToAll(COLOR_LIGHTBLUE,str);
    Kick(target);
    return 1;
    } else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3 as szintü VIP-nak szükséges!\");
}
CMD:vjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2 || IsPlayerAdmin(playerid))
{
new reason[50];
if(sscanf(params, \"us[50]\", player1, reason)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /jail [Játékos ID/Név] [indok]\");
if(IsPlayerNPC(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Botokat nem zárhatsz börtönbe!\");
    if(!IsPlayerConnected(player1) && (GetPVarInt(player1, \"Level\") > GetPVarInt(playerid, \"Level\")) ) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva, vagy magasabb szintû admin, mint te!\");
if(GetPVarInt(player1, \"JailTime\") > 1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos már börtönbe van!\");
if(playerid == player1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Magadat nem zárhatod börönbe!\");
TogglePlayerControllable(player1, 1);
SetPlayerPos(player1, 197.6661, 173.8179, 1003.0234);
SetPlayerInterior(player1,3);
format(str,sizeof(str), \"*** VIP: %s börtönbe zárta %s nevû játékost  [indok: %s]\", pName(playerid), pName(player1),reason);
SendClientMessageToAll(COLOR_LIGHTGREEN,str);
return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 2-es szintû VIP-nak kéne lenned!\");
}
CMD:vunjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2 || IsPlayerAdmin(playerid))
{
if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /unjail [Játékos ID/Név]\");
    if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(!GetPVarInt(player1, \"JailTime\")) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos nincs börtönben!\");
        format(str,sizeof(str), \"***VIP: %s kiengedett téged a börtönbõl.\", pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
        SpawnPlayer(player1);
format(str,sizeof(str), \"*** Admin: %s kiengedte a börtönbõl %s nevû játékost.\", pName(playerid), pName(player1));
SendClientMessageToAll(COLOR_BLUE,str);
    return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 2-es szintû VIP-nak kéne lenned!\");
}
CMD:vfreeze(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 1 || IsPlayerAdmin(playerid))
{
if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /freeze [Játékos ID/Név] \");
if(IsPlayerNPC(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Botokat nem fagyaszthatsz le!\");
if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(playerid == player1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Magadat nem fagyaszthatod le!\");
TogglePlayerControllable(player1, 0);
format(str,sizeof(str), \"*** VIP: %s lefagyasztott téged!.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vunfreeze(playerid,params[])
{
    if(GetPVarInt(playerid, \"VIP\") >= 1 || IsPlayerAdmin(playerid))
{
    if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /unfreeze [Játékos ID/Név]\");
    if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
    if(!GetPVarInt(player1, \"FreezeTime\")) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos nincs lefagyasztva!\");
SetPVarInt(player1, \"FreezeTime\", 0);
        format(str,sizeof(str), \"*** VIP: %s levette a fagyasztást rólad.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
TogglePlayerControllable(player1,1);
format(str,sizeof(str),\"*** VIP: %s levette a fagyasztást %s nevû játékosról.\", pName(playerid), pName(player1));
    return SendClientMessageToAll(COLOR_BLUE, str);
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vgod( playerid )
{
if(GetPVarInt(playerid,\"VIP\") >= 2)
{
        if(!GetPVarInt(playerid, \"God\"))
{
           SetPVarInt(playerid, \"God\", 1);
        SetPlayerHealth(playerid,100000);
   return SendClientMessage(playerid, COLOR_GREEN, \"Örökélet be!\");
}
else
{
   SetPVarInt(playerid, \"God\", 0);
        SetPlayerHealth(playerid, 100);
   return SendClientMessage(playerid, COLOR_RED, \"Örökélet ki!\");
}
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz 2-es szintû VIP-nak kéne lenned!\");
}
CMD:vskin(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
new skin;
new string2[175];
if(sscanf(params,\"d\",skin)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat : /vskin [skinid] \");
if(skin < 0 || skin > 299) return SendClientMessage(playerid,COLOR_RED,\"Csak 0tól és 299ig vannak skinek!\");
SetPlayerSkin(playerid,skin);
format(string2,175,\"Sikeresen átváltoztattad a skinedet!Új Skined ID-je :%d !\",skin);
SendClientMessage(playerid,COLOR_GREEN,string2);
return 1;
} else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vcarrespawn(playerid,params[])
{
new string[250];
if(GetPVarInt(playerid,\"VIP\") >= 3)
{
for(new cars; cars <MAX_VEHICLES; cars++)
{
SetVehicleToRespawn(cars);
}
format(string,250,\"-VIP-%s respawnolta a jármüveket!\",pName(playerid));
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vcar(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
new id, color1, color2;
new Float:Rot,Float:X,Float:Y,Float:Z;
GetPlayerPos(playerid, X, Y, Z);
GetPlayerFacingAngle(playerid, Rot);
if(sscanf(params,\"ddd\",id,color1,color2)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /vcar [Jármûid][szin1][szin2]\");
if(id < 400 || id > 611) return SendClientMessage(playerid,COLOR_RED,\"Csak 400tól 611ig vannak a jármûid!\");
CreateVehicle(id,X+2,Y+2,Z+2,Rot,color1,color2,0);
SendClientMessage(playerid,COLOR_GREEN,\"Sikeresen lekérted a jármûvet!\");
DestroyVehicle(id);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vgoto(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2) return SendClientMessage(playerid, 0xE60000FF, \"Ezt a parancsot max 2.es szintû V.I.P tagok használhatják!\");
{
new id;
new Float:x,Float:y,Float:z;
if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid,COLOR_GREEN,\"Helytelen PlayerID!\");
if(sscanf(params,\"u\",id))return SendClientMessage(playerid,COLOR_YELLOW,\"Használat: /goto [Játékosnév/id]\");
GetPlayerPos(id,x,y,z);
SetPlayerPos(playerid,x,y,z);
SendClientMessage(id,COLOR_GREEN,\"Egy Vip tag hozzád teleportált!\");
}
return 1;
}
CMD:veject(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 3)
{
new Float:x,Float:y,Float:z;
new target;
if(sscanf(params,\"d\",target)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /veject [iD]\");
SetPlayerPos(target,x,y,z+3);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vsay(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >=3)
{
new uzenet[1000],string[200];
if(sscanf(params,\"s[1000]\",uzenet)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /vsay [Üzenet]\");
format(string,sizeof(string),\"-VIP-{ff0000}%s : {ffffff}%s\",pName(playerid),uzenet);
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vjetpack(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >=1)
{
SendClientMessage(playerid,COLOR_RED,\"Nincs jogosultságod-e parancs használatához!\");
SetPlayerSpecialAction(playerid,SPECIAL_ACTION_USEJETPACK);
SendClientMessage(playerid, COLOR_YELLOW, \"Sikeresen adtál magadnak JetPacket!\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vhelp(playerid)
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
SendClientMessage(playerid,COLOR_GREEN,\"Level1:/vcar /vskin /vjetpack /vfreeze /vunfreeze\");
SendClientMessage(playerid,COLOR_GREEN,\"Level2:/vgoto /vgod /vgodoff /vjail /vunjail\");
SendClientMessage(playerid,COLOR_GREEN,\"Level3:/vsay /veject /vcarrespawn /vkick\");
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!\");
}
public OnPlayerConnect(playerid)
{
PlayerInfo[playerid][VIP] = 0;
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(!fexist(file))
{
dini_Create(file);
dini_IntSet(file,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",dini_Int(file,\"VIP\"));
}
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
return 1;
}
stock pName( playerid )
{
new
   s_szPlayerName[ MAX_PLAYER_NAME ];
GetPlayerName( playerid, s_szPlayerName, MAX_PLAYER_NAME );
return s_szPlayerName;
}

 
esetleg ez ?

Nem elérhető Dfoglalo

  • 4069
  • Globális Moderátor
    • Profil megtekintése
VIP Rendszer
« Válasz #2 Dátum: 2013. Február 01. - 16:51:28 »
0 Show voters
Idézetet írta: ZzzzzZ date=1359733276\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"33279\" data-ipsquote-contentclass=\"forums_Topic

#include a_samp
#include sscanf2
#include zcmd
#include dini
#include dudb
#include dutils
#include colors
#pragma unused ret_memcpy
enum pInfo
{
VIP
};
new PlayerInfo[MAX_PLAYERS][pInfo];
new file[128],str[128];
new player1;
CMD:vips(playerid,params[])
{
new string[250];
SendClientMessage(playerid,COLOR_GREEN,\"____]Online V.I.P Tagok [_____\");
for(new v;v<GetMaxPlayers();v++)
{
if(GetPVarInt(v,\"VIP\") > 0)
{
format(string,250,\"%s V.I.P Szint:%d\",pName(v),GetPVarInt(v,\"VIP\"));
SendClientMessage(playerid,COLOR_GREEN,string);
}
}
return 1;
}
CMD:setvip(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new
string[350],
vlevel;
if(sscanf(params,\"ui\",playerid, vlevel)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /setvip id level (1-3)!\");
if(vlevel <0  || vlevel > 3) return SendClientMessage(playerid,COLOR_RED,\"Csak 1 - 3 VIP SZINT Közt van!\");
if( playerid == INVALID_PLAYER_ID ) return SendClientMessage( playerid, COLOR_RED, \"HIBA: Nem létezõ azonosító!\" );
SetPVarInt(playerid,\"VIP\",vlevel);
format(string,350,\"***%s(%d) {00f7ff}nevû admin kinevezett téged {ff0000}%d V.I.P-nak!\",pName(playerid),playerid,GetPVarInt(playerid,\"VIP\"));
SendClientMessage( playerid,COLOR_GREEN,string);
if(vlevel > GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szinted növekedett!\");
if(vlevel < GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szintedet elvonták!\");
PlayerPlaySound(playerid, 1056, 0, 0, 0);
SetPlayerColor(player1,COLOR_YELLOW);
format(file,sizeof(file),\"%s.ini\",pName(playerid));
dini_IntSet(file,\"VIP\",vlevel);
}
else SendClientMessage( playerid, COLOR_RED, \"Nem vagy RCON Admin!\" );
return 1;
}
CMD:vkick(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 3)
{
new target,reason[50];
if(sscanf(params,\"us[50]\",target,reason)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /kick <Játékos> < Indok>\");
if(target == INVALID_PLAYER_ID)return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(target == playerid) return SendClientMessage(playerid,COLOR_RED,\"Magadat nem rughatod ki balfácán!\");
    format(str,sizeof(str),\"V.I.P :%s kickelte %s játékost! Indoka : %s\",pName(playerid),pName(target),reason);
    SendClientMessageToAll(COLOR_LIGHTBLUE,str);
    Kick(target);
    return 1;
    } else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3 as szintü VIP-nak szükséges!\");
}
CMD:vjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2 || IsPlayerAdmin(playerid))
{
new reason[50];
if(sscanf(params, \"us[50]\", player1, reason)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /jail [Játékos ID/Név] [indok]\");
if(IsPlayerNPC(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Botokat nem zárhatsz börtönbe!\");
    if(!IsPlayerConnected(player1) && (GetPVarInt(player1, \"Level\") > GetPVarInt(playerid, \"Level\")) ) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva, vagy magasabb szintû admin, mint te!\");
if(GetPVarInt(player1, \"JailTime\") > 1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos már börtönbe van!\");
if(playerid == player1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Magadat nem zárhatod börönbe!\");
TogglePlayerControllable(player1, 1);
SetPlayerPos(player1, 197.6661, 173.8179, 1003.0234);
SetPlayerInterior(player1,3);
format(str,sizeof(str), \"*** VIP: %s börtönbe zárta %s nevû játékost  [indok: %s]\", pName(playerid), pName(player1),reason);
SendClientMessageToAll(COLOR_LIGHTGREEN,str);
return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 2-es szintû VIP-nak kéne lenned!\");
}
CMD:vunjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2 || IsPlayerAdmin(playerid))
{
if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /unjail [Játékos ID/Név]\");
    if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(!GetPVarInt(player1, \"JailTime\")) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos nincs börtönben!\");
        format(str,sizeof(str), \"***VIP: %s kiengedett téged a börtönbõl.\", pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
        SpawnPlayer(player1);
format(str,sizeof(str), \"*** Admin: %s kiengedte a börtönbõl %s nevû játékost.\", pName(playerid), pName(player1));
SendClientMessageToAll(COLOR_BLUE,str);
    return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 2-es szintû VIP-nak kéne lenned!\");
}
CMD:vfreeze(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 1 || IsPlayerAdmin(playerid))
{
if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /freeze [Játékos ID/Név] \");
if(IsPlayerNPC(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Botokat nem fagyaszthatsz le!\");
if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(playerid == player1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Magadat nem fagyaszthatod le!\");
TogglePlayerControllable(player1, 0);
format(str,sizeof(str), \"*** VIP: %s lefagyasztott téged!.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vunfreeze(playerid,params[])
{
    if(GetPVarInt(playerid, \"VIP\") >= 1 || IsPlayerAdmin(playerid))
{
    if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /unfreeze [Játékos ID/Név]\");
    if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
    if(!GetPVarInt(player1, \"FreezeTime\")) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos nincs lefagyasztva!\");
SetPVarInt(player1, \"FreezeTime\", 0);
        format(str,sizeof(str), \"*** VIP: %s levette a fagyasztást rólad.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
TogglePlayerControllable(player1,1);
format(str,sizeof(str),\"*** VIP: %s levette a fagyasztást %s nevû játékosról.\", pName(playerid), pName(player1));
    return SendClientMessageToAll(COLOR_BLUE, str);
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vgod( playerid )
{
if(GetPVarInt(playerid,\"VIP\") >= 2)
{
        if(!GetPVarInt(playerid, \"God\"))
{
           SetPVarInt(playerid, \"God\", 1);
        SetPlayerHealth(playerid,100000);
   return SendClientMessage(playerid, COLOR_GREEN, \"Örökélet be!\");
}
else
{
   SetPVarInt(playerid, \"God\", 0);
        SetPlayerHealth(playerid, 100);
   return SendClientMessage(playerid, COLOR_RED, \"Örökélet ki!\");
}
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz 2-es szintû VIP-nak kéne lenned!\");
}
CMD:vskin(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
new skin;
new string2[175];
if(sscanf(params,\"d\",skin)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat : /vskin [skinid] \");
if(skin < 0 || skin > 299) return SendClientMessage(playerid,COLOR_RED,\"Csak 0tól és 299ig vannak skinek!\");
SetPlayerSkin(playerid,skin);
format(string2,175,\"Sikeresen átváltoztattad a skinedet!Új Skined ID-je :%d !\",skin);
SendClientMessage(playerid,COLOR_GREEN,string2);
return 1;
} else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vcarrespawn(playerid,params[])
{
new string[250];
if(GetPVarInt(playerid,\"VIP\") >= 3)
{
for(new cars; cars <MAX_VEHICLES; cars++)
{
SetVehicleToRespawn(cars);
}
format(string,250,\"-VIP-%s respawnolta a jármüveket!\",pName(playerid));
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vcar(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
new id, color1, color2;
new Float:Rot,Float:X,Float:Y,Float:Z;
GetPlayerPos(playerid, X, Y, Z);
GetPlayerFacingAngle(playerid, Rot);
if(sscanf(params,\"ddd\",id,color1,color2)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /vcar [Jármûid][szin1][szin2]\");
if(id < 400 || id > 611) return SendClientMessage(playerid,COLOR_RED,\"Csak 400tól 611ig vannak a jármûid!\");
CreateVehicle(id,X+2,Y+2,Z+2,Rot,color1,color2,0);
SendClientMessage(playerid,COLOR_GREEN,\"Sikeresen lekérted a jármûvet!\");
DestroyVehicle(id);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vgoto(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2) return SendClientMessage(playerid, 0xE60000FF, \"Ezt a parancsot max 2.es szintû V.I.P tagok használhatják!\");
{
new id;
new Float:x,Float:y,Float:z;
if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid,COLOR_GREEN,\"Helytelen PlayerID!\");
if(sscanf(params,\"u\",id))return SendClientMessage(playerid,COLOR_YELLOW,\"Használat: /goto [Játékosnév/id]\");
GetPlayerPos(id,x,y,z);
SetPlayerPos(playerid,x,y,z);
SendClientMessage(id,COLOR_GREEN,\"Egy Vip tag hozzád teleportált!\");
}
return 1;
}
CMD:veject(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 3)
{
new Float:x,Float:y,Float:z;
new target;
if(sscanf(params,\"d\",target)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /veject [iD]\");
SetPlayerPos(target,x,y,z+3);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vsay(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >=3)
{
new uzenet[1000],string[200];
if(sscanf(params,\"s[1000]\",uzenet)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /vsay [Üzenet]\");
format(string,sizeof(string),\"-VIP-{ff0000}%s : {ffffff}%s\",pName(playerid),uzenet);
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vjetpack(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >=1)
{
SendClientMessage(playerid,COLOR_RED,\"Nincs jogosultságod-e parancs használatához!\");
SetPlayerSpecialAction(playerid,SPECIAL_ACTION_USEJETPACK);
SendClientMessage(playerid, COLOR_YELLOW, \"Sikeresen adtál magadnak JetPacket!\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vhelp(playerid)
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
SendClientMessage(playerid,COLOR_GREEN,\"Level1:/vcar /vskin /vjetpack /vfreeze /vunfreeze\");
SendClientMessage(playerid,COLOR_GREEN,\"Level2:/vgoto /vgod /vgodoff /vjail /vunjail\");
SendClientMessage(playerid,COLOR_GREEN,\"Level3:/vsay /veject /vcarrespawn /vkick\");
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!\");
}
public OnPlayerConnect(playerid)
{
PlayerInfo[playerid][VIP] = 0;
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(!fexist(file))
{
dini_Create(file);
dini_IntSet(file,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",dini_Int(file,\"VIP\"));
}
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
return 1;
}
stock pName( playerid )
{
new
   s_szPlayerName[ MAX_PLAYER_NAME ];
GetPlayerName( playerid, s_szPlayerName, MAX_PLAYER_NAME );
return s_szPlayerName;
}

 
esetleg ez ?
 
Sajnos pont ez volt az, amelyik elmentette a szintet a megfelelõ fájlokba, azonban a parancsok bugoltak. PL. nem lehetett börtönbõl kiengedni, bárki tudott teleportálni, a 3-as parancsot 1-es is használhatta, stb. Persze néhány bug szerkesztéstõl keletkezett, mivel próbáltam javítani a bugokat. PL. jail bug alap volt, át akartam állítani 1 szintet PL. vgoto-ban átírtam 2-est 3-asra, meg vport-ra, és máris bárki használhatta... LOL... szóval ez nem jön be :( Tudom, hogy a tied, szóval bocs, hogy negatív véleményt kell látnod róla.. :/
EDIT: Jah, és warningos is volt :D Csak 1 volt //annoxd//, de most 14...
EDIT2: Amúgy a kocsiresi és a vskin hasznos volt :D Azok nem bugoltak. Habár lehetett volna 1 kocsira resi kód is. :D
« Utoljára szerkesztve: 2013. Február 01. - 16:58:52 írta Dfoglalo »

Nem elérhető pisti525

  • 906
  • One Shot, One Kill
    • Profil megtekintése
VIP Rendszer
« Válasz #3 Dátum: 2013. Február 01. - 17:11:26 »
0 Show voters
ebben a kocsi resiben az a baj hogy beírtad hogy /vcarrespawn és minden kocsit helyre rakta :( még azt is amiben player ült :( :(

Nem elérhető Dfoglalo

  • 4069
  • Globális Moderátor
    • Profil megtekintése
VIP Rendszer
« Válasz #4 Dátum: 2013. Február 02. - 13:13:33 »
0 Show voters
Idézetet írta: pisti525 date=1359735086\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"33279\" data-ipsquote-contentclass=\"forums_Topic
ebben a kocsi resiben az a baj hogy beírtad hogy /vcarrespawn és minden kocsit helyre rakta :( még azt is amiben player ült :( :(
 
OFF: Így gyûjtöd a hozzászólásokat, hogy jobb rangot kapj mi?xd mint amikor támogató lettél a hozzászólásaid száma miatt...
 

Habár lehetett volna 1 kocsira resi kód is. :D
 
[/quote]
És a kód alapból nem nézi, hogy ülnek a benne, szal emiatt cssk ne panaszkodj xd
\"ON\": Találtam egy VIP Rendszert, ami menti a fájlokat, de nincs benne parancs. Sikerült hozzátennem a parancsokat, így a témát zárom :)

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal