GTA Közösség - A magyar GTA fórum

Hatalmas Archívum => Fórum Archívum (Témák/Fórumok) => A témát indította: feheristi97 - 2011. július 25. - 16:02:54

Cím: [FS]Report
Írta: feheristi97 - 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

Cím: [FS]Report
Írta: Kovacs_Bela - 2011. július 25. - 16:22:29

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

Cím: [FS]Report
Írta: herban - 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]

Cím: [FS]Report
Írta: instant - 2011. július 25. - 16:46:19

ez van az ladmin4v2 bei s nem  ??? Wink

Cím: [FS]Report
Írta: Delta - 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;
}

Cím: [FS]Report
Írta: Kovacs_Bela - 2011. július 25. - 17:02:26

stock GetPlayerNameEx(playerid)
{
    new string[24];
    GetPlayerName(playerid,string,24);
    return string;
}
string?:D
amúgy így is jó :)

Cím: [FS]Report
Írta: Zsolesszka - 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!  ;D
 

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]

Cím: [FS]Report
Írta: ►ѕтa - 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.

Cím: [FS]Report
Írta: Zsolesszka - 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ó?  !

Cím: [FS]Report
Írta: Kovacs_Bela - 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.

Cím: [FS]Report
Írta: energo.v2 - 2011. július 25. - 20:54:42

Ember!!!! :)

Cím: [FS]Report
Írta: ►ѕтa - 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.