// TMW2 scripts.
// Author:
//    Jesusalva
// Description:
//    Fires of Steam: The Death of Andrei Sakar

//////////////////////////////////////////
// Warp Control

// FiresOfSteam_Warp(ID)
function	script	FiresOfSteam_Warp	{
    if ($FIRESOFSTEAM < getarg(0)) {
        dispbottom l("Monsters remaining: %s", fnum(mobcount(getmap(), "all")));
        end;
    }
    if ($FIRESOFSTEAM > getarg(0))
        return true;
    if ($FIRESOFSTEAM_CD > gettimetick(2)) {
        dispbottom l("Time left until warp can be used: %s", FuzzyTime($FIRESOFSTEAM_CD));
        end;
    }
	return false;
}

//////////////////////////////////////////
029-1,147,153,0	script	#291to292	NPC_HIDDEN,1,0,{
    end;
OnTouch:
    if (FiresOfSteam_Warp(2)) goto L_Warp;
    // Additional conditions here
    if ($FIRESOFSTEAM[1] > 0 ||
        $FIRESOFSTEAM[2] > 0 ||
        $FIRESOFSTEAM[3] > 0 ||
        $FIRESOFSTEAM[4] > 0 ||
        $FIRESOFSTEAM[5] > 0) {
            dispbottom l("A magic barrier prevents you from enterering. Maybe it is a good idea to shut down the pentagrams first?");
            end;
    }
    // Fallthrough
L_Warp:
    warp "029-2", 35, 70;
    end;
}

029-2,35,38,0	script	#292to293	NPC_HIDDEN,3,0,{
    end;
OnTouch:
    if (FiresOfSteam_Warp(3)) goto L_Warp;
    // Fallthrough
L_Warp:
    warp "029-3", 25, 68;
    end;
}

029-3,126,99,0	script	#293to294	NPC_HIDDEN,3,0,{
    end;
OnTouch:
    if (FiresOfSteam_Warp(4)) goto L_Warp;
    // Fallthrough
L_Warp:
    warp "029-4", 125, 18;
    end;
}

029-4,21,98,0	script	#294to295	NPC_HIDDEN,3,0,{
    end;
OnTouch:
    if (FiresOfSteam_Warp(5)) goto L_Warp;
    // Fallthrough
L_Warp:
    warp "029-5", 125, 18;
    end;
}

029-5,70,25,0	script	#295to296	NPC_HIDDEN,1,0,{
    end;
OnTouch:
    if (FiresOfSteam_Warp(6)) goto L_Warp;
    // Fallthrough
L_Warp:
    warp "029-6", 134+9, 31;
    end;
}

// 27+9 = 36
029-6,36,90,0	script	Great Tree#296to297	NPC_NO_SPRITE,{
    if (FiresOfSteam_Warp(7)) goto L_Warp;
    // Additional conditions here
    mes l("Apparently, you'll need to use a %s to get this to work!", getitemlink(DruidTreeBranch));
    if (!countitem(DruidTreeBranch)) close;
    next;
    if (askyesno() == ASK_NO) close;
    closeclientdialog;
    delitem DruidTreeBranch, 1;
    // Fallthrough
L_Warp:
    warp "029-7", 96, 121;
    end;

OnInit:
    .distance=3;
    end;
}

029-7,80,49,0	script	Dead Tree#297to298	NPC_NO_SPRITE,{
    if (FiresOfSteam_Warp(8)) goto L_Warp;
    // Additional conditions here (TODO)
    // Fallthrough
L_Warp:
    warp "029-8", 51, 174;
    end;

OnInit:
    .distance=3;
    end;
}

029-8,174,77,0	script	#298to299	NPC_HIDDEN,1,0,{
    end;
OnTouch:
    if (FiresOfSteam_Warp(9)) goto L_Warp;
    // Additional conditions here (TODO)
    // Fallthrough
L_Warp:
    warp "029-9", 96, 48;
    end;
}

029-9	mapflag	zone	MMO