Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //==============================================================================
- #include a_samp
- #include zcmd
- #include sscanf2
- //==============================================================================
- #define FILTERSCRIPT
- #define SLOTS 32
- //==============================================================================
- new
- vNome [ MAX_PLAYER_NAME ] ,
- virus [ SLOTS ] ,
- Str [ 128 ] ,
- Float:X ,
- Float:Y ,
- Float:Z ,
- id ,
- ii
- ;
- //==============================================================================
- public
- OnFilterScriptInit ( )
- {
- print ( "\n--------------------------------------" ) ;
- print ( " Virus System" ) ;
- print ( "--------------------------------------\n" ) ;
- return 1 ;
- }
- //==============================================================================
- public OnPlayerDeath ( playerid , killerid , reason )
- {
- virus [ playerid ] = 0 ;
- return 1 ;
- }
- //==============================================================================
- CMD:darvirus(playerid, params[])
- {
- if ( IsPlayerAdmin ( playerid ) )
- {
- if ( sscanf ( params , "u" , id ) ) return SendClientMessage ( playerid , 0x0080FFAA , "[USE]: /darvirus [id]" ) ;
- else
- {
- GetPlayerName ( playerid , vNome , MAX_PLAYER_NAME ) ;
- format ( Str , 128 , "[AVISO]: O administrador %s deu um virus para ti, usa /infectar [id]" , vNome ) ;
- SendClientMessage ( id , 0x0080FFAA , Str ) ;
- SendClientMessageToAll ( 0x0080FFAA , "Um virus Foi Espalhado Pela Cidade, Tenha Cuidado" ) ;
- virus [ id ] = 1 ;
- }
- }
- else SendClientMessage ( playerid , 0x0080FFAA , "Você não é admin logado na rcon" ) ;
- return 1 ;
- }
- //==============================================================================
- CMD:infectar(playerid, params[])
- {
- if ( virus [ playerid ] == 1 )
- {
- if ( sscanf ( params , "u" , id ) ) return SendClientMessage ( playerid , 0x0080FFAA , "USE: /infectar [id]" ) ;
- else
- {
- if ( virus [ id ] == 1 ) return SendClientMessage ( playerid , 0x0080FFAA , "AVISO: Este player já esta infetado" ) ;
- else
- {
- GetPlayerPos ( id , X , Y , Z ) ;
- if ( IsPlayerInRangeOfPoint ( playerid , 3.0 , X , Y , Z ) )
- {
- GetPlayerName ( playerid , vNome , MAX_PLAYER_NAME ) ;
- format ( Str , 128 , "Você foi infectado por %s, use /infectar [id]" , vNome ) ;
- SendClientMessage ( id , 0x0080FFAA , Str ) ;
- virus [ id ] = 1 ;
- GetPlayerName ( id , vNome , MAX_PLAYER_NAME ) ;
- format ( Str , 128 , "Você infectou %s !" , vNome ) ;
- SendClientMessage ( playerid , 0x0080FFAA , Str ) ;
- ResetPlayerWeapons(id);
- }
- else return SendClientMessage ( playerid , -1 , "Este Player Está Longe" ) ;
- }
- }
- }
- else SendClientMessage ( playerid , -1 , "Você não ésta infectado" ) ;
- return 1 ;
- }
- //==============================================================================
- CMD:verinfectados(playerid, params[])
- {
- ii = 0 ;
- for ( id = 0 ; id < SLOTS ; id++ )
- {
- if ( virus [ id ] == 1 )
- {
- GetPlayerName ( id , vNome , MAX_PLAYER_NAME ) ;
- format ( Str , 128 , "%s [ %i ] Está infectado." , vNome , id ) ;
- if ( ii == 0 )
- {
- ii = 1 ;
- SendClientMessage ( playerid , -1 , "Lista de jogadores infectados:" ) ;
- }
- SendClientMessage ( playerid , 0x0080FFAA , Str ) ;
- }
- }
- if ( ii == 0 ) return SendClientMessage ( playerid , -1 , "Não existem jogadores infectados." ) ;
- return 1 ;
- }
- //==============================================================================
- CMD:vcmd(playerid, params[])
- {
- ShowPlayerDialog ( playerid , 4830 , DIALOG_STYLE_MSGBOX , "Virus System - Comandos" , "/infectar [id] - para infectar alguem...\n/darvirus [id] - Para setar o virus a algum player, Deverá estar logado na rcon/n\vcreditos - Para ver o creditos\n/vobj - Para ver o objetivo...", "Ok" , "" ) ;
- return 1 ;
- }
- //==============================================================================
- CMD:vcreditos(playerid, params[])
- {
- ShowPlayerDialog ( playerid , 4830 , DIALOG_STYLE_MSGBOX , "Virus System - Creditos" , "Scripter Geral - BlueX\nColaborador - Slash PT\nZCMD: Zeex\nSscanf: Y_Less\nNão Retire os Creditos Do FS!" , "Ok" , "" ) ;
- return 1 ;
- }
- //==============================================================================
- CMD:vobj(playerid, params[])
- {
- ShowPlayerDialog ( playerid , 4830 , DIALOG_STYLE_MSGBOX , "Virus System - Objetivo" , "Virus: O Objetivo do virus é infectar todos os players, lembrando que quando eles morrem a infeção para\nCops: Os Cops deverão proteger a cidade contra o vrius, matando os infectados\nInfectados: Os infectados deverão infectar Todos Os Players " , "Ok" , "" ) ;
- return 1 ;
- }
- //==============================================================================
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement