Szerző Téma: "üzenõ" script..  (Megtekintve 628 alkalommal)

"üzenõ" script..
« Dátum: 2012. Augusztus 07. - 14:00:27 »
0 Show voters
Tehát egy olyan scriptre lene szükségem ha pl beírja valaki hogy /ötlet akkor kijön egy kis dialogos ablak vagy mi és oda ha beír valamit akkor a szerver mappába beleírja hogy mit írtak.. És így tudnak nekem üzenni hogy mi kellene még a szerverre vagy egyéb.. Az elõzõben amit nyitottam nem volt jó valamiért :S És már nem tudok valamiért hozzászólni
« Utoljára szerkesztve: 2012. Augusztus 10. - 19:44:23 írta Benceee »

Kovacs_Bela

  • Vendég
"üzenõ" script..
« Válasz #1 Dátum: 2012. Augusztus 08. - 00:02:05 »
+1 Show voters

#include <a_samp>
#include <sscanf2>
#include <zcmd>
stock  dini_Write(filename[],key[])
{
      if(!fexist(filename)) return false;
      new File:fwd;
      fwd=fopen(filename,io_write);
if(fwd)
{
fwrite(fwd,key);
fclose(fwd);
}
}
CMD:otlet(playerid,params[])
{
    new t[128],y,m,d,h,min,mp;
    if(sscanf(params,\"s[128]\",t)) return SendClientMessage(playerid,-1,\"/otlet (ötleted)\");
    new msg[200],name[24];
    getdate(y,m,d);
    gettime(h,min,mp);
    GetPlayerName(playerid,name,24);
    format(msg,200,\"%d.%d.%d %d:%d:%d | %s ötlete: %s\",y,m,d,h,min,mp,name,t);
    dini_Write(\"otletek.txt\",msg);
    format(msg,200,\"{a1b2c3}Sikeresen elküldted az ötleted ami a következõ: {ffbb00}%s\",t);
    SendClientMessage(playerid,-1,msg);
    return 1;
}

"üzenõ" script..
« Válasz #2 Dátum: 2012. Augusztus 10. - 19:43:51 »
0 Show voters
Idézetet írta: danix99 date=1344376925\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25686\" data-ipsquote-contentclass=\"forums_Topic


#include <a_samp>
#include <sscanf2>
#include <zcmd>
stock  dini_Write(filename[],key[])
{
      if(!fexist(filename)) return false;
      new File:fwd;
      fwd=fopen(filename,io_write);
if(fwd)
{
fwrite(fwd,key);
fclose(fwd);
}
}
CMD:otlet(playerid,params[])
{
    new t[128],y,m,d,h,min,mp;
    if(sscanf(params,\"s[128]\",t)) return SendClientMessage(playerid,-1,\"/otlet (ötleted)\");
    new msg[200],name[24];
    getdate(y,m,d);
    gettime(h,min,mp);
    GetPlayerName(playerid,name,24);
    format(msg,200,\"%d.%d.%d %d:%d:%d | %s ötlete: %s\",y,m,d,h,min,mp,name,t);
    dini_Write(\"otletek.txt\",msg);
    format(msg,200,\"{a1b2c3}Sikeresen elküldted az ötleted ami a következõ: {ffbb00}%s\",t);
    SendClientMessage(playerid,-1,msg);
    return 1;
}

 

Ha beirom hogy pl /otlet banán akkor csak kírja hogy /otlet (ötleted)..

Nem elérhető nyE

  • 1745
    • Profil megtekintése
"üzenõ" script..
« Válasz #3 Dátum: 2012. Augusztus 10. - 21:31:58 »
0 Show voters
Nem dialogos, viszont 100% mûködik + ha nincs fájl létrehozva, akkor csinál magának egyet.
 

CMD:otlet(playerid, params[])
{
    new otlet[128], File: log, str[128], year, month, day, hour, minute, second;
    if(sscanf(params, \"s[128]\", otlet)) return SendClientMessage(playerid, -1, \"Használat: /otlet (ötleted)\");
    else
    {
        SendClientMessage(playerid, -1, \"Az ötleted elküldve a szerver tulajdonosának!\");
        getdate(year, month, day); gettime(hour, minute, second);
if(!fexist(\"Otletek.txt\"))
        {
    log = fopen(\"Otletek.txt\", io_write);
    format(str, 128, \"[%02d. %02d. %02d, %02d:%02d:%02d]%s: %s\\r\\n\", year, month, day, hour, minute, second, GetPlayerNameEx(playerid), otlet);
            fwrite(log, str);
    fclose(log);
        }
else if(fexist(\"Otletek.txt\"))
{
    log = fopen(\"Otletek.txt\", io_append);
    format(str, 128, \"[%02d. %02d. %02d, %02d:%02d:%02d]%s: %s\\r\\n\", year, month, day, hour, minute, second, GetPlayerNameEx(playerid), otlet);
    fwrite(log, str);
    fclose(log);
}
    }
    return 1;
}
stock GetPlayerNameEx(playerid)
{
    new name[MAX_PLAYER_NAME];
    GetPlayerName(playerid, name, MAX_PLAYER_NAME);
    return name;
}
« Utoljára szerkesztve: 2012. Augusztus 10. - 21:35:58 írta Antonyo »

"üzenõ" script..
« Válasz #4 Dátum: 2012. Augusztus 10. - 21:44:02 »
0 Show voters
Ugyan aza hiba ..://

Nem elérhető nyE

  • 1745
    • Profil megtekintése
"üzenõ" script..
« Válasz #5 Dátum: 2012. Augusztus 11. - 09:56:10 »
+1 Show voters
Idézetet írta: siklosikrisz date=1344627842\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25686\" data-ipsquote-contentclass=\"forums_Topic
Ugyan aza hiba ..://
 
Akkor már csak az lehet, hogy nem frissítetted az sscanf pluginodat. Régebben nekem is ez volt a hiba amikor átálltam 0.3e-re. Töltsd le a legújabb verziót. Katt ide!

"üzenõ" script..
« Válasz #6 Dátum: 2012. Augusztus 11. - 13:19:48 »
0 Show voters
Rendben köszi tesztelem majd :D

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal