Üdv!
Elkészítettem egy report rendszert.
Parancsok:
/report
/asay - CSAK ADMINNAK
/asayy - CSAK ADMINNAK
Adminnak az RCON adminok számítanak.
A játékos kérdez valamit: /report Hogy kell ugrani?
Az admin válaszol: /asayy Playerid, válasz
Amikor a játékos ír egy reportot, annak az ID-jét kijelzi az adminoknak.
Sima /asay parancsal tudsz adminként írni.
#include <a_samp>
#include <zcmd>
#include <sscanf2>
#define szurke 0xAFAFAFAA
#define piros 0xFF0000AA
#define feher 0xFFFFFFAA
#define fekete 0x000000
#define neon 0x00FFFFFF
#define FEROHELY 30 // Írd át a szervered slot számára
new reportja[MAX_PLAYERS][128];
new string[128];
new neve[24];
CMD:report(playerid, params[])
{
new report[128];
if(sscanf(params,\"s[128]\",report)) return SendClientMessage(playerid,feher,\"Használat: /report [kérdésed]\");
GetPlayerName(playerid, neve, sizeof(neve));
for(new i = 0; i < FEROHELY; i ++)
{
if(IsPlayerAdmin(i))
{
format(string, sizeof(string), \"%s [%d] reportja: %s\", neve, playerid, report);
SendClientMessage(i, piros, string);
}
}
reportja[playerid] = report;
SendClientMessage(playerid, szurke, \"Üzenet elküldve.\");
return 1;
}
CMD:asay(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new szoveg[128];
if(sscanf(params,\"s[128]\",szoveg)) return SendClientMessage(playerid,feher,\"Használat: /asay [üzenet]\");
GetPlayerName(playerid, neve, sizeof(neve));
format(string, sizeof(string), \"Admin %s: %s\", neve, szoveg);
SendClientMessageToAll(neon, string);
}
return 1;
}
CMD:asayy(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new szoveg[128];
new id;
if(sscanf(params,\"us[128]\",id, szoveg)) return SendClientMessage(playerid,feher,\"Használat: /asayy [id] [üzenet]\");
GetPlayerName(playerid, neve, sizeof(neve));
new neve2[24];
GetPlayerName(id, neve2, sizeof(neve2));
new string2[128];
format(string2, sizeof(string2), \"%s reportja: %s\", neve2, reportja[id]);
SendClientMessageToAll(piros, string2);
format(string, sizeof(string), \"Admin %s: %s\", neve, szoveg);
SendClientMessageToAll(neon, string);
}
return 1;
}
Sziasztok!Valaki megtudná nekem írni hogy ezt Ladmin 4v2-be hogy rakjuk be?Mert mindent próbáltam,de nem megy :S
Elõre is kössz!
Szia! Az IsPlayerLAdmin.inc-et letöltöd innen: http://solidfiles.com/d/5e48/ , beteszed pawno/includes mappába és a szervereden az includes mappába!
És itt a script:
#include <a_samp>
#include <zcmd>
#include <sscanf2>
#include <IsPlayerLAdmin>
#define szurke 0xAFAFAFAA
#define piros 0xFF0000AA
#define feher 0xFFFFFFAA
#define fekete 0x000000
#define neon 0x00FFFFFF
#define FEROHELY 30 // Írd át a szervered slot számára
new reportja[MAX_PLAYERS][128];
new string[128];
new neve[24];
CMD:report(playerid, params[])
{
new report[128];
if(sscanf(params,\"s[128]\",report)) return SendClientMessage(playerid,feher,\"Használat: /report [kérdésed]\");
GetPlayerName(playerid, neve, sizeof(neve));
for(new i = 0; i < FEROHELY; i ++)
{
if(IsPlayerLAdmin(i))
{
format(string, sizeof(string), \"%s [%d] reportja: %s\", neve, playerid, report);
SendClientMessage(i, piros, string);
}
}
reportja[playerid] = report;
SendClientMessage(playerid, szurke, \"Üzenet elküldve.\");
return 1;
}
CMD:asay(playerid, params[])
{
if(IsPlayerLAdmin(playerid))
{
new szoveg[128];
if(sscanf(params,\"s[128]\",szoveg)) return SendClientMessage(playerid,feher,\"Használat: /asay [üzenet]\");
GetPlayerName(playerid, neve, sizeof(neve));
format(string, sizeof(string), \"Admin %s: %s\", neve, szoveg);
SendClientMessageToAll(neon, string);
}
return 1;
}
CMD:asayy(playerid, params[])
{
if(IsPlayerLAdmin(playerid))
{
new szoveg[128];
new id;
if(sscanf(params,\"us[128]\",id, szoveg)) return SendClientMessage(playerid,feher,\"Használat: /asayy [id] [üzenet]\");
GetPlayerName(playerid, neve, sizeof(neve));
new neve2[24];
GetPlayerName(id, neve2, sizeof(neve2));
new string2[128];
format(string2, sizeof(string2), \"%s reportja: %s\", neve2, reportja[id]);
SendClientMessageToAll(piros, string2);
format(string, sizeof(string), \"Admin %s: %s\", neve, szoveg);
SendClientMessageToAll(neon, string);
}
return 1;
}
Sziasztok!Valaki megtudná nekem írni hogy ezt Ladmin 4v2-be hogy rakjuk be?Mert mindent próbáltam,de nem megy :S
Elõre is kössz!
Szia! Az IsPlayerLAdmin.inc-et letöltöd innen: http://solidfiles.com/d/5e48/ , beteszed pawno/includes mappába és a szervereden az includes mappába!
És itt a script:
#include <a_samp>
#include <zcmd>
#include <sscanf2>
#include <IsPlayerLAdmin>
#define szurke 0xAFAFAFAA
#define piros 0xFF0000AA
#define feher 0xFFFFFFAA
#define fekete 0x000000
#define neon 0x00FFFFFF
#define FEROHELY 30 // Írd át a szervered slot számára
new reportja[MAX_PLAYERS][128];
new string[128];
new neve[24];
CMD:report(playerid, params[])
{
new report[128];
if(sscanf(params,\"s[128]\",report)) return SendClientMessage(playerid,feher,\"Használat: /report [kérdésed]\");
GetPlayerName(playerid, neve, sizeof(neve));
for(new i = 0; i < FEROHELY; i ++)
{
if(IsPlayerLAdmin(i))
{
format(string, sizeof(string), \"%s [%d] reportja: %s\", neve, playerid, report);
SendClientMessage(i, piros, string);
}
}
reportja[playerid] = report;
SendClientMessage(playerid, szurke, \"Üzenet elküldve.\");
return 1;
}
CMD:asay(playerid, params[])
{
if(IsPlayerLAdmin(playerid))
{
new szoveg[128];
if(sscanf(params,\"s[128]\",szoveg)) return SendClientMessage(playerid,feher,\"Használat: /asay [üzenet]\");
GetPlayerName(playerid, neve, sizeof(neve));
format(string, sizeof(string), \"Admin %s: %s\", neve, szoveg);
SendClientMessageToAll(neon, string);
}
return 1;
}
CMD:asayy(playerid, params[])
{
if(IsPlayerLAdmin(playerid))
{
new szoveg[128];
new id;
if(sscanf(params,\"us[128]\",id, szoveg)) return SendClientMessage(playerid,feher,\"Használat: /asayy [id] [üzenet]\");
GetPlayerName(playerid, neve, sizeof(neve));
new neve2[24];
GetPlayerName(id, neve2, sizeof(neve2));
new string2[128];
format(string2, sizeof(string2), \"%s reportja: %s\", neve2, reportja[id]);
SendClientMessageToAll(piros, string2);
format(string, sizeof(string), \"Admin %s: %s\", neve, szoveg);
SendClientMessageToAll(neon, string);
}
return 1;
}
[/quote]
Köszönöm szépen!Rendben van minden!