diff --git a/README.md b/README.md
index 78a860e..beda454 100644
--- a/README.md
+++ b/README.md
@@ -1,14 +1,38 @@
-# PK_Alert
-Notify to channel PK alert information.
+# PKAdmin
 
-pkadmin help            :    This menu
+## Usage:
 
-pkadmin alert <yes/no>  :    Turns on/off channel alerts             
+   pkadmin help                :      This menu
 
-pkadmin sound <yes/no>  :    Turns on/off sound alerts               
+   pkadmin alert <yes/no>      :      Turns on/off channel alerts
 
-pkadmin volume <0-100>  :    Sets the play volume for sound          
+   pkadmin sound <yes/no>      :      Turns on/off sound alerts
 
-pkadmin enable          :    Enables the script                      
+   pkadmin volume <0-100>      :      Sets the play volume for sound
 
-pkadmin disable         :    Disables the script
+   pkadmin levelrange <1-100>  :      Set the range of levels displayed in the PK Alert
+
+   pkadmin enable              :      Enables the script
+
+   pkadmin disable             :      Disables the script
+
+   pkgo                        :      "Runto" help your clan mate out
+
+
+## Installation:
+Copy the sound file redalert.wav into your MUSHclient\sounds directory.
+
+Copy the xml file into your MUSHclient\worlds\plugins diretory or a subdirectory.
+Then just install the plugin into MUSHClient and you are ready to go.
+
+Usage
+At the end of the PK alert message is the level of the player being attacked
+and a level range. The level range defaults to plus and minus 10. It can be
+changed to any value with tht epkadmin levelrange command.
+
+When you see a PK Alert from a clan mate, the second line that is displayed
+has a clickable link for the room number. If you have explored the room and all
+necessary cexits are setup you will run directly to the room.
+
+There is also a handy alias pkgo that will again run you to the room of your
+clan mate. It is reset each time the PK alert is displayed on your screen.
diff --git a/pk_alert_with_sound.xml b/pk_alert_with_sound.xml
index 8b4755f..22b9913 100644
--- a/pk_alert_with_sound.xml
+++ b/pk_alert_with_sound.xml
@@ -1,542 +1,592 @@
-<?xml version="1.0" encoding="iso-8859-1"?>
-<!DOCTYPE muclient>
-<!-- Saved on Monday, October 29, 2018, 1:39 PM -->
-<!-- MuClient version 5.06-pre -->
-
-<!-- Plugin "PK Alert Script" generated by Plugin Wizard -->
-
-<muclient>
-<plugin
-   name="PK_Alert"
-   author="Cytan_Method"
-   id="dc7103896128e00c34b21951"
-   language="Lua"
-   purpose="Notify to channel PK alert information."
-   save_state="y"
-   date_written="2018-10-29 13:37:21"
-   version="1.4"
-   >
-<description trim="y">
-<![CDATA[
-Description Here
-]]>
-</description>
-
-</plugin>
-
-
-<!--  Get our standard constants -->
-
-<include name="constants.lua"/>
-
-<!--  Triggers  -->
-
-<triggers>
-
-  <trigger
-	enabled="y"
-	match="^@\w\(@\wGroup@\w\) @\w(?<saveme>.+): '@\w(?<target>\w+).* @\win @x202(?<area>\w+) @\w\[@x202(?<roomnum>\d+)@\w\]'$"
-	regexp="y"
-	sequence="100"
-	script="respondAlert"
-	omit_from_output="n"
-  >
- </trigger>
-
-  <trigger
-   enabled="y"
-   match="^(\w+) disappears!$"
-   regexp="y"
-   sequence="100"
-   script="recalled"
-  >
-</trigger>
-  <trigger
-   enabled="y"
-   match="^You grab hold of (.*?)\'s neck and choke \w+ to unconsciousness\!$"
-   regexp="y"
-   sequence="100"
-   script="sendStrangleAlert"
-  >
-</trigger>
-
-  <trigger
-   enabled="y"
-   match="^(.*?) looks very uncomfortable\.$"
-   regexp="y"
-   sequence="100"
-   script="sendCursedAlert"
-  >
-  </trigger>
-<!--You switch targets and direct your attacks at Ralyn.-->
-<!--** You can take revenge on Yatzi for 15 minutes-->
-  <trigger
-   enabled="y"
-   match="^\*\* For \w+ interference, you can take revenge on (.*?) for 15 minutes\.$"
-   regexp="y"
-   sequence="100"
-   script="sendPkAlert"
-  >
-  </trigger>
-
-  <trigger
-   enabled="y"
-   match="^\*\* You can take revenge on (.*?) for 15 minutes\.$"
-   regexp="y"
-   sequence="100"
-   script="sendPkAlert"
-  >
-  </trigger>
-
- <trigger
-   enabled="y"
-   match="^\*\* (.*?) can now take revenge on you for 15 minutes\.$"
-   regexp="y"
-   sequence="100"
-   script="sendPkAlert"
-  >
-  </trigger>
-
-  <trigger
-   enabled="y"
-   match="^(?<clan>.+?)\s\(.+\)\s+tells the CLAN: 'PK Alert:(?<attacker>.+)\s+in\s+(?<area>.+?)\s+\[(?<roomid>\d+)\]'$"
-   regexp="y"
-   sequence="100"
-   script="outputHyperLink"
-   ignore_case="y"
-   keep_evaluating="y"
-  >
-  </trigger>
-
-</triggers>
-
-<!--  Plugin help  -->
-
-<aliases>
-
-<alias
-  enabled="y"
-  match="pkc *"
-  script="sendPkInfoClan"
-  sequence="100"
->
-  </alias>
-
-  <alias
-    enabled="y"
-    match="pkg *"
-    script="sendPkInfoGroup"
-    sequence="100"
-  >
-    </alias>
-
-	<alias
-    enabled="y"
-    sequence="100"
-    ignore_case="y"
-    regexp="y"
-    keep_evaluating="n"
-	match="^\s*(?:pkadmin|pkadmi|pkadm)\s+(?<Args>.+)?$"
-	script="COMMAND_PKAdmin"
-    >
-    </alias>
-
- 	<alias
-    enabled="y"
-    sequence="100"
-    ignore_case="y"
-    regexp="y"
-    keep_evaluating="n"
-	match="^\s*(?:pkadmin|pkadmi|pkadm(?<Args>))$"
-	script="COMMAND_PKAdmin"
-    >
-    </alias>
-</aliases>
-
-<script>
-<![CDATA[
---									Settings Management
-require 'serialize'
-
-PKASettings = {}
-PKASettings.volume = 100
-PKASettings.alert = 1
-PKASettings.sound = 1
-PKASettings.enabled = 1
-
-function SaveSettings()
-	SetVariable("PKSettings", serialize.save_simple(PKASettings))
-end
-
-function LoadSettings()
-	assert(loadstring("PKASettings = "..GetVariable("PKSettings"))) ()
-end
-]]></script>
-<script>
-<![CDATA[
---									PKAdmin Commands
-dofile (GetInfo(60) .. "aardwolf_colors.lua")
-
-Prepend = "@GPKAdmin: @W"
-
-function cnote(str)
-	AnsiNote(stylesToANSI(ColoursToStyles(str)))
-end
-
--- Turn on the option to have Mushclient Play Sounds while minimized/background
-SetOption ("play_sounds_in_background", 1)
-
-PKAdminCommands = {
-		COMMAND_PKAdmin_Help					= {"help", "hel", "he", "h"},
-        COMMAND_PKAdmin_Alert                   = {"alert", "aler", "ale" },
-		COMMAND_PKAdmin_Enable					= {"enable", "enabl", "enab", "ena", "on"},
-		COMMAND_PKAdmin_Disable					= {"disable", "disabl", "disab", "disa", "off"},
-        COMMAND_PKAdmin_Sound                   = {"sound", "soun", "soun", "sou" },
-        COMMAND_PKAdmin_Status                  = {"status", "statu", "stat" },
-        COMMAND_PKAdmin_Volume                  = {"volume", "volum", "volu", "vol" },
-		COMMAND_PKAdmin_Reset					= {"reset"}
-}
-
-function COMMAND_PKAdmin(name, lines, wildcards)
-	local args, command = {}, nil
-	--split args, set first to "command", default to 'help'
-	for word in string.gmatch(wildcards.Args, "%w+") do table.insert(args, word) end
-	command = args[1]
-	if command then table.remove(args,1) else command = "help" end
-
-	--parse command
-	command = string.lower(command)
-	for func, list in pairs(PKAdminCommands) do
-		for _, item in ipairs(list) do
-			if command == item then
-				return _G[func](args)
-			end
-		end
-	end
-
-	OUTPUT_UnrecognizedCommand()
-end
-
-function COMMAND_PKAdmin_Help()
-	cnote("@GPKAdmin")
-	cnote("@WUsage:")
-	cnote("   @Gpkadmin help                @w:            @WThis menu")
-	cnote("   @Gpkadmin alert <yes/no>      @w:            @WTurns on/off channel alerts             ")
-	cnote("   @Gpkadmin sound <yes/no>      @w:            @WTurns on/off sound alerts               ")
-	cnote("   @Gpkadmin volume <0-100>      @w:            @WSets the play volume for sound          ")
-	cnote("   @Gpkadmin enable              @w:            @WEnables the script                      ")
-	cnote("   @Gpkadmin disable             @w:            @WDisables the script                     ")
-	Note()
-end
-
-function COMMAND_PKAdmin_Enable()
-	cnote(Prepend.."PKAnnouncer is now @Genabled@W.")
-	PKASettings.enabled = 1
-	SaveSettings()
-end
-
-function COMMAND_PKAdmin_Disable()
-	cnote(Prepend.."PKAnnouncer is now @Rdisabled@W.")
-	PKASettings.enabled = 0
-	SaveSettings()
-end
-
-OnOffCommands = {
-	True			=	{"true", "t", "yes", "y"},
-	False           =   {"false", "f", "no", "n"}
-}
-
-function COMMAND_PKAdmin_Alert(args)
-	local enabled, ch = nil
-	if args and args[1] then
-		ch = string.lower(args[1])
-		for enabl, list in pairs(OnOffCommands) do
-			for _, trunc in ipairs(list) do
-				if trunc == ch then
-					enabled = enabl
-					break
-				end
-			end
-			if enabled then break end
-		end
-
-		if not enabled then --didn't understand arg
-			cnote(Prepend.."@R"..args[1].." is not a valid option.")
-			Note()
-			return
-		end
-	end
-
-	if enabled == "True" then
-		PKASettings.alert = 1
-		cnote(Prepend.."@wAlerts to clan channel are now @GEnabled@w.")
-		SaveSettings()
-	elseif enabled == "False" then
-		PKASettings.alert = 0
-		cnote(Prepend.."@wAlerts to clan channel are now @RDisabled@w.")
-		SaveSettings()
-	end
-end
-
-function COMMAND_PKAdmin_Sound(args)
-	local enabled, ch = nil
-	if args and args[1] then
-		ch = string.lower(args[1])
-		for enabl, list in pairs(OnOffCommands) do
-			for _, trunc in ipairs(list) do
-				if trunc == ch then
-					enabled = enabl
-					break
-				end
-			end
-			if enabled then break end
-		end
-
-		if not enabled then --didn't understand arg
-			cnote(Prepend.."@R"..args[1].." is not a valid option.")
-			Note()
-			return
-		end
-	end
-
-	if enabled == "True" then
-		PKASettings.sound = 1
-		cnote(Prepend.."@wSound alerts are now @GEnabled@w.")
-		SaveSettings()
-	elseif enabled == "False" then
-		PKASettings.sound = 0
-		cnote(Prepend.."@wSound alerts are now @RDisabled@w.")
-		SaveSettings()
-	end
-end
-
-function COMMAND_PKAdmin_Volume(args)
-	if not tonumber(args[1]) or (tonumber(args[1]) < 0) or (tonumber(args[1]) > 100) then
-		cnote(Prepend.."@RVolume@w requires a number from 0-100." )
-		Note()
-		return
-	end
-
-	PKASettings.volume = tonumber(args[1])
-	SaveSettings()
-	cnote(Prepend.."@wVolume is now set to @Y"..tonumber(args[1]).."@w.")
-end
-
-function COMMAND_PKAdmin_Status()
-  cnote( "@R+@w-----------------------------------------------------------------------------------------@R+@w" )
-  cnote( " " .. Prepend .. " PKAnnouncer's current status is " .. (PKASettings.enabled == 1 and "@GOn" or "@ROff") .. "@w" )
-  cnote( "@R+@w-----------------------------------------------------------------------------------------@R+@w" )
-  cnote( ("  @x208Channel Alerts :@w %-30.30s " ):format( PKASettings.alert == 1 and "@GOn@w" or "@ROff@w"))
-  cnote( ("  @x208Sound Alerts   :@w %-30.30s " ):format( PKASettings.sound == 1 and "@GOn@w" or "@ROff@w"))
-  cnote( ("  @x208Sound Volume   :@w %-30.0d "  ):format( PKASettings.volume ) )
-  cnote( "@R+@w-----------------------------------------------------------------------------------------@R+@w" )
-  Note()
-end
-
-function COMMAND_PKAdmin_Reset()
-  PKASettings = {}
-  PKASettings.volume = 100
-  PKASettings.alert = 1
-  PKASettings.sound = 1
-  PKASettings.enabled = 1
-  cnote( Prepend.."PKASettings have been reset to defaults." )
-  SaveSettings()
-end
-
-function OUTPUT_UnrecognizedCommand()
-	cnote(Prepend.."Unrecognized command.  Try @Ggadmin help@W for help.")
-	Note()
-end
-
-]]></script>
-
-<script>
-<![CDATA[
-require "gmcphelper"
-
-local area = ""
-local roomid = ""
-local room = ""
-local target = ""
-local ingroup = false
-local chan = "clan "
-local varSoundFile = GetInfo(74) .. "redalert.wav"
-
-GMCPPluginID = "3e7dedbe37e44942dd46d264"
-
-function isEnabled()
-  if PKASettings.enabled == 1 then
-    return true
-  else
-	return false
-  end
-end
-
-function isSoundEnabled()
-  if PKASettings.sound == 1 then
-    return true
-  else
-	return false
-  end
-end
-
-function isAlertEnabled()
-  if PKASettings.alert == 1 then
-    return true
-  else
-	return false
-  end
-
-end
-
-function sendPkInfoClan(name, line, wildcards)
-  if isEnabled() then
-    getRoomInformation()
-	if isAlertEnabled() then
-      SendNoEcho(string.format("cl @W%s@C ENGAGED @Win @x202%s @W[@x202%s@W]",wildcards[1], area, roomid))
-	end
-    target = wildcards[1]
-  end
-end
-
-function recalled(name, line, wildcards)
-  if isEnabled() and isAlertEnabled() then
-    if (ingroup == true) then
-      chan = "gt "
-    else
-      chan = "clan "
-    end
-    if(wildcards[1] == target) then
-      SendNoEcho(string.format(chan .. "@W%s@C Recalled!",wildcards[1], area, roomid))
-    end
-  end
-end
-
-function sendPkInfoGroup(name, line, wildcards)
-  if isEnabled() and isAlertEnabled() then
-    getRoomInformation()
-    SendNoEcho(string.format("gt @W%s@C ENGAGED @Win @x202%s @W[@x202%s@W]",wildcards[1], area, roomid))
-    target = wildcards[1]
-  end
-end
-
-function sendPkAlert(name, line, wildcards)
-  if isEnabled() then
-    if isAlertEnabled() then
-      getRoomInformation()
-
-      if(wildcards[1] ~= nil) then
-        if (ingroup == true) then
-	  	    SendNoEcho(string.format("gt @RPK Alert: @W%s@C @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-	    end
-        SendNoEcho(string.format("cla @RPK Alert: @W%s@C @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-	    target = wildcards[1]
-      else
-	    if (ingroup == true) then
-	      SendNoEcho(string.format("gt @RPK Alert: @W%s@C @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-	    end
-        SendNoEcho(string.format("cla @RPK Alert: @W%s@C @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-	    target = wildcards[1]
-      end
-	end
-
-    --- Give the audio indicator
-    -- Sound( varSoundFile )
-	if isSoundEnabled() then
-      PlaySound( 9, varSoundFile, false, (0-(100-PKASettings.volume)), 0 )
-	end
-  end
-end
-
-function outputHyperLink(name, line, wildcards)
-    if wildcards.roomid ~= nil then
-        ColourTell("red", "", "RPK Alert: ", "goldenrod", "", "I'm getting attacked please help at ",
-               "white", "", "[")
-        Hyperlink("mg "..wildcards.roomid, wildcards.roomid, "Click to run directly to then room Id"..roomid, "orangered", "", 0)
-        ColourNote("White", "", "]!")
-    end
-end
-
-function sendStrangleAlert(name, line, wildcards)
-  if isEnabled() and isAlertEnabled() then
-	getRoomInformation()
-
-	if (ingroup == true) then
-	  chan = "gt "
-    else
-	  chan = "clan "
-    end
-
-    if(wildcards[1] ~= nil) then
-	  Send(string.format(chan .. "@W%s@C STRANGLED @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-	  target = wildcards[1]
-	else
-	  Send(string.format(chan .. "@W%s@C STRANGLED @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-	  target = wildcards[1]
-    end
-  end
-end
-
-function sendCursedAlert(name, line, wildcards)
-  if isEnabled() and isAlertEnabled() then
-    if (ingroup == true) then
-	  chan = "gt "
-    else
-	  chan = "clan "
-    end
-    getRoomInformation()
-    if(wildcards[1] ~= nil) then
-      SendNoEcho(string.format(chan .. "@W%s@C CURSED @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-	  target = wildcards[1]
-    else
-      Send(string.format(chan .. "@W%s@C CURSED @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid))
-      target = wildcards[1]
-    end
-  end
-end
-
-function respondAlert(name, line, wildcards)
-end
-
-function getRoomInformation()
-   if IsConnected() then
-      Send_GMCP_Packet("request room")
-   end
-
-  -- get updated room information
-  gmcproom = gmcp("room")
-  area = gmcproom.info.zone
-  roomid = gmcproom.info.num
-  room = gmcproom.info.name
-end
-
-function OnPluginBroadcast (msg, id, name, text)
-	if id == "3e7dedbe37e44942dd46d264" then
-		if text == "group" then
-			local res, membercount = CallPlugin(GMCPPluginID, "gmcpval", "group.count")
-			if membercount == "" then membercount = 0 end
-			if tonumber(membercount) >= 1 then
-			ingroup = true
-			end
-		end
-	end
-end
-
-function OnPluginInstall()
-    OnPluginEnable()
-end
-function OnPluginEnable()
-  local settings = GetVariable("PKSettings")
-  if settings and settings ~= "" then
-    assert(loadstring("PKASettings = "..GetVariable("PKSettings"))) ()
-  end
-end
-
-
-function OnHelp ()
-  world.Note (world.GetPluginInfo (world.GetPluginID (), 3))
-end
-]]>
-</script>
-
+<?xml version="1.0" encoding="iso-8859-1"?>
+<!DOCTYPE muclient>
+<!-- Saved on Monday, October 29, 2018, 1:39 PM -->
+<!-- MuClient version 5.06-pre -->
+
+<!-- Plugin "PK Alert Script" generated by Plugin Wizard -->
+
+<muclient>
+<plugin
+   name="PK_Alert"
+   author="Cytan_Method"
+   id="dc7103896128e00c34b21951"
+   language="Lua"
+   purpose="Notify to channel PK alert information."
+   save_state="y"
+   date_written="2018-10-29 13:37:21"
+   version="1.6"
+   >
+<description trim="y">
+<![CDATA[
+Description Here
+]]>
+</description>
+
+</plugin>
+
+<!--  Get our standard constants -->
+
+<include name="constants.lua"/>
+
+<!--  Triggers  -->
+
+<triggers>
+  <trigger
+   enabled="y"
+   match="^(\w+) disappears!$"
+   regexp="y"
+   sequence="100"
+   script="recalled"
+  >
+  </trigger>
+  <trigger
+   enabled="y"
+   match="^You grab hold of (.+?)\'s neck and choke \w+ to unconsciousness\!$"
+   regexp="y"
+   sequence="100"
+   script="sendStrangleAlert"
+  >
+  </trigger>
+  <trigger
+   enabled="y"
+   match="^(?<target>\w[\w\s]+) looks very uncomfortable\."
+   regexp="y"
+   sequence="100"
+   script="sendCursedAlert"
+  >
+  </trigger>
+
+<!--You switch targets and direct your attacks at Ralyn.-->
+<!--** You can take revenge on Yatzi for 15 minutes-->
+  <trigger
+   enabled="y"
+   match="^\*\* For \w+ interference, you can take revenge on (.*?) for 15 minutes\.$"
+   regexp="y"
+   sequence="100"
+   script="sendPkAlert"
+  >
+  </trigger>
+
+  <trigger
+   enabled="y"
+   match="^\*\* You can take revenge on (.*?) for 15 minutes\.$"
+   regexp="y"
+   sequence="100"
+   script="sendPkAlert"
+  >
+  </trigger>
+
+ <trigger
+   enabled="y"
+   match="^\*\* (.*?) can now take revenge on you for 15 minutes\.$"
+   regexp="y"
+   sequence="100"
+   script="sendPkAlert"
+  >
+  </trigger>
+
+<!--
+The prefix characters '\' that YOU need to use are to be found in world properties -> scripts and then look at the top right for the characters in Script.
+Room 10676 is in Kimr's Farm. safe room. test with
+\Simulate("SuperBuff (Newbie member) tells the CLAN: 'PK Alert:Noddy in Farm [10676].'\n")
+-->
+  <trigger
+   enabled="y"
+   match="^(?<clan>.+?)\s\(.+\)\s+tells the CLAN: 'PK Alert:\s+(?<attacker>.+)\s+in\s+(?<area>.+?)\s+\[(?<roomid>\d+)\](?: I am level \d+ \(\d+ - \d+\))?'$"
+   regexp="y"
+   sequence="100"
+   script="outputHyperLink"
+   ignore_case="y"
+   keep_evaluating="y"
+  >
+  </trigger>
+</triggers>
+
+<aliases>
+<alias
+  enabled="y"
+  match="pkc *"
+  script="sendPkInfoClan"
+  sequence="100"
+>
+  </alias>
+
+  <alias
+    enabled="y"
+    match="pkg *"
+    script="sendPkInfoGroup"
+    sequence="100"
+  >
+    </alias>
+
+	<alias
+    enabled="y"
+    sequence="100"
+    ignore_case="y"
+    regexp="y"
+    keep_evaluating="n"
+	match="^\s*(?:pkadmin|pkadmi|pkadm)\s+(?<Args>.+)?$"
+	script="COMMAND_PKAdmin"
+    >
+    </alias>
+
+ 	<alias
+    enabled="y"
+    sequence="100"
+    ignore_case="y"
+    regexp="y"
+    keep_evaluating="n"
+	match="^\s*(?:pkadmin|pkadmi|pkadm(?<Args>))$"
+	script="COMMAND_PKAdmin"
+    >
+    </alias>
+
+	<alias
+    enabled="y"
+    sequence="100"
+    ignore_case="y"
+    regexp="y"
+    keep_evaluating="n"
+	match="^\s*pk\s*go\s*$"
+	script="runto_PK_room"
+    >
+    </alias>
+
+</aliases>
+
+<script>
+<![CDATA[
+--									Settings Management
+require 'serialize'
+
+PKASettings = {}
+PKASettings.volume = 100
+PKASettings.alert = 1
+PKASettings.sound = 1
+PKASettings.enabled = 1
+PKASettings.playerlevel = 1
+defLevelRange = 10
+PKASettings.levelrange = defLevelRange
+
+local runto_roomid = 0
+
+function SaveSettings()
+	SetVariable("PKSettings", serialize.save_simple(PKASettings))
+end
+
+function LoadSettings()
+	assert(loadstring("PKASettings = "..GetVariable("PKSettings"))) ()
+end
+]]></script>
+<script>
+<![CDATA[
+--									PKAdmin Commands
+dofile (GetInfo(60) .. "aardwolf_colors.lua")
+
+Prepend = "@GPKAdmin: @W"
+
+function cnote(str)
+	AnsiNote(stylesToANSI(ColoursToStyles(str)))
+end
+
+-- Turn on the option to have Mushclient Play Sounds while minimized/background
+SetOption ("play_sounds_in_background", 1)
+
+PKAdminCommands = {
+		COMMAND_PKAdmin_Help					= {"help", "hel", "he", "h"},
+        COMMAND_PKAdmin_Alert                   = {"alert", "aler", "ale" },
+		COMMAND_PKAdmin_Enable					= {"enable", "enabl", "enab", "ena", "on"},
+		COMMAND_PKAdmin_Disable					= {"disable", "disabl", "disab", "disa", "off"},
+        COMMAND_PKAdmin_Sound                   = {"sound", "soun", "soun", "sou" },
+        COMMAND_PKAdmin_Status                  = {"status", "statu", "stat" },
+        COMMAND_PKAdmin_Volume                  = {"volume", "volum", "volu", "vol" },
+        COMMAND_PKAdmin_LevelRange              = {"levelrange", "levelr", "level",},
+		COMMAND_PKAdmin_Reset					= {"reset"}
+}
+
+function COMMAND_PKAdmin(name, lines, wildcards)
+	local args, command = {}, nil
+	--split args, set first to "command", default to 'help'
+	for word in string.gmatch(wildcards.Args, "%w+") do table.insert(args, word) end
+	command = args[1]
+	if command then table.remove(args,1) else command = "help" end
+
+	--parse command
+	command = string.lower(command)
+	for func, list in pairs(PKAdminCommands) do
+		for _, item in ipairs(list) do
+			if command == item then
+				return _G[func](args)
+			end
+		end
+	end
+
+	OUTPUT_UnrecognizedCommand()
+end
+
+function COMMAND_PKAdmin_Help()
+	cnote("@GPKAdmin")
+	cnote("@WUsage:")
+	cnote("   @Gpkadmin help                @w:      @WThis menu")
+	cnote("   @Gpkadmin alert <yes/no>      @w:      @WTurns on/off channel alerts   ")
+	cnote("   @Gpkadmin sound <yes/no>      @w:      @WTurns on/off sound alerts     ")
+	cnote("   @Gpkadmin volume <0-100>      @w:      @WSets the play volume for sound")
+	cnote("   @Gpkadmin levelrange <1-100>  @w:      @WSet the range of levels displayed in the PK Alert")
+	cnote("   @Gpkadmin enable              @w:      @WEnables the script            ")
+	cnote("   @Gpkadmin disable             @w:      @WDisables the script           ")
+	Note()
+
+	cnote("   @Gpkgo                        @w:      @W\"Runto\" help your clan mate out")
+	Note()
+end
+
+function COMMAND_PKAdmin_Enable()
+	cnote(Prepend.."PKAnnouncer is now @Genabled@W.")
+	PKASettings.enabled = 1
+	SaveSettings()
+end
+
+function COMMAND_PKAdmin_Disable()
+	cnote(Prepend.."PKAnnouncer is now @Rdisabled@W.")
+	PKASettings.enabled = 0
+	SaveSettings()
+end
+
+OnOffCommands = {
+	True			=	{"true", "t", "yes", "y"},
+	False           =   {"false", "f", "no", "n"}
+}
+
+function COMMAND_PKAdmin_Alert(args)
+	local enabled, ch = nil
+	if args and args[1] then
+		ch = string.lower(args[1])
+		for enabl, list in pairs(OnOffCommands) do
+			for _, trunc in ipairs(list) do
+				if trunc == ch then
+					enabled = enabl
+					break
+				end
+			end
+			if enabled then break end
+		end
+
+		if not enabled then --didn't understand arg
+			cnote(Prepend.."@R"..args[1].." is not a valid option.")
+			Note()
+			return
+		end
+	end
+
+	if enabled == "True" then
+		PKASettings.alert = 1
+		cnote(Prepend.."@wAlerts to clan channel are now @GEnabled@w.")
+		SaveSettings()
+	elseif enabled == "False" then
+		PKASettings.alert = 0
+		cnote(Prepend.."@wAlerts to clan channel are now @RDisabled@w.")
+		SaveSettings()
+	end
+end
+
+function COMMAND_PKAdmin_Sound(args)
+	local enabled, ch = nil
+	if args and args[1] then
+		ch = string.lower(args[1])
+		for enabl, list in pairs(OnOffCommands) do
+			for _, trunc in ipairs(list) do
+				if trunc == ch then
+					enabled = enabl
+					break
+				end
+			end
+			if enabled then break end
+		end
+
+		if not enabled then --didn't understand arg
+			cnote(Prepend.."@R"..args[1].." is not a valid option.")
+			Note()
+			return
+		end
+	end
+
+	if enabled == "True" then
+		PKASettings.sound = 1
+		cnote(Prepend.."@wSound alerts are now @GEnabled@w.")
+		SaveSettings()
+	elseif enabled == "False" then
+		PKASettings.sound = 0
+		cnote(Prepend.."@wSound alerts are now @RDisabled@w.")
+		SaveSettings()
+	end
+end
+
+function COMMAND_PKAdmin_Volume(args)
+	if not tonumber(args[1]) or (tonumber(args[1]) < 0) or (tonumber(args[1]) > 100) then
+		cnote(Prepend.."@RVolume@w requires a number from 0-100." )
+		Note()
+		return
+	end
+
+	PKASettings.volume = tonumber(args[1])
+	SaveSettings()
+	cnote(Prepend.."@wVolume is now set to @Y"..tonumber(args[1]).."@w.")
+end
+
+function COMMAND_PKAdmin_LevelRange(args)
+	if not tonumber(args[1]) or (tonumber(args[1]) < 0) then
+		cnote(Prepend.."@RLevel Range@w requires a number greater than zero.")
+		Note()
+		return
+	end
+
+	PKASettings.levelrange = tonumber(args[1])
+	SaveSettings()
+	cnote(Prepend.."@wLevel range is now set to @Y+/-"..PKASettings.levelrange.."@w.")
+end
+
+function COMMAND_PKAdmin_Status()
+  cnote( "@R+@w-----------------------------------------------------------------------------------------@R+@w" )
+  cnote( " " .. Prepend .. " PKAnnouncer's current status is " .. (PKASettings.enabled == 1 and "@GOn" or "@ROff") .. "@w" )
+  cnote( "@R+@w-----------------------------------------------------------------------------------------@R+@w" )
+  cnote( ("  @x208Channel Alerts :@w %-30.30s " ):format( PKASettings.alert == 1 and "@GOn@w" or "@ROff@w"))
+  cnote( ("  @x208Sound Alerts   :@w %-30.30s " ):format( PKASettings.sound == 1 and "@GOn@w" or "@ROff@w"))
+  cnote( ("  @x208Sound Volume   :@w %-30.0d "  ):format( PKASettings.volume ) )
+  cnote( ("  @x208Level Range    :@w +/-%-30.0d "  ):format( PKASettings.levelrange) )
+  cnote( "@R+@w-----------------------------------------------------------------------------------------@R+@w" )
+  Note()
+end
+
+function COMMAND_PKAdmin_Reset()
+  PKASettings = {}
+  PKASettings.volume = 100
+  PKASettings.alert = 1
+  PKASettings.sound = 1
+  PKASettings.enabled = 1
+  PKASettings.levelrange = defLevelRange
+  PKASettings.playerlevel = tonumber(gmcp("char.status.level"))
+  cnote( Prepend.."PKASettings have been reset to defaults." )
+  SaveSettings()
+end
+
+function OUTPUT_UnrecognizedCommand()
+	cnote(Prepend.."Unrecognized command.  Try @Ggadmin help@W for help.")
+	Note()
+end
+
+]]></script>
+
+<script>
+<![CDATA[
+require "gmcphelper"
+
+local area = ""
+local roomid = ""
+local room = ""
+local target = ""
+local ingroup = false
+local chan = "clan "
+local varSoundFile = GetInfo(74) .. "redalert.wav"
+
+GMCPPluginID = "3e7dedbe37e44942dd46d264"
+
+function isEnabled()
+  if PKASettings.enabled == 1 then
+    return true
+  else
+	return false
+  end
+end
+
+function isSoundEnabled()
+  if PKASettings.sound == 1 then
+    return true
+  else
+	return false
+  end
+end
+
+function isAlertEnabled()
+  if PKASettings.alert == 1 then
+    return true
+  else
+	return false
+  end
+end
+
+function sendPkInfoClan(name, line, wildcards)
+  if isEnabled() then
+    getRoomInformation()
+	if isAlertEnabled() then
+      local msg = string.format(" @W%s@C ENGAGED @Win @x202%s @W[@x202%s@W]",wildcards[1], area, roomid)
+      msg = addLevelRangeText(msg)
+      SendNoEcho("clan "..msg)
+	end
+    target = wildcards[1]
+  end
+end
+
+function recalled(name, line, wildcards)
+  if isEnabled() and isAlertEnabled() then
+    if(wildcards[1] == target) then
+      if (ingroup == true) then
+        chan = "gt "
+      else
+        chan = "clan "
+      end
+      SendNoEcho(string.format(chan .. "@W%s@C Recalled!",wildcards[1], area, roomid))
+    end
+  end
+end
+
+function sendPkInfoGroup(name, line, wildcards)
+  if isEnabled() and isAlertEnabled() then
+    getRoomInformation()
+    local msg = string.format(" @W%s@C ENGAGED @Win @x202%s @W[@x202%s@W]",wildcards[1], area, roomid)
+    msg = addLevelRangeText(msg)
+    SendNoEcho("gt "..msg)
+
+    target = wildcards[1]
+  end
+end
+
+function sendPkAlert(name, line, wildcards)
+  if isEnabled() then
+    if isAlertEnabled() then
+      getRoomInformation()
+
+      if wildcards[1] ~= nil then
+        local msg = string.format(" @RPK Alert: @W%s @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid)
+        msg = addLevelRangeText(msg)
+	    SendNoEcho("clan "..msg)
+        if ingroup == true then
+    	    SendNoEcho("gt "..msg)
+        end
+	    target = wildcards[1]
+     end
+	end
+
+    --- Give the audio indicator
+    -- Sound( varSoundFile )
+	if isSoundEnabled() then
+      PlaySound( 9, varSoundFile, false, (0-(100-PKASettings.volume)), 0 )
+	end
+  end
+end
+
+function outputHyperLink(name, line, wildcards)
+    if wildcards.roomid ~= nil then
+        runto_roomid = wildcards.roomid
+
+        ColourTell("red", "", "RPK Alert: ", "goldenrod", "", "I'm getting attacked please help at ",
+               "white", "", "[")
+        Hyperlink("mg "..wildcards.roomid, wildcards.roomid, "Click to run directly to then room Id"..roomid, "orangered", "", 0)
+        ColourNote("White", "", "]!")
+    end
+end
+
+function runto_PK_room()
+    if runto_roomid ~= 0 then
+        Execute("mapper goto "..runto_roomid)
+    end
+end
+
+function sendStrangleAlert(name, line, wildcards)
+  if isEnabled() and isAlertEnabled() then
+	getRoomInformation()
+
+    if(wildcards[1] ~= nil) then
+        local msg = string.format("@W%s@C STRANGLED @Win @x202%s @W[@x202%s@W]", wildcards[1], area, roomid)
+        msg = addLevelRangeText(msg)
+		SendNoEcho("clan "..msg)
+        if ingroup == true then
+            SendNoEcho("gt "..msg)
+        end
+        target = wildcards[1]
+    end
+  end
+end
+
+function sendCursedAlert(name, line, wildcards)
+  if isEnabled() and isAlertEnabled() then
+    if (ingroup == true) then
+	  chan = "gt "
+    else
+	  chan = "clan "
+    end
+    getRoomInformation()
+
+    if(wildcards.target ~= nil and wildcards.target ~= "") then
+        local msg = string.format("@W%s@C CURSED @Win @x202%s @W[@x202%s@W]", wildcards.target, area, roomid)
+        msg = addLevelRangeText(msg)
+		SendNoEcho("clan "..msg)
+        if ingroup == true then
+            SendNoEcho("gt "..msg)
+        end
+        target = wildcards.target
+    end
+  end
+end
+
+function getRoomInformation()
+   if IsConnected() then
+      Send_GMCP_Packet("request room")
+   end
+
+  -- get updated room information
+  gmcproom = gmcp("room")
+  area = gmcproom.info.zone
+  roomid = gmcproom.info.num
+  room = gmcproom.info.name
+end
+
+function addLevelRangeText(msg)
+    if PKASettings.playerlevel > 0 and PKASettings.levelrange > 0 then
+        local min = PKASettings.playerlevel - PKASettings.levelrange
+        if min < 1 then min = 1 end
+
+        local max = PKASettings.playerlevel + PKASettings.levelrange
+        if max > 201 then max = 201 end
+
+        msg = msg.." I am level @x202"..PKASettings.playerlevel.." @W(@x202"..min.."@W - @x202"..max.."@W)"
+    end
+
+    return msg
+end
+
+function OnPluginBroadcast (msg, id, name, text)
+	if id == GMCPPluginID then
+		if text == "group" then
+			local res, membercount = CallPlugin(GMCPPluginID, "gmcpval", "group.count")
+			if membercount == "" then membercount = 0 end
+			if tonumber(membercount) >= 1 then
+			    ingroup = true
+			end
+        elseif text == "char.status" then
+            PKASettings.playerlevel = tonumber(gmcp("char.status.level"))
+		end
+	end
+end
+
+function OnPluginInstall()
+    OnPluginEnable()
+end
+
+function OnPluginEnable()
+  local settings = GetVariable("PKSettings")
+  if settings and settings ~= "" then
+    assert(loadstring("PKASettings = "..GetVariable("PKSettings"))) ()
+  end
+
+  if PKASettings.levelrange == nil then PKASettings.levelrange = defLevelRange end
+
+  Send_GMCP_Packet("request char")
+end
+
+function OnHelp ()
+  world.Note (world.GetPluginInfo (world.GetPluginID (), 3))
+end
+]]>
+</script>
+
 </muclient>
\ No newline at end of file