Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- >>>>>>>>>>>>>>>>WBLIN<<<<<<<<<<<<<<<<(SISTEMA VIP)
- #include a_samp
- #include zcmd
- #include dof2
- new pVip [ MAX_PLAYERS ] ;
- forward SalvarVip ( playerid ) ;
- forward CarregarVip ( playerid ) ;
- public OnFilterScriptInit ( )
- {
- print ( "** Filterscript de VIP ligado com sucesso! **" ) ;
- return 1;
- }
- public OnFilterScriptExit ( )
- {
- print ( "** Filterscript de VIP desligado com sucesso! **" ) ;
- DOF2_Exit();
- return 1;
- }
- public OnPlayerConnect ( playerid )
- {
- CarregarVip ( playerid ) ;
- return 1;
- }
- public OnPlayerDisconnect ( playerid )
- {
- SalvarVip ( playerid ) ;
- return 1;
- }
- public OnPlayerCommandPerformed ( playerid , cmdtext [ ] , success )
- {
- return 1;
- }
- // * Inicio dos comandos * //
- CMD :darvip ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- if ( IsPlayerAdmin ( playerid ) )
- {
- new
- nom [ MAX_PLAYER_NAME ] ,
- str [ 79 ] ,
- pid ,
- level
- ;
- if ( sscanf ( params, "ui" , pid , level ) ) return SendClientMessage ( playerid , 0xBEBEBEAA , "USO CORRETO: /darvip [playerid] [level ~ 0 - 3]" ) ;
- if ( level <= 0 && level >= 3 ) return SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Level de 0 à 3!" ) ;
- if ( level >= 0 && level < 4)
- {
- pVip [ pid ] = level ;
- GetPlayerName ( playerid , nom , sizeof ( nom ) ) ;
- GetPlayerName ( pid , nom , sizeof ( nom ) ) ;
- format ( str , sizeof ( str ) , "* Você setou o level vip de %s para %d." , pid , level ) ;
- SendClientMessage ( playerid , 0x00FF00AA , str ) ;
- format ( str , sizeof ( str ) , "* %s setou seu level vip para %d." , nom , level ) ;
- SendClientMessage ( playerid , 0x00FF00AA , str ) ;
- }
- }
- else
- SendClientMessage ( playerid, 0x8B1A1AAA , "[ERRO] Você não está logado na RCON!" ) ;
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Player não conectado!" ) ;
- return 1;
- }
- CMD :vips ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- new
- pn [ MAX_PLAYER_NAME ] ,
- str [ 56 ],
- Count = 0
- ;
- SendClientMessage ( playerid , 0x00FF00AA , "~~~~~~~~~~~~~~~~ Vips ~~~~~~~~~~~~~~~~~~" ) ;
- for ( new i = 0 ; i < MAX_PLAYERS; i++ )
- {
- if ( IsPlayerConnected ( i ) )
- {
- GetPlayerName ( i , pn , sizeof ( pn ) ) ;
- if ( pVip [ i ] >= 1 )
- {
- Count ++ ;
- format ( str , sizeof ( str ) , "* Vips Online Level %d: %s" , pVip[i] , pn ) ;
- SendClientMessage ( playerid , -1 , str ) ;
- }
- }
- }
- if ( Count == 0 )
- {
- SendClientMessage ( playerid , 0x8B1A1AAA , "* Nenhum player VIP Online" ) ;
- }
- SendClientMessage ( playerid , 0x00FF00AA , "~~~~~~~~~~~~~~~~ Vips ~~~~~~~~~~~~~~~~~~" ) ;
- }
- return 1;
- }
- CMD :cvip ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- new
- pnom [ MAX_PLAYER_NAME ] ,
- texto [ 128 ] ,
- str [ 79 ]
- ;
- if ( pVip [ playerid ] >= 1 )
- {
- GetPlayerName ( playerid , pnom , sizeof ( pnom ) ) ;
- if ( sscanf ( params, "s" , texto ) ) return SendClientMessage ( playerid , 0x8B1A1AAA , "USO CORRETO: /cvip [texto]" ) ;
- format ( str , sizeof ( str ) , "I CHAT I Vip %s: %s" , pnom , texto ) ;
- for ( new i = 0 ; i < MAX_PLAYERS; i++ )
- {
- if ( pVip [ i ] > 0 )
- {
- SendClientMessage ( i , 0x00FF00AA, str ) ;
- }
- }
- }
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Você não é Vip!" ) ;
- return 1;
- }
- CMD :ajudavip ( playerid , params [ ] )
- {
- if ( pVip [ playerid ] >= 1 )
- {
- new
- dial [ 500 ]
- ;
- format ( dial , sizeof ( dial ) , "{6495ED}Todos comandos vip\n{EE82EE}Kit Vip: {FFFFFF}/kitvip\n{EE82EE}Para vêr vips online: {FFFFFF}/vips\n{EE82EE}Chat vip: {FFFFFF}/cvip \n{EE82EE}Enche vida: {FFFFFF}/vidav \n{EE82EE}Enche Colete: {FFFFFF}/coletev\n{EE82EE}Jetpack: {FFFFFF}/jetpackv\n{EE82EE}Reparar Veiculo: {FFFFFF}/repararv" ) ;
- ShowPlayerDialog ( playerid , 999 , DIALOG_STYLE_MSGBOX , "{FFFF00}Comandos Vip" , dial , "OK" , "" ) ;
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Você não é VIP!" ) ;
- return 1;
- }
- CMD :kitvip ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- new
- pnom [ MAX_PLAYER_NAME ] ,
- texto [ 128 ] ,
- str [ 79 ]
- ;
- if ( pVip [ playerid ] >= 1 )
- {
- GivePlayerWeapon ( playerid , 24 , 9999 );
- GivePlayerWeapon ( playerid , 26 , 9999 );
- GivePlayerWeapon ( playerid , 28 , 9999 );
- GivePlayerWeapon ( playerid , 31 , 9999 );
- GivePlayerWeapon ( playerid , 34 , 9999 );
- GetPlayerName ( playerid , pnom , sizeof ( pnom ) ) ;
- format ( str , sizeof ( str ) , "Vip %s pego o kit VIP" , pnom , texto ) ;
- for ( new i = 0 ; i < MAX_PLAYERS; i++ )
- {
- if ( pVip [ i ] > 1 )
- {
- SendClientMessage ( i , 0x00FFFFAA, str ) ;
- }
- }
- }
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Você não é VIP" ) ;
- return 1;
- }
- CMD :coletev ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- new
- pnom [ MAX_PLAYER_NAME ] ,
- texto [ 128 ] ,
- str [ 79 ]
- ;
- if ( pVip [ playerid ] >= 1 )
- {
- SetPlayerArmour(playerid, 100);
- GetPlayerName ( playerid , pnom , sizeof ( pnom ) ) ;
- format ( str , sizeof ( str ) , "Vip %s encheu o colete!" , pnom , texto ) ;
- for ( new i = 0 ; i < MAX_PLAYERS; i++ )
- {
- if ( pVip [ i ] > 1 )
- {
- SendClientMessage ( i , 0x00FFFFAA, str ) ;
- }
- }
- }
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Você não é VIP" ) ;
- return 1;
- }
- CMD :vidav ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- new
- pnom [ MAX_PLAYER_NAME ] ,
- texto [ 128 ] ,
- str [ 79 ]
- ;
- if ( pVip [ playerid ] >= 1 )
- {
- SetPlayerHealth ( playerid , 100 );
- GetPlayerName ( playerid , pnom , sizeof ( pnom ) ) ;
- format ( str , sizeof ( str ) , "Vip %s encheu a vida!" , pnom , texto ) ;
- for ( new i = 0 ; i < MAX_PLAYERS; i++ )
- {
- if ( pVip [ i ] > 1 )
- {
- SendClientMessage ( i , 0x00FFFFAA, str ) ;
- }
- }
- }
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Você não é VIP" ) ;
- return 1;
- }
- CMD :jetpackv ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- new
- pnom [ MAX_PLAYER_NAME ] ,
- texto [ 128 ] ,
- str [ 79 ]
- ;
- if ( pVip [ playerid ] >= 1 )
- {
- if(IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, 0x8B1A1AAA, "Você Não Pode Usar JetPack em Um Veiculo !");
- new Float:X, Float:Y, Float:Z;
- GetPlayerPos(playerid, X, Y, Z);
- CreatePickup(370, 3, X, Y, Z);
- GetPlayerName ( playerid , pnom , sizeof ( pnom ) ) ;
- format ( str , sizeof ( str ) , "Vip %s pegou JetPack!" , pnom , texto ) ;
- for ( new i = 0 ; i < MAX_PLAYERS; i++ )
- {
- if ( pVip [ i ] > 1 )
- {
- SendClientMessage ( i , 0x00FFFFAA, str ) ;
- }
- }
- }
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Você não é VIP" ) ;
- return 1;
- }
- CMD :repararv ( playerid , params [ ] )
- {
- if ( IsPlayerConnected ( playerid ) )
- {
- new
- pnom [ MAX_PLAYER_NAME ] ,
- texto [ 128 ] ,
- str [ 79 ]
- ;
- if ( pVip [ playerid ] >= 1 )
- {
- if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, 0x8B1A1AAA, "Você não está em um veiculo!");
- RepairVehicle(GetPlayerVehicleID(playerid));
- GetPlayerName ( playerid , pnom , sizeof ( pnom ) ) ;
- format ( str , sizeof ( str ) , "Vip %s pegou JetPack!" , pnom , texto ) ;
- for ( new i = 0 ; i < MAX_PLAYERS; i++ )
- {
- if ( pVip [ i ] > 1 )
- {
- SendClientMessage ( i , 0x00FFFFAA, str ) ;
- }
- }
- }
- }
- else
- SendClientMessage ( playerid , 0x8B1A1AAA , "[ERRO] Você não é VIP" ) ;
- return 1;
- }
- // * Fim dos comandos * //
- public SalvarVip ( playerid )
- {
- new
- ArquivoVIP [ 50 ] ,
- NomeP [ MAX_PLAYER_NAME ]
- ;
- GetPlayerName ( playerid , NomeP , MAX_PLAYER_NAME ) ;
- format ( ArquivoVIP , 50 , "Vips/%s" , NomeP ) ;
- if ( !DOF2_FileExists ( ArquivoVIP ) ) return DOF2_CreateFile ( ArquivoVIP ) ;
- DOF2_SetInt ( ArquivoVIP , "VipLevel" , pVip [ playerid ] ) ;
- DOF2_SaveFile ( ) ;
- return 1;
- }
- public CarregarVip ( playerid )
- {
- new
- ArquivoVIP [ 50 ] ,
- NomeP [ MAX_PLAYER_NAME ]
- ;
- GetPlayerName ( playerid, NomeP, MAX_PLAYER_NAME ) ;
- format ( ArquivoVIP , 50 , "Vips/%s" , NomeP ) ;
- if ( DOF2_FileExists ( ArquivoVIP ) )
- {
- pVip [ playerid ] = ( playerid , DOF2_GetInt ( ArquivoVIP , "VipLevel" ) ) ;
- }
- return 1;
- }
- stock sscanf(string[], format[], {Float,_}:...)
- {
- #if defined isnull
- if (isnull(string))
- #else
- if (string[0] == 0 || (string[0] == 1 && string[1] == 0))
- #endif
- {
- return format[0];
- }
- #pragma tabsize 4
- new
- formatPos = 0,
- stringPos = 0,
- paramPos = 2,
- paramCount = numargs(),
- delim = ' ';
- while (string[stringPos] && string[stringPos] <= ' ')
- {
- stringPos++;
- }
- while (paramPos < paramCount && string[stringPos])
- {
- switch (format[formatPos++])
- {
- case '\0':
- {
- return 0;
- }
- case 'i', 'd':
- {
- new
- neg = 1,
- num = 0,
- ch = string[stringPos];
- if (ch == '-')
- {
- neg = -1;
- ch = string[++stringPos];
- }
- do
- {
- stringPos++;
- if ('0' <= ch <= '9')
- {
- num = (num * 10) + (ch - '0');
- }
- else
- {
- return -1;
- }
- }
- while ((ch = string[stringPos]) > ' ' && ch != delim);
- setarg(paramPos, 0, num * neg);
- }
- case 'h', 'x':
- {
- new
- num = 0,
- ch = string[stringPos];
- do
- {
- stringPos++;
- switch (ch)
- {
- case 'x', 'X':
- {
- num = 0;
- continue;
- }
- case '0' .. '9':
- {
- num = (num << 4) | (ch - '0');
- }
- case 'a' .. 'f':
- {
- num = (num << 4) | (ch - ('a' - 10));
- }
- case 'A' .. 'F':
- {
- num = (num << 4) | (ch - ('A' - 10));
- }
- default:
- {
- return -1;
- }
- }
- }
- while ((ch = string[stringPos]) > ' ' && ch != delim);
- setarg(paramPos, 0, num);
- }
- case 'c':
- {
- setarg(paramPos, 0, string[stringPos++]);
- }
- case 'f':
- {
- new changestr[16], changepos = 0, strpos = stringPos;
- while(changepos < 16 && string[strpos] && string[strpos] != delim)
- {
- changestr[changepos++] = string[strpos++];
- }
- changestr[changepos] = '\0';
- setarg(paramPos,0,_:floatstr(changestr));
- }
- case 'p':
- {
- delim = format[formatPos++];
- continue;
- }
- case '\'':
- {
- new
- end = formatPos - 1,
- ch;
- while ((ch = format[++end]) && ch != '\'') {}
- if (!ch)
- {
- return -1;
- }
- format[end] = '\0';
- if ((ch = strfind(string, format[formatPos], false, stringPos)) == -1)
- {
- if (format[end + 1])
- {
- return -1;
- }
- return 0;
- }
- format[end] = '\'';
- stringPos = ch + (end - formatPos);
- formatPos = end + 1;
- }
- case 'u':
- {
- new
- end = stringPos - 1,
- id = 0,
- bool:num = true,
- ch;
- while ((ch = string[++end]) && ch != delim)
- {
- if (num)
- {
- if ('0' <= ch <= '9')
- {
- id = (id * 10) + (ch - '0');
- }
- else
- {
- num = false;
- }
- }
- }
- if (num && IsPlayerConnected(id))
- {
- setarg(paramPos, 0, id);
- }
- else
- {
- #if !defined foreach
- #define foreach(%1,%2) for (new %2 = 0; %2 < MAX_PLAYERS; %2++) if (IsPlayerConnected(%2))
- #define __SSCANF_FOREACH__
- #endif
- string[end] = '\0';
- num = false;
- new
- name[MAX_PLAYER_NAME];
- id = end - stringPos;
- foreach (Player, playerid)
- {
- GetPlayerName(playerid, name, sizeof (name));
- if (!strcmp(name, string[stringPos], true, id))
- {
- setarg(paramPos, 0, playerid);
- num = true;
- break;
- }
- }
- if (!num)
- {
- setarg(paramPos, 0, INVALID_PLAYER_ID);
- }
- string[end] = ch;
- #if defined __SSCANF_FOREACH__
- #undef foreach
- #undef __SSCANF_FOREACH__
- #endif
- }
- stringPos = end;
- }
- case 's', 'z':
- {
- new
- i = 0,
- ch;
- if (format[formatPos])
- {
- while ((ch = string[stringPos++]) && ch != delim)
- {
- setarg(paramPos, i++, ch);
- }
- if (!i)
- {
- return -1;
- }
- }
- else
- {
- while ((ch = string[stringPos++]))
- {
- setarg(paramPos, i++, ch);
- }
- }
- stringPos--;
- setarg(paramPos, i, '\0');
- }
- default:
- {
- continue;
- }
- }
- while (string[stringPos] && string[stringPos] != delim && string[stringPos] > ' ')
- {
- stringPos++;
- }
- while (string[stringPos] && (string[stringPos] == delim || string[stringPos] <= ' '))
- {
- stringPos++;
- }
- paramPos++;
- }
- do
- {
- if ((delim = format[formatPos++]) > ' ')
- {
- if (delim == '\'')
- {
- while ((delim = format[formatPos++]) && delim != '\'') {}
- }
- else if (delim != 'z')
- {
- return delim;
- }
- }
- }
- while (delim > ' ');
- return 0;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement