Dynamic Vehicle System with ORM

/*
        Dynamic vehicle system with ORM created by justice96
        Date created: 05/08/2015
    Last updated: 07/08/2015
        Note: Do not remove my name on credits!
                                                        */
// Includes
#include <a_samp>
#include <a_mysql>
#include <sscanf2>
#include <YSI/y_iterate>
#include <izcmd>

// MySQL connection details
#define HOST "localhost"
#define USER "root"
#define PASS ""
#define DATABASE "Database"

// Function (forward & public) > (function)
#define function%0(%1) \
        forward%0(%1); public%0(%1)
#define SEM(%0,%1); SendClientMessage(%0,COLOR_GREY,%1); // thanks to Tianmetal
#define forex(%0,%1) for(new %0 = 0; %0 < %1; %0++)
#define delstr(%0) strdel(%0,0,strlen(%0))
#define IsNull(%1) ((!(%1[0])) || (((%1[0]) == '\1') && (!(%1[1])))) // updated function.

// Main Colors
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_GREY 0xAFAFAFAA

// Vehicle Func Define
#define MAX_SERVER_VEHICLES 100
#define MAX_PLATE_NAME 30

// Iterator
new Iterator:Vehicles<MAX_SERVER_VEHICLES>;

// Enumrators
enum server_veh
{
    ORM:ORM_ID,
    ID,
    Model,
    Color[2],
    Plate[MAX_PLATE_NAME],
    Float:Spawn[4]
};
new ServerVehicle[MAX_SERVER_VEHICLES][server_veh];
new VehicleID[MAX_SERVER_VEHICLES];
new Database;

#if defined FILTERSCRIPT

public OnFilterScriptInit()
{
    print("\n--------------------------------------");
    print(" [Debug]: justice96 (Dynamic Vehicle ORM) loaded.");
    print("--------------------------------------\n");
    Database = mysql_connect(HOST, USER, DATABASE, PASS);
        mysql_log(LOG_ERROR | LOG_WARNING);
    mysql_pquery(Database,"SELECT * FROM `server_vehicles` ORDER BY `veh_id` ASC","Vehicle_Load",""); // Load _ Vehicles by     ascending
    AddPlayerClass(0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
    return 1;
}

public OnFilterScriptExit()
{
    return 1;
}

#else

main()
{
    print("\n----------------------------------");
    print(" Blank Gamemode by your name here");
    print("----------------------------------\n");
}

#endif

public OnGameModeInit()
{
    // Don't use these lines if it's a filterscript
    SetGameModeText("Blank Script");
    return 1;
}

public OnGameModeExit()
{
    return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
    SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
    SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
    SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
    return 1;
}

public OnPlayerConnect(playerid)
{
    return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    return 1;
}

public OnPlayerSpawn(playerid)
{
    return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
    return 1;
}

public OnVehicleSpawn(vehicleid)
{
    return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
    return 1;
}

public OnPlayerText(playerid, text[])
{
    return 1;
}

// SSCANF Menu (cmd)
SSCANF:servervehiclemenu(string[])
{
    if(!strcmp(string,"create",true)) return 1;
    else if(!strcmp(string,"add",true)) return 1;
    else if(!strcmp(string,"make",true)) return 1;
    else if(!strcmp(string,"remove",true)) return 2;
    else if(!strcmp(string,"delete",true)) return 2;
    else if(!strcmp(string,"destroy",true)) return 2;
    else if(!strcmp(string,"park",true)) return 3;
    else if(!strcmp(string,"parkvehicle",true)) return 3;
    else if(!strcmp(string,"plate",true)) return 4;
    else if(!strcmp(string,"setplate",true)) return 4;
    else if(!strcmp(string,"color",true)) return 5;
    else if(!strcmp(string,"colour",true)) return 5;
    else if(!strcmp(string,"setcolour",true)) return 5;
    else if(!strcmp(string,"setcolor",true)) return 5;
    return 0;
}

function Vehicle_Load()
{
    new rows = cache_get_row_count(Database);
    if(rows != 0)
    {
        forex(row,rows)
        {
            new vehicleid = cache_get_row_int(row,0,Database);
            new ORM:ormid = ServerVehicle[vehicleid][ORM_ID] = orm_create("server_vehicles",Database);
            orm_addvar_int(ormid,ServerVehicle[vehicleid][ID],"veh_id");
            orm_addvar_string(ormid,ServerVehicle[vehicleid][Plate],MAX_PLATE_NAME,"veh_plate");
            orm_addvar_int(ormid,ServerVehicle[vehicleid][Model],"veh_model");
            orm_addvar_int(ormid,ServerVehicle[vehicleid][Color][0],"veh_color_1");
            orm_addvar_int(ormid,ServerVehicle[vehicleid][Color][1],"veh_color_2");
            orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][0],"veh_x");
            orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][1],"veh_y");
            orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][2],"veh_z");
            orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][3],"veh_a");
            orm_apply_cache(ormid,row);
            orm_setkey(ormid,"veh_id");
            Vehicle_Create(vehicleid,INVALID_PLAYER_ID);
        }
    }
    return 1;
}

function Vehicle_Create(vehicleid,playerid)
{
    new string[144];
    VehicleID[vehicleid] = CreateVehicle(ServerVehicle[vehicleid][Model],ServerVehicle[vehicleid][Spawn][0],ServerVehicle[vehicleid][Spawn][1],ServerVehicle[vehicleid][Spawn][2],ServerVehicle[vehicleid][Spawn][3],ServerVehicle[vehicleid][Color][0],ServerVehicle[vehicleid][Color][1],-1);
    SetVehicleNumberPlate(ServerVehicle[vehicleid][ID],ServerVehicle[vehicleid][Plate]);
    Iter_Add(Vehicles,vehicleid);
    if(playerid != INVALID_PLAYER_ID)
    {
        format(string,sizeof(string),"<VEHICLEINFO>: {ffffff}(Server) Vehicle has been created with ({ffff00}id:%d{ffffff})({ffff00}plate:%s{ffffff})",vehicleid,ServerVehicle[vehicleid][Plate]);
        SendClientMessage(playerid,COLOR_LIGHTBLUE,string);
    }
    return 1;
}

CMD:vehicle(playerid,params[])
{
    new action,string[128];
    if(sscanf(params,"k<servervehiclemenu>S()[128]",action,string)) return SEM(playerid,"<USAGE>: /vehicle [create/delete/park/plate/color]");
    else
    {
        switch(action)
        {
            case 1:
            {
                new model,color1,color2,vehplate[MAX_PLATE_NAME];
                if(sscanf(string,"ddds["#MAX_PLATE_NAME"]",model,color1,color2,vehplate)) return SEM(playerid,"<USAGE>: /vehicle create [modelid] [color 1] [color 2] [plate name (max 30 chars)]");
                if(model < 400 || model > 611) return SEM(playerid,"<ERROR>: You have entered an invalid modelid !");
                if(Iter_Free(Vehicles) == -1) return SEM(playerid,"<ERROR>: No free vehicle slot available !");
                if(color1 < 0 || color1 > 255 || color2 < 0 || color2 > 255) return SEM(playerid,"<ERROR>: You have entered an invalid colorid !");
                new vehicleid = Iter_Free(Vehicles);
                ServerVehicle[vehicleid][Model] = model;
                ServerVehicle[vehicleid][ID] = vehicleid;
                ServerVehicle[vehicleid][Color][0] = color1;
                ServerVehicle[vehicleid][Color][1] = color2;
                strmid(ServerVehicle[vehicleid][Plate],vehplate,0,strlen(vehplate),MAX_PLATE_NAME);
                GetPlayerPos(playerid,ServerVehicle[vehicleid][Spawn][0],ServerVehicle[vehicleid][Spawn][1],ServerVehicle[vehicleid][Spawn][2]);
                GetPlayerFacingAngle(playerid,ServerVehicle[vehicleid][Spawn][3]);
                new ORM:ormid = ServerVehicle[vehicleid][ORM_ID] = orm_create("server_vehicles",Database);
                orm_addvar_int(ormid,ServerVehicle[vehicleid][ID],"veh_id");
                orm_addvar_string(ormid,ServerVehicle[vehicleid][Plate],MAX_PLATE_NAME,"veh_plate");
                orm_addvar_int(ormid,ServerVehicle[vehicleid][Model],"veh_model");
                orm_addvar_int(ormid,ServerVehicle[vehicleid][Color][0],"veh_color_1");
                orm_addvar_int(ormid,ServerVehicle[vehicleid][Color][1],"veh_color_2");
                orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][0],"veh_x");
                orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][1],"veh_y");
                orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][2],"veh_z");
                orm_addvar_float(ormid,ServerVehicle[vehicleid][Spawn][3],"veh_a");
                orm_insert(ormid,"Vehicle_Create","dd",vehicleid,playerid);
                orm_setkey(ormid,"veh_id");
            }
            case 2:
            {
                if(IsNull(string)) return SEM(playerid,"<USAGE>: /vehicle delete [vehicleid]");
                new vehicleid = strval(string);
                if(Iter_Contains(Vehicles,vehicleid))
                {
                    format(string,sizeof(string),"<VEHICLEINFO>: {ffffff}(Server) Vehicle with {ffff00}id %d {ffffff}has been deleted!",vehicleid);
                    SendClientMessage(playerid,COLOR_LIGHTBLUE,string);
                    DestroyVehicle(VehicleID[vehicleid]);
                    orm_delete(ServerVehicle[vehicleid][ORM_ID],true);
                    Iter_Remove(Vehicles,vehicleid);
                }
                else SEM(playerid,"<ERROR>: Invalid vehicleid !");
            }
            case 3:
            {
                if(IsNull(string)) return SEM(playerid,"<USAGE>: /vehicle park [vehicleid]");
                new vehicleid = strval(string);
                if(Iter_Contains(Vehicles,vehicleid))
                {
                    GetPlayerPos(playerid,ServerVehicle[vehicleid][Spawn][0],ServerVehicle[vehicleid][Spawn][1],ServerVehicle[vehicleid][Spawn][2]);
                    GetPlayerFacingAngle(playerid,ServerVehicle[vehicleid][Spawn][3]);
                    format(string,sizeof(string),"<VEHICLEINFO>: {ffffff}(Server) Vehicle with {ffff00}id %d {ffffff}has been parked!",vehicleid);
                    SendClientMessage(playerid,COLOR_LIGHTBLUE,string);
                    orm_update(ServerVehicle[vehicleid][ORM_ID]);
                }
                else SEM(playerid,"<ERROR>: Invalid vehicleid !");
            }
            case 4:
            {
                new vehicleid,newplate[MAX_PLATE_NAME];
                if(sscanf(string,"ds["#MAX_PLATE_NAME"]",vehicleid,newplate)) return SEM(playerid,"<USAGE>: /vehicle plate [modelid/vehicleid] [plate name (max 30 chars)]");
                if(Iter_Contains(Vehicles,vehicleid))
                {
                    strmid(ServerVehicle[vehicleid][Plate],newplate,0,strlen(newplate),MAX_PLATE_NAME);
                    format(string,sizeof(string),"<VEHICLEINFO>: {ffffff}You have changed the vehicle name to '{ffff00}%s{ffffff}'",newplate);
                    SendClientMessage(playerid,COLOR_LIGHTBLUE,string);
                    orm_update(ServerVehicle[vehicleid][ORM_ID]);
                }
                else SEM(playerid,"<ERROR>: Invalid vehicleid !");
            }
            case 5:
            {
                new vehicleid,color1,color2;
                if(sscanf(string,"ddd",vehicleid,color1,color2)) return SEM(playerid,"<USAGE>: /vehicle color [modelid/vehicleid] [color 1] [color 2]");
                if(Iter_Contains(Vehicles,vehicleid))
                {
                    ServerVehicle[vehicleid][Color][0] = color1;
                    ServerVehicle[vehicleid][Color][1] = color2;
                    format(string,sizeof(string),"<VEHICLEINFO>: {ffffff}You have changed the vehicle color with '{ffff00}id %d{ffffff}'",vehicleid);
                    SendClientMessage(playerid,COLOR_LIGHTBLUE,string);
                    orm_update(ServerVehicle[vehicleid][ORM_ID]);
                }
                else SEM(playerid,"<ERROR>: Invalid vehicleid !");
            }
            default: SEM(playerid,"<USAGE>: /vehicle [create/delete/park/plate/color]");
        }
    }
    return CMD_SUCCESS;
}

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
    return 1;
}

public OnPlayerExitVehicle(playerid, vehicleid)
{
    return 1;
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
    return 1;
}

public OnPlayerEnterCheckpoint(playerid)
{
    return 1;
}

public OnPlayerLeaveCheckpoint(playerid)
{
    return 1;
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
    return 1;
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
    return 1;
}

public OnRconCommand(cmd[])
{
    return 1;
}

public OnPlayerRequestSpawn(playerid)
{
    return 1;
}

public OnObjectMoved(objectid)
{
    return 1;
}

public OnPlayerObjectMoved(playerid, objectid)
{
    return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
    return 1;
}

public OnVehicleMod(playerid, vehicleid, componentid)
{
    return 1;
}

public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
    return 1;
}

public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
    return 1;
}

public OnPlayerSelectedMenuRow(playerid, row)
{
    return 1;
}

public OnPlayerExitedMenu(playerid)
{
    return 1;
}

public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
    return 1;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
    return 1;
}

public OnRconLoginAttempt(ip[], password[], success)
{
    return 1;
}

public OnPlayerUpdate(playerid)
{
    return 1;
}

public OnPlayerStreamIn(playerid, forplayerid)
{
    return 1;
}

public OnPlayerStreamOut(playerid, forplayerid)
{
    return 1;
}

public OnVehicleStreamIn(vehicleid, forplayerid)
{
    return 1;
}

public OnVehicleStreamOut(vehicleid, forplayerid)
{
    return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    return 1;
}

public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
    return 1;
}