DRCMD:tele valami(playerid,params[])

Mibõl gondolod hogy gyors? Nem látom az eredményeket, de az biztos hogy egyszerû.
Feleslegesnek találom a függvénykönyvtár ellenõrzését, és az \'endinput\' irányelvet.
Elég lenne ha a_samp.inc függvénykönyvtár alá helyezzük a drcmd-t.
Másrészt ha használni szeretném az OnPlayerCommandText eljárást akkor ALS is kéne.
 

#include <a_samp>
#define DRCMD:%1(%2,%3) \\
forward drcmd_%1(%2,%3); \\
public drcmd_%1(%2,%3)
#define DRCMD_%1(%2,%3) \\
DRCMD:%1(%2,%3)
#define drcmd(%1,%2,%3) \\
DRCMD:%1(%2,%3)
#define CMD:%1(%2,%3) \\
DRCMD:%1(%2,%3)
#define COMMAND:%1(%2,%3) \\
DRCMD:%1(%2,%3)
main() { }
public OnGameModeInit()
{
    #define MAX_TEST (990000)
for(new d; d < 10; ++d) print(\" \");
    new dcmdtest = GetTickCount();
    for(new a; a < MAX_TEST; ++a)
        OnPlayerDraCommandText(0, \"/drcmd teszt\");
    printf(\"# DRCMD in %d\",GetTickCount() - dcmdtest);
    new zcmdtest = GetTickCount();
    for(new a; a < MAX_TEST; ++a)
        OnPlayerCommandText(0, \"/drcmd teszt\");
    printf(\"# ZCMD in %d\",GetTickCount() - zcmdtest);
    return true;
}
forward OnPlayerDraCommandText(playerid, cmdtext[]);
public OnPlayerDraCommandText(playerid, cmdtext[])
{
new
function[32],
szokozmeddig = -1;
while(++szokozmeddig < strlen(cmdtext)) if((cmdtext[szokozmeddig] == \' \')) break;
strmid(function, cmdtext, 1, szokozmeddig);
format(function, sizeof(function), \"drcmd_%s\", function);
while(cmdtext[szokozmeddig] == \' \') szokozmeddig++;
if(funcidx(function) != -1)
{
if(szokozmeddig == strlen(cmdtext))
{
   return CallLocalFunction(function, \"is\", playerid, \"\\1\");
}
return CallLocalFunction(function, \"is\", playerid, cmdtext[szokozmeddig]);
}
return 0;
}
static
bool:zcmd_g_HasOPCS = false,
bool:zcmd_g_HasOPCE = false;
#define MAX_FUNC_NAME (32)
public OnPlayerCommandText(playerid, cmdtext[])
{
    if (zcmd_g_HasOPCS && !CallLocalFunction(\"OnPlayerCommandReceived\", \"is\", playerid, cmdtext))
    {
        return 1;
    }
    new
        pos,
        funcname[MAX_FUNC_NAME];
    while (cmdtext[++pos] > \' \')
{
funcname[pos-1] = tolower(cmdtext[pos]);
}
format(funcname, sizeof(funcname), \"cmd_%s\", funcname);
    while (cmdtext[pos] == \' \') pos++;
if (!cmdtext[pos])
{
if (zcmd_g_HasOPCE)
{
   return CallLocalFunction(\"OnPlayerCommandPerformed\", \"isi\", playerid, cmdtext, CallLocalFunction(funcname, \"is\", playerid, \"\\1\"));
}
return CallLocalFunction(funcname, \"is\", playerid, \"\\1\");
}
if (zcmd_g_HasOPCE)
{
return CallLocalFunction(\"OnPlayerCommandPerformed\", \"isi\", playerid, cmdtext, CallLocalFunction(funcname, \"is\", playerid, cmdtext[pos]));
}
return CallLocalFunction(funcname, \"is\", playerid, cmdtext[pos]);
}