Maruda515

  roulette.amxx

plugin_init

register_prize

/*
	Registers new prize, native must be placed in plugin_init function
	desc - short description for developer menu. Limit: 100 characters
	karma - how good is prize
		positive value for favorable prizes
		negative value for unfavorable prizes
		0 for neutral or hard to assess prizes
	pwr - the product of chance on the prize drawn, recommended value: POWER
	key - translates key if set to true or just register prize with given name

	Returns registered prize id. Prize ids begins from 0
*/
native register_prize(desc[200], pwr=POWER, karma=0, bool:key=true);

/*
	draw power =7!, for example, prize with 3× less chance to get out from draw,
	we register with power: POWER/3: register_prize("prize name", POWER/3);
*/
#define POWER			5040

// some predefines karma levels for prizes
#define KARMA_WORST		"-100"
#define KARMA_VERY_BAD		"-75"
#define KARMA_BAD		"-50"
#define KARMA_QUITE_BAD		"-25"
#define KARMA_MINUS		"-1"
#define KARMA_NEUTRAL		"0"
#define KARMA_PLUS		"1"
#define KARMA_QUITE_GOOD	"25"
#define KARMA_GOOD		"50"
#define KARMA_VERY_GOOD		"75"
#define KARMA_BEST		"100"

check_prize

/*
	Ask for ability to draw the prize for a given player
	id - number of player to draw the prize
	Returning ROULETTE_ALLOW allows for draw the prize
	Returning ROULETTE_BLOCK disallows for draw the prize
*/
forward check_prize(id);

enum{
	ROULETTE_BLOCK,	// Blocks forward execute or disallow for executing
	ROULETTE_ALLOW	// Executes the forward or allow for executing
}

public check_prize(id){	
	return ROULETTE_ALLOW;
}

public check_prize(id){	
	return get_user_team(id)==1?ROULETTE_ALLOW:ROULETTE_BLOCK;
}

power_reset

/*
	Ask for change prize`s power
	id - number of player to reset the power
	Returning ROULETTE_ALLOW allows for prize`s power reset
	Returning ROULETTE_BLOCK disallows for prize`s power reset
*/
forward power_reset(id);

check_prize

execute_prize

/*
	Executes prize by given player
	id - number of player wchich drew the prize
*/
forward execute_prize(id);

change_prize_power

/*
	Forces prize power change
	id - number of player, which power is changed
		if set to 0, power is changed for all players
	pwr - new power to set

	Returns old player`s prize power or -1 if id is 0
*/
native change_prize_power(id=0, pwr=0);

/*
	Sets user karma level
	id - number of player to set new karma
		if set to 0, karma is set to all players
	karma - new karma to set

	Returns old player`s karma or -1 if id is 0
*/
native set_user_karma(id=0, karma=0);

/*
	Gets user karma level
	id - number of player to get karma
*/
native get_user_karma(id);

/*
	Changes prize`s karma
	karma - new karma to set

	Returns prize`s old karma
*/
native change_prize_karma(karma=0);

/*
	Gets time to end of round in seconds
*/
native timeleft();

/*
	Registers new dictionary of keys to translate
	file - dictionary`s filename placed in data/lang
*/
native register_translate(file[128]);

/*
	Translates key registered by register_translate
	id - number of player to translate key for
	key - the key to translate
	result - the output for translated key
*/
native translate(id, key[128], result[896]);

prize_info

/*
	Shows information of drawed message to winner and his spectators
	id - number of player to show the information
	color - color of the message to show.
		Available colors to choose:
		YELLOW, GREEN, RED, BLUE
	key - translates key if set to true or just shows given message
	msg - message to show for a player. Limit of 190 characters
	msgSpec - message to show for player`s spectators. Same limit.
	channel - binary sum of channels message to show
		1 - ColorChat
		2 - Tutor
		4 - Center
	time - how long the tutor message have to lasts (float value)
*/
native prize_info(id, color=INFO_YELLOW, msg[190]="", msgSpec[190]="", bool:key=true, channel=3, Float:time=10.0);

enum(<<=1){			// Message channels used in prize_info native
	MSG_COLORCHAT=1,
	MSG_TUTOR,
	MSG_CENTER
}

enum{				// Colors are projected to be compatible with ColorChat
	INFO_YELLOW=1,		// Yellow color has been added to make names more sense
	INFO_GREEN,
	INFO_RED=5,
	INFO_BLUE
}

/*
	Shows counter centered information to winner and his spectators
	Uses client_print print_center in format: "translated_key: number"
	id - number of player to show the counter
	key - the key to translate, being the prize name
	number - number to show (f.e. seconds left, HP left, etc.)
	spect - specifies, if show counter to spectators too.
*/
native prize_counter(id, key[128], number, bool:spect=true);

#include <amxmodx>
#include <roulette>

public plugin_init(){
	register_plugin("Roulette Prize name", "0.1", "Prize Author");
	register_prize("Prize name: Short prize description");
}

public execute_prize(id){

}

public check_prize(id){	
	return ROULETTE_ALLOW;
}

public power_reset(id){
	return ROULETTE_ALLOW;
}

// defines cvar bitsum value, showing cvar`s existing and every change
#define FCVAR_SHOWALL FCVAR_ARCHIVE|FCVAR_SERVER

#include <amxmodx>
#include <roulette>

new ban=0, c_rounds_ban;

public plugin_init(){
	register_plugin("Roulette Prize name", "0.1", "Prize Author");
	register_prize("Prize name: Short prize description");

	register_logevent("roundStart", 2, "1=Round_Start");

	c_rounds_ban=register_cvar("roulette_prize_name_rounds_ban", "20", FCVAR_SHOWALL);
}

public execute_prize(id){
	change_prize_power(id, 0);
	ban=get_pcvar_num(c_rounds_ban);
}

public roundStart(){
	if(ban){
		--ban;
	}
}

public check_prize(id){
	return ban?ROULETTE_BLOCK:ROULETTE_ALLOW;
}

public power_reset(id){
	return ROULETTE_ALLOW;
}

power_reset

enum{
	ROULETTE_BLOCK,	// Blocks forward execute or disallow for executing
	ROULETTE_ALLOW	// Executes the forward or allow for executing
}

#include <amxmodx>
#include <hamsandwich>
#include <roulette>

new maxPlayers, prize[33];

public plugin_init(){
	register_plugin("Roulette Prize name", "0.1", "Prize Author");
	register_prize("Prize name: Short prize description");

	register_logevent("roundEnd", 2, "1=Round_End");
	register_logevent("roundEnd", 2, "1=Game_Commencing");

	RegisterHam(Ham_Killed, "player", "killed", 1);
}

public plugin_cfg(){
	maxPlayers=get_maxplayers();
}

public execute_prize(id){
	prize[id]=20;

	new data[1];
	data[0]=id;
	set_task(1.0, "timer", _, data, 1, "a", prize[id]);
}

public timer(data[]){
	new id=data[0];
	if(is_user_alive(id) && prize[id]){
		if(--prize[id]){
			// tutaj wykonujemy kod co sekunde, dla dodatniego licznika czasu
		} else {
			// licznik czasu wlasnie dobiegl zera, wykonujemy pewien, inny kod
		}
	}
}

public killed(vid, kid, shouldgib){
	if(prize[vid]){
		prize[vid]=0;
	}
}

public client_putinserver(id){
	prize[id]=0;
}

public roundEnd(){
	remove_task();
	for(new i=1; i<=maxPlayers; ++i){
		prize[i]=0;
	}
}

public check_prize(id){	
	return ROULETTE_ALLOW;
}

public power_reset(id){
	return ROULETTE_ALLOW;
}

execute_prize

• Koniec czasu (licznik osiągnął wartość zerową)
• Zabicie gracza (stąd funkcja killed)
• Koniec rundy (funkcja roundEnd)

#include <amxmodx>
#include <fakemeta>
#include <hamsandwich>
#include <roulette>

new maxPlayers, prize[33];
new c_prize_min, c_prize_max;

public plugin_init(){
	register_plugin("Roulette Prize name", "0.1", "Prize Author");
	register_prize("Prize name: Short prize description");

	register_logevent("roundEnd", 2, "1=Round_End");
	register_logevent("roundEnd", 2, "1=Game_Commencing");

	RegisterHam(Ham_Killed, "player", "killed", 1);

	c_prize_min=register_cvar("c_prize_name_min", "10", FCVAR_SHOWALL);
	c_prize_max=register_cvar("c_prize_name_max", "20", FCVAR_SHOWALL);
}

public plugin_cfg(){
	maxPlayers=get_maxplayers();
}

public execute_prize(id){
	// gracz o numerze id wylosowal nagrode
	// tutaj wykonujemy operacje tuz po wylosowaniu nagrody

	prize[id]=random_num(get_pcvar_num(c_prize_min), get_pcvar_num(c_prize_max));
	prize_info(id, INFO_BLUE, "PRIZE_NAME_DESC", "PRIZE_NAME_DESC_SPEC");
	prize_counter(id, "PRIZE_NAME", prize[id]);

	new data[1];
	data[0]=id;
	set_task(1.0, "timer", _, data, 1, "a", prize[id]);
}

public timer(data[]){
	new id=data[0];
	if(is_user_alive(id) && prize[id]){
		if(--prize[id]){
			// tutaj wykonujemy kod co sekunde, dla dodatniego licznika czasu
			prize_counter(id, "PRIZE_NAME", prize[id]);
		} else {
			// licznik czasu wlasnie dobiegl zera, wykonujemy pewien, inny kod
			prize_info(id, .key=false, .channel=MSG_CENTER);
		}
	}
}

public killed(vid, kid, shouldgib){
	if(prize[vid]){
		prize[vid]=0;
	}
}

public client_putinserver(id){
	prize[id]=0;
}

public roundEnd(){
	remove_task();
	for(new i=1; i<=maxPlayers; ++i){
		prize[i]=0;
	}
}

public check_prize(id){	
	return ROULETTE_ALLOW;
}

public power_reset(id){
	return ROULETTE_ALLOW;
}

change_prize_power(id, 0);

24.12.2012 1.0   N Init version
28.12.2012 2.0   + Added custom configuration files. Plugin is fully plug & play now
03.01.2013 2.1   $ Fixed incorrect plugin native change prize power call
04.01.2013 2.2   + Added cutom map`s custom configuration files settings service
08.01.2013 3.0   % Improved memory usage, replacing stable tables with the cellarray
11.01.2013 3.1   $ Fixed the ArrayGetArray incorect identifier usage
13.01.2013 4.0   + Added multilanguage service, changed main plugin language to english
13.01.2013 4.0.1 $ Changed variables names and comments to english
13.01.2013 4.0.2 $ Fixed null sized array initialize while no prizes
13.01.2013 4.1   % Improved menu show while no prizes
13.01.2013 4.2   $ No more searching for winning prize`s execute forward id twice
28.01.2013 5.0   % Merged ConnorMcLeod`s get_remaining_seconds and Roulette
28.01.2013 5.0.1 + Added timeleft native
29.01.2013 5.1   + Added register_translate and translate natives
30.01.2013 5.1.1 $ Fixed translations for tutor
30.01.2013 5.2   + Added prize_info native
30.01.2013 5.3   $ Added register_prize multilang support
30.01.2013 5.3.1 % Improved some comparisons usage
30.01.2013 5.3.2 $ Fixed infinity loop bug when prize`s default power is 0
01.02.2013 6.0   + Added karma system
02.02.2013 6.0.1 % Improved some natives returns
02.02.2013 6.1   + Added change_prize_karma, set_user_karma and get_user_karma natives
03.02.2013 6.1.1 % Improved some natives parameters and variables usage
03.02.2013 6.1.2 + Added source code sections and some comments blocks
04.02.2013 6.1.3 + Added KARMA_* defines in INC file
04.02.2013 6.1.4 + Added POWER_STR, allowing use it directly in prize`s power cvars
04.02.2013 6.2   % Reduced POWER(_STR) to 7! to avoid integer overflow more effectively
04.02.2013 6.2.1 + Added FCVAR_SHOWALL definition to simplify registering some cvars
05.02.2013 6.2.2 $ Fixed translate native not returning translated string
05.02.2013 6.2.3 + Added credits informations in info section of SMA file
05.02.2013 6.3   + Added prize_counter native to simplify showing counters
06.02.2013 6.3.1 % Moved descriptions in INC file over the content to cooperate with editors
05.03.2013 6.3.2 % Changed array of booleand into bitsum, added bitsum defines

roulette_lightning_min 20 // <minimalne obrażenia od błyskawicy>
roulette_lightning_max 50 // <maksymalne obrażenia od błyskawicy>
roulette_lightning_burn_min 2 // <minimalny czas podpalenia>
roulette_lightning_burn_max 8 // <maksymalny czas podpalenia>

roulette_god_min 10 // <minimalny czas trwania GodModa>
roulette_god_max 20 // <maksymalny czas trwania GodModa>
roulette_god_speed 450 // <prędkość gracza podczas GodModa>

roulette_invisible_cap_min 12 // <minimalny czas trwania niewidzialności>
roulette_invisible_cap_max 26 // <maksymalny czas trwania niewidzialności>
roulette_invisible_cap_speed 500 // <prędkość gracza podczas trwania nagrody>

roulette_ghost_min 8 // <minimalny czas trwania NoClipa>
roulette_ghost_max 22 // <maksymalny czas trwania NoClipa>
roulette_ghost_speed 500 // <prędkość gracza podczas NoClipa>

roulette_grenades_he_min 4 // <minimalna liczba HE do wylosowania>
roulette_grenades_he_max 8 // <maksymalna liczba HE do wylosowania>
roulette_grenades_fb_min 6 // <minimalna liczba FB do wylosowania>
roulette_grenades_fb_max 12 // <maksymalna liczba FB do wylosowania>
roulette_grenades_sg_min 2 // <minimalna liczba SG do wylosowania>
roulette_grenades_sg_max 4 // <maksymalna liczba SG do wylosowania>

roulette_hacker_life 150 // <liczba punktów życia, jakie otrzyma gracz>

roulette_gambler_min 1 // <minimalna liczba dolarów do wylosowania>
roulette_gambler_max 10000 // <maksymalna liczba dolarów do wylosowania>

roulette_karma_num_min 5 // <minimalny czas trwania slapowania>
roulette_karma_num_max 15 // <maksymalny czas trwania slapowania>
roulette_karma_dmg_min 1 // <minimalna wartość obrażeń każdego slapa>
roulette_karma_dmg_min 9 // <maksymalna wartość obrażeń każdegoslapa>

roulette_casino_money 3000 // <liczba przegrywanych dolarów>

roulette_pocket_money_money 3000 // <liczba wygrywanych dolarów>

roulette_kick_min 15 // <minimalna liczba zabieranych punktów życia>
roulette_kick_max 25 // <maksymalna liczba zabieranych punktów życia>

roulette_human_bomb_min 20 // <minimalny czas do wybuchu bomby>
roulette_human_bomb_max 40 // <maksymalny czas do wybuchu bomby>
roulette_human_bomb_range 1000 // <zasięg rażenia bomby>
roulette_human_bomb_rounds_ban 5 // <liczba rund limitu globalnego>

roulette_small_invisibility_min 10 // <0-254> minimalna wartość niewidzialności
roulette_small_invisibility_max 50 // <0-255> maksymalna wartość niewidzialności

roulette_monkey_min 0.2 // <0.0-0.99> minimalny iloczyn grawitacji (float)
roulette_monkey_max 0.5 // <0.0-1.0> maksymalny iloczyn grawitacji (float)

roulette_medic_min 1 // minimalna liczba życia do wylosowania
roulette_medic_max 200 // maksymalna liczba życia do wylosowania

roulette_multijump_jumps 3 // <liczba dodatkowych skoków w powietrzu>

roulette_invisible_god_min 14 // <minimalny czas trwania nagrody>
roulette_invisible_god_max 16 // <maksymalny czas trwania nagrody>
roulette_invisible_god_speed 500 // <prędkość gracza podczas trwania nagrody>

roulette_cutthroat_speed 500 // <prędkość nożownika>
roulette_cutthroat_hp 1000 // <liczba życia nożownika>

roulette_damage_min 1 // <minimalna liczba obrażeń>
roulette_damage_max 111 // <maksymalna liczba obrażeń>

roulette_fire_min 1 // <minimalna liczba obrażeń co sekundę>
roulette_fire_max 3 // <maksymalna liczba obrażeń co sekundę>

roulette_tax_vat 23 // <wysokość podatku w HP>

roulette_rambo_min 15 // <minimalny czas trwania Rambo>
roulette_rambo_max 25 // <maksymalny czas trwania Rambo>

roulette_suicide_bomber_min 25 // <minimalny czas do automatycznego wybuchu samobójcy>
roulette_suicide_bomber_max 35 // <maksymalny czas do automatycznego wybuchu samobójcy>
roulette_suicide_bomber_speed 400 // <prędkość samobójcy>
roulette_suicide_bomber_range 777 // <zasięg rażenia wybuchu samobójcy>
roulette_suicide_bomber_rounds_ban 5 // <liczba rund limitu globalnego>

roulette_schnitzel_hp 100 // <liczba dodawanego HP za zjedzenie schabowego>

roulette_elephant_min 1.5 // <minimalny iloczyn grawitacji> (float)
roulette_elephant_max 2.5 // <maksymalny iloczyn grawitacji> (float)

roulette_sniper_min 15 // <minimalny czas trwania nagrody>
roulette_sniper_max 25 // <maksymalny czas trwania nagrody>

roulette_old_man_min 8 // <minimalny czas trwania nagrody>
roulette_old_man_max 15 // <maksymalny czas trwania nagrody>
roulette_old_man_speed 72 // <prędkość starucha>

roulette_frag_loss_min 1 // <minimalna liczba fragów do stracenia>
roulette_frag_loss_max 2 // <maksymalna liczba fragów do stracenia>

roulette_death_loss_min 1 // <minimalna liczba zgonów do stracenia>
roulette_death_loss_max 5 // <maksymalna liczba zgonów do stracenia>

roulette_windman_min 12 // <minimalny czas trwania nagrody>
roulette_windman_max 24 // <maksymalny czas trwania nagrody>
roulette_windman_speed 1000 // <2-1000> szybkość biegu podczas nagrody

roulette_blind_min 10 // <minimalny czas oślepienia>
roulette_blind_max 15 // <maksymalny czas oślepienia>

roulette_teleport_min 3 // <minimalny czas do teleportu>
roulette_teleport_max 6 // <maksymalny czas do teleportu>

roulette_free_frag_min 3 // <minimalny czas do teleportacji>
roulette_free_frag_min 6 // <maksymalny czas do teleportacji>
roulette_free_frag_time 15 // <czas zakopania pod ziemią po teleportacji>

roulette_money_win_min 1000 // <minimalna gotówka do wygrania>
roulette_money_win_max 13000 // <maksymalna gotówka do wygrania>

roulette_frag_win_min 1 // <minimalna liczba wygranych fragów>
roulette_frag_win_max 3 // <maksymalna liczba wygranych fragów>

roulette_death_win_min 1 // <minimalna liczba wygranych zgonów>
roulette_death_win_max 3 // <maksymalna liczba wygranych zgonów>

roulette_life_win_min 50 // <minimalne HP do wygrania>
roulette_life_win_max 150 // <maksymalne HP do wygrania>

roulette_buried_min 15 // <minimalny czas trwania nagrody>
roulette_buried_max 25 // <maksymalny czas trwania nagrody>

roulette_rapist_min 20 // <minimalny czas trwania nagrody>
roulette_rapist_max 30 // <maksymalny czas trwania nagrody>
roulette_rapist_speed 300 // <prędkość zboczeńca>

roulette_zeus_min 12 // <minimalny czas trwania nagrody>
roulette_zeus_max 18 // <maksymalny czas trwania nagrody>
roulette_zeus_speed 700 // <prędkość Zeusa>

roulette_pauper_money 1500 // <liczba dodawanych dolarów graczowi>

#include <amxmodx>
#include <fun>
#include <HamSandwich>

// makrodefinicje obsługi Sumy bitów
#define SetBit(%1,%2) (%1|=(1<<(%2)))
#define ClearBit(%1,%2) (%1&=~(1<<(%2)))
#define CheckBit(%1,%2) (%1&(1<<(%2)))

// zmienna jako suma bitów, określająca, czy gracz ma bonus prędkości
new speedbuff;

// zmienna z maksymalną liczbą graczy na serwerze
new maxPlayers;

public plugin_init(){
	// Rejestruje plugin
	register_plugin("Random speed buff", "1.0", "benio101");

	// Rejestruje najlepszy dostępny event resetu prędkości gracza
	RegisterHam(get_player_resetmaxspeed_func(), "player", "speed", 1);

	// Rejestruje event nowej rundy
	register_logevent("roundStart", 2, "1=Round_Start");

	// Rejestruje event końca rundy
	register_logevent("roundEnd", 2, "1=Round_End");
}

public plugin_cfg(){
	//pobiera maksymalną liczbę graczy na serwerze
	maxPlayers=get_maxplayers();
}

// Wybiera najlepszy dostępny event resetu prędkości gracza
Ham:get_player_resetmaxspeed_func(){
	#if defined Ham_CS_Player_ResetMaxSpeed
		return IsHamValid(Ham_CS_Player_ResetMaxSpeed)?Ham_CS_Player_ResetMaxSpeed:Ham_Item_PreFrame;
	#else
		return Ham_Item_PreFrame;
	#endif
}

// obsługa nowej rundy
public roundStart(){
	// pobieranie id żywych graczy
	new player_ids[32], players=-1;
	for(new i=1; i<=maxPlayers; ++i){
		if(is_user_alive(i)){
			player_ids[++players]=i;
		}
	}

	if(++players){
		// losujemy zwycięzcę speed buffa
		new winner=player_ids[random(players)];

		// dodajemy jej buffa prędkości w miejscu
		set_user_maxspeed(winner, 1000.0);

		// oznaczamy gracza jako posiadającego buffa
		SetBit(speedbuff, winner);
	}/*{
		else brak żywych graczy, nie losujemy
	}*/
}

// obsługa bonusu prędkości
public speed(id){
	if(
			// sprawdzamy, czy gracz żyje
			is_user_alive(id)
			// oraz, czy posiada buff prędkości
		&&	 CheckBit(speedbuff, id)
	){
		// jeśli posiada, to ustawiamy mu prędkość znów na 1000.0
		set_user_maxspeed(id, 1000.0);
	}
}

public client_connect(id){
	// zapobiegamy odziedziczeniu buffa przez nowego gracza,
	// który otrzymał id szczęśliwca, który opuścił serwer
	ClearBit(speedbuff, id);
}

public roundEnd(){
	// runda się skończyła, usuwamy wszelkie bonusy prędkości
	speedbuff=0;
}