stock INI_Create(filename[])
{
    if(INI_Exist(filename)) 
        return printf("Erro ao criar o arquivo '%s'. O arquivo jб existe.");

    new
        File:MeuArquivo;

    MeuArquivo = fopen(filename, io_write);
    fclose(MeuArquivo);
    return 0x1;
}

#tryinclude <a_samp>

//Keys
//
//Lucas Vinнcius @ThunderGamesBR

#define KEY_ACTION 				(1)
#define KEY_CROUCH 				(2)
#define KEY_FIRE 				(4)
#define KEY_SPRINT 				(8)
#define KEY_SECONDARY_ATTACK          (16)
#define KEY_JUMP 				(32)
#define KEY_LOOK_RIGHT 			(64)
#define KEY_HANDBRAKE 			(128)
#define KEY_LOOK_LEFT 			(256)
#define KEY_SUBMISSION 			(512)
#define KEY_LOOK_BEHIND		 	(512)
#define KEY_WALK 				(1024)
#define KEY_ANALOG_UP 			(2048)
#define KEY_ANALOG_DOWN 		        (4096)
#define KEY_ANALOG_LEFT 		        (8192)
#define KEY_ANALOG_RIGHT 		        (16384)
#define KEY_YES 				        (65536)
#define KEY_NO 					(131072)
#define KEY_CTRL_BACK 			(262144)

#define KEY_UP				 	(-128)
#define KEY_DOWN 				(128)
#define KEY_LEFT 				(-128)
#define KEY_RIGHT 				(128)

#define fcreate(%0) fclose(fopen(%0, io_append))

public OnPlayerDeath(playerid)
{
    if(IsPlayerConnected(killerid)) {
        new rtext[128];
        if(reason == 0) { rtext = "a socos."; }
        else if(reason == 1) { rtext = "com um soco ingles."; }
        else if(reason == 2) { rtext = "com taco de Golfe"; }
        else if(reason == 3) { rtext = "com um cassetete."; }
        else if(reason == 4) { rtext = "com uma faca."; }
        else if(reason == 5) { rtext = "com um bastгo de Baseball."; }
        else if(reason == 6) { rtext = "com uma pб."; }
        else if(reason == 7) { rtext = "com um taco de bilhar."; }
        else if(reason == 8) { rtext = "com uma Katana."; }
        else if(reason == 9) { rtext = "com uma Serra Eletrica"; }
        else if(reason == 10) { rtext = "com um Pinto de borracha duplo "; }
        else if(reason == 11) { rtext = "com um Pinto de borracha "; }
        else if(reason == 12) { rtext = "com um Vibrador "; }
        else if(reason == 13) { rtext = "com um Vibrador "; }
        else if(reason == 14) { rtext = "com um Buquк de Flores"; }
        else if(reason == 15) { rtext = "com uma Bengala"; }
        else if(reason == 16) { rtext = "com uma Granada"; }
        else if(reason == 17) { rtext = "com uma Bomba de Gas"; }
        else if(reason == 18) { rtext = "com um Coqtel Molotov"; }
        else if(reason == 22) { rtext = "com tiros de uma Colt45"; }
        else if(reason == 23) { rtext = "com tiros de uma Colt45 com Silenciador"; }
        else if(reason == 24) { rtext = "com tiros de uma Desert Eagle"; }
        else if(reason == 25) { rtext = "com tiros de uma Shotgun"; }
        else if(reason == 26) { rtext = "com tiros de uma Sawnoff"; }
        else if(reason == 27) { rtext = "com tiros de uma Combat Shotgun"; }
        else if(reason == 28) { rtext = "com tiros de uma Micro Uzi"; }
        else if(reason == 29) { rtext = "com tiros de uma MP5"; }
        else if(reason == 30) { rtext = "com tiros de uma AK-47"; }
        else if(reason == 31) { rtext = "com tiros de uma M4"; }
        else if(reason == 32) { rtext = "com tiros de uma Tec-9"; }
        else if(reason == 33) { rtext = "com tiros de uma Country Rifle"; }
        else if(reason == 34) { rtext = "com tiros de uma Sniper Rifle"; }
        else if(reason == 35) { rtext = "com tiros de uma BAZOOKA"; }
        else if(reason == 36) { rtext = "com tiros de uma BAZOOKA DE TIRO PERSEGUIDOR"; }
        else if(reason == 37) { rtext = "com um Lanзa Chamas"; }
        else if(reason == 38) { rtext = "com tiros de uma Minigun"; }
        else if(reason == 39) { rtext = "com Bombas Armadas"; }
        else if(reason == 40) { rtext = "com um Detonador"; }
        else if(reason == 41) { rtext = "com um Spray"; }
        else if(reason == 42) { rtext = "com um extintor de incendios"; }
        else if(reason == 47) { rtext = "FAKE PISTOL"; }
        else if(reason == 49) { rtext = "Atropelado"; }
        else if(reason == 50) { rtext = "nas hйlices de um helicoptero"; }
        else if(reason == 51) { rtext = "com uma explosгo"; }
        else if(reason == 53) { rtext = "morreu afogado."; }
        else if(reason == 54) { rtext = "caiu de um lugar alto e morreu."; }
        else if(reason == 255) { rtext = "morreu sozinho"; }
        else { rtext = "Ninguкm sabe como !"; }

        new pStr[100];
        format(pStr,sizeof(pStr),"O jogador %s matou %s (( %s ))", Nome(killerid), GetPlayerNick(playerid), rtext);
        MensagemParaAdminsMorte(pStr);
    }
       return 1;
}

й um codigo util que um dia eu procurei e achei

#define Callback::%0(%1)    forward %0(%1); public %0(%1)
Callback::Eating(playerid, start){

    static
        Float: Vida
    ;

    GetPlayerHealth(playerid, Vida);

    if(Vida < 100){
        if(!start){

            ClearAnimations(playerid);
            ApplyAnimation(playerid, "FOOD", "EAT_Burger",4.1,0,1,1,0,0);
            Eating(playerid, 0);
                    
                    
            GetPlayerHealth(playerid, Vida);
            SetPlayerHealth(playerid, floatadd(Vida, 35));

            SetTimerEx("Eating", 1500, false, "ii", playerid, 1);
            return false;
        }else{

            GetPlayerHealth(playerid, Vida);
            SetPlayerHealth(playerid, floatadd(Vida, 35));
        }
    }
    return true;
}

/*
     Filter-Script
     Mensaje Por Textdraw Dinamico
     By: Parka
*/
#include <a_samp>
#pragma tabsize 4
#define CallBack%0(%1) forward%0(%1); public%0(%1)

new Float:TD_Posicion_X;
new Text:Anuncios;
new StrText[90];
new TimeToTextdraw;

public OnFilterScriptInit()
{
    print("Mensaje Por Textdraw Dinamico By: Parka");
    TimeToTextdraw = SetTimer("TextDrawsAnuncios",66,true);
    return 1;
}

public OnFilterScriptExit()
{
    KillTimer(TimeToTextdraw);
    return 1;
}

CallBack TextDrawsAnuncios( )
{
    UpDateTextDraw( Text:Anuncios ) ;
    TD_Posicion_X -= 1.0;

    if(TD_Posicion_X == -385.0000)
        {
        UpDateTextDraw(Text:Anuncios);
        TD_Posicion_X = 641.0000;
        }

    if(TD_Posicion_X == 640.0000)
    {
    new rantext = random(2);
    switch(rantext)
    {
    case 0: format(StrText,90,"~y~Mensajes aleatorios Dinamicos Con Textdraw.");  // Texto o mensaje que quieras
    case 1: format(StrText,90,"~y~SA-MP Forums Hecho Por Parka.");         // Texto o mensaje que quieras
    }
    TextDrawSetString(Anuncios,StrText);
    }
    return 1;
}

CallBack UpDateTextDraw( Text:TextId )
{
    TextDrawDestroy(TextId);
    TextId = TextDrawCreate(TD_Posicion_X, 1.000000, StrText );
    TextDrawBackgroundColor(TextId , 255);
    TextDrawFont(TextId , 1);
    TextDrawSetOutline(TextId , 1);
    TextDrawSetProportional(TextId , 1);
    return TextDrawShowForAll(TextId);
}

#define Ping 700

Nome(playerid) {

    new Nom [21]
    GetPlayerName(playerid, Nome, 21);
    return Nom;
}
public OnPlayerUpdate(playerid)
{
    new celulas[80], PPing = GetPlayerPing(playerid);
    if(PPing > Ping)
    {
        format(celulas, 128,"[AdmCmd]: %s foi kikado por ping alto (%d)",Nome(playerid), Ping);
        SendClientMessageToAll(-1,celulas);
        Kick(playerid);
    }
   return 1;
}