MQEmulator.net • -

Nitram_Anizok.pl - Quest File

General Info

Quest File

# items: 9426, 9295, 9434
	my $walking = 0;
	my $won = 0;

sub EVENT_SPAWN {
	if($entity_list->IsMobSpawnedByNpcTypeID(206067)) {
		quest::depop(206067); #real Xanamech
	}
	if(!$entity_list->IsMobSpawnedByNpcTypeID(206068)) {
		quest::spawn2(206068,0,0,-735,1580,-50,251.6); #fake Xanamech
	}
}

sub EVENT_SAY {
	if($walking == 0) {
		if($text=~/Hail/i) {
			quest::say("Oh my hello! It has been such a long time since I have had visitors. Have you come to learn of [" . quest::saylink("advanced tinkering") . "] as well?");
		} elsif($text=~/advanced tinkering/i) {
			quest::say("Aye, I advanced to this plane due to my work on tinkering back in Ak`Anon. A grand city it is, but my abilities were compromised with the materials I had to work with there. My body and soul has come to rest here, forever coming up with new ideas. You should be aware though that this plane is not how it was when I arrived. Much [" . quest::saylink("construction") . "] has taken place.");
		} elsif($text=~/construction/i) {
			quest::say("When I first arrived I started creating smaller things. As time went on my inventions became more and more focused and impressive. I started building steam powered clockwork to help me gather materials. I had gone too far giving them the ability to learn and with a built in desire of self perpetuation. They began to integrate themselves with the clockwork that already existed within the factory that you can see if you step outside.");
			quest::say("I once worked within the factory with a kind and fair gnome, Meldrath. Now that he has gone missing the clockworks seem to be working towards a more devious goal. The clockwork out here in the junkyard have been discarded due to their malfunction or replacement by a more efficient series. Needless to say their [" . quest::saylink("instinct for survival") . "] has not been lost.");
		} elsif($text=~/instinct for survival/i) {
			quest::say("The clockwork have become increasingly aggressive because of their desperation for spare parts. I have to defend myself anytime I head out to find parts for my tinkering. I fear for my safety with what is being built in the factory. I have started to build myself my own means of defense. It is nearly completed but I need an odd combination of [" . quest::saylink("batteries") . "] to start it up. I should have planned more carefully for it to use simple mana batteries.");
		} elsif($text=~/combination of batteries/i) {
			quest::say("Well you see when I was back home it was common for me to use a mycological spore extricate-kinetoconvertor to power my devices. I started planning my defense to use this as a power source out of sheer habit. Here in this desolation the mushrooms that were grown back home do not exist. I am going to have to rig something from spare parts. It is taking a long time with my having to search the junkyard small portions at a time due to the clockworks. Would you help me in [" . quest::saylink("collecting materials") . "]?");
		} elsif($text=~/collecting materials/i) {
			quest::say("Let us see here. I have some of the base parts for the power source. If you could collect a copper node, a bundle of super conductive wires, and an intact power cell I could power up the machine. Good luck to you $name, I hope that we can work together on this.");
		}
	} elsif($won == 1) {
		if($text=~/Hail/i) {
			quest::setglobal("pop_poi_dragon", 1, 5, "F");
			$client->Message(4,"You receive a character flag!");
		}
	}
}

sub EVENT_ITEM {
	if(plugin::check_handin(\%itemcount, 9426 => 1, 9295 => 1, 9434 => 1)) {
		$walking = 1; #variable to not respond while pathing
		quest::start(23);
		quest::settimer(1,1); #set timer to check for my loc change to EVENT_WAYPOINT_ARRIVE??
	}
}

sub EVENT_TIMER {
	if($timer == 1 && $x == -720 && $y == 1500 && !$entity_list->IsMobSpawnedByNpcTypeID(206067)) {
		quest::spawn2(206067,0,0,-735,1580,-50,251.6); # real Xanamech
		quest::depop(206068); #fake Xanamech
		quest::stoptimer(1);
		quest::settimer(2,1);
		quest::settimer(4,7200); #fail timer
	} elsif($timer == 2 && !$entity_list->IsMobSpawnedByNpcTypeID(206067)) {
		EVENT_WIN();
	} elsif($timer == 3) {
		quest::depop_withtimer();
		$walking = 0;
		$won = 0;
	} elsif($timer == 4) {
		quest::depopall(206067);
		quest::depop_withtimer();
		$walking = 0;
		$won = 0;
	}
}

sub EVENT_DEATH_COMPLETE {
	$walking = 0;
	$won = 0;
}

sub EVENT_WIN {
	$won = 1;
	quest::stoptimer(2);
	quest::settimer(3,600);
}

Source: 17 Jan 2022
Quest Source: 28 May 2022