// TMW2 Script modified by Jesusalva
// Evol scripts.
// Authors:
//    4144
//    gumi
//    omatt
//    Reid
// Description:
//    A box with clothes for new players.
// Variable:
//    ShipQuests_Arpan
// Values:
//    1   Talked to Arpan and needs to get clothes.
//    2   Has the clothes.

000-0-0,36,34,0	script	Chest#002-1	NPC_CHEST_BIG,2,4,{

    .@questState = getq(ShipQuests_Arpan);

    if (.@questState == 0) {
        npctalk3 l("You should talk to Magic Arpan first.");
        end;
    }

    if (.busy == false)
    {
        if (.@questState == 1) {
            inventoryplace CreasedShirt, 2;
            setq1 ShipQuests_Arpan, 2;
            getitem CreasedShirt, 1;
            getitem CreasedShorts, 1;
            npctalk3 l("You take the clothes from the chest.");
        }

        specialeffect(.dir == 0 ? 24 : 25, AREA, getnpcid()); // closed ? opening : closing
        .dir = .dir == 0 ? 2 : 6; // closed ? opening : closing
        .busy = true; // lock the animation
        initnpctimer;
    }
    end;

OnTimer220:
    .dir = .dir == 6 ? 0 : 4; // closing ? closed : open
    end;

OnTimer500:
    .busy = false; // unlock

    if (.dir == 0) {
        stopnpctimer; // stop here if the chest is closed
    }
    end;

OnUnTouch:
    if (getareausers(.x - 2, .y - 4, .x + 2, .y + 6) > 0 || .dir == 0) {
        end;
    }
OnTimer30000:
    .busy = true;
    .dir = 6; // closing
    specialeffect(25, AREA, getnpcid()); // closing
    setnpctimer 0;
OnTouch:
    end;

OnInit:
    .distance = 3;
    end;
}