Ü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.0Kezdõ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