clFunctions - CreativityLacker's custom functions

#include <a_samp>

/*
native GetPlayersName(playerid)
native SetPlayerPositionEx(playerid, Float:x, Float:y, Float:z, Float:angle, vworld, interior)
native GetPlayerIPAddress(playerid)
native HealPlayer(playerid)
native KillPlayer(playerid)
native GivePlayerHealth(playerid, Float:health)
native TakePlayerHealth(playerid, Float:health)
native BankruptPlayer(playerid)
native SetPlayerCash(playerid)
native GivePlayerScore(playerid, score)
native TakePlayerScore(playerid, score)
native SlapPlayer(playerid)
native ExplodePlayer(playerid)
native IsPlayerAiming(playerid)
native GetWeaponNameByID(weaponid)
native GetWeaponSlotByID(weaponid)
native GetPlayerArmedWeaponAmmo(playerid)
native GetVehicleNameByModel(model)
native GetWeatherName(weatherid)
native LoadObjectsFromFile(const filename[])
native HealAll()
native ArmourAll()
native FreezeAll()
native DisarmAll()
native GiveWeaponToAll(weaponid, ammo)
native GiveCashToAll(cash)
native GiveScoreToAll(score)
native UnfreezeAll()
native GetOnlinePlayersCount()
*/

new VehicleNames[212][] = {
        {"Landstalker"},
        {"Bravura"},
        {"Buffalo"},
        {"Linerunner"},
        {"Perrenial"},
        {"Sentinel"},
        {"Dumper"},
        {"Firetruck"},
        {"Trashmaster"},
        {"Stretch"},
        {"Manana"},
        {"Infernus"},
        {"Voodoo"},
        {"Pony"},
        {"Mule"},
        {"Cheetah"},
        {"Ambulance"},
        {"Leviathan"},
        {"Moonbeam"},
        {"Esperanto"},
        {"Taxi"},
        {"Washington"},
        {"Bobcat"},
        {"Mr Whoopee"},
        {"BF Injection"},
        {"Hunter"},
        {"Premier"},
        {"Enforcer"},
        {"Securicar"},
        {"Banshee"},
        {"Predator"},
        {"Bus"},
        {"Rhino"},
        {"Barracks"},
        {"Hotknife"},
        {"Trailer 1"},
        {"Previon"},
        {"Coach"},
        {"Cabbie"},
        {"Stallion"},
        {"Rumpo"},
        {"RC Bandit"},
        {"Romero"},
        {"Packer"},
        {"Monster"},
        {"Admiral"},
        {"Squalo"},
        {"Seasparrow"},
        {"Pizzaboy"},
        {"Tram"},
        {"Trailer 2"},
        {"Turismo"},
        {"Speeder"},
        {"Reefer"},
        {"Tropic"},
        {"Flatbed"},
        {"Yankee"},
        {"Caddy"},
        {"Solair"},
        {"Berkley's RC Van"},
        {"Skimmer"},
        {"PCJ-600"},
        {"Faggio"},
        {"Freeway"},
        {"RC Baron"},
        {"RC Raider"},
        {"Glendale"},
        {"Oceanic"},
        {"Sanchez"},
        {"Sparrow"},
        {"Patriot"},
        {"Quad"},
        {"Coastguard"},
        {"Dinghy"},
        {"Hermes"},
        {"Sabre"},
        {"Rustler"},
        {"ZR-350"},
        {"Walton"},
        {"Regina"},
        {"Comet"},
        {"BMX"},
        {"Burrito"},
        {"Camper"},
        {"Marquis"},
        {"Baggage"},
        {"Dozer"},
        {"Maverick"},
        {"News Chopper"},
        {"Rancher"},
        {"FBI Rancher"},
        {"Virgo"},
        {"Greenwood"},
        {"Jetmax"},
        {"Hotring"},
        {"Sandking"},
        {"Blista Compact"},
        {"Police Maverick"},
        {"Boxville"},
        {"Benson"},
        {"Mesa"},
        {"RC Goblin"},
        {"Hotring Racer A"},
        {"Hotring Racer B"},
        {"Bloodring Banger"},
        {"Rancher"},
        {"Super GT"},
        {"Elegant"},
        {"Journey"},
        {"Bike"},
        {"Mountain Bike"},
        {"Beagle"},
        {"Cropdust"},
        {"Stunt"},
        {"Tanker"},
        {"Roadtrain"},
        {"Nebula"},
        {"Majestic"},
        {"Buccaneer"},
        {"Shamal"},
        {"Hydra"},
        {"FCR-900"},
        {"NRG-500"},
        {"HPV1000"},
        {"Cement Truck"},
        {"Tow Truck"},
        {"Fortune"},
        {"Cadrona"},
        {"FBI Truck"},
        {"Willard"},
        {"Forklift"},
        {"Tractor"},
        {"Combine"},
        {"Feltzer"},
        {"Remington"},
        {"Slamvan"},
        {"Blade"},
        {"Freight"},
        {"Streak"},
        {"Vortex"},
        {"Vincent"},
        {"Bullet"},
        {"Clover"},
        {"Sadler"},
        {"Firetruck LA"},
        {"Hustler"},
        {"Intruder"},
        {"Primo"},
        {"Cargobob"},
        {"Tampa"},
        {"Sunrise"},
        {"Merit"},
        {"Utility"},
        {"Nevada"},
        {"Yosemite"},
        {"Windsor"},
        {"Monster A"},
        {"Monster B"},
        {"Uranus"},
        {"Jester"},
        {"Sultan"},
        {"Stratum"},
        {"Elegy"},
        {"Raindance"},
        {"RC Tiger"},
        {"Flash"},
        {"Tahoma"},
        {"Savanna"},
        {"Bandito"},
        {"Freight Flat"},
        {"Streak Carriage"},
        {"Kart"},
        {"Mower"},
        {"Duneride"},
        {"Sweeper"},
        {"Broadway"},
        {"Tornado"},
        {"AT-400"},
        {"DFT-30"},
        {"Huntley"},
        {"Stafford"},
        {"BF-400"},
        {"Newsvan"},
        {"Tug"},
        {"Trailer 3"},
        {"Emperor"},
        {"Wayfarer"},
        {"Euros"},
        {"Hotdog"},
        {"Club"},
        {"Freight Carriage"},
        {"Trailer 3"},
        {"Andromada"},
        {"Dodo"},
        {"RC Cam"},
        {"Launch"},
        {"Police Car (LSPD)"},
        {"Police Car (SFPD)"},
        {"Police Car (LVPD)"},
        {"Police Ranger"},
        {"Picador"},
        {"S.W.A.T. Van"},
        {"Alpha"},
        {"Phoenix"},
        {"Glendale"},
        {"Sadler"},
        {"Luggage Trailer A"},
        {"Luggage Trailer B"},
        {"Stair Trailer"},
        {"Boxville"},
        {"Farm Plow"},
        {"Utility Trailer"}
};



stock GetPlayersName(playerid)
{
    new name[MAX_PLAYER_NAME];
    GetPlayerName(playerid, name, sizeof(name) );
    return name;
}

stock SetPlayerPositionEx(playerid, Float:x, Float:y, Float:z, Float:angle, vworld, interior)
{
    SetPlayerPos(playerid, x, y, z);
    SetPlayerFacingAngle(playerid, angle);
    SetPlayerVirtualWorld(playerid, vworld);
    SetPlayerInterior(playerid, interior);
    return 1;
}

stock GetPlayerIPAddress(playerid)
{
    new ip[20];
    GetPlayerIp(playerid, ip, sizeof(ip) );
    return ip;
}

stock HealPlayer(playerid) return SetPlayerHealth(playerid, 100);
stock KillPlayer(playerid) return SetPlayerHealth(playerid, -5);

stock GivePlayerHealth(playerid, Float:health)
{
    new Float:hp;
    GetPlayerHealth(playerid, hp);
    new calc = floatadd(hp, health);
    SetPlayerHealth(playerid, calc);
    return 1;
}

stock TakePlayerHealth(playerid, Float:health)
{
    new Float:hp;
    GetPlayerHealth(playerid, hp);
    new calc = floatsub(hp, health);
    SetPlayerHealth(playerid, calc);
    return 1;
}

stock BankruptPlayer(playerid) return ResetPlayerMoney(playerid)

stock SetPlayerCash(playerid, cash)
{
    ResetPlayerMoney(playerid);
    GivePlayerMoney(playerid, cash);
}

stock GivePlayerScore(playerid, score)
{
    new pscore = GetPlayerScore(playerid);
    SetPlayerScore(playerid, pscore+score);
    return 1;
}

stock TakePlayerScore(playerid, score)
{
    new pscore = GetPlayerScore(playerid);
    SetPlayerScore(playerid, pscore-score);
    return 1;
}

stock SlapPlayer(playerid)
{
    new Float:Pos[3];
    GetPlayerPos(playerid, Pos[0], Pos[1], Pos[2] );
    SetPlayerPos(playerid, Pos[0], Pos[1], Pos[2]+10);
    return 1;
}

stock ExplodePlayer(playerid)
{
    new Float:Pos[3];
    GetPlayerPos(playerid, Pos[0], Pos[1], Pos[2] );
    CreateExplosion(Pos[0], Pos[1], Pos[2], 8, 5.0);
    return 1;
}

stock IsPlayerAiming(playerid)
{
    new anim = GetPlayerAnimationIndex(playerid);
    switch(anim)
    {
        case 1167, 1365, 1643, 1453, 220: return 1;
    }
    return 0;
}

stock GetWeaponNameByID(weaponid)
{
    new gunname[32];
    switch (weaponid)
    {
        case 1..17,22..43,46: GetWeaponName(weaponid,gunname,sizeof(gunname));
        case 0: format(gunname,32,"%s","Fist");
        case 18: format(gunname,32,"%s","Molotov");
        case 44: format(gunname,32,"%s","Night Goggles");
        case 45: format(gunname,32,"%s","Thermal Goggles");
        default: format(gunname,32,"%s","Unknown weapon");
    }
    return gunname;
}

stock GetWeaponSlot(weaponid)
{
    new slot;
    switch(weaponid)
    {
        case 0,1: slot = 0;
        case 2 .. 9: slot = 1;
        case 10 .. 15: slot = 10;
        case 16 .. 18, 39: slot = 8;
        case 22 .. 24: slot =2;
        case 25 .. 27: slot = 3;
        case 28, 29, 32: slot = 4;
        case 30, 31: slot = 5;
        case 33, 34: slot = 6;
        case 35 .. 38: slot = 7;
        case 40: slot = 12;
        case 41 .. 43: slot = 9;
        case 44 .. 46: slot = 11;
    }
    return slot;
}

stock gGetPlayerAmmo(playerid)
{
    new weapon[3];
    weapon[0] = GetWeaponSlot(GetPlayerWeapon(playerid) );
    GetPlayerWeaponData(playerid, weapon[0], weapon[1], weapon[2]);
    return weapon[2];
}

stock GetVehicleNameByModel(model)
{
    new string[32];
    format(string,sizeof string,"%s",VehicleNames[model -400]);
    return string;
}

stock GetWeatherName(weatherid)
{
    new wName[80];
    switch(weatherid)
    {
        case 0..7: wName = "Clear skies";
        case 8: wName = "Stormy";
        case 9: wName = "Cloudy";
        case 10: wName = "Clear skies";
        case 11: wName = "Heatwave";
        case 12..15: wName = "Cloudy/Clear";
        case 16: wName = "Cloudy/Rainy";
        case 17, 18: wName = "Heatwave";
        case 19: wName = "Sandstorm";
        case 20: wName = "Foggy/Greenish";
        case 21,22: wName = "Dark clouds";
        case 23..26: wName = "Heatwave";
        case 27..29: wName = "Clear skies";
        case 30: wName = "Cloudy";
        case default: wName = "Unknown";
    }
    return wName;
}

stock LoadObjectsFromFile(const filename[]) // Thanks to iPLEOMAX for fixing this
{
    if(!fexist(filename))
    return printf("[Objects] Couldn't load objects from %s [Reason : File doesn't exist]", filename);
    new File:Handler = fopen(filename, io_read);
    if(!Handler) return printf("[Objects] Couldn't load objects from %s [Reason : I/O Error]", filename);
    new Line[256], Index = -1, Model, Float:PosX, Float:PosY, Float:PosZ, Float:RotX, Float:RotY, Float:RotZ, Float:DrawDistance;
    Objects_loaded = 0;
    while(fread(Handler, Line))
    {
        Index++;
        new EOL = strfind(Line, ";", false);
        if(EOL != -1) strdel(Line, EOL - 1, sizeof Line - 1);
        else
        {
            printf("[Objects] Error reading @LineIndex %i from %s (EOL not found)", Index, filename);
            continue;
        }
        if(!sscanf(Line[13], "p<,>iffffffF(100)", Model, PosX, PosY, PosZ, RotX, RotY, RotZ, DrawDistance))
        {
            CreateObject(Model, PosX, PosY, PosZ, RotX, RotY, RotZ, DrawDistance);
            Objects_loaded++;
        }
        else printf("[Objects] Error reading @LineIndex %i from %s [Invalid format]", Index, filename);
    }
    fclose(Handler);
    printf("[Objects] Loaded %d objects from: %s", Objects_loaded, filename);
    return true;
}

stock HealAll()
{
    for(new i; i < MAX_PLAYERS; i++) SetPlayerHealth(i, 100);
    return 1;
}

stock ArmourAll()
{
    for(new i; i < MAX_PLAYERS; i++) SetPlayerArmour(playerid, 100);
    return 1;
}

stock DisarmAll()
{
    for(new i; i < MAX_PLAYERS; i++) ResetPlayerWeapons(i);
    return 1;
}

stock GiveWeaponToAll(weaponid, ammo)
{
    if(weaponid > 46) return 0;
    for(new i; i < MAX_PLAYERS; i++) GivePlayerWeapon(playerid, weaponid, ammo);
    return 1;
}

stock GiveCashToAll(cash)
{
    for(new i; i < MAX_PLAYERS; i++) GivePlayerMoney(i, cash);
    return 1;
}

stock GiveScoreToAll(score)
{
    for(new i; i < MAX_PLAYERS; i++)
    {
        new pscore = GetPlayerScore(i);
        SetPlayerScore(i, pscore+score);
    }
    return 1;
}

stock FreezeAll()
{
    for(new i; i < MAX_PLAYERS; i++) TogglePlayerControllable(i, false);
    return 1;
}

stock UnfreezeAll()
{
    for(new i; i < MAX_PLAYERS; i++) TogglePlayerControllable(i, true);
    return 1;
}

stock GetOnlinePlayersCount()
{
    new count;
    for(new x=0; x< MAX_PLAYERS; x++)
    {
        if(IsPlayerConnected(x))
        {
            count++;
        }
    }
    return count;
}