lvip

#include <a_samp>
#include <sscanf2>
#include <zcmd>
#include <dini>

enum pInfo
{
VIP
};

new player1;
new PlayerInfo[MAX_PLAYERS][pInfo];
new ted;
new file[128],str[128];
//new nev;
public OnPlayerConnect(playerid)
{
PlayerInfo[playerid][VIP] = 0;

format(file,sizeof(file),"/Lofvip/%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),"/Lofvip/%s.ini",pName(playerid));
if(fexist(file))
{
SetPVarInt(playerid,"VIP",GetPVarInt(playerid,"VIP"));
}
return 1;
}

CMD:vrules(playerid)
{
new DIALOGstring[2000];
format(DIALOGstring, sizeof(DIALOGstring),"%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s",
"Vip Szabájzat\n",
"{ff0000}Tilos a VIP Kihasználás / Elveszük a vipét!!\n",
"{ff0000}Tilos {fcdb05}Kéregetni VIP-et Vagy parancsokhoz engedélyt! /Mute /kick!\n",
"{ff0000}A rendes szabályzat Betartása !! ha nem tartod be / VIP-t elveszük vagy megkapod az érte valo büntetést!\n",
"{ff0000}Tilos {fcdb05}Az Admini VIP-eknek azokat jailba csukni akiket nem birnak! (Csak arra mint pl : db vegy sk) /Vip elvevés vagy lecsökentés!\n",
"{ff0000}Magyarázat\n",
"{ff0000}VIP Kihasználás / PL : Oda gotozol egy playerhez akinek le van tiltva a gotolya és megölöd! vagy Godba ölsz!\n",
"{fcdb05}Kéregetés Szerintem egyértelmü! , Jailbazárás akit nem birsz / pl Nembirod Joska01-et és berakod jailba pedig nem is csinált semmit!\n");
ShowPlayerDialog(playerid,-1, DIALOG_STYLE_MSGBOX, "{"#FF0000"}VIP Szabályzat!:", DIALOGstring, "Rendben");
return 1;
}

CMD:viphelp(playerid)
{
SendClientMessage(playerid,-1,"------------------------------------------------------------------------");
SendClientMessage(playerid,-1,"V.I.P Rangok!");
SendClientMessage(playerid,-1,"1.VIP = Arany{fcdb05} VIP");
SendClientMessage(playerid,-1,"2.VIP = Premier {04ff00} VIP");
SendClientMessage(playerid,-1,"3.VIP = Admin {ff0000}VIP");
SendClientMessage(playerid,-1,"{fcdb05}VIP Segitség");
SendClientMessage(playerid,-1,"{04ff00}VIP akkarsz lenni? nem kell mást tened mint : !!");
SendClientMessage(playerid,-1,"{ff0000}Tökéletes Magatartás! , Nem Lehettél 9-napnál Tovább banolva!");
SendClientMessage(playerid,-1,"{fcdb05}Segitség a Többi playernek! Mibe ? : pl parancsokba szabályzatba vagy egyébbe!!");
SendClientMessage(playerid,-1,"{04ff00}Ha Minden jó és te az órunkra kötöd kizárolag nem kapod meg a VIP-et!");
SendClientMessage(playerid,-1,"{ff0000}Be kell tartanod a VIP-Szabályzatot is! (/vrules) / meg a sima szabályzatot is");
SendClientMessage(playerid,-1,"--------------------------------------------------------------------------");
return 1;
}

CMD:visten(playerid)
{
if(GetPVarInt(playerid,"VIP") >= 3)
{
SendClientMessage(playerid,-1,"{04ff00}Halhatatlan vagy! De elvettük a fegyvereidet!");
ResetPlayerWeapons(playerid);
SetPlayerHealth(playerid,99999);
return 1;
}else return SendClientMessage(playerid,-1,"{ff0000}HIBA: Ehez a parancshoz minimum 3 es szintû vipnak kéne lenned!");
}

CMD:varmour(playerid)
{
if(GetPVarInt(playerid,"VIP") >= 1)
{
SetPlayerArmour(playerid,100);
SendClientMessage(playerid,-1,"{ff0000}Sikeresen Feltötöted az armourodat.");
return 1;
}else return SendClientMessage(playerid,-1,"{ff0000}HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!");
}

CMD:vheal(playerid)
{
if(GetPVarInt(playerid,"VIP") >= 1)
{
SetPlayerHealth(playerid,200);
SendClientMessage(playerid,-1,"{ff0000}Sikeresen Feltötöted az Életed.");
return 1;
}else return SendClientMessage(playerid,-1,"{ff0000}HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!");
}

CMD:vistenki(playerid)
{
if(GetPVarInt(playerid,"VIP") >= 1)
{
SendClientMessage(playerid,-1,"{ff0000}Halhatatlanságodat eltüntetük!");
SetPlayerHealth(playerid,200);
return 1;
}else return SendClientMessage(playerid,-1,"{ff0000}HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!");
}

CMD:vjetpack(playerid)
{
if(GetPVarInt(playerid,"VIP") >= 2)
{
SendClientMessage(playerid,-1,"Sikeresen lespawnoltál egy jetpackot INGYEN!");
SetPlayerSpecialAction(playerid,SPECIAL_ACTION_USEJETPACK);
return 1;
}else return SendClientMessage(playerid,-1,"HIBA: Ehez a parancshoz minimum 2 es szintû vipnak kéne lenned!");
}


CMD:vsay(playerid, params[])
{
if(GetPVarInt(playerid,"VIP") == 1)
{
new uzenet[1000],string[200];
if(sscanf(params,"s[1000]",uzenet)) return SendClientMessage(playerid,-1,"Használat /vsay [Üzenet]");
format(string,sizeof(string),"{fcdb05}[VIP] {aa00ff}%s : {ffffff}%s",pName(playerid),uzenet);
SendClientMessageToAll(-1,string);
return 1;
}
else
{
if(GetPVarInt(playerid,"VIP") == 2)
{
new uzenet[1000],string[200];
if(sscanf(params,"s[1000]",uzenet)) return SendClientMessage(playerid,-1,"Használat /vsay [Üzenet]");
format(string,sizeof(string),"{04ff00}[V.I.P] {03c2f7}%s : {ffffff}%s",pName(playerid),uzenet);
SendClientMessageToAll(-1,string);
return 1;
}
else
{
if(GetPVarInt(playerid,"VIP") == 3)
{
new uzenet[1000],string[200];
if(sscanf(params,"s[1000]",uzenet)) return SendClientMessage(playerid,-1,"Használat /vsay [Üzenet]");
format(string,sizeof(string),"{ff0000}[_][V.I.P][_]{999696} %s : {ffffff}%s",pName(playerid),uzenet);
SendClientMessageToAll(-1,string);
}
else SendClientMessage(playerid,-1, "{ff0000}HIBA: Nem vagy VIP tag!");
}
}
return 1;
}

CMD:vipcmds(playerid, params[])
{
if(GetPVarInt(playerid,"VIP") == 1)
{
SendClientMessage(playerid,-1,"---------------------[VIP Parancsok]------------");
SendClientMessage(playerid,-1,"{ff0000}/vsay /vrules /vhelp ] /vheal /varmour /vipcmds ");
SendClientMessage(playerid,-1,"------------------------------------------------");
return 1;
}
else
{
if(GetPVarInt(playerid,"VIP") == 2)
{
SendClientMessage(playerid,-1,"---------------------[VIP Parancsok]-----------");
SendClientMessage(playerid,-1,"{ff0000}/vsay /vrules /vhelp  /vheal /varmour /vipcmds ");
SendClientMessage(playerid,-1,"{ff0000}*****************/vjetpack /vgoto**************");
SendClientMessage(playerid,-1,"-----------------------------------------------");
return 1;
}
else
{
if(GetPVarInt(playerid,"VIP") == 3)
{
SendClientMessage(playerid,-1,"---------------------[VIP Parancsok]--------------------------");
SendClientMessage(playerid,-1,"{ff0000}/vsay /vrules /vhelp /vheal /varmour /vipcmds ");
SendClientMessage(playerid,-1,"{ff0000}/vjetpack /vgoto /vget /vkick /visten /vistenki /vjail /vunjail");
SendClientMessage(playerid,-1,"---------------------------------------------------------------");
}
else SendClientMessage(playerid,-1, "{bf00ff}HIBA: Nem vagy VIP tag!");
}
}
return 1;
}

CMD:vjail(playerid,params[])
{
if(GetPVarInt(playerid, "VIP") >= 3 || IsPlayerAdmin(playerid))
{
new reason[50];
if(sscanf(params, "us[50]", player1, reason)) return SendClientMessage(playerid,-1, "{ff0000}HASZNÁLAT: /jail [Játékos ID/Név] [Indok]");
if(IsPlayerNPC(player1)) return SendClientMessage(playerid,-1, "{ff0000}HIBA: Botokat nem zárhatsz börtönbe!");
if(!IsPlayerConnected(player1) && (GetPVarInt(player1, "Level") > GetPVarInt(playerid, "Level")) ) return SendClientMessage(playerid,-1, "HIBA: Játékos nincs csatlakozva, vagy magasabb szintû admin, mint te!");
if(GetPVarInt(player1, "JailTime") > 1) return SendClientMessage(playerid,-1, "{ff0000}HIBA: A játékos már börtönbe van!");
if(playerid == player1) return SendClientMessage(playerid,-1, "{ff0000}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), "{ff0000}*** VIP: %s börtönbe zárta %s nevû játékost  [Indok: %s]", pName(playerid), pName(player1),reason);
SendClientMessageToAll(-1,str);
return 1;
} else return SendClientMessage(playerid,-1, "{ff0000}HIBA: Ehez a parancshoz 3-es szintû VIP-nak kéne lenned!");
}

CMD:vunjail(playerid,params[])
{
if(GetPVarInt(playerid, "VIP") >= 3 || IsPlayerAdmin(playerid))
{
if(sscanf(params, "u", player1)) return SendClientMessage(playerid,-1, "{ff0000}HASZNÁLAT: /unjail [Játékos ID/Név]");
if(!IsPlayerConnected(player1)) return SendClientMessage(playerid,-1, "{ff0000}HIBA: Játékos nincs csatlakozva!");
if(!GetPVarInt(player1, "JailTime")) return SendClientMessage(playerid,-1, "{ff0000}HIBA: A játékos nincs börtönben!");
format(str,sizeof(str), "{ff0000}***VIP: %s kiengedett téged a börtönbõl.", pName(playerid));
SendClientMessage(player1,-1,str);
SpawnPlayer(player1);
format(str,sizeof(str), "{ff0000}***VIP: %s kiengedte a börtönbõl %s nevû játékost.", pName(playerid), pName(player1));
SendClientMessageToAll(-1,str);
return 1;
} else return SendClientMessage(playerid,-1, "{ff0000}HIBA: Ehez a parancshoz 3-es szintû VIP-nak kéne lenned!");
}

CMD:vkick(playerid,params[])
{
if(GetPVarInt(playerid, "VIP") == 3)
{
new target,reason[50];
if(sscanf(params,"us[50]",target,reason)) return SendClientMessage(playerid,-1,"Használat : /kick <Játékos> < Indok>");
if(target == INVALID_PLAYER_ID)return SendClientMessage(playerid,-1, "HIBA: Játékos nincs csatlakozva!");
if(target == playerid) return SendClientMessage(playerid,-1,"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(-1,str);
Kick(target);
return 1;
} else return SendClientMessage(playerid,-1,"HIBA: Ehez a parancshoz 3 as szintü VIP-nak szükséges!");
}

CMD:vgoto(playerid)
{
if(GetPVarInt(playerid,"VIP") >= 2)
{
new id;
new Float:x,Float:y,Float:z;
if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid,-1,"Helytelen PlayerID! Használata /vgoto [ID]");
GetPlayerPos(id,x,y,z);
SetPlayerPos(playerid,x,y,z);
SendClientMessage(id,-1,"Egy Vip tag hozzád teleportált!");
return 1;
}else return SendClientMessage(playerid,-1,"{ff0000}HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!");
}

stock pName( playerid )
{
 new
   s_szPlayerName[ MAX_PLAYER_NAME ];

 GetPlayerName( playerid, s_szPlayerName, MAX_PLAYER_NAME );
 return s_szPlayerName;
}

CMD:setvip(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new
string[350],
vip;
if(sscanf(params,"ui",playerid, vip)) return SendClientMessage(playerid,-1,"Használat : /setvip id level (1-3)!");
if(vip <0  || vip > 3) return SendClientMessage(playerid,-1,"Csak 1 - 3 VIP SZINT Közt van!");
if( playerid == INVALID_PLAYER_ID ) return SendClientMessage( playerid,-1, "HIBA: Nem létezõ azonosító!" );
SetPVarInt(playerid,"VIP",vip);
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,-1,string);
if(vip > GetPVarInt(playerid,"VIP")) return SendClientMessage(playerid,-1,"VIP Szinted növekedett!");
if(vip < GetPVarInt(playerid,"VIP")) return SendClientMessage(playerid,-1,"VIP Szintedet elvonták!");
PlayerPlaySound(playerid, 1056, 0, 0, 0);
SetPlayerColor(ted,-1);
format(file,sizeof(file),"/Lofvip/%s.ini",pName(playerid));
dini_IntSet(file,"VIP",vip);
}
else SendClientMessage(playerid,-1, "{ff0000}Nem vagy RCON Admin!" );
return 1;
}

CMD:vips(playerid,params[])
{
new string[250];
SendClientMessage(playerid,-1,"--==[Online V.I.P]==--");
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,-1,string);
}
}
return 1;
}