1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese

Threaded Mode
[AJUDA] Vantagens Sistema VIP.
[RTK]WolF_
Big Clucker
***
Posts: 84
Threads: 22
Joined: Jul 2010
Reputation: 0
#1

25.09.2010, 19:48
Alguйm ae ajuda...

To com um Simples Sistema VIP [FilterScript X-VIP], eu vou enviar o cуdigo, se alguйm souber como por pra todos os vips sempre nascerem com Colete & Vida cheia e em um certo tempo receber uma certa quantia de dinheiro e por algum comando /vips que mostra os VIPs online... Coloca ae no cуdigo e me envia por favor

pawn Код:
#include <a_samp>
#include <Dini>

//[FS] X-VIP System 2
//Autor - [NNF]BurnouT.nL_
//Regiгo - Paraнba, BRASIL

#define dcmd(%1,%2,%3) if (!strcmp((%3)[1], #%1, true, (%2)) && ((((%3)[(%2) + 1] == '\0') && (dcmd_%1(playerid, ""))) || (((%3)[(%2) + 1] == ' ') && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1

#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA

#pragma tabsize 0

new VipLogged[MAX_PLAYERS]=0;
new vstring[256];
new ip[256];

public OnFilterScriptInit()
{
    print("|~> ");
    print("|~> Sistema VIP Carregado!");
    print("|~>");
}

public OnFilterScriptExit()
{
    print("|~> ");
    print("|~> Sistema VIP Nгo-Carregado!");
    print("|~>");
}

public OnPlayerConnect(playerid)
{
    GetPlayerIp(playerid,ip,256);
    format(vstring,256,"/xvip/%s.txt",ip);

    if(dini_Exists(vstring))
    {

    if(dini_Int(vstring,"vip") == 1)
    {
    VipLogged[playerid]=1;
    SendClientMessage(playerid,0xFFFFFFAA,"Sistema VIP: Vocк estб logado como um VIP. /vcmds & /cmdvip");
    }
    SetPlayerArmour(playerid,100);

    }
    else
    {
    dini_Create(vstring);
    dini_Set(vstring,"vip","0");
    }

    return true;
}

public OnPlayerDisconnect(playerid)
{
    VipLogged[playerid]=0;
    return true;
}

public OnPlayerCommandText(playerid,cmdtext[])
{
    dcmd(vmyip,5,cmdtext);
    dcmd(vcmds,5,cmdtext);
    dcmd(vtune,5,cmdtext);
    dcmd(vnitro,6,cmdtext);
    dcmd(vhyd,4,cmdtext);
    dcmd(vtune,5,cmdtext);
    dcmd(vmorning,8,cmdtext);
    dcmd(vday,4,cmdtext);
    dcmd(vtonight,8,cmdtext);
    dcmd(vnight,6,cmdtext);
    dcmd(vdrunk,6,cmdtext);
    dcmd(vcolete,6,cmdtext);
    dcmd(vinterior,9,cmdtext);
    dcmd(vfight,6,cmdtext);
    dcmd(vsetvip,7,cmdtext);
    return 0;
}

dcmd_vcmds(playerid,params[])
{
    #pragma unused params
            SendClientMessage(playerid,COLOR_RED," VIP comandos (/vcmds)");
            SendClientMessage(playerid,COLOR_GREEN," /vtune  /vnitro /vhyd /vmyip");
            SendClientMessage(playerid,COLOR_GREEN," /vmorning /vday /vtonight /vnight");
            SendClientMessage(playerid,COLOR_GREEN," /vdrunk /vinterior /vfight");
    return 1;
}


dcmd_vtune(playerid,params[])
{
        #pragma unused params
    if(VipLogged[playerid] == 1)
        {
            if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
            {
                new rand=random(3);
                ChangeVehiclePaintjob(GetPlayerVehicleID(playerid),rand);
                AddVehicleComponent(GetPlayerVehicleID(playerid),1010);
                AddVehicleComponent(GetPlayerVehicleID(playerid),1087);
                SendClientMessage(playerid,COLOR_GREEN," Carro Tunado.");
                return 1;
            }
            else SendClientMessage(playerid,COLOR_RED," Vocк nгo estб no veнculo.");
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP");
        return 1;
}

dcmd_vnitro(playerid,params[])
{
        #pragma unused params
        if(VipLogged[playerid] == 1)
        {
            if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
            {
                AddVehicleComponent(GetPlayerVehicleID(playerid),1010);
                SendClientMessage(playerid,COLOR_GREEN," Nitro adicionado ao veнculo.");
                return 1;
            }
            else SendClientMessage(playerid,COLOR_RED," Vocк nгo estб no carro.");
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP");
        return 1;
}

dcmd_vhyd(playerid,params[])
{
        #pragma unused params
        if(VipLogged[playerid] == 1)
        {
            if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
            {
                AddVehicleComponent(GetPlayerVehicleID(playerid),1087);
                SendClientMessage(playerid,COLOR_GREEN," Hidrбulica acrescentado ao carro.");
                return 1;
            }
            else SendClientMessage(playerid,COLOR_RED," Vocк nгo estб no carro.");
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vinterior(playerid,params[])
{
    if(!strlen(params)) return SendClientMessage(playerid,COLOR_RED,"Use: /vinterior [interior-id]");
    if(VipLogged[playerid] == 1)
        {
            SetPlayerInterior(playerid,strval(params[0]));
            format(vstring,256," Vocк mudou seu interior para: %d",strval(params[0]));
            SendClientMessage(playerid,COLOR_GREEN,vstring);
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vdrunk(playerid,params[])
{
    if(!strlen(params)) return SendClientMessage(playerid,COLOR_RED,"Use: /vbebado [bebado-id]");
    if(VipLogged[playerid] == 1)
        {
            SetPlayerDrunkLevel(playerid,strval(params[0]));
            format(vstring,256," Vocк mudou seu nivel de bebado para: %d",strval(params[0]));
            SendClientMessage(playerid,COLOR_GREEN,vstring);
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vcolete(playerid,params[])
{
    if(!strlen(params)) return SendClientMessage(playerid,COLOR_RED,"Use: /vcolete ");
    if(VipLogged[playerid] == 1)
        {
            SetPlayerArmour(playerid,strval(params[0]));
            format(vstring,256," Vocк mudou seu colete para 100.0 !",strval(params[0]));
            SendClientMessage(playerid,COLOR_GREEN,vstring);
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vsetvip(playerid,params[])
{
    if(!strlen(params[0]) || !strlen(params[1])) return SendClientMessage(playerid,COLOR_RED,"Use: /vsetvip [ID player's] [1/0]");
    if(IsPlayerAdmin(playerid))
        {
            VipLogged[params[0]]=params[1];
            GetPlayerIp(params[0],ip,256);
            format(vstring,256," Seu VIP foi alterado para: %d",params[1]);
            SendClientMessage(params[0],COLOR_GREEN,vstring);
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED,"|~> Vocк nгo tem permissгo para usar esse comando.");
        return 1;
}

dcmd_vmyip(playerid,params[])
{
        #pragma unused params
        if(VipLogged[playerid] == 1)
        {
            GetPlayerIp(playerid,ip,256);
            format(vstring,256," Seu IP й: %s",ip);
            SendClientMessage(playerid,COLOR_GREEN,vstring);
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vnight(playerid,params[])
{
        #pragma unused params
    if(VipLogged[playerid] == 1)
        {
            SetPlayerTime(playerid,3,0);
            SendClientMessage(playerid,COLOR_GREEN," Seu tempo mudou as 03:00");
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vday(playerid,params[])
{
        #pragma unused params
        if(VipLogged[playerid] == 1)
        {
            SetPlayerTime(playerid,12,0);
            SendClientMessage(playerid,COLOR_GREEN," Seu tempo mudou as 09:00");
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vmorning(playerid,params[])
{
        #pragma unused params
        if(VipLogged[playerid] == 1)
        {
            SetPlayerTime(playerid,9,0);
            SendClientMessage(playerid,COLOR_GREEN," Seu tempo mudou as 09:00");
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}


dcmd_vtonight(playerid,params[])
{
        #pragma unused params
    if(VipLogged[playerid] == 1)
        {
            SetPlayerTime(playerid,21,0);
            SendClientMessage(playerid,COLOR_GREEN," Seu tempo mudou аs 21:00");
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}

dcmd_vfight(playerid,params[])
{
    if(!strlen(params[0]))
    {
    SendClientMessage(playerid,COLOR_RED,"Use: /sluta [1/2/3/4]");
    SendClientMessage(playerid,COLOR_RED,"1 - Boxe, 2 - KneeHead");
    SendClientMessage(playerid,COLOR_RED,"3 - Kung-Fu, 4 - Normal");
    }
    if(VipLogged[playerid] == 1)
        {
        if(strval(params[0]) == 1)
        {
        SetPlayerFightingStyle(playerid, FIGHT_STYLE_BOXING);
        SendClientMessage(playerid,0xAFAFAF0," Vocк estб lutando do estilo  - 'Boxe'");
        return 1;
        }

    if(strval(params[0]) == 2)
    {
        SetPlayerFightingStyle(playerid, FIGHT_STYLE_KNEEHEAD);
        SendClientMessage(playerid,0xAFAFAF0," Vocк estб lutando do estilo  - 'KneeHead'");
        return 1;
    }

    if(strval(params[0]) == 3)
    {
        SetPlayerFightingStyle(playerid, FIGHT_STYLE_KUNGFU);
        SendClientMessage(playerid,0xAFAFAF0," Vocк estб lutando do estilo - 'Kung-Fu'");
        return 1;
    }

    if(strval(params[0]) == 4)
    {
        SetPlayerFightingStyle(playerid, FIGHT_STYLE_NORMAL);
        SendClientMessage(playerid,0xAFAFAF0," Vocк estб lutando do estilo - 'Normal'");
        return 1;
    }
            return 1;
        }
        else SendClientMessage(playerid,COLOR_RED," Vocк nгo й VIP.");
        return 1;
}
Obs.: Ele estб traduzido!
Find
Reply
KevinsL
Huge Clucker
****
Posts: 407
Threads: 12
Joined: Jan 2010
Reputation: 0
#2

25.09.2010, 22:15
( Последний раз редактировалось KevinsL; 25.09.2010 в 22:28. )
no: public OnPlayerSpawn(playerid)
pawn Код:
if(VipLogged[playerid] == 1)
{
    SetPlayerArmour(playerid, 100);
    SetPlayerHealth(playerid, 100);
}
e esse no: public OnPlayerCommandText
pawn Код:
if(strcmp(cmd, "/vips", true) == 0)
    {
        if(IsPlayerConnected(playerid))
        {
            SendClientMessage(playerid, 0xFFFFFFAA, "Vips Online:");
            for(new i = 0; i < MAX_PLAYERS; i++)
            {
                if(IsPlayerConnected(i))
                {
                    if(VipLogged[i] == 1)
                    {
                        GetPlayerName(i, sendername, sizeof(sendername));
                        format(string, 256, "VIP: %s", sendername);
                        SendClientMessage(playerid, 0xFF0000AA, string);
                    }
                }
            }
        }
        return 1;
    }
Find
Reply
[RTK]WolF_
Big Clucker
***
Posts: 84
Threads: 22
Joined: Jul 2010
Reputation: 0
#3

26.09.2010, 00:03
Infelizmente nenhum dos 2 nгo funcionou, coloquei tudo certo mais dб os seguintes errors nas linha que eu adicionei que contйm "if"

pawn Код:
\filterscripts\SistemaVIP.pwn(316) : error 010: invalid function or declaration
Se tiver como ajeitar... Ajuda ae
Find
Reply
KevinsL
Huge Clucker
****
Posts: 407
Threads: 12
Joined: Jan 2010
Reputation: 0
#4

26.09.2010, 00:28
' ¬¬
Find
Reply
« Next Oldest | Next Newest »


Forum Jump:


Users browsing this thread: 1 Guest(s)
  1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese