// Peter quest debug
// Author:
//    gumi
//    jesusalva
// Notes:
//    Using l() usually is not a good idea (translating debug text? What?)

function	script	QuestDebug3	{
    do
    {
        clear;
        setnpcdialogtitle l("Quest debug");
        mes "ShipQuests_Peter";
        mes "---";
        mes l("Quest state: @@", getq(ShipQuests_Peter));
        mes l("Killed mob bitmask: @@", getq2(ShipQuests_Peter));
        mes l("Instance ID: @@", getq3(ShipQuests_Peter));
        next;

        .@q=getq(ShipQuests_Peter);

        GenericQuestDebug ShipQuests_Peter,
            l("Does not have the quest"), 0,
            l("Peter needs help"), 1,
            l("Toggle Tortuga Bounty"), .@q^2,
            l("Toggle Ratto Bounty"), .@q^4,
            l("Toggle Croc Bounty"), .@q^8,
            l("Quest complete"), 15;

        if (@menuret < 0)
        {
            return;
        }

    } while (1);
}