Szerző Téma: [FS]Report (Megtekintve 659 alkalommal)

feheristi97 · « **Dátum:** 2011. július 25. - 16:02:54 »

Helló! Készitetem egy report scriptet ami RPG szerverekre hasznósak a parancsa /report
By KuKaC a.k.a FeherIsti
Link: www.pastebin.com/zjMJKJJg

Kovacs_Bela · « **Válasz #1 Dátum:** 2011. július 25. - 16:22:29 »

onfilterscriptexit alá írtad?!?!?! úgy az életbe nem fog menni

herban · « **Válasz #2 Dátum:** 2011. július 25. - 16:36:53 »

A FilterScriptExit függvény akkor hívodik meg, ha a script-et kiveszed(/rcon unloadfs)
vagy restartolod a servert.
Talán így kéne:
[pawn]
#include <a_samp>
#if defined FILTERSCRIPT
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\"By KuKaC a.k.a FeherIsti\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnFilterScriptExit()
{

return 1;
}
#define params
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp(\"/report\", cmdtext, true) == 0)
{
if(!strlen(params)){
SendClientMessage(playerid, 0xFF0000AA, \"/report [szöveg]\");
new name[MAX_PLAYER_NAME], string[200];
GetPlayerName(playerid, name, sizeof(name));
format(string, sizeof(string), \"Reportolt %s: %s\", name, params);
SendClientMessage(playerid, 0x00FF00AA, \"Reportod elküldve!\");
for(new i=0; i<GetMaxPlayers(); i++){
if(IsPlayerConnected(i)){
if(IsPlayerAdmin(i)){
SendClientMessage(i, 0xFF0000AA, string);
return 1;
}
#endif[/pawn]

instant · « **Válasz #3 Dátum:** 2011. július 25. - 16:46:19 »

ez van az ladmin4v2 bei s nem

Wink

Delta · « **Válasz #4 Dátum:** 2011. július 25. - 16:52:35 »

Én így oldanám meg, hogy megy-e az jó kérdés nem teszteltem..

   CMD:report(playerid, params[])
{
new sztring[100], string[128];
if(sscanf(params, \"s[100]\", sztring)) return SendClientMessage(playerid, 0xFF0000AA, \"/report [szöveg]\");
{
format(string, sizeof(string), \"Reportolt %s: %s\", GetPlayerNameEx(playerid), sztring);
SendClientMessage(playerid, 0x00FF00AA, \"Reportod elküldve!\");
   new i=0;
for(; i++ != MAX_PLAYERS;)
{
   if(IsPlayerConnected(i))continue;
   if(IsPlayerAdmin(i))continue;
   SendClientMessage(i, 0xFF0000AA, string);
   return 1;
}
}
return 1;
}

GetPlayerNameEx

stock GetPlayerNameEx(playerid)
{
    new string[24];
    GetPlayerName(playerid,string,24);
    return string;
}

Kovacs_Bela · « **Válasz #5 Dátum:** 2011. július 25. - 17:02:26 »

stock GetPlayerNameEx(playerid)
{
new string[24];
GetPlayerName(playerid,string,24);
return string;
}
string?

amúgy így is jó

Zsolesszka · « **Válasz #6 Dátum:** 2011. július 25. - 18:56:25 »

Idézetet írta: Arnold_Alexander date=1311606432\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"9849\" data-ipsquote-contentclass=\"forums_Topic

delta megoldási mindenféeképpen JOBB! de kezdõ létedre nemis rossz grat!

Leszámítva hogy a 0 playerid-vel rendelkezõ Rcon admin nem kapja meg az üzenetet.
[pawn]
new i=0;
for(; i++ != MAX_PLAYERS;)
{
printf(\"i: %d\", i);
}
[/pawn]

[2011.07.25 18:50:08] i: 1
[2011.07.25 18:50:08] i: 2
[2011.07.25 18:50:08] i: 3
[2011.07.25 18:50:08] i: 4
[2011.07.25 18:50:08] i: 5
[2011.07.25 18:50:08] i: 6
[/quote]

►ѕтa · « **Válasz #7 Dátum:** 2011. július 25. - 19:16:11 »

[pawn]#include <a_samp>
#include <zcmd>
#include <sscanf2>
new reporttext[50][96], reports;
CMD:report(playerid, params[])
{
new text[86], string[128], i=-1;
if(sscanf(params, \"s[86]\", text)) return SendClientMessage(playerid, 0xFF0000AA, \"Használat: /report [szöveg]\");
if(strlen(text) >= 2 || strlen(text) <= 86) return SendClientMessage(playerid, 0xFF0000AA, \"Túl rövid, vagy túl hosszú a szöveg!\");
reports++;
if(reports == 51) reports = 1;
format(reporttext[reports], 86, \"%s\", text);
format(string, sizeof string, \"[/report] %s (%d): %s\", namee(playerid), reports, reporttext[reports]);
while(i < GetMaxPlayers())
{
   if(IsPlayerConnected(i))continue; if(IsPlayerAdmin(i))continue;
   SendClientMessage(i,0xFFFF00AA,string);
   i++;
}
return 1;
}
CMD:rvalasz(playerid, params[])
{
new text[102], string[128], reportid;
if(!IsPlayerAdmin(playerid)) SendClientMessage(playerid, 0xFF0000AA, \"Nem vagy admin!\");
if(sscanf(params, \"s[102]\", reportid, text)) return SendClientMessage(playerid, 0xFF0000AA, \"Használat: /rvalasz [report] [szöveg]\");
if(strlen(text) >= 2 || strlen(text) <= 102) return SendClientMessage(playerid, 0xFF0000AA, \"Túl rövid, vagy túl hosszú a szöveg!\");
if(strlen(reportid) >= 2) return SendClientMessage(playerid, 0xFF0000AA, \"Ez a report nem létezik!\");
format(string, sizeof string, \"[/report] %s (%d): %s\", namee(playerid), reportid, reporttext[reportid]);
SendClientMessageToAll(0xFFFF00AA,string);
format(string, sizeof string, \"Válasz %s: %s\", namee(playerid), text);
SendClientMessageToAll(0x00FF00AA,string);
return 1;
}
namee(p) { new nameee[MAX_PLAYER_NAME]; GetPlayerName(p, nameee, MAX_PLAYER_NAME); return nameee; }[/pawn]
Én verzióm, csináltam bele egy kis pluszt is.

Zsolesszka · « **Válasz #8 Dátum:** 2011. július 25. - 20:06:04 »

Idézetet írta: ►ѕтaЯ◄ date=1311614171\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"9849\" data-ipsquote-contentclass=\"forums_Topic

[pawn]
if(IsPlayerConnected(i))continue; if(IsPlayerAdmin(i))continue;
[/pawn]
Ez így biztos jó? !

Kovacs_Bela · « **Válasz #9 Dátum:** 2011. július 25. - 20:46:15 »

Idézetet írta: ►ѕтaЯ◄ date=1311614171\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"9849\" data-ipsquote-contentclass=\"forums_Topic

[pawn]#include <a_samp>
#include <zcmd>
#include <sscanf2>
new reporttext[50][96], reports;
CMD:report(playerid, params[])
{
new text[86], string[128], i=-1;
if(sscanf(params, \"s[86]\", text)) return SendClientMessage(playerid, 0xFF0000AA, \"Használat: /report [szöveg]\");
if(strlen(text) >= 2 || strlen(text) <= 86) return SendClientMessage(playerid, 0xFF0000AA, \"Túl rövid, vagy túl hosszú a szöveg!\");
reports++;
if(reports == 51) reports = 1;
format(reporttext[reports], 86, \"%s\", text);
format(string, sizeof string, \"[/report] %s (%d): %s\", name(playerid), reports, reporttext[reports]);
while(i < GetMaxPlayers())
{
   if(IsPlayerConnected(i))continue; if(IsPlayerAdmin(i))continue;
   SendClientMessage(i,0xFFFF00AA,string);
   i++;
}
return 1;
}
CMD:rvalasz(playerid, params[])
{
new text[102], string[128], reportid;
if(!IsPlayerAdmin(playerid)) SendClientMessage(playerid, 0xFF0000AA, \"Nem vagy admin!\");
if(sscanf(params, \"s[102]\", reportid, text)) return SendClientMessage(playerid, 0xFF0000AA, \"Használat: /rvalasz [report] [szöveg]\");
if(strlen(text) >= 2 || strlen(text) <= 102) return SendClientMessage(playerid, 0xFF0000AA, \"Túl rövid, vagy túl hosszú a szöveg!\");
if(strlen(reportid) >= 2) return SendClientMessage(playerid, 0xFF0000AA, \"Ez a report nem létezik!\");
format(string, sizeof string, \"[/report] %s (%d): %s\", name(playerid), reportid, reporttext[reportid]);
SendClientMessageToAll(0xFFFF00AA,string);
format(string, sizeof string, \"Válasz %s: %s\", name(playerid), text);
SendClientMessageToAll(0x00FF00AA,string);
return 1;
}
name(p) { new name[MAX_PLAYER_NAME]; GetPlayerName(p, name, MAX_PLAYER_NAME); retur name; }[/pawn]
Én verzióm, csináltam bele egy kis pluszt is.

40. sor végén retur name helyett return name és még így is van egy error amit nem értek:
...Asztal\\moneybag\\filterscripts\\report.pwn(32) : error 035: argument type mismatch (argument 1)
...Asztal\\moneybag\\filterscripts\\report.pwn(40) : warning 219: local variable \"name\" shadows a variable at a preceding level
Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase
1 Error.

energo.v2 · « **Válasz #10 Dátum:** 2011. július 25. - 20:54:42 »

Ember!!!!

►ѕтa · « **Válasz #11 Dátum:** 2011. július 25. - 21:15:32 »

Idézetet írta: Zsolesszka date=1311617164\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"9849\" data-ipsquote-contentclass=\"forums_Topic

[pawn]
if(IsPlayerConnected(i))continue; if(IsPlayerAdmin(i))continue;
[/pawn]

Ez így biztos jó? !

[/quote]
Nos nálam PAWN-ban nem ír hibát, ingame nem teszteltem, mivel ezen jelenleg nincsen SA-MP / SA. Holnap megnézem.

obo[T] link=topic=13817.msg159004#msg159004 date=1311619575]

...

[/quote]
40. sor végén retur name helyett return name és még így is van egy error amit nem értek:
...Asztal\\moneybag\\filterscripts\\report.pwn(32) : error 035: argument type mismatch (argument 1)
...Asztal\\moneybag\\filterscripts\\report.pwn(40) : warning 219: local variable \"name\" shadows a variable at a preceding level
Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase
1 Error.

[/quote]
Javítva.

Szerző Téma: [FS]Report (Megtekintve 659 alkalommal)

feheristi97

Kovacs_Bela

herban

Kovacs_Bela

Kovacs_Bela

energo.v2