[nightsta69]

here is everything to make the guild hall teleporter work. its not full, as I took out some things for my server. but you can add those with a little research, and PEQ editor

spawn2 table

INSERT INTO `spawn2` VALUES ('72045', '80016', 'guildhall', '0', '-128.100006', '-25.500000', '3.100000', '81.000000', '0', 

'0', '0', '0', '1', '1');
INSERT INTO `spawn2` VALUES ('57311', '46047', 'guildhall', '0', '-102.800003', '-70.800003', '7.100000', '30.299999', '0', 

'0', '0', '0', '1', '1');

merchantlist table

INSERT INTO `merchantlist` VALUES ('345000', '10', '10092');
INSERT INTO `merchantlist` VALUES ('345000', '5', '10094');
INSERT INTO `merchantlist` VALUES ('345000', '1', '49803');
INSERT INTO `merchantlist` VALUES ('345000', '13', '76000');
INSERT INTO `merchantlist` VALUES ('345000', '12', '76001');
INSERT INTO `merchantlist` VALUES ('345000', '15', '76002');
INSERT INTO `merchantlist` VALUES ('345000', '17', '76003');
INSERT INTO `merchantlist` VALUES ('345000', '8', '76004');
INSERT INTO `merchantlist` VALUES ('345000', '19', '76005');
INSERT INTO `merchantlist` VALUES ('345000', '9', '76006');
INSERT INTO `merchantlist` VALUES ('345000', '22', '76007');
INSERT INTO `merchantlist` VALUES ('345000', '18', '76009');
INSERT INTO `merchantlist` VALUES ('345000', '16', '76010');
INSERT INTO `merchantlist` VALUES ('345000', '4', '76011');
INSERT INTO `merchantlist` VALUES ('345000', '7', '76012');
INSERT INTO `merchantlist` VALUES ('345000', '14', '88738');
INSERT INTO `merchantlist` VALUES ('345000', '3', '88739');

npc_type table

INSERT INTO `npc_types` VALUES ('345004', 'Zeflmin_Werlikanin', 'Portal Crystals', '50', '12', '41', '1', '3750', '0', 

'15', '47', '3', '19', '19', '0', '345000', '0', '0', '0', '0', '74', '200', '', '55', '0', '0', '0', '0', '0', '0', '0', 

'0', '0', '0', '0', '0', '0', '0', '0', '0', '1.7', '41', '41', '41', '41', '41', '0', '1', '1', '1197', '0', '1', '-15', 

'1', '191', '191', '191', '191', '191', '191', '191', '0', '0', '1', '0', '1', '0', '0', '0', '0', '0', '100', '0', '0');

INSERT INTO `npc_types` VALUES ('345005', 'guildhall_portal_trigger', null, '1', '240', '1', '11', '0', '2', '0', '0', '-

1', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', 'UMCNIDABfWOHgd', '70', '0', '1', '1', '1', '1', '0', '0', '0', '0', 

'0', '0', '0', '0', '0', '0', '0', '1.25', '79', '79', '79', '79', '79', '1', '1', '1', '0', '0', '0', '0', '0', '79', 

'79', '79', '79', '79', '79', '79', '1', '1', '1', '0', '1', '0', '0', '0', '0', '1', '100', '0', '0');

spawngroup table

INSERT INTO `spawngroup` VALUES ('80016', 'guildhall_80016', '0', '0', '0', '0', '0', '0', '0');
INSERT INTO `spawngroup` VALUES ('46047', 'guildhall3450004', '0', '0', '0', '0', '0', '0', '0');

zeflmin_werlikanin.pl

sub EVENT_SAY {
	if ($text=~ /Hail/i) {
		quest::say("Zeflmin Werlikanin says 'Hello $name. Come to take a look at the crystal geode? The geode has some very strong magic inside of it that can help you. I can bring out the magic of the geode for you, but a gnome has to make a living! Even if he's stuck in this little hole in the wall all the time. Not that I'm bitter. Each of the crystals I sell is linked to a location in our world. If you give me one of the crystals I can focus the geode to let you and your companions travel there in the blink of an eye!'");
	}
}
sub EVENT_ITEM {
	my @itemlist = (10092,10094,64191,76000,76001,76002,76003,76004,76005,76006,76007,76009,76010,76011,76012,76070,88735,88736,88737,88738,88739);
	foreach my $curitem (@itemlist) {
       if($curitem == $item1) {
			quest::setglobal($uguild_id."portal",$item1,7,"F");
			quest::emote("takes the crystal from you and mutters some arcane words over it.");
			quest::say("'The crystal geode is now active, just go step on the crystal platform and you'll be whisked away to your destination! I hope you don't get motion sickness!'");
			return;
	   }
	}
plugin::return_items(\%itemcount);
}

guildhall_portal_trigger.pl

sub EVENT_SPAWN {
	my $x = $npc->GetX();
	my $y = $npc->GetY();
	my $range = 10;
	quest::set_proximity($x - $range, $x + $range, $y - $range, $y + $range);

}
sub EVENT_ENTER {
	if(defined($qglobals{$uguild_id."portal"})) {
		quest::say("portal defined");
		quest::say("trying to port now");
		if(($qglobals{$uguild_id."portal"}) == 10092) {
			quest::movepc(76,-353.08,-374.8,3.75);
		}
		if(($qglobals{$uguild_id."portal"}) == 10094) {
			quest::movepc(71,542.45,1384.6,-650);
		}
		if(($qglobals{$uguild_id."portal"}) == 76000) {
			quest::movepc(13,-382,-284,-7);
		}
		if(($qglobals{$uguild_id."portal"}) == 76001) {
			quest::movepc(21,-1334.24,209.57,-51.47);
		}
		if(($qglobals{$uguild_id."portal"}) == 76002) {
			quest::movepc(27,-64,262,-93.96);
		}
		if(($qglobals{$uguild_id."portal"}) == 76003) {
			quest::movepc(38,0,0,66.6);
		}
		if(($qglobals{$uguild_id."portal"}) == 76004) {
			quest::movepc(54,10,-20,0);
		}
		if(($qglobals{$uguild_id."portal"}) == 76005) {
			quest::movepc(86,9565.05,2806.4,1045.2);
		}
		if(($qglobals{$uguild_id."portal"}) == 76006) {
			quest::movepc(110,340,5330,-17);
		}
		if(($qglobals{$uguild_id."portal"}) == 76007) {
			quest::movepc(117,895,-939,318);
		}
		if(($qglobals{$uguild_id."portal"}) == 76009) {
			quest::movepc(170,-1858,-420,-10);
		}
		if(($qglobals{$uguild_id."portal"}) == 76010) {
			quest::movepc(100,-1643.01,-3427.84,-6.57);
		}
		if(($qglobals{$uguild_id."portal"}) == 76011) {
			quest::movepc(300,-1461,-2263,-69);
		}
		if(($qglobals{$uguild_id."portal"}) == 76012) {
			quest::movepc(283,590,-1457,-123);
		}
		if(($qglobals{$uguild_id."portal"}) == 88738) {
			quest::movepc(160,-545,645,1);
		}
		if(($qglobals{$uguild_id."portal"}) == 88739) {
			quest::movepc(219,-37,-110,7.95);
		}
	}
}

enjoy!