Szerző Téma: RP mód elkezdése.. (Megtekintve 6514 alkalommal)

shadee · « **Dátum:** 2013. január 10. - 14:20:43 »

Üdv,úgy döntöttem,abbahagyom egy ideig a SA-MP szerver szkripterését,
ezért a kezdõknek jól jöhet ez az alap mód,plusz nekem se porosodik a gépen.
Készitõ:shadee
Sor:1062
parancsfeldolgozó:ZCMD
Adatmentés:DINI
Játékos parancs: 10
Admin parancs: 20
Leader rendszer félig kész(parancs nincs)

#include <a_samp>
#include <dini>
//#include <joeINC>
#include <zcmd>
#include <sscanf2>
main (   ) { }
new AdminSzolgalat[MAX_PLAYERS];
new ID,string1[128];
new SzerverLock = 0;
#pragma unused strtok
#define RED 0xff0000AA
#define ERROR 0x00ccffAA
#define GREEN 0x43e85fAA
#define WHITE 0xffffffAA
#define DIALOG_REGISTER 1
#define DIALOG_LOGIN 2
enum adat
{
pMoney,
pAdmin,
pSkin,
Float:X,
Float:Y,
Float:Z,
pLeader,
pMember,
pRank
}
new PlayerInfo[MAX_PLAYERS][adat];
public OnGameModeInit( )
{
print ( \" Szerver Adatok betöltése.. \" ) ;
SetGameModeText ( \" True Life RolePlay \" ) ;
print ( \" Játékmód szövege betöltve \" ) ;
SendRconCommand ( \" hostname True Life RolePlay[V0.1] \" ) ;
print ( \" Szerver Neve megváltoztatva! \" ) ;
SzerverLock = 0;
return 1;
}
public OnGameModeExit( )
{
return 1;
}
public OnPlayerConnect(playerid)
{
SetSpawnInfo(playerid,0,PlayerInfo[playerid][pSkin],PlayerInfo[playerid][X],PlayerInfo[playerid][Y],PlayerInfo[playerid][Z],0,0,0,0,0,0,0);
SpawnPlayer(playerid);
if(strfind(Neve(playerid), \"_\", true) == -1)
    {
        SendClientMessage(playerid,GREEN,\"Nem megfelelõ Név!\");
        format(string1,sizeof(string1),\"[KICK]%s Kickellve lett a rendszer általl,Indok:Helytelen név!\");
SendClientMessageToAll(RED,string1);
Kick(playerid);
    }
new Fajl[256];
if(SzerverLock == 1)
{
    SendClientMessage(playerid,RED,\"Szervert Feltörték,Ezért kickellve lettél!\");
Kick(playerid);
}
format(Fajl,sizeof(Fajl),\"/Karakterek/%s.ini \",Neve(playerid));
if(fexist(Fajl))
{
    ShowPlayerDialog(playerid,DIALOG_LOGIN,DIALOG_STYLE_INPUT,\"Panel\",\"Felhasználó már létezik!\\nJelentkezz be!\",\"Mehet\",\"Mégse\");
}
else
{
    ShowPlayerDialog(playerid,DIALOG_REGISTER,DIALOG_STYLE_INPUT,\"Panel\",\"Felhasználó nem létezik\\nRegisztrálj!\",\"Mehet\",\"Mégse\");
}
return 1;
}
public OnPlayerDisconnect(playerid,reason)
{
new string[128],Fajl[128];
new Float:x,Float:y,Float:z;
GetPlayerPos(playerid,x,y,z);
PlayerInfo[playerid][X] = x;
switch(reason)
{
case 0:
{
   format(string,sizeof(string),\"(( %s Crashelt a közeledben! ))\",Neve(playerid));
   ProxDetector(playerid,RED,string,20.0);
}
case 1:
{
   format(string,sizeof(string),\"(( %s Kilépett a közeledben! ))\",Neve(playerid));
   ProxDetector(playerid,RED,string,20.0);
}
case 2:
{
   format(string,sizeof(string),\"(( %s Elhagyta a szervert(kick) ))\",Neve(playerid));
   ProxDetector(playerid,RED,string,20.0);
}
}
print(string);
format(Fajl, sizeof(Fajl), \"/Karakterek/%s.ini\", Neve(playerid));
dini_IntSet(Fajl, \"Admin\",PlayerInfo[playerid][pAdmin]);
dini_IntSet(Fajl, \"Skin\",PlayerInfo[playerid][pSkin]);
dini_IntSet(Fajl, \"Penz\",PlayerInfo[playerid][pMoney]);
dini_IntSet(Fajl, \"Leader\",PlayerInfo[playerid][pLeader]);
dini_IntSet(Fajl, \"Member\",PlayerInfo[playerid][pMember]);
dini_IntSet(Fajl, \"Rank\",PlayerInfo[playerid][pRank]);
dini_FloatSet(Fajl, \"X\",Float:PlayerInfo[playerid][X]);
dini_FloatSet(Fajl, \"Y\",Float:PlayerInfo[playerid][Y]);
dini_FloatSet(Fajl, \"Z\",Float:PlayerInfo[playerid][Z]);
return 1;
}
public OnPlayerSpawn(playerid)
{
//   SetPlayerPos(playerid,PlayerInfo[playerid][X],PlayerInfo[playerid][Y],PlayerInfo[playerid][Z]);
//   SetPlayerSkin(playerid,PlayerInfo[playerid][pSkin]);
return 1;
}
public OnPlayerText(playerid,text[])
{
if(IsPlayerConnected(playerid))
{
    if(AdminSzolgalat[playerid] == 0)
    {
   format(string1,sizeof(string1),\"%s Mondja: %s\",Neve(playerid),text);
   ProxDetector(playerid,GREEN,string1,8.0);
}
}
return 1;
}
CMD:ahelp(playerid)
{
if(PlayerInfo[playerid][pAdmin] == 0)
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
if(PlayerInfo[playerid][pAdmin] >= 1)
{
    SendClientMessage(playerid,GREEN,\"<Moderátor> /adminszolgalat | /kick | /asay | /a | /setint | /setvw\");
SendClientMessage(playerid,GREEN,\"<Moderátor> /vá\");
}
if(PlayerInfo[playerid][pAdmin] >= 2)
{
    SendClientMessage(playerid,GREEN,\"<Adminisztrátor> /setskin | /tv | /tvki | | /slap | /ban \");
    SendClientMessage(playerid,GREEN,\"<Adminisztrátor> /repairvehicle\");
}
if(PlayerInfo[playerid][pAdmin] >= 3)
{
    SendClientMessage(playerid,GREEN,\"<Tulajdonos> /makeadmin /sethp\");
    SendClientMessage(playerid,GREEN,\"<Tulajdonos> /mentos /rendor /szerelo\");
}
if(PlayerInfo[playerid][pAdmin] >= 4)
{
    SendClientMessage(playerid,RED,\"<Fejlesztõ> /veh /szerverlezar\");
}
return 1;
}
CMD:adminszolgalat(playerid)
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >=1)
    {
        if(AdminSzolgalat[playerid] == 0)
        {
            AdminSzolgalat[playerid] = 1;
      SetPlayerColor(playerid,RED);
      SendClientMessage(playerid,RED,\"<< AdminSzolgálatba áltáll! >>\");
   }
   else
   {
       AdminSzolgalat[playerid] = 0;
      SetPlayerColor(playerid,WHITE);
      SendClientMessage(playerid,RED,\"<< Kiléptél adminszolgálatból! >>\");
   }
}
else
{
    SendClientMessage(playerid,ERROR,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:kick(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pAdmin] >=1)
{
    new Indok[64];
    if(sscanf(params,\"us[64]\",ID,Indok))return SendClientMessage(playerid, RED, \"Használat: /kick < ID/NÉV >< Indok>\");
   if(PlayerInfo[iD][pAdmin] > PlayerInfo[playerid][pAdmin])return SendClientMessage(playerid,GREEN,\"Nagyobb admint nem kickelhetsz!\");
   if(!IsPlayerConnected(ID))
   format(string1,sizeof(string1),\"[KICK]%s Kickellve lett  %s általl,Indok:%s\",Neve(ID),Neve(playerid),Indok);
   SendClientMessageToAll(ERROR,string1);
   Kick(ID);
}
}
return 1;
}
CMD:ban(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pAdmin] >=2)
{
    new Indok[64];
    if(sscanf(params,\"us[64]\",ID,Indok))return SendClientMessage(playerid, RED, \"Használat: /ban < ID/NÉV >< Indok>\");
   if(PlayerInfo[iD][pAdmin] > PlayerInfo[playerid][pAdmin])return SendClientMessage(playerid,GREEN,\"Nagyobb admint nem bannolhatsz!\");
   if(!IsPlayerConnected(ID))
   format(string1,sizeof(string1),\"[bAN]%s Bannolva lett %s általl,Indok:%s\",Neve(ID),Neve(playerid),Indok);
   SendClientMessageToAll(RED,string1);
   Ban(ID);
}
}
return 1;
}
CMD:va(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 1)
    {
        new valasz[128];
        if(sscanf(params,\"us[128]\",ID,valasz))return SendClientMessage(playerid,GREEN,\"Használat: /vá [Név/ID][Válasz]\");
        format(string1,sizeof(string1),\"%s Válaszolt Neki:%s,Válasza:%s\",Neve(playerid),Neve(ID),valasz);
        SendAdminMessage(RED,string1);
        format(string1,sizeof(string1),\"%s Válaszolt Neked:%s\",Neve(playerid),valasz);
        SendClientMessage(ID,GREEN,string1);
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:bug(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    new BUG[128];
    if(sscanf(params,\"s[128]\",BUG))return SendClientMessage(playerid,GREEN,\"Használat: /bug [bug tömör leírása]\");
    format(string1,sizeof(string1),\"[bUG]%s Bugjelentése:%s[bUG]\",Neve(playerid),BUG);
    SendAdminMessage(RED,string1);
SendClientMessage(playerid,GREEN,\"Bug jelentésed elküldve az adminok felé!\");
}
return 1;
}
CMD:asay(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin]<=1)return SendClientMessage(playerid,GREEN,\"Nem vagy jogosult a parancs használatára!\");
new Indok[128],arank[128];
if(sscanf(params,\"s[128]\",Indok))return SendClientMessage(playerid,RED,\"Használat:/asay [szöveg]\");
if(PlayerInfo[playerid][pAdmin] == 1) { arank = \"Moderátor\"; }
if(PlayerInfo[playerid][pAdmin] == 2) { arank = \"Admin\"; }
if(PlayerInfo[playerid][pAdmin] == 3) { arank = \"Tulajdonos\"; }
if(PlayerInfo[playerid][pAdmin] == 4) { arank = \"Fejlesztõ\"; }
format(string1,sizeof(string1),\"%s %s: %s\",arank,Neve(playerid),Indok);
SendClientMessageToAll(RED,string1);
}
return 1;
}
CMD:a(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >=1)
    {
   new Aszoveg[128];
   if(sscanf(params,\"s[128]\",Aszoveg))return SendClientMessage(playerid,GREEN,\"Használat: /a [AdminChat]\");
   format(string1,sizeof(string1),\"Admin %s: %s\",Neve(playerid),Aszoveg);
   SendAdminMessage(ERROR,string1);
}
}
return 1;
}
CMD:makeadmin(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >=3)
    {
        new szint;
        if(sscanf(params,\"ud\",ID,szint))return SendClientMessage(playerid,RED,\"Használat: /makeadmin [Név/ID] [szint]\");
//      if(szint >= 0 || szint <=4)return SendClientMessage(playerid,RED,\"AdminSzint 0-4ig!\");
   format(string1,sizeof(string1),\"%s Kinevezett %d-es szintû Adminisztrátornak!\",Neve(playerid),szint);
   SendClientMessage(ID,0x00f7ffAA,string1);
   format(string1,sizeof(string1),\"%s Kinevezte %s-t %d-s szintû Adminnak!\",Neve(playerid),Neve(ID),szint);
   SendAdminMessage(RED,string1);
   PlayerInfo[iD][pAdmin] = szint;
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:makeleader(playerid,params[])
{
new FrakcioID;
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 3)
    {
        if(sscanf(params,\"ud\",ID,FrakcioID))return SendClientMessage(playerid,RED,\"Használat: /makeleader [Név/ID][FrakcióID]\");
        if(FrakcioID >= 0 && FrakcioID <= 3)
        {
            if(FrakcioID == 0)
            {
                PlayerInfo[iD][pLeader] = 0;
         format(string1,sizeof(string1),\"<< %s elvette a leader jogodat!\",Neve(playerid));
         SendClientMessage(ID,RED,string1);
         format(string1,sizeof(string1),\"<< %s elvette %s leader jogát!\",Neve(playerid),Neve(ID));
         SendAdminMessage(RED,string1);
      }
      else if(FrakcioID == 1)
      {
                PlayerInfo[iD][pLeader] = 1;
         format(string1,sizeof(string1),\"<< %s Kinevezett téged Rendõrleaderé!\",Neve(playerid));
         SendClientMessage(ID,RED,string1);
         format(string1,sizeof(string1),\"<< %s Kinevezte %s-t rendõrleaderé!\",Neve(playerid),Neve(ID));
         SendAdminMessage(RED,string1);
      }
      else if(FrakcioID == 2)
      {
                 PlayerInfo[iD][pLeader] = 2;
         format(string1,sizeof(string1),\"<< %s Kinevezett téged MentõLeader-nek!\",Neve(playerid));
         SendClientMessage(ID,RED,string1);
         format(string1,sizeof(string1),\"<< %s Kinevezte %s-t MentõLeader-nek!\",Neve(playerid),Neve(ID));
         SendAdminMessage(RED,string1);
      }
      else if(FrakcioID == 3)
      {
          PlayerInfo[iD][pLeader] = 3;
         format(string1,sizeof(string1),\"<< %s Kinevezett téged Autószerelõ leader-nek!\",Neve(playerid));
         SendClientMessage(ID,RED,string1);
         format(string1,sizeof(string1),\"<< %s Kinevezte %s-t Autószerelõ leadernek!\",Neve(playerid),Neve(ID));
         SendAdminMessage(RED,string1);
      }
   }
}
}
return 1;
}
CMD:szerelo(playerid,params[])
{
if(PlayerInfo[playerid][pLeader] == 3 || PlayerInfo[playerid][pAdmin] >= 3)
{
    new rang;
    if(sscanf(params,\"ud\",ID,rang))return SendClientMessage(playerid,GREEN,\"Használat: /szerelo [Név/ID][RANG]\");
if(PlayerInfo[iD][pMember] == 0)
{
    PlayerInfo[iD][pMember] = 3;
    PlayerInfo[iD][pRank] = rang;
    format(string1,sizeof(string1),\"%s felvett téged a szerelõkhöz![RANG:%d]\",Neve(playerid),rang);
    SendClientMessage(ID,ERROR,string1);
    SendClientMessage(playerid,GREEN,\"Felvetted az illetõt a szerelõkhöz!\");
}
else
{
    SendClientMessage(playerid,RED,\"Ez a játékos már benne van egy frakcióba!\");
}
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
return 1;
}
CMD:rendor(playerid,params[])
{
if(PlayerInfo[playerid][pLeader] == 1 || PlayerInfo[playerid][pAdmin] >= 3)
{
    new rang;
    if(sscanf(params,\"ud\",ID,rang))return SendClientMessage(playerid,GREEN,\"Használat: /rendor [Név/ID][RANG]\");
if(PlayerInfo[iD][pMember] == 0)
{
    PlayerInfo[iD][pMember] = 1;
    PlayerInfo[iD][pRank] = rang;
    format(string1,sizeof(string1),\"%s felvett téged a Rendõrséghez![RANG:%d]\",Neve(playerid),rang);
    SendClientMessage(ID,ERROR,string1);
    SendClientMessage(playerid,GREEN,\"Felvetted az illetõt a rendõrségre!\");
}
else
{
    SendClientMessage(playerid,RED,\"Ez a játékos már benne van egy frakcióba!\");
}
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
return 1;
}
CMD:mentos(playerid,params[])
{
if(PlayerInfo[playerid][pLeader] == 2 || PlayerInfo[playerid][pAdmin] >= 3)
{
    new rang;
    if(sscanf(params,\"ud\",ID,rang))return SendClientMessage(playerid,GREEN,\"Használat: /mentos [Név/ID][RANG]\");
if(PlayerInfo[iD][pMember] == 0)
{
    PlayerInfo[iD][pMember] = 2;
    PlayerInfo[iD][pRank] = rang;
    format(string1,sizeof(string1),\"%s felvett téged a kórházba![RANG:%d]\",Neve(playerid),rang);
    SendClientMessage(ID,ERROR,string1);
    SendClientMessage(playerid,GREEN,\"Felvetted az illetõt a kórházba!\");
}
else
{
    SendClientMessage(playerid,RED,\"Ez a játékos már benne van egy frakcióba!\");
}
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
return 1;
}
CMD:setskin(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 2)
    {
        if(!IsPlayerConnected(ID))return SendClientMessage(playerid,RED,\"Játékos Nem elérhetõ..\");
        new skin;
   if(sscanf(params,\"ud\",ID,skin))return SendClientMessage(playerid,RED,\"Használat:/skin [Név/ID][skinID]\");
   if(skin >=1 && skin <= 299)
   {
      format(string1,sizeof(string1),\"%s Átrakta a Skinedet erre:%d\",Neve(playerid),skin);
      SendClientMessage(ID,ERROR,string1);
      SetPlayerSkin(ID,skin);
      PlayerInfo[iD][pSkin] = skin;
      SendClientMessage(playerid,ERROR,\"Megváltoztattad az illetõ SKIN-ét!\");
   }
}
}
return 1;
}
CMD:goto(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 1)
    {
    if(sscanf(params,\"u\",ID)) return SendClientMessage(playerid,GREEN,\"Használat: /goto[Név/ID]\");
        if(!IsPlayerConnected(ID)) return SendClientMessage(playerid, GREEN, \"A játékos nem elérhetõ!\");
   new Float:x,Float:y,Float:z;
        if(IsPlayerInAnyVehicle(playerid))
        {
       new carid = GetPlayerVehicleID(playerid);
       SetVehiclePos(carid, x+3,y,z);
       PutPlayerInVehicle(playerid, carid, 1);
   }
   else
   {
       SetPlayerPos(playerid,x,y,z);
   }
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:gethere(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 2)
    {
       if(sscanf(params,\"u\",ID)) return SendClientMessage(playerid,GREEN,\"Használat: /gethere [Név/ID]\");
           if(!IsPlayerConnected(ID)) return SendClientMessage(playerid, GREEN, \"A játékos nem elérhetõ!\");
   new Float:x,Float:y,Float:z;
           if(IsPlayerInAnyVehicle(ID))
           {
       new carid = GetPlayerVehicleID(ID);
       SetVehiclePos(carid, x+3,y,z);
       PutPlayerInVehicle(ID, carid, 1);
   }
   else
   {
       SetPlayerPos(ID,x,y,z);
   }
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:adminok(playerid)
{
if(IsPlayerConnected(playerid))
{
for(new i = 0; i < MAX_PLAYERS ; i++)
{
    new atext[20];
    if(PlayerInfo[pAdmin] == 1) { atext = \"Moderátor\";}
    if(PlayerInfo[pAdmin] == 2) { atext = \"Admin\";}
    if(PlayerInfo[pAdmin] == 3) { atext = \"Tulajdonos\";}
    if(PlayerInfo[pAdmin] == 4) { atext = \"Fejlesztõ\";}
    format(string1,sizeof(string1),\"Neve:%s | AdminSzint:%s\",Neve(i),atext);
}
        SendClientMessage(playerid,GREEN,string1);
}
return 1;
}
CMD:proba(playerid, params[])
{
new TRY[128], S[128+1];
if(sscanf(params, \"s[128]\", TRY)) return SendClientMessage(playerid, RED, \"Használat: /próba < Próbálkozás >\");
switch(random(2))
{
case 0:
{
   format(S, sizeof(S), \"* %s megpróbál(ja) %s, és sikerül neki!\", Neve(playerid),  TRY);
   ProxDetector(  playerid, RED,S,8.0);
        }
        case 1:
        {
   format(S, sizeof(S), \" %s megpróbál(ja) %s, de nem sikerül neki!\", Neve(playerid), TRY);
   ProxDetector( playerid, RED,S,8.0);
        }
    }
    return 1;
}
CMD:tv(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pAdmin] >= 2)
{
    if(sscanf(params,\"u\", ID)) return SendClientMessage(playerid, GREEN, \"Használat: /tv [Név/ID]\");
    if(!IsPlayerConnected(ID)) return SendClientMessage(playerid, GREEN, \"Játékos nem elérhetõ!\");
    TogglePlayerSpectating(playerid, 1);
          PlayerSpectatePlayer(playerid, ID);
   SetPlayerInterior(playerid,GetPlayerInterior(ID));
       SetPlayerVirtualWorld(playerid, GetPlayerVirtualWorld(ID));
   format(string1,sizeof(string1),\"[sPECTATE]%s elkezdte Tv-zni %s-t!\",Neve(playerid),Neve(ID));
   SendAdminMessage(ERROR,string1);
}
else
{
    SendClientMessage(playerid,GREEN,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:tvki(playerid)
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 2)
    {
   TogglePlayerSpectating(playerid,0);
   SendClientMessage(playerid,ERROR,\"Kiléptél a TV-zésbõl!\");
}
}
return 1;
}
CMD:setint(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 1)
    {
        new interior;
        if(sscanf(params,\"ud\",ID,interior))return SendClientMessage(playerid,RED,\"Használat: /setint [Név/ID][interior]\");
        SendClientMessage(playerid,ERROR,\"Sikeresen átváltottad az interiorját!\");
        SendClientMessage(ID,ERROR,\"Egy admin átrakta az Interiorodat!\");
        SetPlayerInterior(ID,interior);
}
}
return 1;
}
CMD:setvw(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pAdmin] >= 1)
{
    if(sscanf(params,\"u\",ID))return SendClientMessage(playerid,GREEN,\"Használat: /setvw [Név/ID]\");
    SendClientMessage(playerid,ERROR,\"Átraktad az illetõ VW-jét 0ra!\");
    SendClientMessage(ID,ERROR,\"Egy Admin átrakta a VW-ted 0ra!\");
            SetPlayerVirtualWorld(ID, 0);
}
}
return 1;
}
CMD:veh(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] == 4)
    {
        new Float:x,Float:y,Float:z,VehID;
        GetPlayerPos(playerid,x,y,z);
        if(sscanf(params,\"d\",VehID))return SendClientMessage(playerid,RED,\"Használat:/veh [Jármû ID]\");
   AddStaticVehicle(VehID,x,y+2,z,0,1,0);
}
else
{
    SendClientMessage(playerid,GREEN,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:slap(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 2)
    {
        if(sscanf(params,\"u\",ID))return SendClientMessage(playerid,ERROR,\"Használat: /slap [Név/ID]\");
        new Float:x,Float:y,Float:z;
        GetPlayerPos(ID,x,y,z);
        SetPlayerPos(ID,x,y,z+2);
   SendClientMessage(playerid,RED,\"Slappoltad a játékost!\");
   SendClientMessage(ID,RED,\"Egy admin adott egy pacsit!\");
}
else
{
    SendClientMessage(playerid,ERROR,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:repairvehicle(playerid)
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] >= 2)
    {
        new Car = GetPlayerVehicleID(playerid);
        RepairVehicle(Car);
        format(string1,sizeof(string1),\"[REPAIR]%s megjavította a %d IDjû jármûvet!\",Neve(playerid),Car);
   SendAdminMessage(RED,string1);
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:sethp(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    new HP;
    if(PlayerInfo[playerid][pAdmin] >=3)
    {
        if(sscanf(params,\"ud\",ID,HP))return SendClientMessage(playerid,RED,\"Használat: /sethp [Játékos ID/NÉV][Érték]\");
   SetPlayerHealth(ID,HP);
   SendClientMessage(ID,RED,\"Egy Adminisztrátor átállította az életeted!\");
   SendClientMessage(playerid,RED,\"Élet átállítva a játékosnak!\");
}
else
{
    SendClientMessage(playerid,RED,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:szerverlezar(playerid)
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pAdmin] == 4)
    {
        if(SzerverLock == 0)
        {
            SzerverLock = 1;
            SendClientMessageToAll(RED,\"A szerver zárolva lett,ha valaki feljön kickellve lesz a rendszer általl!\");
            format(string1,sizeof(string1),\"<Zárolás>%s Zárolta a Szervert!<Zárolás>\",Neve(playerid));
      SendAdminMessage(RED,string1);
   }
   else
   {
       SzerverLock = 0;
       SendClientMessageToAll(RED,\" A szerver megnyitva,a veszél elhárult!\");
      format(string1,sizeof(string1),\"<Nyitás>%s Felnyitotta a szerver!<Nyitás>\",Neve(playerid));
      SendAdminMessage(RED,string1);
   }
}
else
{
    SendClientMessage(playerid,GREEN,\"Nem vagy jogosult a parancs használatára!\");
}
}
return 1;
}
CMD:b(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
new oocszoveg[128];
    if(sscanf(params,\"s[128]\",oocszoveg))return SendClientMessage(playerid,RED,\"Használat:/b [OOC]\");
    format(string1,sizeof(string1),\"(([OOC] %s: %s ))\",Neve(playerid),oocszoveg);
    ProxDetector(playerid,ERROR,string1,12.0);
}
return 1;
}
CMD:s(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    new kiabalas[128];
    if(sscanf(params,\"s[128]\",kiabalas))return SendClientMessage(playerid,GREEN,\"Használat: /s [szöveg]\");
format(string1,sizeof(string1),\"%s Kiabálja: %\",Neve(playerid),kiabalas);
ProxDetector(playerid,ERROR,string1,12.0);
}
return 1;
}
CMD:h(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    new halkan[128];
    if(sscanf(params,\"s[128]\",halkan))return SendClientMessage(playerid,RED,\"Használat:/h [szöveg]\");
format(string1,sizeof(string1),\"%s Halkan mondja: %s\",Neve(playerid),halkan);
ProxDetector(playerid,ERROR,string1,4.0);
}
return 1;
}
CMD:me(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    new cselekves[128];
if(sscanf(params,\"s[128]\",cselekves))return SendClientMessage(playerid,0xa108faAA,\"Használat: /me [szöveg]\");
format(string1,sizeof(string1),\"%s:%s\",Neve(playerid),cselekves);
ProxDetector(playerid,0xa108faAA,string1,8.0);
}
return 1;
}
CMD:megprobal(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
new megprobalja[128];
if(sscanf(params,\"s[128]\",megprobalja))return SendClientMessage(playerid,ERROR,\"Használat: /megpróbál [Mit]\");
switch(random(2))
{
    case 0:
    {
        format(string1,sizeof(string1),\"%s megpróbál(ja) %s,de nem sikerül(t) neki!\",Neve(playerid),megprobalja);
        ProxDetector(playerid,0xf03ee7AA,string1,8.0);
   }
   case 1:
   {
       format(string1,sizeof(string1),\"%s megpróbál(ja) %s,és sikerül(t) neki!\",Neve(playerid),megprobalja);
       ProxDetector(playerid,0xf03ee7AA,string1,8.0);
   }
}
}
return 1;
}
CMD:try(playerid, params[])
{
return cmd_megprobal(playerid, params);
}
CMD:erme(playerid)
{
if(IsPlayerConnected(playerid))
{
switch(random(2))
{
    case 0:
    {
        format(string1,sizeof(string1),\"%s feldobott egy érmét,fejre esett.\",Neve(playerid));
      ProxDetector(playerid,ERROR,string1,8.0);
   }
   case 1:
   {
       format(string1,sizeof(string1),\"%s feldobott egy érmét,és írás lett.\",Neve(playerid));
   }
}
}
return 1;
}
CMD:report(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(sscanf(params,\"s[128]\",params))return SendClientMessage(playerid,ERROR,\"Használat: /report [Panasz]\");
    format(string1,sizeof(string1),\"[PANASZ]%s Panasza: %s\",Neve(playerid),params);
    SendAdminMessage(ERROR,string1);
    SendClientMessage(playerid,ERROR,\"Panaszodat elküldtük az adminok felé..\");
}
return 1;
}
CMD:pm(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(AdminSzolgalat[iD] == 1)
    {
        new pm[128];
        if(sscanf(params,\"us[128]\",ID,pm))return SendClientMessage(playerid,GREEN,\"Használat: /pm [Név/ID][Panasz]\");
        format(string1,sizeof(string1),\"[PM][iD:%d]%s panasza: %s\",ID,Neve(playerid),pm);
        SendClientMessage(ID,RED,string1);
        SendClientMessage(playerid,GREEN,\"a panaszodat sikeresen elküldtük!\");
}
else
{
    SendClientMessage(playerid,GREEN,\"Õ nincs adminszolgálatba!\");
}
}
return 1;
}
CMD:help(playerid)
{
if(IsPlayerConnected(playerid))
{
SendClientMessage(playerid,ERROR,\"/b | /s | /h | /me | /érme\");
SendClientMessage(playerid,ERROR,\"/report | /adminok | /megpróbál\");
SendClientMessage(playerid,ERROR,\" /idõ | /pm\");
if(PlayerInfo[playerid][pAdmin] > 0)
{
    SendClientMessage(playerid,GREEN,\"Adminparancsok>> /ahelp\");
}
else if(PlayerInfo[playerid][pLeader] == 1)
{
    SendClientMessage(playerid,GREEN,\"Leader: /rendõr\");
}
else if(PlayerInfo[playerid][pLeader] == 2)
{
    SendClientMessage(playerid,GREEN,\"Leader: /mentõs\");
}
else if(PlayerInfo[playerid][pLeader] == 3)
{
    SendClientMessage(playerid,GREEN,\"Leader: /szerelõ\");
}
}
return 1;
}
CMD:penztarca(playerid)
{
if(IsPlayerConnected(playerid))
{
format(string1,sizeof(string1),\"%s megnézte a pénztárcája tartalmát..\",Neve(playerid));
ProxDetector(playerid,0x7cf03eAA,string1,8.0);
format(string1,sizeof(string1),\"Pénztárcádba %dft van.\",PlayerInfo[playerid][pMoney]);
SendClientMessage(playerid,0x7cf03eAA,string1);
}
return 1;
}
CMD:ido(playerid)
{
new Ora,Perc,Masodperc;
gettime(Ora,Perc,Masodperc);
format(string1,sizeof(string1),\"Jelenleg %d óra és %d perc van.\",Ora,Perc);
SendClientMessage(playerid,GREEN,string1);
return 1;
}
//Frakció parancsok
CMD:megaphone(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pMember] == 1 || PlayerInfo[playerid][pLeader] == 1)
    {
        if(IsPlayerInAnyVehicle(playerid))
        {
      new kihangosito[128];
      if(sscanf(params,\"s[128]\",kihangosito))return SendClientMessage(playerid,GREEN,\"Használat:/m(egaphone) [Kihangosító]\");
      format(string1,sizeof(string1),\"<<Kihangosító>> %s\",kihangosito);
      ProxDetector(playerid,GREEN,string1,15.0);
   }
   else
   {
       SendClientMessage(playerid,GREEN,\"Nem ülsz jármûben!\");
   }
    }
    else
    {
        SendClientMessage(playerid,GREEN,\"Hm...honnan lesz megafonod? \");
}
}
return  1;
}
CMD:m(playerid,params[])
{
return cmd_megaphone(playerid, params);
}
CMD:radio(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
    if(PlayerInfo[playerid][pMember] == 1 || PlayerInfo[playerid][pLeader] == 1)
    {
        new radio[128];
        if(sscanf(params,\"s[128]\",radio))return SendClientMessage(playerid,GREEN,\"Használat:/rádió <Szöveg>\");
        format(string1,sizeof(string1),\"[RÁDIÓ]%s mondja: %s\",Neve(playerid),radio);
        SendFrakcioMessage(2,GREEN,string1);
        format(string1,sizeof(string1),\"[RÁDIÓ]Valaki mondja: %s\",radio);
        ProxDetector(playerid,GREEN,string1,8.0);
}
    if(PlayerInfo[playerid][pMember] == 2 || PlayerInfo[playerid][pLeader] == 2)
    {
        new radio[128];
        if(sscanf(params,\"s[128]\",radio))return SendClientMessage(playerid,GREEN,\"Használat:/rádió <Szöveg>\");
        format(string1,sizeof(string1),\"[RÁDIÓ]%s mondja: %s\",Neve(playerid),radio);
        SendFrakcioMessage(2,GREEN,string1);
        format(string1,sizeof(string1),\"[RÁDIÓ]Valaki mondja: %s\",radio);
        ProxDetector(playerid,GREEN,string1,8.0);
}
    if(PlayerInfo[playerid][pMember] == 3 || PlayerInfo[playerid][pLeader] == 3)
    {
        new radio[128];
        if(sscanf(params,\"s[128]\",radio))return SendClientMessage(playerid,GREEN,\"Használat:/rádió <Szöveg>\");
        format(string1,sizeof(string1),\"[RÁDIÓ]%s mondja: %s\",Neve(playerid),radio);
        SendFrakcioMessage(2,GREEN,string1);
        format(string1,sizeof(string1),\"[RÁDIÓ]Valaki mondja: %s\",radio);
        ProxDetector(playerid,GREEN,string1,8.0);
}
}
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    new Fajl[128],string[128];
    format(Fajl,sizeof(Fajl),\"/Karakterek/%s.ini\",Neve(playerid));
if(dialogid == DIALOG_REGISTER)
{
    if( !response ) { Kick(playerid ) ; }
    else
    {
        dini_Create(Fajl);
        dini_Set(Fajl, \"Jelszo\", inputtext);
        dini_IntSet(Fajl, \"Admin\", 0);
        dini_IntSet(Fajl, \"Skin\",26);
        dini_IntSet(Fajl, \"Penz\",25000);
        dini_IntSet(Fajl, \"Leader\",0);
        dini_IntSet(Fajl, \"Member\",0);
 
        SendClientMessage(playerid,GREEN,\"Karaktered Sikeresen Létrehozva!\");
       ShowPlayerDialog(playerid,DIALOG_LOGIN,DIALOG_STYLE_INPUT,\"Panel\",\"Felhasználó már létezik!\\nJelentkezz be!\",\"Mehet\",\"Mégse\");
}
}
if(dialogid == DIALOG_LOGIN)
{
    if(!response) { Kick(playerid); }
    else
    {
        new jelszo[200];
        format(jelszo, sizeof(jelszo), \"%s\", dini_Get(Fajl, \"Jelszo\"));
   if(strcmp(inputtext, jelszo) == 0)
   {
       PlayerInfo[playerid][pAdmin] = dini_Int(Fajl, \"Admin\");
      PlayerInfo[playerid][pSkin] = dini_Int(Fajl,\"Skin\");
      PlayerInfo[playerid][pMoney] = dini_Int(Fajl, \"Penz\");
      PlayerInfo[playerid][pLeader] = dini_Int(Fajl, \"Leader\");
      PlayerInfo[playerid][pMember] = dini_Int(Fajl, \"Member\");
      PlayerInfo[playerid][X] = dini_Int(Fajl, \"X\");
      PlayerInfo[playerid][Y] = dini_Int(Fajl, \"Y\");
      PlayerInfo[playerid][Z] = dini_Int(Fajl, \"Z\");
      //SetPlayerSkin(playerid,PlayerInfo[playerid][pSkin]);
       SetPlayerColor(playerid,WHITE);
       AdminSzolgalat[playerid] = 0;
       
      SpawnPlayer(playerid);
      SendClientMessage(playerid,ERROR,\"Sikeresen Bejelentkeztél!\");
   }
             else
           {
      format(string,sizeof(string),\"[KICK]%s Kickellve lett a rendszer általl,Indok:Helytelen Jelszó!\",Neve(playerid));
      SendClientMessageToAll(RED,string);
      Kick(playerid);
           }
        }
}
return 1;
}
public OnPlayerUpdate(playerid)
{
if(AdminSzolgalat[playerid] == 1)
{
format(string1,sizeof(string1),\"%s\\nAdminSzolgálatban!\",Neve(playerid));
    SetPlayerChatBubble(playerid, string1, RED, 20.0, 2000);
}
return 1;
}
stock Neve(playerid)
{
new Nev[24];
GetPlayerName(playerid,Nev,sizeof(Nev));
return Nev;
}
stock ProxDetector(playerid,szin,uzenet[],Float: tavolsag)
{
new Float:x,Float:y,Float:z;
GetPlayerPos(playerid,x,y,z);
for(new i = 0; i < MAX_PLAYERS; i++)
{
    if(IsPlayerConnected(playerid))
    {
        if(IsPlayerInRangeOfPoint(i,tavolsag,x,y,z))
        {
            SendClientMessage(i,szin,uzenet);
   }
}
}
return 1;
}
stock SendAdminMessage(SZIN,UZENET[])
{
for(new i = 0; i < MAX_PLAYERS ; i++)
{
    if(PlayerInfo[pAdmin] >=1)
    {
        SendClientMessage(i,SZIN,UZENET);
}
}
return 1;
}
stock SendFrakcioMessage(frakcioID,COLOR,uzenet[])
{
for(new i = 0; i < MAX_PLAYERS ; i++)
{
    if(PlayerInfo[pLeader] == frakcioID || PlayerInfo[pMember] == frakcioID)
    {
        SendClientMessage(i,COLOR,uzenet);
}
}
return 1;
}

Asdeeer · « **Válasz #1 Dátum:** 2013. január 10. - 17:09:35 »

Szép! Majd tesztelem ha otthon leszek

. Remélem ebbe nem lesz olyan sok hiba mint a másik alapmódodba

.

Rammstein · « **Válasz #2 Dátum:** 2013. január 10. - 17:35:40 »

Ha jól látom ez félig skyline módja, miért raktad ki? vagy ha a tiéd, miért tlrp? ....

Hugo.Cy · « **Válasz #3 Dátum:** 2013. január 10. - 17:55:38 »

Hooo.. ez valaki más módja? mert akkor nem is nyúlok hozzá..

shadee · « **Válasz #4 Dátum:** 2013. január 11. - 13:17:52 »

Micsoda?na ne viccelj,eztet én írtam még a True Life-ra,de mivel csak az enyém,ezért bármikor kirakhatom,most felmek skypera,megkérdem skylinetõl hogy mi a szar van.

skyLine · « **Válasz #5 Dátum:** 2013. január 11. - 14:01:26 »

Ennek semmi köze az én módomhoz. Shadeeval 2 féleképp próbáltuk megcsinálni, csak õ ráunt és publikálta az õ verzióját. Ebbe én 1 sort, 1 szót, 1 betût sem írtam bele

SSK · « **Válasz #6 Dátum:** 2013. január 25. - 15:15:07 »

Az miért van ha beregizek akkor esek le a semmibe és egyszer csak kidob egy helyre?Ezt hogy lehetne megoldani?

citromhun · « **Válasz #7 Dátum:** 2013. január 25. - 22:53:30 »

Nekem tetszik. Ment a plusz!

shadee · « **Válasz #8 Dátum:** 2013. január 26. - 00:03:47 »

Idézetet írta: SSK date=1359123307\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"32204\" data-ipsquote-contentclass=\"forums_Topic

Az miért van ha beregizek akkor esek le a semmibe és egyszer csak kidob egy helyre?Ezt hogy lehetne megoldani?

mivel az alappozició nincs beállítva.

Zalakaka45 · « **Válasz #9 Dátum:** 2013. március 16. - 05:54:35 »

Ez most hova menti a fájlokat? :unsure:

jana4 · « **Válasz #10 Dátum:** 2013. március 16. - 13:17:48 »

Idézetet írta: Zalakaka45 date=1363409675\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"32204\" data-ipsquote-contentclass=\"forums_Topic

Ez most hova menti a fájlokat? :unsure:

A scriptfiles mappában létre kell hozni egy Karakterek nevû mappát. (És abba a mappába menti.)

( /Karakterek/%s.ini )

Blez · « **Válasz #11 Dátum:** 2013. március 17. - 13:02:20 »

Jó kis alapmód! Ment a + !

Metroad · « **Válasz #12 Dátum:** 2013. március 17. - 14:07:43 »

Tetszik! Repül a +!

EpicSlash · « **Válasz #13 Dátum:** 2013. március 19. - 20:17:36 »

FIGYELEM!!
Valamit kihagytál! Ha bejelentkezésnél/regisztrálásnál nem írnak semmit, akkor is belépteti õket stb..
Írjátok még be ezt:

//ezt a dialog register/login alá kell!
if(!strlen(inputtext)) return ShowPlayerDialog(playerid,DIALOG_LOGIN,DIALOG_STYLE_INPUT,\"Panel\",\"Felhasználó már létezik!\\nJelentkezz be!\",\"Mehet\",\"Mégse\");
{
//....
}

tomhenks · « **Válasz #14 Dátum:** 2013. március 23. - 07:49:32 »

Valaki feltöltené nekem a .pwn fájlt valahova,ha megkérhetem?

Szerző Téma: RP mód elkezdése.. (Megtekintve 6514 alkalommal)

Rammstein