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

if(IsPlayerInRangeOfPoint(playerid,5,1,1,1)) itt nem meg kellene adnod a XYZ kordínátát?

Szép!

Kössz!  ;D

Idézetet írta: Yѕtee date=1331927166\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"18610\" data-ipsquote-contentclass=\"forums_TopicEz inkább függvénykönyvtár, csak írtál hozzá egy példát, ezért megváltoztattam a téma elõtagját.  ;)
 

Kösz szépen! De az inc segítségével csináltam az egészet! :)

Hy, készitettem egy log scriptett lényege, ha be van téve a szerverbe a filterscript akkor beíród /betoltlog /logkeszites vagy /torollog akkor készithetel saját logót ami azt jelenti mint a konsol hogy látód mit írnak a játékósók egy Teszt.log -ban! Készitõ: Exec((Én))
 

#include < a_samp >
#include <  rLogs >
#include <  zcmd  >
new r_var[ 5 ] = \"Exec\";
CMD:logkeszites( playerid, params[ ] )
{
   new r_g_log[ 15 ];
   if( !LogExist( \"Teszt.log\" ) ) //Megnézi van-e ilyen mappa!
   {
      CreateLog( \"Teszt.log\" ); //Itt készit egy \"Teszt.log\" -ótt!
      format( r_g_log, sizeof( r_g_log ), \"Teszt Log: %s\", r_var ); //String segítségével írja a neveket is és a logot is!
      WriteLog( \"Teszt.log\", r_g_log ); //Ide írja a logokat ebbe a \"Teszt.log\" -ba!
   }
   return 1;
}
CMD:betoltlog( playerid, params[ ] )
{
   ReadLog( \"Teszt.log\" ); //Ha ezt beíród akkor betölti a logot!
   return 1;
}
CMD:torollog( playerid, params[ ] )
{
   DeleteLog( \"Teszt.log\" ); //Töröli a logot!
   return 1;
}

 
Megfelellõ inc ami az rLogs!
EZ AZ ANGÓL FÓRUMROL VAN AZ INC!
 

#include <a_samp>
#if defined _ServerLogs_included
#endinput
#endif
#define _ServerLogs_included
#define LogExist fexist
stock CreateLog( const File[ ] )
{
    if( fexist( File ) )
    {
        printf(\"Használd (\\\"file\\\", \\\"message\\\"); hogy írjál a logba!.\");
        return 0;
    }
    new File:File_Rk = fopen( File, io_write );
    fclose( File_Rk );
    
    return 1;
}
stock WriteLog( const File[ ], string[ ] )
{
    if( !fexist( File ) )
    {
        printf(\"Use CreateLog(\\\"file\\\"); hogy készitsél és írjál a logba!.\");
        return 0;
    }
    new r_strg[ 300 ];
    new a, m, d, h, mi, s;
    getdate( a, m, d );
    gettime( h,mi,s );
    format( r_strg, sizeof( r_strg ), \"(%d/%d/%d)[%02d:%02d:%d] %s\\r\\n\", d, m, a, h, mi , s, string );
    new File:File_r = fopen( File, io_append );
    fwrite( File_r, r_strg );
    fclose( File_r );
    
    return 1;
}
stock DeleteLog( const File[ ] )
{
    if( !fexist( File ) )
    {
        printf(\"Ez a log már létezik!\");
        return 0;
    }
    fremove( File );
    
    return 1;
}
stock ReadLog( const File[ ] )
{
    if( !fexist( File ) )
    {
        printf(\"Ez a log már létezik!.\");
        return 0;
    }
    new rk_strg[ 100 ];
    new File:r_File = fopen( File, io_read );
    while( fread( r_File, rk_strg ) )
    {
        printf( \"[ %s ] %s\", File, rk_strg );
        return 1;
    }
    fclose( r_File );
    
    return 1;
}

 
JÖHETNEK A KOMENTEK, ÉS TERMÉSZTESEN A LIKE IS :D :), Na csáó!

Hy, gondoltam írok egy skin mentõ és betõltõ szkriptet parancsai: /sajatskin , /skinbetolt
Hozzatok létre a scriptfiles mappában egy      jatekos        TXT!
A saját skin mentésért írd be /sajatskin
Készitõ: Exec$
 

#include       <a_samp>
#include       < Zcmd >
#include       < Dini >
#define Skin      23
#define G     \"{6EF83C}\"
#define R     \"{F81414}\"
#define W     \"{FFFFFF}\"
#define O     \"{FFAF00}\"
#define L     \"{00C0FF}\"
#define V     \"{B700FF}\"
public OnFilterScriptInit()
{
if(!fexist(\"/jatekos.ini\")) dini_Create(\"/jatekos/skin.ini\");
}
public OnPlayerSpawn(playerid)
{
    new P_Msg[124];
if(dini_Isset(\"/jatekos/skin.ini\",P_Name(playerid))) SetPlayerSkin(playerid, dini_Int(\"/jatekos/skin.ini\",P_Name(playerid)));
    format(P_Msg, sizeof(P_Msg), \"\"W\"Autómatikusan lementõdõtt a skined: \"G\"%d\",GetPlayerSkin(playerid));
SendClientMessage(playerid, 0xFFFFFFFF, P_Msg);
return true;
}
CMD:skinbetolt(playerid, params[ ] )
{
    new P_Msg[124];
    if(dini_Isset(\"/jatekos/skin.ini\",P_Name(playerid))) SetPlayerSkin(playerid, dini_Int(\"/jatekos/skin.ini\",P_Name(playerid)));
format(P_Msg, sizeof(P_Msg), \"\"W\"A mostani skined \"G\"%d.\", GetPlayerSkin(playerid));
SendClientMessage(playerid, 0xFFFFFFFF, P_Msg);
return true;
}
CMD:sajatskin(playerid, params[ ] )
{
    ShowPlayerDialog(playerid, Skin, DIALOG_STYLE_INPUT, \"\"R\"Válazd ki a skined\", \"\"G\"Tölsd be a skined\", \">> OK <<\", \"Cancel\");
return true;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == Skin)
{
    if(response)
{
            new S_id,
       P_Msg[124];
   S_id = strval(inputtext);
   if(S_id < 0 || S_id > 300)
            {
       SendClientMessage(playerid, 0xFFFFFFFF, \"\"R\"Írjál egy skin ID \"G\"1 -tõl \"R\"egészen \"G\"299\");
            }
            else
            {
      SetPlayerSkin(playerid, S_id);
               format(P_Msg, sizeof(P_Msg), \"\"W\"A skined ell lett mentve \"G\"%d\",S_id);
      SendClientMessage(playerid, 0xFFFFFFFF, P_Msg);
      dini_IntSet(\"/jatekos/skin.ini\",P_Name(playerid),GetPlayerSkin(playerid));
   }
        }
    }
    return true;
}
stock P_Name(playerid)
{
     new PN[MAX_PLAYERS];
    GetPlayerName(playerid, PN, sizeof(PN));
     return PN;
}

Hy, bemutatnám a Rendõrõk VS Rablók szerverét máma kinyitótta a kapuit a szerver és várja a játékósókat a szervere!
A mod az RCB modbol lett készitve minden átt van benne írva és átalakitva!
Játszódása a Plaomino Crack faluban van de én elneveztem Little Town -nak a mod nevét..
Mik vannak benne?
Rendõr
Úttisztitó
Katona
Pilóta
Mentõs
Hitmán
Tûzóltó
A szerveren a ladmin4v2 -es adminrendszer fút és az is fogg menni egy ideig!
Rendõr: Ell kell kapja a bûnõzõket!
Mentõs: Gyógyitani, segíteni tudd!
Katona: Bûnõzõket fogg ell!
Pilóta: Utasokat szálitt!
Hitman: Mesterlövész!
Tûzóltó: Ha van tûz eloltja!
Úttisztittó: Takarit!
Parancsok: /service medic, /service taxi, /service mechanic, /service police, /rob, /Taze, /cuff, /elenged, /bilincs, /uncuff, /tnt!
/service medic: Mentõs hÍvás
/service police: Rendõr hívás
/service taxi: Taxi hívás
/service mechanic: Szerelõ hívás
Szerveren tõbb mint 100 darabb ház található! GARHOUSE!
Tulajdónós: Harry
Segítõkéz: .Roly
Mappok: Rendõrség be van mappolva, tûzóltó bemappolva, mentõs HQ bemappolva, uttisztitó bemappolva!
Mikor lespawnolsz a szerveren akkor kiad egy nagy méretû dialogot hogyan és mik vanna a szerveren remélem tetszeni fogg! Ûdv RvR Team!
IP: [mod]Eltávolítva[/mod]

A mod elejére Így ird #include <sscanf>

Felmész a szervere majd /save lemész majd a Gta san Andreas mappában van a position.txt ott lesz pl ez: 6634.535.43543.5435.34534
Na majd az OnPlayerSpawn alá írd be SetPlayerPos(playerid,AZ AMI OTT VAN AZ A SZÁMOK IDE ÍRD BE DE CSAK X,Y,Z!);

Ez igaz egy kicsit bugos mód de szerintem ez profi szkriptereknek ajánlom mert bugos egy vannak Bene más hibák :)

Én az ultimate trucking módját csinalgatnam fejlesztenem tovább mert az könyebb mód és a ppc az meg nehéz nagyon inc stb ..

Azok ppc vagy ultimate mód átalakítva!

SetPlayerInterior(playerid,1);  0 helyet 1 írj!

lehetetlen!

Igen persze, mert ékezettel fórditjátok le az INC és nem úgy kell hanem sima írásal mint pl:  csá helyet csa , igy kell forsitani!