// Moubootaur Legends Script
// Author:
// Jesusalva
// Description:
// Guild House & Warps
033-1,134,79,0 script #GDoor NPC_NO_SPRITE,0,0,{
end;
OnTouch:
if (getcharid(2) < 1) {
dispbottom l("You do not belong to a guild.");
end;
}
// Warp you to your guild house if exist.
// Build the instance otherwise.
// Well, "checking if instance exist by mapname" is an illusion.
// So we try to build and if we fail, we warp the player to the instance.
.@ID=getcharid(2);
@MAP_NAME$="guild@"+str(.@ID); // Max 4 chars for map name
.@INSTID = instance_create("guilds@a"+(.@ID), getcharid(2), IOT_GUILD);
// Instance already exists - .@INSTID returns "-4"
if (.@INSTID == -4) {
warp @MAP_NAME$, any(34,35), 48;
end;
}
.@instanceMapName$ = instance_attachmap("guilds", .@INSTID, 0, @MAP_NAME$);
instance_set_timeout(0, 0, .@INSTID);
instance_init(.@INSTID);
warp @MAP_NAME$, any(34,35), 48;
end;
}
function script SetPorthosPortal {
.@id = getarg(0);
mesn l("Portal %02d", .@id);
switch (.@id) {
case 6:
mesc l("Event: Moubootaur Showdown"), 1; break;
case 7:
mesc l("Warp: TMW Classic"), 1; close;
case 8:
mesc l("Event: Blanc's Showdown"), 1; break;
case 9:
mesc l("Warp: TMW ML"), 1; close;
default:
mesc l("This portal has not been coded yet."); close;
}
next;
mes l("Do you want to activate the event?");
if (askyesno() == ASK_NO) close;
switch (.@id) {
case 6:
setd(sprintf("$@EVENT_%02d", .@id), PORTHOS_ACTIVE);
setd(sprintf("$@EVENT_%02d_M$", .@id), "001-13-2");
setd(sprintf("$@EVENT_%02d_X", .@id), 47);
setd(sprintf("$@EVENT_%02d_Y", .@id), 52);
break;
case 8:
// Clean-up 001-3 in case there are already mobs there
killmonsterall("001-3");
// Environment Monsters, they do not respawn
.@m$="001-3";
// Thematic mobs
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Thug), Thug, 150);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Swashbuckler), Swashbuckler, 150);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Grenadier), Grenadier, 140);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, OceanPirate), OceanPirate, 100);
// There's `Marley` but they're listed as boss
// We'll likely use them in the mazes, as your target?
// Environment runt
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, DeathCat), DeathCat, 100);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, BlackSlime), BlackSlime, 90);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, SmallFrog), SmallFrog, 80);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, BigFrog), BigFrog, 80);
// The lower tier
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, WickedMushroom), WickedMushroom, 50);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Forain), Forain, 50);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Assassin), Assassin, 50);
// The mid tier
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, HoodedNinja), HoodedNinja, 30);
// The high tier
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, BlackSlimeMother), BlackSlimeMother, 10);
// The boss level spawns
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Reaper), Reaper, 2);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, NightmareDragon), NightmareDragon, 2);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Mandragora), Mandragora, 1);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, SiegeTower), SiegeTower, 1);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, Golem), Golem, 2);
areamonster(.@m$, 20, 20, getmapinfo(MAPINFO_SIZE_X, .@m$), getmapinfo(MAPINFO_SIZE_Y, .@m$), strmobinfo(1, ShadowTortuga), ShadowTortuga, 1);
// Set everything up
setd(sprintf("$@EVENT_%02d", .@id), PORTHOS_ACTIVE);
setd(sprintf("$@EVENT_%02d_M$", .@id), "001-3");
setd(sprintf("$@EVENT_%02d_X", .@id), 164);
setd(sprintf("$@EVENT_%02d_Y", .@id), 33);
kamibroadcast("Blanc's Showdown was enabled.");
break;
default:
mes l("Error.");
break;
}
close;
return;
}
// Shortcut to TMW Classic?
033-1,85,227,0 script #Porthos07 NPC_NO_SPRITE,0,0,{
end;
OnTouch:
slide 85, 228;
mes l("Do you want to visit The Mana World: Classic?");
next;
if (askyesno() == ASK_YES)
MirrorLakeSendTo(MLP_TMW, 0);
closeclientdialog;
end;
}
// Event: Blanc's Manhunt
033-1,72,190,0 script #Porthos08 NPC_NO_SPRITE,0,0,{
end;
OnTouch:
if ($@EVENT_06 == PORTHOS_BUSY) {
dispbottom l("This portal is currently busy - an event must be in progress.");
end;
}
// 001-3 portals
if ($@EVENT_08 == PORTHOS_UNUSED) {
if (is_admin() || is_master())
SetPorthosPortal(8);
dispbottom l("This portal is not currently active.");
end;
}
warp $@EVENT_08_M$, $@EVENT_08_X, $@EVENT_08_Y;
end;
}
// Shortcut to Moubootaur Legends?
033-1,31,155,0 script #Porthos09 NPC_NO_SPRITE,0,0,{
end;
OnTouch:
slide 31, 156;
mes l("Do you want to visit The Mana World: Moubootaur Legends?");
next;
if (askyesno() == ASK_YES)
MirrorLakeSendTo(MLP_ML, 0);
closeclientdialog;
end;
}
// TODO: Event: Zax De'Kagen Showdown
// Event: Moubootaur Showdown
// This is a draft in npc/config/events.txt
033-1,154,238,0 script #Porthos06 NPC_NO_SPRITE,0,0,{
end;
OnTouch:
if ($@EVENT_06 == PORTHOS_BUSY) {
dispbottom l("This portal is currently busy - an event must be in progress.");
end;
}
if ($@EVENT_06 == PORTHOS_UNUSED) {
if (is_admin() || is_master())
SetPorthosPortal(6);
dispbottom l("This portal is not currently active.");
end;
}
warp $@EVENT_06_M$, $@EVENT_06_X, $@EVENT_06_Y;
end;
}