/**************************************************
*******
*                    il_o2_table_dist
*      ----------------------------------------
*  Author          : Ilerien Phoenix
*  Begin           : 22.03.2008
*  Copyright       : © 2008 Gem of The North Group (SM)
*  E-mail          : ilerienphoenix@gmail.com
*
*      ----------------------------------------
*      onDisturbed script for tables
*
**************************************************
*******/

/*
теги:
вейпоинтов - "PLACE_<тег стола>_<номер вейпоинта, начиная с 1>"
создаваемых плейсеблов - "PLC_<тег стола>_<номер вейпоинта>"

ресреф плейсебла - "plc_<ресреф итема>"

у столов должны быть уникальные теги
*/


const string sItemPlaceableMatch = "oItemPlaceableMatch";
const string sNoPlace = "На столе нет свободного места";

object SearchForFreePlace(object oTable);
void CreatePlaceableByItem(object oPlace, object oItem);
void DestroyPlaceable(object oItem);
string GetPlaceableTagByPlace(object oPlace);


void main()
{
    object oItem = GetInventoryDisturbItem();
    int nType = GetInventoryDisturbType();
    object oPC = GetLastDisturbed();
    object oTable = OBJECT_SELF;
    object oPlace = SearchForFreePlace(oTable);

    switch(nType)
    {
        case INVENTORY_DISTURB_TYPE_ADDED:
        {
            if(GetIsObjectValid(oPlace))
                CreatePlaceableByItem(oPlace, oItem);
            else
            {
                CopyItem(oItem, oPC, TRUE);
                DestroyObject(oItem);
                SendMessageToPC(oPC, sNoPlace);
            }
            break;
        }
        case INVENTORY_DISTURB_TYPE_STOLEN:
        case INVENTORY_DISTURB_TYPE_REMOVED:
            DestroyPlaceable(oItem);
    }
}

object SearchForFreePlace(object oTable)
{
    if(!GetIsObjectValid(oTable))
        return OBJECT_INVALID;

    //теги вейпоинтов "PLACE_<тег стола>_<номер вейпоинта, начиная с 1>"
    string sTag = GetTag(oTable);
    string sPlaceTag = "PLACE_" + sTag + "_";
    int i;
    object oPlace;

    for(i = 1; TRUE; i++)
    {
        oPlace = GetWaypointByTag(sPlaceTag + IntToString(i));
        if(!GetIsObjectValid(oPlace))
            return OBJECT_INVALID;
        if(!GetIsObjectValid(GetObjectByTag(GetPlaceableTagB
yPlace(oPlace))))
            return oPlace;
    }

    return OBJECT_INVALID;
}

void CreatePlaceableByItem(object oPlace, object oItem)
{
    if(!GetIsObjectValid(oPlace) || !GetIsObjectValid(oItem))
        return;

    //ресреф плейса получается по ресрефу итема добавлением "plc_"
    string sResRef = "plc_" + GetResRef(oItem);
    location lLoc = GetLocation(oPlace);
    object oPlaceable = CreateObject(OBJECT_TYPE_PLACEABLE, sResRef, lLoc, FALSE, GetPlaceableTagByPlace(oPlace));
    SetPlotFlag(oPlaceable, TRUE);
    SetLocalObject(oItem, sItemPlaceableMatch, oPlaceable);
}

void DestroyPlaceable(object oItem)
{
    if(!GetIsObjectValid(oItem))
        return;

    object oPlaceable = GetLocalObject(oItem, sItemPlaceableMatch);
    SetPlotFlag(oPlaceable, FALSE);
    DestroyObject(oPlaceable);
    DeleteLocalObject(oItem, sItemPlaceableMatch);
}


string GetPlaceableTagByPlace(object oPlace)
{
    string sPlaceTag = GetTag(oPlace);
    return "PLC_" + GetStringRight(sPlaceTag, GetStringLength(sPlaceTag) - 6);
}