Szerző Téma: Közös Rádió? (Megtekintve 1032 alkalommal)

Ted[ULR] · « **Dátum:** 2013. február 07. - 02:18:26 »

Sziasztok!
Rég nyitottam már témát

Most egy olyan segítséget kérek hogy Közös Rádión bírjanak beszélni a Frakciósok.
Szóval a Frakciós Rádió.


CMD:fr(playerid, params[])
{
if(pInfo[playerid][pFrakcio] == RFONOK || pInfo[playerid][pFrakcio] == RENDOR)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    
    format(S2, sizeof(S2), \"[Rádió] %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    
    SendRendorMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == MFONOK || pInfo[playerid][pFrakcio] == MENTOS)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[Rádió] %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendMentosMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == SZFONOK || pInfo[playerid][pFrakcio] == SZERELO)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[Rádió] %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendSzereloMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == RAFONOK || pInfo[playerid][pFrakcio] == RADIOS)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[Rádió] %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendRadiosMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == ADOFONOK || pInfo[playerid][pFrakcio] == ADOTAG)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[Rádió] %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendNavMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else
{
    SendClientMessage(playerid, PIROS, \"Nem vagy semilyen frakció tagja!\");
}
return 1;
}

Én azt akarom hogy ez segítségével segítsetek meg csinálni a \"/kfr\"-t.
Lényege: Ha Mondjuk rendõr ír a /kfr-el akkor így rakja a Frakciósoknak a Chat-ba:


[KözösRádió] [Rendõr] \" Neve \": \" Szöveg amit ír \" , vége

Ha mondjuk Tûzoltó:


[KözösRádió] [Tûzoltó] \" Neve \": \" Szöveg amit ír \" , vége

És így tovább!


[KözösRádió] [Vámhivata] \" Neve \": \" Szöveg amit ír \" , vége
[KözösRádió] [Mentõs] \" Neve \": \" Szöveg amit ír \" , vége

Remélem értitek amit kérek

Remélem sokan segítenek

Red-Eye · « **Válasz #1 Dátum:** 2013. február 07. - 09:57:59 »


#include <a_samp>
#include <zcmd>
#include <sscanf2>
#define RENDOR 1
#define RFONOK 2
#define MENTOS 3
#define MFONOK 4
#define RADIOS 5
#define RAFONOK 6
#define SZERELO 7
#define SZFONOK 8
#define ADOTAG 9
#define ADOFONOK 10
enum asd {
pFrakcio,
}
new FrakiNeve[11][10] =
{
{\" \"},
{\"Rendõr\"},
{\"Rendõr\"},
{\"Mentõs\"},
{\"Mentõs\"},
{\"Rádiós\"},
{\"Rádiós\"},
{\"Szerelõ\"},
{\"Szerelõ\"},
{\"NAV\"},
{\"NAV\"}
};
new pInfo[MAX_PLAYERS][asd];
CMD:frakiadd(playerid,params[])
{
new pid,
fraki;
if(sscanf(params,\"ud\",pid,fraki)) return SendClientMessage(playerid,0xF0F8FFAA,\"Használat: /frakiadd id frakiszáma\");
pInfo[pid][pFrakcio] = fraki;
return 1;
}
CMD:kfr(playerid,params[])
{
new tempstring[128];
if(sscanf(params,\"s[128]\",tempstring)) return SendClientMessage(playerid,0xF0F8FFAA,\"Használat: /kfr <Üzenet>\");
if(FrakiCheck(playerid))
{
FrakiRadio(playerid,tempstring);
}
return 1;
}
stock FrakiRadio(playerid,szoveg[128])
{
new tempName[MAX_PLAYER_NAME];
new outstr[245];
GetPlayerName(playerid,tempName,sizeof(tempName));
for(new i = 0;i < MAX_PLAYERS;i++)
{
if(IsPlayerConnected(playerid) && FrakiCheck(playerid))
{
format(outstr,sizeof(outstr),\"[KözösRádió] [%s] %s: %s,vége\",FrakiNeve[pInfo[playerid][pFrakcio]],tempName,szoveg);
SendClientMessage(i,0xF0F8FFAA,outstr);
}
}
return 0;
}
stock FrakiCheck(playerid)
{
if(pInfo[playerid][pFrakcio] ==  RENDOR || pInfo[playerid][pFrakcio] ==  RFONOK || pInfo[playerid][pFrakcio] ==  MENTOS || pInfo[playerid][pFrakcio] ==  MFONOK || pInfo[playerid][pFrakcio] ==  RADIOS || pInfo[playerid][pFrakcio] ==  RAFONOK || pInfo[playerid][pFrakcio] ==  SZERELO || pInfo[playerid][pFrakcio] ==  SZFONOK || pInfo[playerid][pFrakcio] ==  ADOTAG || pInfo[playerid][pFrakcio] ==  ADOFONOK)
{
return true;
}
else
{
return false;
}
}
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\" Blank Filterscript by your name here\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}

teljes fs amit összedobtam hozzá, remélem a finom hangolást megoldod sajna több idõm nincs rá tesztelni csak egy magam teszteltem úgy mûködött, define-okat újakat csináltam magamnak majd a tieid szerint módosítsd VIGYÁZZ!! a kiírásnál a frakciónevet a pFrakcio értéke alapján csinálja szóval ha elcsúsztatod hogy a rendõr nem 1-es 2-es stb. akkor már nem mûködik megfelelõen
remélem azért ez a kis összedobott vackom is segítségedre lesz valamennyire

Na hali :smokin:

Ted[ULR] · « **Válasz #2 Dátum:** 2013. február 07. - 13:17:44 »

De én csak /kfr parancsot kértem... Nem egy frakciós scriptet....

Red-Eye · « **Válasz #3 Dátum:** 2013. február 07. - 14:47:03 »

hogy tudjam tesztelni írnom kellett hozzá teszt értékeket, vagy te hogy tesztelnél valamit amiben nem vagy biztos hogy mûködik? $:-\$ \

Pajd Tamás · « **Válasz #4 Dátum:** 2013. február 10. - 00:27:37 »


CMD:kfr(playerid, params[])
{
if(pInfo[playerid][pFrakcio] == RFONOK || pInfo[playerid][pFrakcio] == RENDOR)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    
    format(S2, sizeof(S2), \"[KözösRádió] Rendõr %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    
    SendRendorMessage(RADIO, S2);
            SendMentosMessage(RADIO, S2);
    SendSzereloMessage(RADIO, S2);
            SendRadiosMessage(RADIO, S2);
            SendNavMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == MFONOK || pInfo[playerid][pFrakcio] == MENTOS)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[KözösRádió] Mentõ %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendRendorMessage(RADIO, S2);
            SendMentosMessage(RADIO, S2);
    SendSzereloMessage(RADIO, S2);
            SendRadiosMessage(RADIO, S2);
            SendNavMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == SZFONOK || pInfo[playerid][pFrakcio] == SZERELO)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[KözösRádió] Szerelõ %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendRendorMessage(RADIO, S2);
            SendMentosMessage(RADIO, S2);
    SendSzereloMessage(RADIO, S2);
            SendRadiosMessage(RADIO, S2);
            SendNavMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == RAFONOK || pInfo[playerid][pFrakcio] == RADIOS)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[KözösRádió] Rádió %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendRendorMessage(RADIO, S2);
            SendMentosMessage(RADIO, S2);
    SendSzereloMessage(RADIO, S2);
            SendRadiosMessage(RADIO, S2);
            SendNavMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else if(pInfo[playerid][pFrakcio] == ADOFONOK || pInfo[playerid][pFrakcio] == ADOTAG)
{
    new S[100], S2[128], S3[128];
    if(sscanf(params, \"s[100]\", S)) return SendClientMessage(playerid, PIROS, \"Használat: /fr < Frakció Rádió >\");
    format(S2, sizeof(S2), \"[KözösRádió] Adó és Vámhivatal %s mondja: %s\", Nev(playerid), S);
format(S3, sizeof(S3), \"[Rádió] Valaki mondja: %s\", S);
    SendRendorMessage(RADIO, S2);
            SendMentosMessage(RADIO, S2);
    SendSzereloMessage(RADIO, S2);
            SendRadiosMessage(RADIO, S2);
            SendNavMessage(RADIO, S2);
    ProxDetector(10.0, playerid, S3, NARANCS, NARANCS, NARANCS, NARANCS, NARANCS);
}
else
{
    SendClientMessage(playerid, PIROS, \"Nem vagy semilyen frakció tagja!\");
}
return 1;
}

elvileg jó, nem teszteltem.
változtatások: parancs neve, és hogy minden leaderes meló tagjainak elküldi az üzit elvileg, és a rádió átírva közös rádióra és a frakció nevek odaírva. összesen 1.5 perc

Ted[ULR] · « **Válasz #5 Dátum:** 2013. február 11. - 11:26:41 »

Ugyan ezt csináltam meg tegnap 0:00-kor

Látom te 27 perccel késõbb. De azért köszi