From bacedfe5c2fc5ea43c772939e03f2008468e5748 Mon Sep 17 00:00:00 2001
From: koopa <brad@xeryax.com>
Date: Tue, 1 Mar 2022 18:23:49 -0500
Subject: [PATCH] Create GenieHunt_Script.xml

Initial Commit
---
 GenieHunt_Script.xml | 203 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 203 insertions(+)
 create mode 100644 GenieHunt_Script.xml

diff --git a/GenieHunt_Script.xml b/GenieHunt_Script.xml
new file mode 100644
index 0000000..10d3b64
--- /dev/null
+++ b/GenieHunt_Script.xml
@@ -0,0 +1,203 @@
+<?xml version="1.0" encoding="iso-8859-1"?>
+<!DOCTYPE muclient>
+<!-- Saved on Thursday, December 29, 2016, 11:46 PM -->
+<!-- MuClient version 0.00 -->
+<muclient>
+<plugin
+   name="GenieMazeDirections"
+   author="Icecool"
+   id="0e47ad0db65663674f9d3d13"
+   language="Lua"
+   purpose="Does the hunting to find the directions for the Genie Maze"
+   date_written="2017-08-03 00:00:00"
+   save_state="y"
+   requires="0.00"
+   version="1.00"
+   >
+
+</plugin>
+
+<aliases>
+	<alias
+		script="aliasHuntFirstSand"
+		match="sandhunt"
+		name="aliasSandHunt"
+		keep_evaluating="y"
+		enabled="y"
+		regexp="n"
+		send_to="12"
+		sequence="100">
+	</alias>
+</aliases>
+
+<triggers>
+		<trigger
+			name="triggerHunt1Sand"
+			enabled="n"
+			group="triggerGenieHunt"
+			script="triggerProcessHunt"
+			match="^You are certain that blizzard of sand is (?<dir>\w+) from here.$"
+			omit_from_output="y"
+			regexp="y"
+			sequence="100"
+		>
+		</trigger>
+		<trigger
+			name="triggerHunt3Sand"
+			enabled="n"
+			group="triggerGenieHunt"
+			script="triggerProcessHunt"
+			match="^You are certain that blizzard of sand is (?<dir>\w+) from here.$"
+			omit_from_output="y"
+			regexp="y"
+			sequence="100"
+		>
+		</trigger>
+		<trigger
+			name="triggerHunt5Sand"
+			enabled="n"
+			group="triggerGenieHunt"
+			script="triggerProcessHunt"
+			match="^You are certain that blizzard of sand is (?<dir>\w+) from here.$"
+			omit_from_output="y"
+			regexp="y"
+			sequence="100"
+		>
+		</trigger>
+		<trigger
+			name="triggerHunt7Sand"
+			enabled="n"
+			group="triggerGenieHunt"
+			script="triggerProcessHunt"
+			match="^You are certain that blizzard of sand is (?<dir>\w+) from here.$"
+			omit_from_output="y"
+			regexp="y"
+			sequence="100"
+		>
+		</trigger>
+		<trigger
+			name="triggerHunt9Sand"
+			enabled="n"
+			group="triggerGenieHunt"
+			script="triggerProcessHunt"
+			match="^You are certain that blizzard of sand is (?<dir>\w+) from here.$"
+			omit_from_output="y"
+			regexp="y"
+			sequence="100"
+		>
+		</trigger>
+		<trigger
+			name="triggerHunt11Sand"
+			enabled="n"
+			group="triggerGenieHunt"
+			script="triggerProcessHunt"
+			match="^You are certain that blizzard of sand is (?<dir>\w+) from here.$"
+			omit_from_output="y"
+			regexp="y"
+			sequence="100"
+		>
+		</trigger>
+</triggers>
+
+<!--  Get our standard constants -->
+
+<include name="constants.lua"/>
+
+<!--  Script  -->
+<script>
+<![CDATA[
+-- Initialize the GenieHunt table
+function initializeGenieHunt()
+  GenieHunt = { }
+    GenieHunt.OneSand = ""
+    GenieHunt.ThreeSand = ""
+    GenieHunt.FiveSand = ""
+    GenieHunt.SevenSand = ""
+    GenieHunt.NineSand = ""
+    GenieHunt.ElevenSand = ""
+end
+
+-- Begin the hunting of the first sand which includes initializing the table/etc
+function aliasHuntFirstSand()
+    initializeGenieHunt()
+    functionHuntSand(1)
+end
+
+-- Process the Hunt Triggers
+function triggerProcessHunt(name, line, arg)
+    if name == "triggerHunt1Sand" then
+        EnableTrigger("triggerHunt1Sand", false )
+        GenieHunt.OneSand = arg.dir:upper()
+        ColourNote( "gray", "black", "[", "white", "black", "GenieHunt", "gray", "black", "]:", "lightskyblue", "black", "GenieHunt.OneSand is set to ", "red", "black", GenieHunt.OneSand )
+        functionHuntSand(3)
+    elseif name == "triggerHunt3Sand" then
+        EnableTrigger("triggerHunt3Sand", false )
+        GenieHunt.ThreeSand = arg.dir:upper()
+        ColourNote( "gray", "black", "[", "white", "black", "GenieHunt", "gray", "black", "]:", "lightskyblue", "black", "GenieHunt.ThreeSand is set to ", "red", "black", GenieHunt.ThreeSand )
+        functionHuntSand(5)
+    elseif name == "triggerHunt5Sand" then
+        EnableTrigger("triggerHunt5Sand", false )
+        GenieHunt.FiveSand = arg.dir:upper()
+        ColourNote( "gray", "black", "[", "white", "black", "GenieHunt", "gray", "black", "]:", "lightskyblue", "black", "GenieHunt.FiveSand is set to ", "red", "black", GenieHunt.FiveSand )
+        functionHuntSand(7)
+    elseif name == "triggerHunt7Sand" then
+        EnableTrigger("triggerHunt7Sand", false )
+        GenieHunt.SevenSand = arg.dir:upper()
+        ColourNote( "gray", "black", "[", "white", "black", "GenieHunt", "gray", "black", "]:", "lightskyblue", "black", "GenieHunt.SevenSand is set to ", "red", "black", GenieHunt.SevenSand )
+        functionHuntSand(9)
+    elseif name == "triggerHunt9Sand" then
+        EnableTrigger("triggerHunt9Sand", false )
+        GenieHunt.NineSand = arg.dir:upper()
+        ColourNote( "gray", "black", "[", "white", "black", "GenieHunt", "gray", "black", "]:", "lightskyblue", "black", "GenieHunt.NineSand is set to ", "red", "black", GenieHunt.NineSand )
+        functionHuntSand(11)
+    elseif name == "triggerHunt11Sand" then
+        EnableTrigger("triggerHunt11Sand", false )
+        GenieHunt.ElevenSand = arg.dir:upper()
+        ColourNote( "gray", "black", "[", "white", "black", "GenieHunt", "gray", "black", "]:", "lightskyblue", "black", "GenieHunt.ElevenSand is set to ", "red", "black", GenieHunt.ElevenSand )
+        functionPrintLoop()
+    end
+end
+
+-- Handle activating and hunting the correct Sand
+function functionHuntSand(hnumber)
+    if hnumber == 1 then
+        SendNoEcho( "hunt 1.sand noportal")
+        EnableTrigger("triggerHunt1Sand", true )
+    elseif hnumber == 3 then
+        SendNoEcho( "hunt 3.sand noportal")
+        EnableTrigger("triggerHunt3Sand", true )
+    elseif hnumber == 5 then
+        SendNoEcho( "hunt 5.sand noportal")
+        EnableTrigger("triggerHunt5Sand", true )
+    elseif hnumber == 7 then
+        SendNoEcho( "hunt 7.sand noportal")
+        EnableTrigger("triggerHunt7Sand", true )
+    elseif hnumber == 9 then
+        SendNoEcho( "hunt 9.sand noportal")
+        EnableTrigger("triggerHunt9Sand", true )
+    elseif hnumber == 11 then
+        SendNoEcho( "hunt 11.sand noportal")
+        EnableTrigger("triggerHunt11Sand", true )
+    end
+end
+
+function functionPrintLoop()
+    if GenieHunt.OneSand == "EAST" and GenieHunt.ThreeSand == "EAST" and GenieHunt.FiveSand == "EAST" then
+        SendNoEcho( "gt @D[@MGenie@D] @C>> @GLoop 1 is here. @C<<@w" )
+    elseif GenieHunt.ThreeSand == "EAST" and GenieHunt.FiveSand == "EAST" and GenieHunt.SevenSand == "EAST" then
+        SendNoEcho( "gt @D[@MGenie@D] @C>> @GLoop 2 is here. @C<<@w" )
+    elseif GenieHunt.FiveSand == "EAST" and GenieHunt.SevenSand == "EAST" and GenieHunt.NineSand == "EAST" then
+        SendNoEcho( "gt @D[@MGenie@D] @C>> @GLoop 3 is here. @C<<@w" )
+    elseif GenieHunt.SevenSand == "EAST" and GenieHunt.NineSand == "EAST" and GenieHunt.ElevenSand == "EAST" then
+        SendNoEcho( "gt @D[@MGenie@D] @C>> @GLoop 4 is here. @C<<@w" )
+    elseif GenieHunt.OneSand == "EAST" and GenieHunt.NineSand == "EAST" and GenieHunt.ElevenSand == "EAST" then
+        SendNoEcho( "gt @D[@MGenie@D] @C>> @GLoop 5 is here. @C<<@w" )
+    elseif GenieHunt.OneSand == "EAST" and GenieHunt.ThreeSand == "EAST" and GenieHunt.ElevenSand == "EAST" then
+       SendNoEcho( "gt @D[@MGenie@D] @C>> @GTrap Loop is here. @C<<@w" )
+    end
+end
+
+]]>
+
+</script>
+</muclient>
\ No newline at end of file