Szerző Téma: Adminszoli(PVaros)  (Megtekintve 1133 alkalommal)

Nem elérhető Dead

  • 2045
    • Profil megtekintése
Adminszoli(PVaros)
« Dátum: 2012. július 15. - 17:43:00 »
+1 Show voters
Üdv.
Ezt a codet azért csínáltam, mert láttam, hogy Spydi hibásan írta meg.
http://sampforum.hu/index.php?topic=28812.0
Kezdõknek jól jön.
Norby tanácsára, kiszedtem a warn elrejtõt.
Warn Mentes Script:
Segítség: ZCMD, PVar
 

#include a_samp //samp inc
#include zcmd //zcmd inc
#define red 0xfc0505AA // szín definálása
new i_string[256]; // max string
CMD:aszoli(playerid, params[])
{
 if(IsPlayerAdmin(playerid)) // lekérdezzük, hogy admin-e
 {
if(GetPVarInt(playerid,\"ASZ\") == 0) // lekérdezzük, hogy szoliban van-e
{
   SetPVarInt(playerid,\"ASZ\",1); // ha nem, akkor beléptetjük
   format(i_string, sizeof(i_string), \"*** %s Adminszoliba lépett.\",pName(playerid)); // üzenet kiírása
       SendClientMessageToAll(red, i_string); // formázása
        }
        else if(GetPVarInt(playerid,\"ASZ\") == 1 ) // lekérdezzük, hogy szoliban van-e
        {
            SetPVarInt(playerid, \"ASZ\",0); // ha igen, akkor elvesszük tõle
   format(i_string, sizeof(i_string), \"*** %s Kilépett adminszoliból.\",pName(playerid)); //üzi kiírása, formázása
       SendClientMessageToAll(red, i_string);
        }
 }
 else SendClientMessage(playerid, red,\"Nem Vagy Admin!\"); // ha nem admin, üzit ír neki
 return 1; // visszatérünk
} // lezárjuk
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\" Blank Filterscript by your name here\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
public OnPlayerConnect(playerid)
{
SetPVarInt( playerid, \"ASZ\", 0); // adunk neki egy pvart = ha belép nincs aszben
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
SetPVarInt( playerid, \"ASZ\", 0);// adunk neki egy pvart = ha kilép nincs aszben
return 1;
}
stock pName( playerid )
{
   static
   PlayerName[ MAX_PLAYER_NAME ];
   GetPlayerName( playerid, PlayerName, MAX_PLAYER_NAME );
   return PlayerName;
}

 
E: Tesztelve, mûködik.



Pawn compiler 3.2.3664           Copyright © 1997-2006, ITB CompuPhase
« Utoljára szerkesztve: 2012. július 15. - 18:31:25 írta Dead »

Nem elérhető Norby

  • 1575
    • Profil megtekintése
Adminszoli(PVaros)
« Válasz #1 Dátum: 2012. július 15. - 18:22:11 »
0 Show voters
Jó lett, bár hülyeségnek tartom hogy kiveszed a warningokat, amik sor eltolódásra adnak hibát, mert így a modban egy káosz lesz majd összevissza sorok és átláthatatlan, ha már írunk valamit akkor azt szépen és a formalitásra is figyeljünk. ;)

Nem elérhető Dead

  • 2045
    • Profil megtekintése
Adminszoli(PVaros)
« Válasz #2 Dátum: 2012. július 15. - 18:28:06 »
0 Show voters
rendben :D kösz

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal