[Pedido] - Alguns plugins

#include < amxmodx >
#include < colorchat >

new cvar_start,cvar_end, cvar_multi, zm, hm

new bool:ativado

public plugin_init()
{
  register_plugin("[ZP] Addon: Happy Hour", "0.1", "Junin | fiendshard")
  register_logevent("round_start", 2, "1=Round_Start")
  register_logevent("round_end", 2, "1=Round_End")
  register_clcmd("say","say_happy");
 
  hm = get_cvar_num("zp_ammop_human_damaged_hp")
  zm = get_cvar_num("zp_ammop_zombie_killed")
 
 
  cvar_multi = register_cvar("zp_hhx", "3")
 
  cvar_start = register_cvar("zp_hhstart", "01")
  cvar_end = register_cvar("zp_hhend", "06")
  cvar_multi = register_cvar("zp_hhx", "2")
 
  //set_task(0.5, "msg_fix", 0)
  set_task(0.5, "msg_fix", .flags="b")
}
public plugin_cfg()
{
  set_task(200.0, "propaganda", 0)
}
public propaganda()
{
  new data[3]
  get_time("%H", data, 2)
  if(get_pcvar_num(cvar_end) > str_to_num(data) >= get_pcvar_num(cvar_start))
  {
     client_texto(0, DontChange,"^4[Happy Hour]^1 Em Andamento !!!! Todos estao ganhando^3 Ammo Packs^4 x%d vezes^1.",get_pcvar_num(cvar_multi))
  }
  else
     client_texto(0, DontChange,"^4[Happy Hour]^1 Comecando as:^4 %d:00^3 |^1 Terminando as:^4 %d:00^3 |^1 Ganhando^4 x%d^1 Vezes de^3 Ammo Packs^1.", get_pcvar_num(cvar_start), get_pcvar_num(cvar_end), get_pcvar_num(cvar_multi))        
}
public round_start()
{
  new data[3]
  get_time("%H", data, 2)
  if(get_pcvar_num(cvar_end) > str_to_num(data) >= get_pcvar_num(cvar_start))
  {
     set_cvar_num("zp_ammop_human_damaged_hp",hm / (get_cvar_num("zp_hhx")))
     set_cvar_num("zp_ammop_zombie_killed",zm * (get_cvar_num("zp_hhx")))
     
     
     
     ativado = true
     
     
  }
  else if(06 >= str_to_num(data))
  {
     
     if(ativado)
     {
        client_texto(0, DontChange,"^4[Happy Hour]^1 Encerrado !!!! Todos estao ganhando^3 Ammo Packs^4 Normalmente^1.")        
        set_cvar_num("zp_ammop_human_damaged_hp",250)
        set_cvar_num ("zp_ammop_zombie_killed", 1)
        ativado = false  
     }
     
  }
 
}
public client_putinserver(id)
{
  set_task(20.0, "mensagem", id, _, _,_, 0)
}
public round_end()
{
  set_cvar_num("zp_ammop_human_damaged_hp",1800)
  set_cvar_num ("zp_ammop_zombie_killed", 1)
 
}
public mensagem(id)
{
  if(!ativado)
  {
     client_texto(id, DontChange,"^4[Happy Hour]^1 Comecando as:^4 %d:00^3 |^1 Terminando as:^4 %d:00^3 |^1 Ganhando^4 x%d^1 Vezes de^3 Ammo Packs^1.", get_pcvar_num(cvar_start), get_pcvar_num(cvar_end), get_pcvar_num(cvar_multi))        
  }
}
public mensagem2(id)
{
  client_texto(id, DontChange,"^4[Happy Hour]^1 Comecando as:^4 %d:00^3 |^1 Terminando as:^4 %d:00^3 |^1 Ganhando^4 x%d^1 Vezes de^3 Ammo Packs^1.", get_pcvar_num(cvar_start), get_pcvar_num(cvar_end), get_pcvar_num(cvar_multi))        
  return PLUGIN_CONTINUE
}
public msg_fix(id)
{
  set_hudmessage(0, 255, 0, 0.03, 0.03, 0, 6.0, 12.0)
  show_hudmessage(id, "[Zplague Happy Hour]^n[Happy hour comeca: %i Hora]^n[Acaba: %i Horas]^n[Double APS: %i]", get_pcvar_num(cvar_start), get_pcvar_num(cvar_end), get_pcvar_num(cvar_multi))
}
public say_happy(id)
{
  new said[32]
  read_argv(1,said,31);
 
  if (containi(said, "happy") != -1)
  {
     mensagem2(id)
  }
  return PLUGIN_HANDLED
}

#if defined _colorchat_included
#endinput
#endif
#define _colorchat_included

/* ColorChat Support */
#define NORMAL DontChange
#define GREEN DontChange
#define TEAM_COLOR DontChange
#define RED Red
#define BLUE Blue
#define GREY Grey
#define ColorChat client_texto
/* ColorChat Support */

enum _:Colors {
DontChange,
Red,
Blue,
Grey
}

stock const g_szTeamName[Colors][] =
{
"UNASSIGNED",
"TERRORIST",
"CT",
"SPECTATOR"
}

stock client_texto(id, iColor=DontChange, const szMsg[], any:...)
{
// check if id is different from 0
if( id && !is_user_connected(id) )
{
return 0;
}

if( iColor > Grey )
{
iColor = DontChange;
}

new szMessage[192];
if( iColor == DontChange )
{
szMessage[0] = 0x04;
}
else
{
szMessage[0] = 0x03;
}

new iParams = numargs();
// Specific player code
if(id)
{
if( iParams == 3 )
{
copy(szMessage[1], charsmax(szMessage)-1, szMsg);
}
else
{
vformat(szMessage[1], charsmax(szMessage)-1, szMsg, 4);
}

if( iColor )
{
new szTeam[11]; // store current team so we can restore it
get_user_team(id, szTeam, charsmax(szTeam));

// set id TeamInfo in consequence
// so SayText msg gonna show the right color
Send_TeamInfo(id, id, g_szTeamName[iColor]);

// Send the message
Send_SayText(id, id, szMessage);

// restore TeamInfo
Send_TeamInfo(id, id, szTeam);
}
else
{
Send_SayText(id, id, szMessage);
}
}

// Send message to all players
else
{
// Figure out if at least 1 player is connected
// so we don't send useless message if not
// and we gonna use that player as team reference (aka SayText message sender) for color change
new iPlayers[32], iNum;
get_players(iPlayers, iNum, "ch");
if( !iNum )
{
return 0;
}

new iFool = iPlayers[0];

new iMlNumber, i, j;
new Array:aStoreML = ArrayCreate();
if( iParams >= 5 ) // ML can be used
{
for(j=4; j {
// retrieve original param value and check if it's LANG_PLAYER value
if( getarg(j) == LANG_PLAYER )
{
i=0;
// as LANG_PLAYER == -1, check if next parm string is a registered language translation
while( ( szMessage[ i ] = getarg( j + 1, i++ ) ) ) {}
if( GetLangTransKey(szMessage) != TransKey_Bad )
{
// Store that arg as LANG_PLAYER so we can alter it later
ArrayPushCell(aStoreML, j++);

// Update ML array saire so we'll know 1st if ML is used,
// 2nd how many args we have to alterate
iMlNumber++;
}
}
}
}

// If arraysize == 0, ML is not used
// we can only send 1 MSG_BROADCAST message
if( !iMlNumber )
{
if( iParams == 3 )
{
copy(szMessage[1], charsmax(szMessage)-1, szMsg);
}
else
{
vformat(szMessage[1], charsmax(szMessage)-1, szMsg, 4);
}

if( iColor )
{
new szTeam[11];
get_user_team(iFool, szTeam, charsmax(szTeam));
Send_TeamInfo(0, iFool, g_szTeamName[iColor]);
Send_SayText(0, iFool, szMessage);
Send_TeamInfo(0, iFool, szTeam);
}
else
{
Send_SayText(0, iFool, szMessage);
}
}

// ML is used, we need to loop through all players,
// format text and send a MSG_ONE_UNRELIABLE SayText message
else
{
new szTeam[11], szFakeTeam[10];

if( iColor )
{
get_user_team(iFool, szTeam, charsmax(szTeam));
copy(szFakeTeam, charsmax(szFakeTeam), g_szTeamName[iColor]);
}

for( i = 0; i < iNum; i++ )
{
id = iPlayers[i];

for(j=0; j {
// Set all LANG_PLAYER args to player index ( = id )
// so we can format the text for that specific player
setarg(ArrayGetCell(aStoreML, j), _, id);
}

// format string for specific player
vformat(szMessage[1], charsmax(szMessage)-1, szMsg, 4);

if( iColor )
{
Send_TeamInfo(id, iFool, szFakeTeam);
Send_SayText(id, iFool, szMessage);
Send_TeamInfo(id, iFool, szTeam);
}
else
{
Send_SayText(id, iFool, szMessage);
}
}
ArrayDestroy(aStoreML);
}
}
return 1;
}

stock Send_TeamInfo(iReceiver, iPlayerId, szTeam[])
{
static iTeamInfo = 0;
if( !iTeamInfo )
{
iTeamInfo = get_user_msgid("TeamInfo");
}
message_begin(iReceiver ? MSG_ONE_UNRELIABLE : MSG_BROADCAST, iTeamInfo, .player=iReceiver);
write_byte(iPlayerId);
write_string(szTeam);
message_end();
}

stock Send_SayText(iReceiver, iPlayerId, szMessage[])
{
static iSayText = 0;
if( !iSayText )
{
iSayText = get_user_msgid("SayText");
}
message_begin(iReceiver ? MSG_ONE_UNRELIABLE : MSG_BROADCAST, iSayText, .player=iReceiver);
write_byte(iPlayerId);
write_string(szMessage);
message_end();
}

stock register_dictionary_colored(const filename[])
{
if( !register_dictionary(filename) )
{
return 0;
}

new szFileName[256];
get_localinfo("amxx_datadir", szFileName, charsmax(szFileName));
format(szFileName, charsmax(szFileName), "%s/lang/%s", szFileName, filename);
new fp = fopen(szFileName, "rt");
if( !fp )
{
log_amx("Failed to open %s", szFileName);
return 0;
}

new szBuffer[512], szLang[3], szKey[64], szTranslation[256], TransKey:iKey;

while( !feof(fp) )
{
fgets(fp, szBuffer, charsmax(szBuffer));
trim(szBuffer);

if( szBuffer[0] == '[' )
{
strtok(szBuffer[1], szLang, charsmax(szLang), szBuffer, 1, ']');
}
else if( szBuffer[0] )
{
strbreak(szBuffer, szKey, charsmax(szKey), szTranslation, charsmax(szTranslation));
iKey = GetLangTransKey(szKey);
if( iKey != TransKey_Bad )
{
while( replace(szTranslation, charsmax(szTranslation), "!g", "^4") ){}
while( replace(szTranslation, charsmax(szTranslation), "!t", "^3") ){}
while( replace(szTranslation, charsmax(szTranslation), "!n", "^1") ){}
AddTranslation(szLang, iKey, szTranslation[2]);
}
}
}

fclose(fp);
return 1;
}