PDA

View Full Version : LDON Magus Transporters


zergling
06-19-2009, 04:22 PM
My players have made several requests to be able to get to the Abysmal Sea for spells, so I decided to work on getting the LDON Maguses working.

Its been several years since I played on live, so the verbiage is probably off.
Still need to work on the locations as well, for now I just incremented all of the x/y/z locations of the maguses by 1.

Im using the zone safe point for north ro, since I can't seem to find the magus in the spawn2 table i have available here at work (its a somewhat hacked together version)

This is my first foray into quest writing and its still a work in progress but figured it couldn't hurt to put it up here in case someone remembered the details better.

Remember to enable Abysmal Sea for all players with
UPDATE zone SET min_status = '0' WHERE short_name = 'abysmal' LIMIT 1 ;

The Maguses are:
Magus Arindri - North Ro - 34129
Magus Jerira - South Ro - 35066
Magus Delin - Everfrost Peaks - 30088
Magus Zeir - Commonlands - 22114
Magus Tira - Butcherblock - 68133
Magus Pellen - Abysmal Sea - 279217


sub EVENT_SAY
{
if ($text =~/Hail/i)
{
quest::say ("Hello, $name. If you would like, I can send you to The [Abysmal] Sea, The [Butcher]block Mountains, The [Everfrost] Peaks, [North] Ro, [South] Ro, or the Eastern [Common]lands.");
}
if ($text =~/abysmal/i)
{
quest::say ("Off you go!");
$client->Message(6, "The Magus casts a spell to send you to The Abysmal Sea.");
quest::movepc(279, 63.000000, -149.000000, 140.002914);
}
if ($text =~/butcher/i)
{
quest::say ("Off you go!");
$client->Message(6, "The Magus casts a spell to send you to The Butcherblock Mountains.");
quest::movepc(68, -2462.000000, -1075.000000, -0.500000);
}
if ($text =~/everfrost/i)
{
quest::say ("Off you go!");
$client->Message(6, "The Magus casts a spell to send you to The Everfrost Peaks.");
quest::movepc(30, -5027.000000, 1799.000000, -59.130001);
}
if ($text =~/north/i)
{
quest::say ("Off you go!");
$client->Message(6, "The Magus casts a spell to send you to The Northern Desert of Ro.");
quest::movepc(34, 299.12,3537.9,-24.5);
}
if ($text =~/south/i)
{
quest::say ("Off you go!");
$client->Message(6, "The Magus casts a spell to send you to The Southern Desert of Ro.");
quest::movepc(35, 1064.000000, -1477.000000, -22.629999);
}
if ($text =~/common/i)
{
quest::say ("Off you go!");
$client->Message(6, "The Magus casts a spell to send you to The Eastern Commonlands.");
quest::movepc(22, -185.000000, -1615.000000, 4.750000);
}
}

Any input or corrections anyone might have are welcome!

cavedude
06-19-2009, 05:04 PM
The Magus stuff is in PEQ SVN, and it has the proper text already in if you wanna "borrow" it.

zergling
06-19-2009, 06:19 PM
Weird, maybe the installer I'm using just didn't have the latest version.

Thanks for the heads up. This can be deleted, sorry to clog up the boards.

joligario
06-19-2009, 09:04 PM
It's all good. I just wrote the files recently, so that is why you didn't see them. Initially I was using the movepc(), but we decided to use the selfcast() instead.