Ad_manager

#include <amxmodx>
#include <amxmisc>

#pragma semicolon 1

new const PLUGIN[] = "Autoresponder/Advertiser";
new const VERSION[] = "0.5";
new const AUTHOR[] = "MaximusBrood";

#define NORM_AD 0
#define SAY_AD 1

#define COND 0
#define STORE 1

#define COND_TKN '%'
#define SAY_TKN '@'

#define COND_STKN "%"
#define DEVIDE_STKN "~"
#define SAY_STKN "@"

//-.-.-.-.-.-.-.-.DEFINES.-.-.-.-.-.-.-.-.-.-.

//Maximum amount of ads
#define MAXADS 64

//Minimum difference between two different ads (float)
new const Float:RAND_MIN = 60.0;

//Maximum difference between two different ads (float)
new const Float:RAND_MAX = 80.0;

//-.-.-.-.-.-.-.-.END DEFINES..-.-.-.-.-.-.-.

//Stores
new sayConditions[MAXADS][3][32];
new normConditions[MAXADS][3][32];
new normStore[MAXADS][128];
new sayStore[MAXADS][2][128];

new gmsgSayText;

//Counters
new adCount[2] = {0, 0};

public plugin_init() {
    register_plugin(PLUGIN, VERSION, AUTHOR);
    
    register_cvar("ad_react_all", "1");
    
    gmsgSayText = get_user_msgid("SayText");
    
    register_clcmd("say","eventSay");
    register_clcmd("say_team","eventSay");
    
    //Delay the load proces by 10 sec because we don't want to get more load
    //on the already high-load mapchange.
    //Too soon to affect players while playing, too late to create time-out @ mapchange
    set_task(10.0, "load");
}

public load()
{
    //Load the data
    new filepath[64];
    get_configsdir(filepath, 63);
    format(filepath, 63, "%s/advertisements.ini", filepath);
    
    if(file_exists(filepath))
    {
        new output[512], conditions[128], temp[64], type;
        
        //Open file
        new fHandle = fopen(filepath, "rt");
        
        //Checks for failure
        if(!fHandle)
            return;
        
        //Loop through all lines
        for(new a = 0; a < MAXADS && !feof(fHandle); a++)
        {
            //Get line
            fgets(fHandle, output, 511);
            
            
            //Work away comments
            if(output[0] == ';' || !output[0] || output[0] == ' ' || output[0] == 10)
            {
                //Line is not counted
                a--;
                continue;
            }
            
            //Reset type
            type = 0;
            
            //Check if it contains conditions
            if(output[0] == COND_TKN)
            {
                //Cut the conditions off the string
                split(output, conditions, 127, output, 511, DEVIDE_STKN);
                
                //Determine if its say check or normal ad
                type = output[0] == SAY_TKN ? 1 : 0;
                
                //Put the conditions in own space
                for(new b = 0; b < 3; b++)
                {
                    new sort[16], cond[32], numb;
                    
                    //Remove the % from line
                    conditions[0] = ' ';
                    trim(conditions);
                    
                    //Get one condition from the line
                    split(conditions, temp, 64, conditions, 127, COND_STKN);
                    
                    split(temp, sort, 15, cond, 31, " ");
                    
                    if(equali(sort, "map"))
                    {
                        numb = 0;
                    } else if(equali(sort, "min_players"))
                    {
                        numb = 1;
                    } else if(equali(sort, "max_players"))
                    {
                        numb = 2;
                    } else
                    {
                        continue;
                    }
                    
                    //Copy it to its final resting place ^^
                    setString(COND, type, cond, adCount[type], numb);
                    
                    //Exit if it hasn't got more conditions
                    if(!conditions[0])
                        break;
                }
            }
            
            if(type == 0)
                type = output[0] == SAY_TKN ? 1 : 0;
            
            if(type == SAY_AD)
            {
                new said[32], answer[128];
                
                //Remove the @ from line
                output[0] = ' ';
                trim(output);
                
                split(output, said, 31, answer, 127, DEVIDE_STKN);
                
                //Apply color
                setColor(answer, 127);
                
                //Save it
                setString(STORE, SAY_AD, said, adCount[SAY_AD], 0);
                setString(STORE, SAY_AD, answer, adCount[SAY_AD], 1);
            } else//if(type == NORM_AD)
            {
                //Apply color
                setColor(output, 511);
                
                //Save it
                setString(STORE, NORM_AD, output, adCount[NORM_AD]);
            }
            
            //Increment the right counter
            adCount[NORM_AD] += type == NORM_AD ? 1 : 0;
            adCount[SAY_AD]  += type == SAY_AD  ? 1 : 0;
        }
        
        //Set a first task, if there are any normal ads
        if(adCount[NORM_AD] != 0)
            set_task(random_float(RAND_MIN, RAND_MAX), "eventTask");
        
        //Close file to prevent lockup
        fclose(fHandle);    
    }
}

new currAd = -1;

public eventTask()
{
    //Go past all ads and check conditions
    for(new a = 0; a < adCount[NORM_AD]; a++)
    {
        //Put current ad to the next one
        currAd = currAd == adCount[NORM_AD] - 1 ? 0 : currAd + 1;
        
        if(checkConditions(currAd, NORM_AD))
        {
            //Display the ad
            new data[3];
            data[0] = currAd;
            data[1] = NORM_AD;
            data[2] = 0;
            displayAd(data);
            
            break;
        }
    }
        
    //Set a new task
    set_task(random_float(RAND_MIN, RAND_MAX), "eventTask");
    
    return PLUGIN_CONTINUE;
}

public eventSay(id)
{
    //If nothing is said, don't check
    if(adCount[SAY_AD] == 0)
        return PLUGIN_CONTINUE;
    
    new talk[64], keyword[16];
    read_args(talk, 63);
        
    //En nu rennen voor jullie zakgeld klootzjakken!
    for(new a = 0; a < adCount[SAY_AD]; a++)
    {
        //Get the string
        getString(STORE, SAY_AD, keyword, 15, a, 0);
        
        if(containi(talk, keyword) != -1)
        {
            //Check the rest if it fails to conditions
            if(!checkConditions(a, SAY_AD))
                continue;
            
            new data[3];
            data[0] = a;
            data[1] = SAY_AD;
            data[2] = id;
            
            //Set the task
            set_task(0.3, "displayAd", 0, data, 3);
            
            //Don't execute more of them
            break;
        }
    }
    
    return PLUGIN_CONTINUE;
}

public displayAd(params[])
{
    //Get the string that is going to be displayed
    new message[128];
    getString(STORE, params[1], message, 127, params[0], params[1]);
    
    //If its enabled by cvar and id is set, display to person who triggered message only
    if(get_cvar_num("ad_react_all") == 0 && params[2] != 0)
    {
        message_begin(MSG_ONE, gmsgSayText, {0,0,0}, params[2]);
        write_byte(params[2]);
        write_string(message);
        message_end();
    
    } else
    {
        //Display the message to everyone
        new plist[32], playernum, player;
        
        get_players(plist, playernum, "c");
    
        for(new i = 0; i < playernum; i++)
        {
            player = plist[i];
            
            message_begin(MSG_ONE, gmsgSayText, {0,0,0}, player);
            write_byte(player);
            write_string(message);
            message_end();
        }
    }
    
    return PLUGIN_HANDLED;
}

//---------------------------------------------------------------------------
//                                STOCKS
//---------------------------------------------------------------------------

stock checkConditions(a, type)
{
    //Mapname
    if((type == NORM_AD && normConditions[a][0][0]) || (type == SAY_AD && sayConditions[a][0][0]))
    {
        new mapname[32];
        get_mapname(mapname, 31);
        
        if(! (type == NORM_AD && equali(mapname, normConditions[a][0]) ) || (type == SAY_AD && equali(mapname, sayConditions[a][0]) ) )
            return false;
    }
    
    //Min Players
    if((type == NORM_AD && normConditions[a][1][0]) || (type == SAY_AD && sayConditions[a][1][0]))
    {
        new playersnum = get_playersnum();
        
        if( (type == NORM_AD && playersnum < str_to_num(normConditions[a][1]) ) || (type == SAY_AD && playersnum < str_to_num(sayConditions[a][1]) ) )
            return false;
    }
    
    //Max Players
    if((type == NORM_AD && normConditions[a][2][0]) || (type == SAY_AD && sayConditions[a][2][0]))
    {
        new playersnum = get_playersnum();
        
        if( (type == NORM_AD && playersnum > str_to_num(normConditions[a][2]) ) || (type == SAY_AD && playersnum > str_to_num(sayConditions[a][2]) ) )
            return false;
    }
    
    //If everything went fine, return true
    return true;
}    

stock setColor(string[], len)
{
    if (contain(string, "!t") != -1 || contain(string, "!g") != -1 || contain(string,"!n") != -1)
    {
        //Some nice shiny colors ^^
        replace_all(string, len, "!t", "^x03");
        replace_all(string, len, "!n", "^x01");
        replace_all(string, len, "!g", "^x04");
        
        //Work away a stupid bug
        format(string, len, "^x01%s", string);
    }
}

stock getString(mode, type, string[], len, one, two = 0)
{
    //server_print("mode: %d type: %d len: %d one: %d two %d", mode, type, len, one, two);
    
    //Uses the fact that a string is passed by reference
    if(mode == COND)
    {
        if(type == NORM_AD)
        {
            copy(string, len, normConditions[one][two]);
        } else//if(type = SAY_AD)
        {
            copy(string, len, sayConditions[one][two]);
        }
    } else//if(mode == STORE)
    {
        if(type == NORM_AD)
        {
            copy(string, len, normStore[one]);
        } else//if(type == SAY_AD)
        {
            copy(string, len, sayStore[one][two]);
        }
    }
}

stock setString(mode, type, string[], one, two = 0)
{
    if(mode == COND)
    {
        if(type == NORM_AD)
        {
            copy(normConditions[one][two], 31, string);
        } else//if(type = SAY_AD)
        {
            copy(sayConditions[one][two], 31, string);
        }
    } else//if(mode == STORE)
    {
        if(type == NORM_AD)
        {
            copy(normStore[one], 127, string);
        } else//if(type == SAY_AD)
        {
            copy(sayStore[one][two], 127, string);
        }
    }
}