I miss NoPort

[ghanja]

sub EVENT_SPAWN 
{
	quest::settimer("randomness",120);
}

sub EVENT_TIMER
{
	if ($timer eq "randomness")
	{
		@randomnessarray = ("OP_SendBaseDataChecksum=0x040b","Trouble casting spells? Check OP_SendSpellChecksum=0x46d3","Corpse loot issue? just for grins try this opcode OP_LootComplete=0x528f see if that helps",
							"Not getting your group leader AA's? Try OP_GroupLeadershipAAUpdate=0x0000","AA's not working? give OP_RespondAA=0x0142 a try",
							"want a progression server? here is your new opcode Progression=0x2071","Even Caryatis knows 'Protip: opcodes solve everything.'",
							"cant log in? OP_SessionReady=0x0001 and OP_Login=0x0002 give them a wirl","Note: I used PublicLogin.exe to get..... MOAR OpCodes!",
							"want to change the MOTD? here use this OP_MOTD=0x319d","Want to bypass Akka's installer? Type this in DOS: OP_ApproveWorld=0x669b");
		$npc->Shout ($randomnessarray[quest::ChooseRandom(0..(scalar @randomnessarray - 1))]);
	}
}