SA-MP Forums Archive
[PEDIDO]Sistema de vip's - Printable Version

+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+---- Thread: [PEDIDO]Sistema de vip's (/showthread.php?tid=263232)


[PEDIDO]Sistema de vip's - Thii - 21.06.2011

Bom usei o search antes de postar e nao achei :] tipo eu nao to tendo muito tempo para mecher com pwn e nao sou la essas coisas quando mecho e nao estou tendo tempo para mecher pois estou servindo ao exercito :] tipo queria um fs ou as linhas para add no meu gm um sistema de vips! como seria ? tipo teria 3 tipos de /vip ! vip bronze, vip prata e vip outro e tipo nao tem sistema de vip no meu gm ai queriia que passase a linhas para setar alguem com esses vip's mencionados e com sistemas de vips contendo /kitvipb(ronze) pegasse 70 de colete, 1000 balas de eagle 1000 balas de m4 e 1000 balas de m4 /kitvipp(rata) pegasse 80 de colete, 2000 balas de eagle 2000 balas de mp5 e 2000 balas de m4 e /kitvipo(uro) pegasse 90 de colete, 3000 balas de eagle 3000 balas de mp5 3000 balas de m4!! e tivesse um chat de vips !

Ps : nao estou falando pra alguem fazer sу estou pedindo se alguem tiver algo que seja parecido com esse ou igual ou atй melhor que poste pf o exercito consome muito tempo e pode ver pela hora que estou postando 2:00 para acordar as 8 entao desde ja grato sу por estarem lendo!

Re: [PEDIDO]Sistema de vip's - ApolloRJ - 21.06.2011

te recomendo o luxadmin ele jб tem esse esquema de vip.. e vбrios comandos rox.. na minha opiniгo jб testei vбrios.. esse e o melhor.. e feito pelo um BR eu acho... ou e portuguкs kkk sei-la.. sу sei que e muito bom..

https://sampforum.blast.hk/showthread.php?tid=120724



By ApolloRJ

Re: [PEDIDO]Sistema de vip's - Shadoww5 - 21.06.2011

Crei este codigo, conforme vocк pediu, e jб inclui o sistema de salvamento, basta colocar a include Dini na pasta "pawno/includes":

PHP код:
#include <Dini>
new VIP[MAX_PLAYERS];
public OnPlayerConnect(playerid)
{
    new file[30], n[24];
    GetPlayerName(playerid, n, 24);
    format(file, 30, "%s.txt", n);
    if(fexist(file)) { VIP[playerid] = dini_Int(file, "VIP"); }
    else 
    { 
        dini_Create(file);
        VIP[playerid] = 0;
    }
    return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
    new file[30], n[24];
    GetPlayerName(playerid, n, 24);
    format(file, 30, "%s.txt", n);
    dini_IntSet(file, "VIP", VIP[playerid]);
    return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
    new cmd[256], idx;
    cmd = strtok(cmdtext, idx);
    if(strcmp(cmd, "/kitvipo", true) == 0)
    {
        if(VIP[playerid] < 3) return SendClientMessage(playerid, -1, "Vocк nгo й Vip Ouro.");
        GivePlayerWeapon(playerid, 24, 3000);
        GivePlayerWeapon(playerid, 29, 3000);
        GivePlayerWeapon(playerid, 31, 3000);
        SetPlayerArmour(playerid, 90);
        return 1;
    }
    if(strcmp(cmd, "/kitvipp", true) == 0)
    {
        if(VIP[playerid] < 2) return SendClientMessage(playerid, -1, "Vocк nгo й Vip Prata.");
        GivePlayerWeapon(playerid, 24, 2000);
        GivePlayerWeapon(playerid, 29, 2000);
        GivePlayerWeapon(playerid, 31, 2000);
        SetPlayerArmour(playerid, 80);
        return 1;
    }
    if(strcmp(cmd, "/kitvipb", true) == 0)
    {
        if(VIP[playerid] < 1) return SendClientMessage(playerid, -1, "Vocк nгo й Vip Bronze.");
        GivePlayerWeapon(playerid, 24, 1000);
        GivePlayerWeapon(playerid, 29, 1000);
        GivePlayerWeapon(playerid, 31, 1000);
        SetPlayerArmour(playerid, 70);
        return 1;
    }
    if(strcmp(cmd, "/vips", true) == 0)
    {
        new str[128], n[24];
        for(new i = 0; i < MAX_PLAYERS; i ++)
        {
            GetPlayerName(i, n, sizeof(n));
            if(VIP[i] == 1) { format(str, sizeof(str), " » %s - {00FF0C}Vip Bronze", n); }
            else if(VIP[i] == 2) { format(str, sizeof(str), " » %s - {303AFF}Vip Prata", n); }
            else if(VIP[i] == 2) { format(str, sizeof(str), " » %s - {FFFE10}Vip Ouro", n); }
            SendClientMessage(playerid, -1, str);
        }
        return 1;
    }
    if(strcmp(cmd, "/chatvip", true) == 0)
        {
        if(VIP[playerid] < 1) return SendClientMessage(playerid, -1, "Vocк nгo й Vip.");
        new string[256], n[24]; 
        new length = strlen(cmdtext); 
        while ((idx < length) && (cmdtext[idx] <= ' ')) 
        { 
            idx++; 
        } 
        new offset = idx; 
        new result[64]; 
        while ((idx < length) && ((idx - offset) < (sizeof(result) - 1))) 
        { 
            result[idx - offset] = cmdtext[idx]; 
            idx++; 
        } 
        result[idx - offset] = EOS; 
        if(!strlen(result)) return SendClientMessage(playerid, -1, "USO: /chatvip [TEXTO]"); 
        GetPlayerName(playerid, n, sizeof(n)); 
        for(new i = 0; i < MAX_PLAYERS; i ++) 
        { 
            if(VIP[i] > 0) 
            { 
                format(string, sizeof(string), "{FCF405}[CHAT VIP]{FFFFFF} %s: %s", n, result); 
                  SendClientMessage(i, -1, string); 
            } 
        }
        return 1;
    }
    if(strcmp(cmd, "/darvip", true) == 0)
    {
        if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, -1, "Vocк nгo estб logado na RCON.");
        new tmp[256], id, lvl, str[128], n[24], n2[24];
        tmp = strtok(cmdtext, idx);
        if(!strlen(tmp)) return SendClientMessage(playerid, -1, "USO: /darvip [ID] [LEVEL]");
        id = strval(tmp);
        tmp = strtok(cmdtext, idx);
        if(!strlen(tmp)) return SendClientMessage(playerid, -1, "USO: /darvip [ID] [LEVEL]");
        lvl = strval(tmp);
        VIP[id] = lvl;
        GetPlayerName(playerid, n, 24);
        GetPlayerName(id, n2, 24);
        format(str, sizeof(str), "O ADMIN %s te deu VIP level %d.", n, lvl);
        SendClientMessage(id, -1, str);
        format(str, sizeof(str), "Vocк deu VIP level %d para o jogador %s.", lvl, n2);
        SendClientMessage(playerid, -1, str);
        return 1;
    }
    return 0;
} 


Re: [PEDIDO]Sistema de vip's - hitachi_uchila - 21.06.2011

o luxurion nem e br nem pt mais mor aaqui no brasil =]

Re: [PEDIDO]Sistema de vip's - Miqueias Barros - 21.06.2011

Quote:
Originally Posted by Shadoww5
Посмотреть сообщение
Crei este codigo, conforme vocк pediu, e jб inclui o sistema de salvamento, basta colocar a include Dini na pasta "pawno/includes":

PHP код:
#include <Dini>
new VIP[MAX_PLAYERS];
public OnPlayerConnect(playerid)
{
    new file[30], n[24];
    GetPlayerName(playerid, n, 24);
    format(file, 30, "%s.txt", n);
    if(fexist(file)) { VIP[playerid] = dini_Int(file, "VIP"); }
    else 
    { 
        dini_Create(file);
        VIP[playerid] = 0;
    }
    return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
    new file[30], n[24];
    GetPlayerName(playerid, n, 24);
    format(file, 30, "%s.txt", n);
    dini_IntSet(file, "VIP", VIP[playerid]);
    return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
    if(strcmp(cmdtext, "/kitvipo", true) == 0)
    {
        if(VIP[playerid] < 3) return SendClientMessage(playerid, -1, "Vocк nгo й Vip Ouro.");
        GivePlayerWeapon(playerid, 24, 3000);
        GivePlayerWeapon(playerid, 29, 3000);
        GivePlayerWeapon(playerid, 31, 3000);
        SetPlayerArmour(playerid, 90);
        return 1;
    }
    if(strcmp(cmdtext, "/kitvipp", true) == 0)
    {
        if(VIP[playerid] < 2) return SendClientMessage(playerid, -1, "Vocк nгo й Vip Prata.");
        GivePlayerWeapon(playerid, 24, 2000);
        GivePlayerWeapon(playerid, 29, 2000);
        GivePlayerWeapon(playerid, 31, 2000);
        SetPlayerArmour(playerid, 80);
        return 1;
    }
    if(strcmp(cmdtext, "/kitvipb", true) == 0)
    {
        if(VIP[playerid] < 1) return SendClientMessage(playerid, -1, "Vocк nгo й Vip Bronze.");
        GivePlayerWeapon(playerid, 24, 1000);
        GivePlayerWeapon(playerid, 29, 1000);
        GivePlayerWeapon(playerid, 31, 1000);
        SetPlayerArmour(playerid, 70);
        return 1;
    }
    if(strcmp(cmdtext, "/vips", true) == 0)
    {
        new str[128], n[24];
        for(new i = 0; i < MAX_PLAYERS; i ++)
        {
            GetPlayerName(i, n, sizeof(n));
            if(VIP[i] == 1) { format(str, sizeof(str), " » %s - {00FF0C}Vip Bronze", n); }
            else if(VIP[i] == 2) { format(str, sizeof(str), " » %s - {303AFF}Vip Prata", n); }
            else if(VIP[i] == 2) { format(str, sizeof(str), " » %s - {FFFE10}Vip Ouro", n); }
            SendClientMessage(playerid, -1, str);
        }
        return 1;
    }
    if(strcmp(cmdtext, "/chatvip", true) == 0)
        {
        if(VIP[playerid] < 1) return SendClientMessage(playerid, -1, "Vocк nгo й Vip.");
        new string[256], n[24]; 
        new length = strlen(cmdtext); 
        while ((idx < length) && (cmdtext[idx] <= ' ')) 
        { 
            idx++; 
        } 
        new offset = idx; 
        new result[64]; 
        while ((idx < length) && ((idx - offset) < (sizeof(result) - 1))) 
        { 
            result[idx - offset] = cmdtext[idx]; 
            idx++; 
        } 
        result[idx - offset] = EOS; 
        if(!strlen(result)) return SendClientMessage(playerid, -1, "USO: /chatvip [TEXTO]"); 
        GetPlayerName(playerid, n, sizeof(n)); 
        for(new i = 0; i < MAX_PLAYERS; i ++) 
        { 
            if(VIP[i] > 0) 
            { 
                format(string, sizeof(string), "{FCF405}[CHAT VIP]{FFFFFF} %s: %s", n, result); 
                  SendClientMessage(i, -1, string); 
            } 
        }
        return 1;
    }
    if(strcmp(cmdtext, "/darvip", true) == 0)
    {
        if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, -1, "Vocк nгo estб logado na RCON.");
        new tmp[256], id, lvl, str[128], n[24], n2[24];
        tmp = strtok(cmdtext, idx);
        if(!strlen(tmp)) return SendClientMessage(playerid, -1, "USO: /darvip [ID] [LEVEL]");
        id = strval(tmp);
        tmp = strtok(cmdtext, idx);
        if(!strlen(tmp)) return SendClientMessage(playerid, -1, "USO: /darvip [ID] [LEVEL]");
        lvl = strval(tmp);
        VIP[id] = lvl;
        GetPlayerName(playerid, n, 24);
        GetPlayerName(id, n2, 24);
        format(str, sizeof(str), "O ADMIN %s te deu VIP level %d.", n, lvl);
        SendClientMessage(id, -1, str);
        format(str, sizeof(str), "Vocк deu VIP level %d para o jogador %s.", lvl, n2);
        SendClientMessage(playerid, -1, str);
        return 1;
    }
    return 0;
} 
Tentei usar este sistema vip ae mais acho que nгo deu certo Shandoww, tipo, dei lб /darvip ele falou la o modo correto, quando digitei do modo correto /darvip id level ele deu erro no comando, como se num existisse... O que serб

Re: [PEDIDO]Sistema de vip's - Shadoww5 - 21.06.2011

Codigo atualizado.

Aqui, аs vezes, ocorre isto tambйm.

Mas basta colocar isto na callback "OnPlayerCommandText":

PHP код:
new cmd[256], idx;
cmd = strtok(cmdtext, idx); 
E substituir o "cmdtext" por "cmd" que tudo funciona certo ...

Alguйm sabe qual o motivo deste erro ?

Re: [PEDIDO]Sistema de vip's - Thii - 21.06.2011

Vou esperar meu horario de almoзo para testar o codigo ^^ mesmo assim muito obrigado!!!

Re: [PEDIDO]Sistema de vip's - Thii - 21.06.2011

aki deu 25 erros '-'

Re: [PEDIDO]Sistema de vip's - Miqueias Barros - 21.06.2011

Posta ai os erros...

Re: [PEDIDO]Sistema de vip's - Jason_King - 23.09.2011

Deu um bug no /vips.

Aparece um monte de nada em vez de aparecer os nomes dos players vips, porque serб que deu isso?

Alguйm pode me ajudar?