Beispiel #1
0
		/// <summary>
		/// Converts a BoxSpawn to an actual spawner object. This function is used to generate
		/// spawn groups created in Pandora's Box
		/// </summary>
		/// <param name="spawn">The BoxSpawn object describing the spawn that should be created</param>
		/// <returns>A Spawner object - null if not valid</returns>
		public static Item CreateBoxSpawn( BoxSpawn spawn )
		{
			if ( spawn == null || spawn.Entries.Count == 0 )
				return null;

			XmlSpawner spawner = new XmlSpawner();

			spawner.Amount = spawn.Count;
			spawner.MaxCount = spawn.Count;
			spawner.MinDelay = TimeSpan.FromSeconds( spawn.MinDelay );
			spawner.MaxDelay = TimeSpan.FromSeconds( spawn.MaxDelay );
			spawner.Team = spawn.Team;
			spawner.HomeRange = spawn.HomeRange;

			spawner.Running = false;

			spawner.Group = spawn.Group;

			XmlSpawner.SpawnObject[] spawnObjects = new Server.Mobiles.XmlSpawner.SpawnObject[ spawn.Entries.Count ];

			for ( int i = 0; i < spawnObjects.Length; i++ )
			{
				BoxSpawnEntry entry = spawn.Entries[ i ] as BoxSpawnEntry;

				spawnObjects[ i ] = new Server.Mobiles.XmlSpawner.SpawnObject( entry.Type, entry.MaxCount );
			}

			spawner.SpawnObjects = spawnObjects;

			return spawner;
		}
 public KeywordTimer(XmlSpawner spawner, KeywordTag tag, TimeSpan delay, TimeSpan repeatdelay, string condition, int gotogroup)
     : base(delay)
 {
     Priority = TimerPriority.OneSecond;
     m_Tag = tag;
     m_Spawner = spawner;
     m_Condition = condition;
     m_Goto = gotogroup;
     m_Repeatdelay = repeatdelay;
 }
        public static bool TestItemProperty(XmlSpawner spawner, Item ObjectPropertyItem, string testString, Mobile trigmob, out string status_str)
        {
            status_str = null;
            // now make sure the item itself is there
            if (ObjectPropertyItem == null || ObjectPropertyItem.Deleted)
            {
                status_str = "Trigger Object not found";
                return false;
            }

            bool testreturn = CheckPropertyString(spawner, ObjectPropertyItem, testString, trigmob, out status_str);

            return testreturn;
        }
 public static bool SpawnTypeKeyword(object invoker, XmlSpawner.SpawnObject TheSpawn, string typeName, string substitutedtypeName, bool requiresurface,
     List<XmlSpawner.SpawnPositionInfo> spawnpositioning, Mobile triggermob, Point3D location, Map map, out string status_str)
 {
     return SpawnTypeKeyword(invoker, TheSpawn, typeName, substitutedtypeName, requiresurface, spawnpositioning,
         triggermob, location, map, null, out status_str);
 }
        // set property values with support for nested attributes
        public static string SetPropertyValue(XmlSpawner spawner, object o, string name, string value)
        {
            if (o == null)
            {
                return "Null object";
            }

            if ( o != null && o is PlayerMobile && ((PlayerMobile)o).AccessLevel >= AccessLevel.Administrator )
                return "Access denied";

            Type ptype = null;
            object po = null;
            Type type = o.GetType();

            PropertyInfo[] props = type.GetProperties(BindingFlags.Static | BindingFlags.Instance | BindingFlags.Public);

            // parse the strings of the form property.attribute into two parts
            // first get the property
            string[] arglist = ParseString(name, 2, ".");

            string propname = arglist[0];

            string[] keywordargs = ParseString(propname, 4, ",");

            // check for special keywords
            if (keywordargs[0] == "ATTACHMENT")
            {
                if (keywordargs.Length < 4)
                {
                    return "Invalid ATTACHMENT format";
                }
                // syntax is ATTACHMENT,type,name,propname

                string apropname = keywordargs[3];
                string aname = keywordargs[2];
                Type attachtype = SpawnerType.GetType(keywordargs[1]);

                // allow empty string specifications to be used to indicate a null string which will match any name
                if (aname == "") aname = null;

                ArrayList attachments = XmlAttach.FindAttachments(o, attachtype, aname);

                if (attachments != null && attachments.Count > 0)
                {
                    // change the object, object type, and propname to refer to the attachment
                    o = attachments[0];
                    propname = apropname;

                    if (o == null)
                    {
                        return "Null object";
                    }

                    type = o.GetType();
                    props = type.GetProperties(BindingFlags.Static | BindingFlags.Instance | BindingFlags.Public);
                }
                else
                    return "Attachment not found";

            }
            else if (keywordargs[0] == "SKILL")
            {
                if (keywordargs.Length < 2)
                {
                    return "Invalid SKILL format";
                }
                bool found = true;
                try
                {
                    SkillName skillname = (SkillName)Enum.Parse(typeof(SkillName), keywordargs[1], true);
                    if (o is Mobile)
                    {

                        Skill skill = ((Mobile)o).Skills[skillname];

                        skill.Base = double.Parse(value);

                        return "Property has been set.";
                    }
                    else
                        return "Object is not mobile";
                }
                catch { found = false; }

                if (!found)
                    return "Invalid SKILL reference.";
            }
            else if (keywordargs[0] == "STEALABLE")
            {

                bool found = true;
                try
                {
                    if (o is Item)
                    {

                        ItemFlags.SetStealable(o as Item, bool.Parse(value));

                        return "Property has been set.";
                    }
                    else
                        return "Object is not an item";
                }
                catch { found = false; }

                if (!found)
                    return "Invalid Stealable assignment.";
            }

            // do a bit of parsing to handle array references
            string[] arraystring = propname.Split('[');
            int index = 0;
            if (arraystring.Length > 1)
            {
                // parse the property name from the indexing
                propname = arraystring[0];

                // then parse to get the index value
                string[] arrayvalue = arraystring[1].Split(']');

                if (arrayvalue.Length > 0)
                {
                    try
                    {
                        index = int.Parse(arrayvalue[0]);
                    }
                    catch { }
                }
            }

            if (arglist.Length == 2)
            {
                PropertyInfo plookup = LookupPropertyInfo(spawner, type, propname);

                if (plookup != null)
                {

                    //if ( !plookup.CanWrite )
                    //return "Property is read only.";

                    if (BaseXmlSpawner.IsProtected(type, propname))
                        return "Property is protected.";

                    ptype = plookup.PropertyType;
                    po = plookup.GetValue(o, null);

                    // now set the nested attribute using the new property list
                    return (SetPropertyValue(spawner, po, arglist[1], value));
                }
                else
                {
                    // is a nested property with attributes so first get the property
                    foreach (PropertyInfo p in props)
                    {
                        if (Insensitive.Equals(p.Name, propname))
                        {
                            //CPA pattr = Properties.GetCPA( p );

                            //if ( pattr == null )
                            //return "Property not found.";

                            //if ( !p.CanWrite )
                            //return "Property is read only.";

                            if (BaseXmlSpawner.IsProtected(type, propname))
                                return "Property is protected.";

                            ptype = p.PropertyType;

                            po = p.GetValue(o, null);

                            // now set the nested attribute using the new property list
                            return (SetPropertyValue(spawner, po, arglist[1], value));

                        }
                    }
                }
            }
            else
            {

                // its just a simple single property

                PropertyInfo plookup = LookupPropertyInfo(spawner, type, propname);

                if (plookup != null)
                {
                    if (!plookup.CanWrite)
                        return "Property is read only.";

                    if (BaseXmlSpawner.IsProtected(type, propname))
                        return "Property is protected.";

                    string returnvalue = InternalSetValue(null, o, plookup, value, false, index);

                    return returnvalue;

                }
                else
                {
                    // note, looping through all of the props turns out to be a significant performance bottleneck
                    // good place for optimization

                    foreach (PropertyInfo p in props)
                    {
                        if (Insensitive.Equals(p.Name, propname))
                        {

                            if (!p.CanWrite)
                                return "Property is read only.";

                            if (BaseXmlSpawner.IsProtected(type, propname))
                                return "Property is protected.";

                            string returnvalue = InternalSetValue(null, o, p, value, false, index);

                            return returnvalue;

                        }
                    }
                }
            }

            return "Property not found.";
        }
 public static void RemoveFromTagList(XmlSpawner spawner, KeywordTag tag)
 {
     for (int i = 0; i < spawner.m_KeywordTagList.Count; i++)
     {
         if (tag == spawner.m_KeywordTagList[i])
         {
             spawner.m_KeywordTagList.RemoveAt(i);
             break;
         }
     }
 }
        public static PropertyInfo LookupPropertyInfo(XmlSpawner spawner, Type type, string propname)
        {
            if (spawner == null || type == null || propname == null) return null;

            // look up the info in the current list

            if (spawner.PropertyInfoList == null) spawner.PropertyInfoList = new ArrayList();

            PropertyInfo pinfo = null;
            TypeInfo tinfo = null;

            foreach (TypeInfo to in spawner.PropertyInfoList)
            {
                // check the type
                if (to.t == type)
                {
                    // found it
                    tinfo = to;

                    // now search the property list
                    foreach (PropertyInfo p in to.plist)
                    {
                        if (Insensitive.Equals(p.Name, propname))
                        {
                            pinfo = p;
                        }
                    }
                }
            }

            // did we find the property?
            if (pinfo != null)
            {
                return pinfo;
            }
            else
            {
                // if it cant be found, then do the full search and add it to the list

                PropertyInfo[] props = type.GetProperties(BindingFlags.Static | BindingFlags.Instance | BindingFlags.Public);

                foreach (PropertyInfo p in props)
                {
                    if (Insensitive.Equals(p.Name, propname))
                    {
                        // did we find the type at least?
                        if (tinfo == null)
                        {
                            // if not then add the type to the list
                            tinfo = new TypeInfo();
                            tinfo.t = type;

                            spawner.PropertyInfoList.Add(tinfo);
                        }

                        // and add the property to the tinfo property list
                        tinfo.plist.Add(p);
                        return p;
                    }
                }
            }

            return null;
        }
 public static KeywordTag GetFromTagList(XmlSpawner spawner, int serial)
 {
     for (int i = 0; i < spawner.m_KeywordTagList.Count; i++)
     {
         if (serial == ((KeywordTag)spawner.m_KeywordTagList[i]).Serial)
         {
             return ((KeywordTag)spawner.m_KeywordTagList[i]);
         }
     }
     return (null);
 }
        public static string ApplySubstitution(XmlSpawner spawner, object o, Mobile trigmob, string typeName)
        {
            System.Text.StringBuilder sb = new System.Text.StringBuilder();

            // go through the string looking for instances of {keyword}
            string remaining = typeName;

            while (remaining != null && remaining.Length > 0)
            {

                int startindex = remaining.IndexOf('{');

                if (startindex == -1 || startindex + 1 >= remaining.Length)
                {
                    // if there are no more delimiters then append the remainder and finish
                    sb.Append(remaining);
                    break;
                }

                // might be a substitution, check for keywords
                int endindex = remaining.Substring(startindex + 1).IndexOf("}");

                // if the ending delimiter cannot be found then just append and finish
                if (endindex == -1)
                {
                    sb.Append(remaining);
                    break;
                }

                // get the string up to the delimiter
                string firstpart = remaining.Substring(0, startindex);
                sb.Append(firstpart);

                string keypart = remaining.Substring(startindex + 1, endindex);

                // try to evaluate and then substitute the arg
                Type ptype;

                string value = ParseForKeywords(spawner, o, keypart.Trim(), trigmob, true, out ptype);

                // trim off the " from strings
                if (value != null)
                {
                    value = value.Trim('"');
                }

                // replace the parsed value for the keyword
                sb.Append(value);

                // continue processing the rest of the string
                if (endindex + startindex + 2 >= remaining.Length) break;

                remaining = remaining.Substring(endindex + startindex + 2, remaining.Length - endindex - startindex - 2);
            }
            return sb.ToString();
        }
Beispiel #10
0
        public static bool AddAttachmentToTarget(XmlSpawner spawner, object o, string[] keywordargs, string[] arglist, Mobile trigmob,
            object refobject, out string remainder, out string status_str)
        {
            remainder = "";
            status_str = null;

            if (o == null || keywordargs == null || arglist == null) return false;

            // Use the format /ATTACH,drop_probability/attachmenttype,name[,args]/
            // or /ATTACH,drop_probability/<attachmenttype,name[,args]/propname1/value1/propname2/value2/...>/
            double drop_probability = 1;

            if (keywordargs.Length > 1)
            {
                bool converterror = false;
                try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                catch { status_str = "Invalid drop probability : " + arglist[1]; converterror = true; }

                if (converterror) return false;
            }

            // o is the object to which the attachment will be attached

            // handle the nested item property specification using <>
            string attachargstring = null;

            // attachtypestr will be the actual attachment type to be created.  In the simple form  it will be arglist[1]
            // for the string /arg1/ATTACH/arg2/arg3/arg4/arg5 arglist [0] will contain ATTACH , arglist[1] will be arg2,
            // and arglist[2] will be arg3/arg4/arg5
            // if nested property specs
            // arglist[1] will be <arg2 and arglist[2] will be arg3/ar4>/arg5
            // the drop probability will be in probargs
            string[] probargs = ParseString(arglist[0], 2, ",");

            string attachtypestr = arglist[1];

            // get the argument list after the < if any , note for the string /arg1/ATTACH/<arg2/arg3/arg4>/arg5 arglist [0] will contain ATTACH
            // arglist[1] will be <arg2 and arglist[2] will be arg3/ar4>/arg5
            // but note arglist[1] could also be <arg2>
            // remainder will have ATTACH/<arg2/arg3/arg4>/arg5
            //
            // can also deal with nested cases of ATTACH/<args/ADD/<args>>  and ATTACH/<args/ADD/<args>/ADD/<args>> although there is no clear
            // reason why this syntax should be used at this time
            string addattachstr = arglist[1];

            if (arglist.Length > 2)
                addattachstr = arglist[1] + "/" + arglist[2];

            // check to see if the first char is a "<"
            if (addattachstr.IndexOf("<") == 0)
            {
                // attacharglist[1] will contain arg2/arg3/arg4>/arg5
                // addattachstr should have the full list of args <arg2/arg3/arg4>/arg5 if they are there.  In the case of /arg1/ADD/arg2
                // it will just have arg2
                string[] attacharglist = ParseString(addattachstr, 2, "<");

                // take that argument list that should like like arg2/ag3/arg4>/arg5
                // need to find the matching ">"
                //string[] attachargs = ParseString(attacharglist[1],2,">");

                string[] attachargs = ParseToMatchingParen(attacharglist[1], '<', '>');

                // and get the first part of the string without the >  so attachargs[0] should be arg2/ag3/arg4
                attachargstring = attachargs[0];

                // and attachargs[1] should be the remainder
                if (attachargs.Length > 1)
                {
                    // but have to get rid of any trailing / that might be after the >
                    string[] trailstr = ParseSlashArgs(attachargs[1], 2);
                    if (trailstr.Length > 1)
                        remainder = trailstr[1];
                    else
                        remainder = attachargs[1];
                }
                else
                    remainder = "";

                // get the type info by pulling out the first arg in attachargstring
                string[] tempattacharg = ParseSlashArgs(attachargstring, 2);

                // and get the type info from it
                attachtypestr = tempattacharg[0];

            }
            else
            {
                // otherwise its just a regular case with arglist[2] containing the rest of the arguments
                if (arglist.Length > 2)
                    remainder = arglist[2];
                else
                    remainder = "";
            }

            // test the drop probability
            if (Utility.RandomDouble() >= drop_probability) return true;

            Type type = null;
            if (attachtypestr != null)
            {
                try
                {
                    type = SpawnerType.GetType(ParseObjectType(attachtypestr));
                }
                catch { }
            }
            // if so then create it
            if (type != null && type.IsSubclassOf(typeof(XmlAttachment)))
            {
                object newo = XmlSpawner.CreateObject(type, attachtypestr, false, true);
                if (newo is XmlAttachment)
                {
                    XmlAttachment attachment = newo as XmlAttachment;

                    // could call applyobjectstringproperties on a nested propertylist here to set attachment attributes
                    if (attachargstring != null)
                    {
                        ApplyObjectStringProperties(spawner, attachargstring, attachment, trigmob, refobject, out status_str);
                    }

                    // add the attachment to the target
                    if (!XmlAttach.AttachTo(spawner, o, attachment))
                    {
                        status_str = String.Format("Attachment {0} not added", attachtypestr);
                        return false;
                    }

                }
                else
                {
                    status_str = "Invalid ATTACH. No such attachment : " + attachtypestr;

                    return false;
                }

            }
            else
            {
                status_str = "Invalid ATTACH. No such attachment : " + attachtypestr;
                return false;
            }

            return true;
        }
Beispiel #11
0
        // added in arg parsing to handle object property setting
        public static bool ApplyObjectStringProperties(XmlSpawner spawner, string str, object o, Mobile trigmob, object refobject, out string status_str)
        {
            status_str = null;

            if (str == null || str.Length <= 0 || o == null) return false;

            // object strings will be of the form "object/modifier" where the modifier string is of the form "propname/value/propname/value/..."
            // some keywords do not have value arguments so the modifier could take the form "propname/propname/value/..."
            // this is handled by parsing into both forms

            // make sure the string is properly terminated to assure proper parsing of any final keywords
            bool terminated = false;
            str = str.Trim();

            if (str[str.Length - 1] != '/')
            {
                str += "/";
                terminated = true;
            }

            string[] arglist;

            arglist = ParseSlashArgs(str, 2);

            string remainder = null;

            // place the modifier section of the string in remainder
            if (arglist.Length > 1)
                remainder = arglist[1];

            bool no_error = true;

            // process the modifier string if there is anything
            while (arglist.Length > 1)
            {
                // place into arglist the parsed modifier up to this point
                // arglist[0] will contain the propname
                // arglist[1] will contain the value
                // arglist[2] will contain the reset of the modifier
                arglist = ParseSlashArgs(remainder, 3);

                // singlearglist will contain the propname and the remainder
                // for those keywords that do not have value args
                string[] singlearglist = ParseSlashArgs(remainder, 2);

                if (arglist.Length > 1)
                {
                    // handle value keywords that may take comma args

                    // itemarglist[1] will contain arg2/arg3/arg4>/arg5
                    // additemstr should have the full list of args <arg2/arg3/arg4>/arg5 if they are there.  In the case of /arg1/ADD/arg2
                    // it will just have arg2
                    string[] groupedarglist = ParseString(arglist[1], 2, "[");

                    // take that argument list that should like like arg2/ag3/arg4>/arg5
                    // need to find the matching ">"

                    string[] groupargs = null;
                    string groupargstring = null;
                    if (groupedarglist.Length > 1)
                    {
                        groupargs = ParseToMatchingParen(groupedarglist[1], '[', ']');

                        // and get the first part of the string without the >  so itemargs[0] should be arg2/ag3/arg4
                        groupargstring = groupargs[0];
                    }

                    // need to handle comma args that may be grouped with the () such as the (ATTACHMENT,args) arg

                    //string[] value_keywordargs = ParseString(groupedarglist[0],10,",");
                    string[] value_keywordargs = groupedarglist[0].Trim().Split(',');
                    if (groupargstring != null && groupargstring.Length > 0)
                    {

                        if (value_keywordargs != null && value_keywordargs.Length > 0)
                            value_keywordargs[value_keywordargs.Length - 1] = groupargstring;
                    }

                    // handle propname keywords that may take comma args
                    //string[] keywordargs = ParseString(arglist[0],10,",");
                    string[] keywordargs = arglist[0].Trim().Split(',');

                    // this quick optimization can determine whether this is a regular prop/value assignment
                    // since most prop modification strings will use regular propnames and not keywords, it makes sense to check for that first
                    if (value_keywordargs[0].Length > 0 && !Char.IsUpper(value_keywordargs[0][0]) &&
                        arglist[0].Length > 0 && !Char.IsUpper(arglist[0][0]))
                    {
                        // all of this code is also included in the keyword candidate tests
                        // this is because regular props can also be entered with uppercase so the lowercase test is not definitive

                        // restricted properties
                        //if(arglist[0].ToLower() == "accesslevel")
                        //{
                        //	status_str = "accesslevel is a protected property";
                        //	if(arglist.Length < 3) break;
                        //	remainder = arglist[2];
                        //}
                        //else
                        {
                            // check for the literal char
                            if (singlearglist[1] != null && singlearglist[1].Length > 0 && singlearglist[1][0] == '@')
                            {
                                string lstr = singlearglist[1];

                                if (terminated && lstr[lstr.Length - 1] == '/')
                                    lstr = lstr.Remove(lstr.Length - 1, 1);

                                string result = SetPropertyValue(spawner, o, arglist[0], lstr.Remove(0, 1));

                                // see if it was successful
                                if (result != "Property has been set.")
                                {
                                    status_str = arglist[0] + " : " + result;
                                    no_error = false;
                                }
                                remainder = null;
                                break;
                            }
                            else
                            {

                                string result = SetPropertyValue(spawner, o, arglist[0], arglist[1]);

                                // see if it was successful
                                if (result != "Property has been set.")
                                {
                                    status_str = arglist[0] + " : " + result;
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                        }
                    }
                    else
                    {
                        if (IsValuemodKeyword(value_keywordargs[0]))
                        {
                            valuemodKeyword kw = (valuemodKeyword)valuemodKeywordHash[value_keywordargs[0]];

                            if (kw == valuemodKeyword.RND)
                            {
                                // generate a random number and use it as the property value.  Use the format /RND,min,max/
                                if (value_keywordargs.Length > 2)
                                {
                                    // get a random number
                                    string randvalue = "0";
                                    try
                                    {
                                        randvalue = String.Format("{0}", Utility.RandomMinMax(int.Parse(value_keywordargs[1]), int.Parse(value_keywordargs[2])));
                                    }
                                    catch { status_str = "Invalid RND args : " + arglist[1]; no_error = false; }
                                    // set the property value using the random number as the value
                                    string result = SetPropertyValue(spawner, o, arglist[0], randvalue);
                                    // see if it was successful
                                    if (result != "Property has been set.")
                                    {
                                        status_str = arglist[0] + " : " + result;
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid RND args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.RNDBOOL)
                            {
                                // generate a random bool and use it as the property value.  Use the format /RNDBOOL/

                                string randvalue = Utility.RandomBool().ToString();

                                // set the property value using the random number as the value
                                string result = SetPropertyValue(spawner, o, arglist[0], randvalue);
                                // see if it was successful
                                if (result != "Property has been set.")
                                {
                                    status_str = arglist[0] + " : " + result;
                                    no_error = false;
                                }

                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.RNDLIST || kw == valuemodKeyword.RNDSTRLIST)
                            {
                                // generate a random number and use it as the property value.  Use the format /RNDLIST,val1,val2,.../
                                if (value_keywordargs.Length > 1)
                                {

                                    // compute a random index into the arglist

                                    int randindex = Utility.Random(1, value_keywordargs.Length - 1);

                                    // assign the list entry as the value

                                    string randvalue = value_keywordargs[randindex];

                                    // set the property value
                                    string result = SetPropertyValue(spawner, o, arglist[0], randvalue);

                                    // see if it was successful
                                    if (result != "Property has been set.")
                                    {
                                        status_str = arglist[0] + " : " + result;
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid " + arglist[0] + " args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.MY)
                            {
                                // syntax is MY,property
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 1)
                                {
                                    string resultstr = ApplyToProperty(spawner, o, o, value_keywordargs[1], arglist[0]);
                                    if (resultstr != null)
                                    {
                                        status_str = "MY error: " + resultstr;
                                        no_error = false;
                                    }

                                }
                                else
                                {
                                    status_str = "Invalid MY args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GET)
                            {
                                // syntax is GET,itemname[,itemtype],property
                                // or GET,itemname[,itemtype],<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 2)
                                {
                                    string propname = value_keywordargs[2];
                                    string typestr = null;

                                    if (value_keywordargs.Length > 3)
                                    {
                                        propname = value_keywordargs[3];
                                        typestr = value_keywordargs[2];
                                    }
                                    // get the current property value
                                    //Type ptype;
                                    // get target item
                                    // is the itemname a serialno?
                                    object testitem = null;
                                    if (value_keywordargs[1].StartsWith("0x"))
                                    {
                                        int serial = -1;
                                        try
                                        {
                                            serial = Convert.ToInt32(value_keywordargs[1], 16);
                                        }
                                        catch { }
                                        if (serial >= 0)
                                            testitem = World.FindEntity(serial);
                                    }
                                    else
                                    {

                                        testitem = FindItemByName(spawner, value_keywordargs[1], typestr);
                                    }

                                    string resultstr = ApplyToProperty(spawner, testitem, o, propname, arglist[0]);

                                    if (resultstr != null)
                                    {
                                        status_str = "GET error: " + resultstr;
                                        no_error = false;
                                    }

                                }
                                else
                                {
                                    status_str = "Invalid GET args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETVAR)
                            {
                                // syntax is GETVAR,varname
                                if (value_keywordargs.Length > 1)
                                {

                                    string varname = value_keywordargs[1];

                                    // look for the xmllocalvariable attachment with the given name
                                    XmlLocalVariable var = (XmlLocalVariable)XmlAttach.FindAttachment(refobject, typeof(XmlLocalVariable), varname);

                                    if (var != null)
                                    {

                                        string result = SetPropertyValue(spawner, o, arglist[0], var.Data);

                                        // see if it was successful
                                        if (result != "Property has been set.")
                                        {
                                            status_str = arglist[0] + " : " + result;
                                            no_error = false;
                                        }
                                    }
                                    else
                                    {
                                        status_str = arglist[0] + " : No such var";
                                        no_error = false;
                                    }
                                    if (arglist.Length < 3) break;
                                    remainder = arglist[2];

                                }
                                else
                                {
                                    status_str = "Invalid GETVAR args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONMOB)
                            {
                                // syntax is GETONMOB,mobname[,mobtype],property
                                // or GETONMOB,mobname[,mobtype],<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 2)
                                {
                                    //if(trigmob != null && !trigmob.Deleted){
                                    // get the current property value
                                    //Type ptype;
                                    // get target item

                                    string propname = value_keywordargs[2];
                                    string typestr = null;
                                    if (value_keywordargs.Length > 3)
                                    {
                                        propname = value_keywordargs[3];
                                        typestr = value_keywordargs[2];
                                    }

                                    Mobile testmobile = FindMobileByName(spawner, value_keywordargs[1], typestr);
                                    string resultstr = ApplyToProperty(spawner, testmobile, o, propname, arglist[0]);
                                    if (resultstr != null)
                                    {
                                        status_str = "GETONMOB error: " + resultstr;
                                        no_error = false;
                                    }

                                }
                                else
                                {
                                    status_str = "Invalid GETONMOB args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONCARRIED)
                            {
                                // syntax is GETONCARRIED,itemname[,itemtype],property
                                // or GETONCARRIED,itemname[,itemtype],<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 2)
                                {
                                    if (trigmob != null && !trigmob.Deleted)
                                    {
                                        string propname = value_keywordargs[2];
                                        string typestr = null;
                                        if (value_keywordargs.Length > 3)
                                        {
                                            propname = value_keywordargs[3];
                                            typestr = value_keywordargs[2];
                                        }
                                        // get the current property value
                                        //Type ptype;
                                        // get target item
                                        Item testitem = SearchMobileForItem(trigmob, ParseObjectType(value_keywordargs[1]), typestr, false);

                                        string resultstr = ApplyToProperty(spawner, testitem, o, propname, arglist[0]);

                                        if (resultstr != null)
                                        {
                                            status_str = "GETONCARRIED error: " + resultstr;
                                            no_error = false;
                                        }

                                    }
                                    else
                                    {
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONCARRIED args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONTRIGMOB)
                            {
                                // syntax is GETONTRIGMOB,property
                                // or  GETONTRIGMOB,<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 1)
                                {
                                    if (trigmob != null && !trigmob.Deleted)
                                    {
                                        string resultstr = ApplyToProperty(spawner, trigmob, o, value_keywordargs[1], arglist[0]);
                                        if (resultstr != null)
                                        {
                                            status_str = "GETONTRIGMOB error: " + resultstr;
                                            no_error = false;
                                        }

                                    }
                                    else
                                    {
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONTRIGMOB args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONNEARBY)
                            {
                                // syntax is GETONNEARBY,range,name[,type][,searchcontainers],property
                                // or GETONNEARBY,range,name[,type][,searchcontainers],[ATTACHMENT,type,name,property]
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 3)
                                {
                                    string targetname = value_keywordargs[2];
                                    string propname = value_keywordargs[3];
                                    string typestr = null;
                                    bool searchcontainers = false;
                                    int range = -1;
                                    try
                                    {
                                        range = int.Parse(value_keywordargs[1]);
                                    }
                                    catch { }

                                    if (range < 0)
                                    {
                                        status_str = "invalid range in GETONNEARBY";
                                        no_error = false;
                                    }

                                    if (value_keywordargs.Length > 4)
                                    {
                                        typestr = value_keywordargs[3];
                                        propname = value_keywordargs[4];
                                    }

                                    if (value_keywordargs.Length > 5)
                                    {
                                        try
                                        {
                                            searchcontainers = bool.Parse(value_keywordargs[3]);
                                        }
                                        catch
                                        {
                                            status_str = "invalid searchcontainer bool in GETONNEARBY";
                                            no_error = false;
                                        }
                                        typestr = value_keywordargs[4];
                                        propname = value_keywordargs[5];
                                    }

                                    Type targettype = null;
                                    if (typestr != null)
                                    {
                                        targettype = SpawnerType.GetType(typestr);
                                    }

                                    if (no_error)
                                    {
                                        // get all of the nearby objects
                                        ArrayList nearbylist = GetNearbyObjects(spawner, targetname, targettype, typestr, range, searchcontainers,null);

                                        string resultstr = null;

                                        // apply the properties from the first valid thing on the list
                                        foreach (object nearbyobj in nearbylist)
                                        {
                                            resultstr = ApplyToProperty(spawner, nearbyobj, o, propname, arglist[0]);
                                            if (resultstr == null)
                                                break;
                                        }
                                        if (resultstr != null)
                                        {
                                            status_str = "GETONNEARBY error: " + resultstr;
                                            no_error = false;
                                        }
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONNEARBY args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONPARENT)
                            {
                                // syntax is GETONPARENT,property
                                // or  GETONPARENT,<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 1)
                                {
                                    object parent = null;
                                    if (refobject is Item)
                                    {
                                        parent = ((Item)refobject).Parent;
                                    }
                                    else
                                        if (refobject is XmlAttachment)
                                        {
                                            parent = ((XmlAttachment)refobject).AttachedTo;
                                        }

                                    if (parent != null)
                                    {
                                        string resultstr = ApplyToProperty(spawner, parent, o, value_keywordargs[1], arglist[0]);
                                        if (resultstr != null)
                                        {
                                            status_str = "GETONPARENT error: " + resultstr;
                                            no_error = false;
                                        }

                                    }
                                    else
                                    {
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONPARENT args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONTHIS)
                            {
                                // syntax is GETONTHIS,property
                                // or  GETONTHIS,<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 1)
                                {

                                    if (refobject != null)
                                    {
                                        string resultstr = ApplyToProperty(spawner, refobject, o, value_keywordargs[1], arglist[0]);
                                        if (resultstr != null)
                                        {
                                            status_str = "GETONTHIS error: " + resultstr;
                                            no_error = false;
                                        }

                                    }
                                    else
                                    {
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONTHIS args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONTAKEN)
                            {
                                // syntax is GETONTAKEN,property
                                // or  GETONTAKEN,<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 1)
                                {

                                    // find the taken object

                                    Item taken = GetTaken(refobject);

                                    if (taken != null)
                                    {
                                        string resultstr = ApplyToProperty(spawner, taken, o, value_keywordargs[1], arglist[0]);
                                        if (resultstr != null)
                                        {
                                            status_str = "GETONTAKEN error: " + resultstr;
                                            no_error = false;
                                        }

                                    }
                                    else
                                    {
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONTAKEN args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONGIVEN)
                            {
                                // syntax is GETONGIVEN,property
                                // or  GETONGIVEN,<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property
                                if (value_keywordargs.Length > 1)
                                {

                                    // find the taken object

                                    Item taken = GetGiven(refobject);

                                    if (taken != null)
                                    {
                                        string resultstr = ApplyToProperty(spawner, taken, o, value_keywordargs[1], arglist[0]);
                                        if (resultstr != null)
                                        {
                                            status_str = "GETONGIVEN error: " + resultstr;
                                            no_error = false;
                                        }

                                    }
                                    else
                                    {
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONGIVEN args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETONSPAWN)
                            {
                                // syntax is GETONSPAWN[,spawername],subgroup,property
                                // or GETONSPAWN[,spawername],subgroup,<ATTACHMENT,type,name,property>
                                // note this will be an arg to some property

                                if (value_keywordargs.Length > 2)
                                {
                                    string subgroupstr = value_keywordargs[1];
                                    string propstr = value_keywordargs[2];
                                    string spawnerstr = null;
                                    if (value_keywordargs.Length > 3)
                                    {
                                        spawnerstr = value_keywordargs[1];
                                        subgroupstr = value_keywordargs[2];
                                        propstr = value_keywordargs[3];
                                    }
                                    // get the current property value
                                    //Type ptype;
                                    // get target object
                                    int subgroup = -1;
                                    try { subgroup = int.Parse(subgroupstr); }
                                    catch { }
                                    if (subgroup == -1)
                                    {
                                        status_str = "Invalid subgroup in GETONSPAWN";
                                        no_error = false;
                                    }
                                    else
                                    {
                                        if (spawnerstr != null)
                                        {
                                            spawner = FindSpawnerByName(spawner, spawnerstr);
                                            if (spawner == null)
                                            {
                                                status_str = "Invalid spawnername in GETONSPAWN";
                                                no_error = false;
                                            }
                                        }
                                        object targetobj = XmlSpawner.GetSpawned(spawner, subgroup);
                                        if (targetobj != null)
                                        {
                                            string resultstr = ApplyToProperty(spawner, targetobj, o, propstr, arglist[0]);
                                            if (resultstr != null)
                                            {
                                                status_str = "GETONSPAWN error: " + resultstr;
                                                no_error = false;
                                            }

                                        }
                                        else
                                        {
                                            no_error = false;
                                        }
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETONSPAWN args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETFROMFILE)
                            {
                                // syntax is GETFROMFILE,filename

                                if (value_keywordargs.Length > 1)
                                {

                                    string filename = value_keywordargs[1];
                                    string filestring = null;

                                    // read in the string from the file
                                    if (System.IO.File.Exists(filename) == true)
                                    {

                                        try
                                        {
                                            // Create an instance of StreamReader to read from a file.
                                            // The using statement also closes the StreamReader.
                                            using (StreamReader sr = new StreamReader(filename))
                                            {
                                                string line;
                                                // Read and display lines from the file until the end of
                                                // the file is reached.
                                                while ((line = sr.ReadLine()) != null)
                                                {
                                                    filestring += line;
                                                }

                                                sr.Close();
                                            }
                                        }
                                        catch
                                        {
                                            status_str = "GETFROMFILE error: " + filename;
                                            no_error = false;
                                        }
                                        // set the property value
                                        string result = SetPropertyValue(spawner, o, arglist[0], filestring);

                                        // see if it was successful
                                        if (result != "Property has been set.")
                                        {
                                            status_str = arglist[0] + " : " + result;
                                            no_error = false;
                                        }
                                    }

                                }
                                else
                                {
                                    status_str = "Invalid GETFROMFILE args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.GETACCOUNTTAG)
                            {
                                // syntax is GETACCOUNTTAG,tagname

                                if (value_keywordargs.Length > 1)
                                {

                                    string tagname = value_keywordargs[1];
                                    string tagvalue = null;

                                    // get the value of the account tag from the triggering mob
                                    if (trigmob != null && !trigmob.Deleted)
                                    {
                                        Account acct = trigmob.Account as Account;
                                        if (acct != null)
                                        {
                                            tagvalue = acct.GetTag(tagname);
                                        }
                                    }
                                    else
                                    {
                                        no_error = false;
                                    }

                                    if (tagvalue != null)
                                    {
                                        // set the property value
                                        string result = SetPropertyValue(spawner, o, arglist[0], tagvalue);

                                        // see if it was successful
                                        if (result != "Property has been set.")
                                        {
                                            status_str = arglist[0] + " : " + result;
                                            no_error = false;
                                        }
                                    }
                                    else
                                    {
                                        status_str = "Invalid GETACCOUNTTAG tagname : " + tagname;
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid GETACCOUNTTAG args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.MUL)
                            {
                                // increment the property value by the amount.  Use the format propname/MUL,min,max/ or propname/MUL,value
                                if (value_keywordargs.Length > 1)
                                {
                                    // get a random number
                                    string incvalue = "0";
                                    if (value_keywordargs.Length > 2)
                                    {
                                        try
                                        {
                                            int incarg0 = (int)(10000 * double.Parse(value_keywordargs[1]));
                                            int incarg1 = (int)(10000 * double.Parse(value_keywordargs[2]));
                                            incvalue = String.Format("{0}", Utility.RandomMinMax(incarg0, incarg1) / 10000.0);
                                        }
                                        catch { status_str = "Invalid MUL args : " + arglist[1]; no_error = false; }
                                    }
                                    else
                                    {
                                        incvalue = value_keywordargs[1];
                                    }
                                    // get the current property value
                                    Type ptype;
                                    string tmpvalue = GetPropertyValue(spawner, o, arglist[0], out ptype);

                                    // see if it was successful
                                    if (ptype == null)
                                    {
                                        status_str = String.Format("Cant find {0}", arglist[0]);
                                        no_error = false;
                                    }
                                    else
                                    {
                                        string currentvalue = "0";
                                        try
                                        {
                                            string[] arglist2 = ParseString(tmpvalue, 2, "=");
                                            string[] arglist3 = ParseString(arglist2[1], 2, " ");
                                            currentvalue = arglist3[0].Trim();
                                        }
                                        catch { }
                                        string tmpstr = currentvalue;
                                        // should use the actual ptype info to do the multiplication.  Maybe later.
                                        try
                                        {
                                            int tmpval = (int)(double.Parse(currentvalue) * double.Parse(incvalue));
                                            tmpstr = tmpval.ToString();
                                        }
                                        catch { status_str = "Invalid MUL args : " + arglist[1]; no_error = false; }

                                        // set the property value using the incremented value
                                        string result = SetPropertyValue(spawner, o, arglist[0], tmpstr);
                                        // see if it was successful
                                        if (result != "Property has been set.")
                                        {
                                            status_str = arglist[0] + " : " + result;
                                            no_error = false;
                                        }
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid MUL args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.INC)
                            {
                                // increment the property value by the amount.  Use the format propname/INC,min,max/ or propname/INC,value
                                if (value_keywordargs.Length > 1)
                                {
                                    // get a random number
                                    string incvalue = "0";
                                    if (value_keywordargs.Length > 2)
                                    {
                                        try
                                        {
                                            incvalue = String.Format("{0}", Utility.RandomMinMax(int.Parse(value_keywordargs[1]), int.Parse(value_keywordargs[2])));
                                        }
                                        catch { status_str = "Invalid INC args : " + arglist[1]; no_error = false; }
                                    }
                                    else
                                    {
                                        incvalue = value_keywordargs[1];
                                    }
                                    // get the current property value
                                    Type ptype;
                                    string tmpvalue = GetPropertyValue(spawner, o, arglist[0], out ptype);

                                    // see if it was successful
                                    if (ptype == null)
                                    {
                                        status_str = String.Format("Cant find {0}", arglist[0]);
                                        no_error = false;
                                    }
                                    else
                                    {
                                        string currentvalue = "0";
                                        try
                                        {
                                            string[] arglist2 = ParseString(tmpvalue, 2, "=");
                                            string[] arglist3 = ParseString(arglist2[1], 2, " ");
                                            currentvalue = arglist3[0].Trim();
                                        }
                                        catch { }
                                        string tmpstr = currentvalue;

                                        // should use the actual ptype info to do the addition.  Maybe later.
                                        try
                                        {
                                            int tmpval = (int)(double.Parse(currentvalue) + double.Parse(incvalue));
                                            tmpstr = tmpval.ToString();
                                        }
                                        catch { status_str = "Invalid INC args : " + arglist[1]; no_error = false; }

                                        // set the property value using the incremented value
                                        string result = SetPropertyValue(spawner, o, arglist[0], tmpstr);
                                        // see if it was successful
                                        if (result != "Property has been set.")
                                        {
                                            status_str = arglist[0] + " : " + result;
                                            no_error = false;
                                        }
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid INC args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.MOB)
                            {
                                // lookup the mob id based on the name. format is /MOB,name[,type]/
                                if (value_keywordargs.Length > 1)
                                {
                                    string typestr = null;
                                    if (value_keywordargs.Length > 2)
                                    {
                                        typestr = value_keywordargs[2];
                                    }
                                    // lookup the name
                                    Mobile mob_id = null;
                                    try
                                    {
                                        mob_id = FindMobileByName(spawner, value_keywordargs[1], typestr); // the format of this will be 0xvalue "name"
                                    }
                                    catch { status_str = "Invalid MOB args : " + arglist[1]; no_error = false; }
                                    // set the property value using this format (M) id name

                                    string result = SetPropertyObject(spawner, o, arglist[0], mob_id);

                                    // see if it was successful
                                    if (result != "Property has been set.")
                                    {
                                        status_str = arglist[0] + " : " + result;
                                        no_error = false;
                                    }

                                }
                                else
                                {

                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.TRIGMOB)
                            {
                                string result = SetPropertyObject(spawner, o, arglist[0], trigmob);
                                // see if it was successful
                                if (result != "Property has been set.")
                                {
                                    status_str = arglist[0] + " : " + result;
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.AMOUNTCARRIED)
                            {
                                // syntax is AMOUNTCARRIED,itemtype
                                int amount = 0;

                                if (value_keywordargs.Length > 1)
                                {
                                    string typestr = value_keywordargs[1];

                                    // get the list of items being carried of the specified type
                                    Type targetType = SpawnerType.GetType(typestr);

                                    if (targetType != null && trigmob != null && trigmob.Backpack != null)
                                    {
                                        amount = trigmob.Backpack.GetAmount(targetType);
                                    }

                                    string result = SetPropertyValue(spawner, o, arglist[0], amount.ToString());

                                    // see if it was successful
                                    if (result != "Property has been set.")
                                    {
                                        status_str = arglist[0] + " : " + result;
                                        no_error = false;
                                    }
                                }
                                else
                                {
                                    status_str = "Invalid AMOUNTCARRIED args : " + arglist[1];
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.PLAYERSINRANGE)
                            {
                                // syntax is PLAYERSINRANGE,range
                                int nplayers = 0;
                                int range = 0;
                                // get the number of players in range
                                if (value_keywordargs.Length > 1)
                                {
                                    try
                                    {
                                        range = int.Parse(value_keywordargs[1]);
                                    }
                                    catch { }
                                }

                                // count nearby players
                                if (refobject is Item)
                                {

                                    foreach (Mobile p in ((Item)refobject).GetMobilesInRange(range))
                                    {
                                        if (p.Player && p.AccessLevel == AccessLevel.Player) nplayers++;
                                    }

                                }
                                else
                                    if (refobject is Mobile)
                                    {

                                        foreach (Mobile p in ((Mobile)refobject).GetMobilesInRange(range))
                                        {
                                            if (p.Player && p.AccessLevel == AccessLevel.Player) nplayers++;
                                        }
                                    }

                                string result = SetPropertyValue(spawner, o, arglist[0], nplayers.ToString());

                                // see if it was successful
                                if (result != "Property has been set.")
                                {
                                    status_str = arglist[0] + " : " + result;
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.TRIGSKILL)
                            {
                                if (value_keywordargs.Length > 1)
                                {
                                    if (spawner != null && spawner.TriggerSkill != null)
                                    {
                                        string skillstr = null;
                                        // syntax is TRIGSKILL,name|value|cap|base
                                        if (value_keywordargs[1].ToLower() == "name")
                                        {
                                            skillstr = spawner.TriggerSkill.Name;
                                        }
                                        else
                                            if (value_keywordargs[1].ToLower() == "value")
                                            {
                                                skillstr = spawner.TriggerSkill.Value.ToString();
                                            }
                                            else
                                                if (value_keywordargs[1].ToLower() == "cap")
                                                {
                                                    skillstr = spawner.TriggerSkill.Cap.ToString();
                                                }
                                                else
                                                    if (value_keywordargs[1].ToLower() == "base")
                                                    {
                                                        skillstr = spawner.TriggerSkill.Base.ToString();
                                                    }

                                        string result = SetPropertyValue(spawner, o, arglist[0], skillstr);
                                        // see if it was successful
                                        if (result != "Property has been set.")
                                        {
                                            status_str = arglist[0] + " : " + result;
                                            no_error = false;
                                        }
                                    }
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == valuemodKeyword.RANDNAME)
                            {
                                if (value_keywordargs.Length > 1)
                                {

                                    string result = SetPropertyValue(spawner, o, arglist[0], NameList.RandomName(value_keywordargs[1]));
                                    // see if it was successful
                                    if (result != "Property has been set.")
                                    {
                                        status_str = arglist[0] + " : " + result;
                                        no_error = false;
                                    }
                                }
                                else
                                {

                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                        }
                        else if (IsTypemodKeyword(keywordargs[0]))
                        {
                            typemodKeyword kw = (typemodKeyword)typemodKeywordHash[keywordargs[0]];

                            if (kw == typemodKeyword.MUSIC)
                            {
                                SendMusicToPlayers(arglist[0], trigmob, refobject, out status_str);
                                if (status_str != null)
                                {
                                    no_error = false;
                                }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            //
                            //  SOUND keyword
                            //
                            else if (kw == typemodKeyword.SOUND)
                            {
                                int sound = -1;
                                // try to get the soundnumber argument
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "Missing sound number";
                                    no_error = false;
                                }
                                else
                                {
                                    try
                                    {
                                        sound = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper sound number format"; no_error = false; }
                                }
                                try
                                {
                                    if (sound >= 0 && o is Mobile)
                                    {
                                        Effects.PlaySound(((Mobile)o).Location, ((Mobile)o).Map, sound);
                                    }
                                    else
                                        if (sound >= 0 && o is Item)
                                        {
                                            Effects.PlaySound(((Item)o).Location, ((Item)o).Map, sound);
                                        }
                                }
                                catch { }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            //
                            //  EFFECT keyword
                            //
                            else if (kw == typemodKeyword.EFFECT)
                            {
                                int effect = -1;
                                int duration = 1;
                                // syntax is EFFECT,itemid,duration,[x,y,z]
                                // try to get the effect argument
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "Missing effect number";
                                    no_error = false;
                                }
                                else
                                {
                                    try
                                    {
                                        effect = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper effect number format"; no_error = false; }
                                }
                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        duration = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "Improper effect duration format"; no_error = false; }
                                }
                                // by default just use the spawn location
                                Point3D eloc;
                                Map emap = Map.Internal;
                                if (o is Mobile)
                                {
                                    eloc = ((Mobile)o).Location;
                                    emap = ((Mobile)o).Map;
                                }
                                else
                                    if (o is Item)
                                    {
                                        eloc = ((Item)o).Location;
                                        emap = ((Item)o).Map;
                                    }
                                    else
                                    {
                                        // should never get here
                                        eloc = new Point3D(0, 0, 0);
                                    }

                                if (keywordargs.Length > 3)
                                {
                                    // is this applied to the trig mob or to a location?
                                    if (keywordargs.Length > 5)
                                    {
                                        int x = 0;
                                        int y = 0;
                                        int z = 0;
                                        try
                                        {
                                            x = int.Parse(keywordargs[3]);
                                            y = int.Parse(keywordargs[4]);
                                            z = int.Parse(keywordargs[5]);
                                        }
                                        catch { status_str = "Improper effect location format"; }
                                        eloc = new Point3D(x, y, z);
                                    }
                                }
                                if (effect >= 0 && emap != Map.Internal)
                                {
                                    Effects.SendLocationEffect(eloc, emap, effect, duration);
                                }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            //
                            //  BOLTEFFECT keyword
                            //
                            else if (kw == typemodKeyword.BOLTEFFECT)
                            {
                                int sound = 0x29;
                                int hue = 0;
                                // syntax is BOLTEFFECT[,sound[,hue]]

                                // try to get the effect argument
                                if (keywordargs.Length > 1)
                                {

                                    try
                                    {
                                        sound = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper sound id"; no_error = false; }
                                }
                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        hue = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "Improper hue"; no_error = false; }
                                }
                                if (o is IEntity)
                                {
                                    SendBoltEffect((IEntity)o, sound, hue);
                                }

                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            //
                            //  MEFFECT keyword
                            //
                            else if (kw == typemodKeyword.MEFFECT)
                            {
                                int effect = -1;
                                int duration = 0;
                                int speed = 1;
                                Point3D eloc1 = new Point3D(0, 0, 0);
                                Point3D eloc2 = new Point3D(0, 0, 0);
                                Map emap = Map.Internal;
                                bool hasloc = false;
                                // syntax is MEFFECT,itemid[,speed][,x,y,z][,x2,y2,z2]

                                // try to get the effect argument
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "Missing effect number";
                                    no_error = false;
                                }
                                else
                                {
                                    try
                                    {
                                        effect = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper effect number format"; no_error = false; }
                                }
                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        speed = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "Improper effect speed format"; no_error = false; }
                                }

                                // by default just use the spawn location

                                if (o is Mobile)
                                {
                                    eloc2 = ((Mobile)o).Location;
                                    emap = ((Mobile)o).Map;
                                }
                                else if (o is Item)
                                {
                                    eloc2 = ((Item)o).Location;
                                    emap = ((Item)o).Map;
                                }

                                if (keywordargs.Length > 8)
                                {

                                    int x = 0;
                                    int y = 0;
                                    int z = 0;
                                    try
                                    {
                                        x = int.Parse(keywordargs[3]);
                                        y = int.Parse(keywordargs[4]);
                                        z = int.Parse(keywordargs[5]);
                                    }
                                    catch { status_str = "Improper effect location format"; }
                                    eloc1 = new Point3D(x, y, z);

                                    try
                                    {
                                        x = int.Parse(keywordargs[6]);
                                        y = int.Parse(keywordargs[7]);
                                        z = int.Parse(keywordargs[8]);
                                    }
                                    catch { status_str = "Improper effect location format"; }
                                    eloc2 = new Point3D(x, y, z);
                                    hasloc = true;

                                }
                                else
                                    if (keywordargs.Length > 5)
                                    {

                                        int x = 0;
                                        int y = 0;
                                        int z = 0;
                                        try
                                        {
                                            x = int.Parse(keywordargs[3]);
                                            y = int.Parse(keywordargs[4]);
                                            z = int.Parse(keywordargs[5]);
                                        }
                                        catch { status_str = "Improper effect location format"; }
                                        eloc1 = new Point3D(x, y, z);
                                        hasloc = true;

                                    }

                                if (effect >= 0 && hasloc && emap != Map.Internal)
                                {
                                    Effects.SendPacket(eloc1, emap, new HuedEffect(EffectType.Moving, -1, -1, effect, eloc1, eloc2, speed, duration, false, false, 0, 0));
                                }
                                else
                                    if (effect >= 0 && refobject is IEntity && o is IEntity)
                                    {
                                        //Effects.SendLocationEffect(eloc, emap, effect, duration);
                                        //public static void SendMovingEffect( IEntity from, IEntity to, int itemID, int speed, int duration, bool fixedDirection, bool explodes )
                                        Effects.SendMovingEffect((IEntity)refobject, (IEntity)o, effect, speed, duration, false, false);
                                    }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            //
                            //  PEFFECT keyword
                            //
                            else if (kw == typemodKeyword.PEFFECT)
                            {
                                int effect = -1;
                                int duration = 1;
                                // syntax is PEFFECT,itemid,duration,[x,y,z]
                                // try to get the effect argument
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "Missing effect number";
                                    no_error = false;
                                }
                                else
                                {
                                    try
                                    {
                                        effect = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper effect number format"; no_error = false; }
                                }
                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        duration = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "Improper effect duration format"; no_error = false; }
                                }
                                // by default just use the spawn location
                                Point3D eloc;
                                Map emap = Map.Internal;
                                if (o is Mobile)
                                {
                                    eloc = ((Mobile)o).Location;
                                    emap = ((Mobile)o).Map;
                                }
                                else if (o is Item)
                                {
                                    eloc = ((Item)o).Location;
                                    emap = ((Item)o).Map;
                                }
                                else
                                {
                                    // should never get here
                                    eloc = new Point3D(0, 0, 0);
                                }

                                if (keywordargs.Length > 3)
                                {
                                    // is this applied to the trig mob or to a location?
                                    if (keywordargs.Length > 5)
                                    {
                                        int x = 0;
                                        int y = 0;
                                        int z = 0;
                                        try
                                        {
                                            x = int.Parse(keywordargs[3]);
                                            y = int.Parse(keywordargs[4]);
                                            z = int.Parse(keywordargs[5]);
                                        }
                                        catch { status_str = "Improper effect location format"; }
                                        eloc = new Point3D(x, y, z);
                                    }
                                }
                                if (effect >= 0 && emap != Map.Internal)
                                {
                                    Effects.SendLocationEffect(eloc, emap, effect, duration);
                                }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            //
                            //  POISON keyword
                            //
                            else if (kw == typemodKeyword.POISON)
                            {

                                ApplyPoisonToPlayers(arglist[0], o as Mobile, o, out status_str);

                                //ApplyPoisonToPlayers(arglist[0], trigmob, refobject, out status_str);

                                if (status_str != null)
                                {
                                    no_error = false;
                                }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            else if (kw == typemodKeyword.DAMAGE)
                            {

                                ApplyDamageToPlayers(arglist[0], o as Mobile, o, out status_str);

                                //ApplyDamageToPlayers(arglist[0], trigmob, refobject, out status_str);
                                if (status_str != null)
                                {
                                    no_error = false;
                                }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            else if (kw == typemodKeyword.ADD)
                            {

                                no_error = AddItemToTarget(spawner, o, keywordargs, arglist, trigmob, refobject, false, out remainder, out status_str);

                            }
                            else if (kw == typemodKeyword.EQUIP)
                            {
                                no_error = AddItemToTarget(spawner, o, keywordargs, arglist, trigmob, refobject, true, out remainder, out status_str);

                            }
                            else if (kw == typemodKeyword.DELETE)
                            {

                                if (o is Item)
                                {
                                    ((Item)o).Delete();
                                }
                                else if (o is Mobile)
                                {
                                    if (!((Mobile)o).Player)
                                    {
                                        ((Mobile)o).Delete();
                                    }
                                }
                                else if (o is XmlAttachment)
                                {
                                    ((XmlAttachment)o).Delete();
                                }

                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];

                            }
                            else if (kw == typemodKeyword.KILL)
                            {
                                if (o is Mobile)
                                {
                                    ((Mobile)o).Kill();
                                }

                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];
                            }
                            else if (kw == typemodKeyword.UNEQUIP)
                            {
                                // syntax is UNEQUIP,layer[,delete]

                                Layer layer = Layer.Invalid;
                                bool remove = false;

                                if (keywordargs.Length > 1)
                                {
                                    try
                                    {
                                        layer = (Layer)Enum.Parse(typeof(Layer), keywordargs[1], true);
                                    }
                                    catch { status_str = "Invalid layer"; }
                                }

                                if (keywordargs.Length > 2)
                                {
                                    if (keywordargs[2] == "delete")
                                    {
                                        remove = true;
                                    }
                                }

                                if (o is Mobile && layer != Layer.Invalid)
                                {
                                    Mobile m = (Mobile)o;
                                    // go through all of the items on the mobile
                                    List<Item> packlist = m.Items;

                                    for (int i = 0; i < packlist.Count; ++i)
                                    {
                                        Item item = (Item)packlist[i];

                                        //  check the layer
                                        // if it matches then unequip it
                                        if (item.Layer == layer)
                                        {
                                            if (remove)
                                            {
                                                item.Delete();
                                            }
                                            else
                                            {
                                                m.AddToBackpack(item);
                                            }
                                        }
                                    }
                                }

                                if (status_str != null)
                                {
                                    no_error = false;
                                }
                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];

                            }
                            else if (kw == typemodKeyword.ATTACH)
                            {
                                no_error = AddAttachmentToTarget(spawner, o, keywordargs, arglist, trigmob, refobject, out remainder, out status_str);

                            }
                            else if (kw == typemodKeyword.MSG)
                            {
                                // syntax is MSG[,probability][,hue]

                                // if the object is a mobile then display a msg over the mob or item
                                double drop_probability = 1;
                                int hue = 0x3b2;

                                if (keywordargs.Length > 1)
                                {
                                    try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                    catch { status_str = "Invalid msg probability : " + arglist[1]; no_error = false; }

                                }
                                if (keywordargs.Length > 2)
                                {
                                    try { hue = int.Parse(keywordargs[2]); }
                                    catch { status_str = "Invalid MSG hue : " + arglist[1]; no_error = false; }

                                }

                                if (hue < 0) hue = 0;

                                if (o is Mobile || o is Item)
                                {
                                    string msgstr = arglist[1];

                                    // test the drop probability
                                    if (Utility.RandomDouble() < drop_probability)
                                    {
                                        if (o is Mobile)
                                            ((Mobile)o).PublicOverheadMessage(MessageType.Regular, hue, false, msgstr);
                                        else
                                            if (o is Item)
                                                ((Item)o).PublicOverheadMessage(MessageType.Regular, hue, false, msgstr);

                                    }
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }

                            else if (kw == typemodKeyword.ASCIIMSG)
                            {
                                // syntax is ASCIIMSG[,probability][,hue][,font]

                                // if the object is a mobile then display a msg over the mob or item
                                double drop_probability = 1;
                                int hue = 0x3b2;
                                int font = 3;
                                if (keywordargs.Length > 1)
                                {
                                    try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                    catch { status_str = "Invalid msg probability : " + arglist[1]; no_error = false; }

                                }
                                if (keywordargs.Length > 2)
                                {
                                    try { hue = int.Parse(keywordargs[2]); }
                                    catch { status_str = "Invalid MSG hue : " + arglist[1]; no_error = false; }

                                }
                                if (keywordargs.Length > 3)
                                {
                                    try { font = int.Parse(keywordargs[3]); }
                                    catch { status_str = "Invalid MSG font : " + arglist[1]; no_error = false; }

                                }
                                if (hue < 0) hue = 0;
                                if (font < 0) font = 0;

                                if (o is Mobile || o is Item)
                                {
                                    string msgstr = arglist[1];

                                    // test the drop probability
                                    if (Utility.RandomDouble() < drop_probability)
                                    {
                                        if (o is Mobile)
                                            PublicOverheadMobileMessage((Mobile)o, MessageType.Regular, hue, font, msgstr, true);
                                        else
                                            if (o is Item)
                                                PublicOverheadItemMessage((Item)o, MessageType.Regular, hue, font, msgstr);

                                    }
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == typemodKeyword.SENDMSG)
                            {
                                // syntax is SENDMSG[,probability][,hue]/msg

                                // if the object is a mobile then display a msg over the mob or item
                                double drop_probability = 1;
                                int hue = 0x3b2;
                                int font = 3;
                                if (keywordargs.Length > 1)
                                {
                                    try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                    catch { status_str = "Invalid msg probability : " + arglist[1]; no_error = false; }

                                }
                                if (keywordargs.Length > 2)
                                {
                                    try { hue = int.Parse(keywordargs[2]); }
                                    catch { status_str = "Invalid SENDMSG hue : " + arglist[1]; no_error = false; }

                                }

                                if (hue < 0) hue = 0;

                                if (o is Mobile)
                                {
                                    string msgstr = arglist[1];

                                    // test the drop probability
                                    if (Utility.RandomDouble() < drop_probability)
                                    {
                                        ((Mobile)o).Send(new UnicodeMessage(Serial.MinusOne, -1, MessageType.Regular, hue, font, "ENU", "System", msgstr));
                                    }
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == typemodKeyword.SENDASCIIMSG)
                            {
                                // syntax is SENDASCIIMSG[,probability][,hue][,font]

                                // if the object is a mobile then display a msg over the mob or item
                                double drop_probability = 1;
                                int hue = 0x3b2;
                                int font = 3;
                                if (keywordargs.Length > 1)
                                {
                                    try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                    catch { status_str = "Invalid msg probability : " + arglist[1]; no_error = false; }

                                }
                                if (keywordargs.Length > 2)
                                {
                                    try { hue = int.Parse(keywordargs[2]); }
                                    catch { status_str = "Invalid MSG hue : " + arglist[1]; no_error = false; }

                                }
                                if (keywordargs.Length > 3)
                                {
                                    try { font = int.Parse(keywordargs[3]); }
                                    catch { status_str = "Invalid MSG font : " + arglist[1]; no_error = false; }

                                }
                                if (hue < 0) hue = 0;
                                if (font < 0) font = 0;

                                if (o is Mobile)
                                {
                                    string msgstr = arglist[1];

                                    // test the drop probability
                                    if (Utility.RandomDouble() < drop_probability)
                                    {
                                        ((Mobile)o).Send(new AsciiMessage(Serial.MinusOne, -1, MessageType.Regular, hue, font, "System", msgstr));
                                    }
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                            else if (kw == typemodKeyword.SAY)
                            {
                                // if the object is a mobile then display a msg over the mob
                                double drop_probability = 1;
                                if (keywordargs.Length > 1)
                                {
                                    try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                    catch { status_str = "Invalid say probability : " + arglist[1]; no_error = false; }
                                }
                                if (o is Mobile)
                                {
                                    string msgstr = arglist[1];

                                    // test the drop probability
                                    if (Utility.RandomDouble() < drop_probability)
                                    {
                                        ((Mobile)o).Say(msgstr);
                                    }
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];

                            }
                            else if (kw == typemodKeyword.SPEECH)
                            {
                                // syntax is SPEECH[,probability][,keywordnumber]
                                // if the object is a mobile then have it speak with optional keyword arg
                                double drop_probability = 1;
                                if (keywordargs.Length > 1)
                                {
                                    try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                    catch { status_str = "Invalid speech probability : " + arglist[1]; no_error = false; }
                                }
                                int keyword_number = -1;
                                if (keywordargs.Length > 2)
                                {
                                    try { keyword_number = int.Parse(keywordargs[2]); }
                                    catch { status_str = "Invalid keyword number : " + arglist[1]; no_error = false; }
                                }
                                if (o is Mobile)
                                {
                                    string msgstr = arglist[1];

                                    // test the drop probability
                                    if (Utility.RandomDouble() < drop_probability)
                                    {
                                        int[] keywordarray = new int[] { };
                                        if (keyword_number >= 0)
                                        {
                                            keywordarray = new int[] { keyword_number };
                                        }
                                        ((Mobile)o).DoSpeech(msgstr, keywordarray, MessageType.Regular, 0x3B2);
                                    }
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];

                            }
                            else if (kw == typemodKeyword.OFFSET)
                            {
                                // syntax is OFFSET,x,y[,z]
                                // shift the location of the object by the specified amount

                                int xoffset = 0;
                                int yoffset = 0;
                                int zoffset = 0;

                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        xoffset = int.Parse(keywordargs[1]);
                                        yoffset = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "Invalid xy offset : " + arglist[1]; no_error = false; }
                                }

                                if (keywordargs.Length > 3)
                                {
                                    try
                                    {
                                        zoffset = int.Parse(keywordargs[3]);
                                    }
                                    catch { status_str = "Invalid zoffset : " + arglist[1]; no_error = false; }
                                }

                                if (o is Mobile)
                                {
                                    Point3D loc = ((Mobile)o).Location;
                                    ((Mobile)o).Location = new Point3D(loc.X + xoffset, loc.Y + yoffset, loc.Z + zoffset);
                                }
                                else if (o is Item)
                                {
                                    Point3D loc = ((Item)o).Location;
                                    ((Item)o).Location = new Point3D(loc.X + xoffset, loc.Y + yoffset, loc.Z + zoffset);
                                }

                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];

                            }
                            else if (kw == typemodKeyword.ANIMATE)
                            {
                                // syntax is ANIMATE,action[,framecount][,repeatcount][,forward true/false][,repeat true/false][delay]
                                // Animate( int action, int frameCount, int repeatCount, bool forward, bool repeat, int delay )
                                int action = -1;
                                int framecount = 7;
                                int repeatcount = 1;
                                bool forward = true;
                                bool repeat = false;
                                int delay = 0;
                                if (keywordargs.Length > 1)
                                {
                                    try { action = int.Parse(keywordargs[1]); }
                                    catch { status_str = "Invalid action : " + arglist[1]; no_error = false; }
                                }

                                if (keywordargs.Length > 2)
                                {
                                    try { framecount = int.Parse(keywordargs[2]); }
                                    catch { status_str = "Invalid framecount : " + arglist[1]; no_error = false; }
                                }

                                if (keywordargs.Length > 3)
                                {
                                    try { repeatcount = int.Parse(keywordargs[3]); }
                                    catch { status_str = "Invalid repeatcount : " + arglist[1]; no_error = false; }
                                }

                                if (keywordargs.Length > 4)
                                {
                                    try { forward = bool.Parse(keywordargs[4]); }
                                    catch { status_str = "Invalid forward : " + arglist[1]; no_error = false; }
                                }

                                if (keywordargs.Length > 5)
                                {
                                    try { repeat = bool.Parse(keywordargs[5]); }
                                    catch { status_str = "Invalid repeat : " + arglist[1]; no_error = false; }
                                }

                                if (keywordargs.Length > 6)
                                {
                                    try { delay = int.Parse(keywordargs[6]); }
                                    catch { status_str = "Invalid delay : " + arglist[1]; no_error = false; }
                                }

                                if (o is Mobile && action >= 0)
                                {
                                    ((Mobile)o).Animate(action, framecount, repeatcount, forward, repeat, delay);
                                }

                                if (arglist.Length < 2) break;
                                remainder = singlearglist[1];

                            }
                            else if (kw == typemodKeyword.BCAST)
                            {
                                // syntax is BCAST[,hue][,font]/message

                                int hue = 0x482;
                                int font = -1; // default unicode messages

                                if (keywordargs.Length > 1)
                                {
                                    try { hue = int.Parse(keywordargs[1]); }
                                    catch { status_str = "Invalid hue : " + arglist[1]; no_error = false; }
                                }

                                if (keywordargs.Length > 2)
                                {
                                    try { font = int.Parse(keywordargs[2]); }
                                    catch { status_str = "Invalid font : " + arglist[1]; no_error = false; }
                                }

                                if (font >= 0)
                                {
                                    // broadcast an ascii message to all players
                                    BroadcastAsciiMessage(AccessLevel.Player, hue, font, arglist[1]);
                                }
                                else
                                {
                                    // broadcast a message to all players
                                    CommandHandlers.BroadcastMessage(AccessLevel.Player, hue, arglist[1]);
                                }

                                if (arglist.Length < 3) break;
                                remainder = arglist[2];

                            }
                        }
                        //else // check for protected properties
                        //	if(arglist[0].ToLower() == "accesslevel")
                        //{
                        //	status_str = "accesslevel is a protected property";
                        //	if(arglist.Length < 3) break;
                        //	remainder = arglist[2];
                        //}
                        else
                        {
                            // check for the literal char
                            if (singlearglist[1] != null && singlearglist[1].Length > 0 && singlearglist[1][0] == '@')
                            {

                                string lstr = singlearglist[1];
                                if (terminated && lstr[lstr.Length - 1] == '/')
                                    lstr = lstr.Remove(lstr.Length - 1, 1);

                                string result = SetPropertyValue(spawner, o, arglist[0], lstr.Remove(0, 1));
                                // see if it was successful
                                if (result != "Property has been set.")
                                {
                                    status_str = arglist[0] + " : " + result;
                                    no_error = false;
                                }
                                remainder = null;
                                break;
                            }
                            else
                            {
                                string result = SetPropertyValue(spawner, o, arglist[0], arglist[1]);
                                // see if it was successful
                                if (result != "Property has been set.")
                                {
                                    status_str = arglist[0] + " : " + result;
                                    no_error = false;
                                }
                                if (arglist.Length < 3) break;
                                remainder = arglist[2];
                            }
                        }
                    }
                }
            }
            return (no_error);
        }
Beispiel #12
0
        public static void AddToRecentSpawnerSearchList(XmlSpawner spawner, XmlSpawner target)
        {
            if (spawner == null || target == null) return;

            if (spawner.RecentSpawnerSearchList == null)
            {
                spawner.RecentSpawnerSearchList = new ArrayList();
            }
            spawner.RecentSpawnerSearchList.Add(target);

            // check the length and truncate if it gets too long
            if (spawner.RecentSpawnerSearchList.Count > 100)
            {
                spawner.RecentSpawnerSearchList.RemoveAt(0);
            }
        }
Beispiel #13
0
        public static void AddSpawnItem(XmlSpawner spawner, object invoker, XmlSpawner.SpawnObject theSpawn, Item item, Point3D location, Map map, Mobile trigmob, bool requiresurface,
            List<XmlSpawner.SpawnPositionInfo> spawnpositioning, string propertyString, bool smartspawn, out string status_str)
        {
            status_str = null;
            if (item == null || theSpawn == null) return;

            // add the item to the spawned list
            theSpawn.SpawnedObjects.Add(item);

            item.Spawner = spawner;

            if (spawner != null)
            {
                // this is being called by a spawner so use spawner information for placement
                if (!spawner.Deleted)
                {
                    // set the item amount
                    if (spawner.StackAmount > 1 && item.Stackable)
                    {
                        item.Amount = spawner.StackAmount;
                    }
                    // if this is in any container such as a pack then add to the container.
                    if (spawner.Parent is Container)
                    {
                        Container c = (Container)spawner.Parent;

                        Point3D loc = spawner.Location;

                        if (!smartspawn)
                        {
                            item.OnBeforeSpawn(loc, map);
                        }

                        item.Location = loc;

                        // check to see whether we drop or add the item based on the spawnrange
                        // this will distribute multiple items around the spawn point, and allow precise
                        // placement of single spawns at the spawn point
                        if (spawner.SpawnRange > 0)
                            c.DropItem(item);
                        else
                            c.AddItem(item);

                    }
                    else
                    {
                        // if the spawn entry is in a subgroup and has a packrange, then get the packcoord

                        Point3D packcoord = Point3D.Zero;
                        if (theSpawn.PackRange >= 0 && theSpawn.SubGroup > 0)
                        {
                            packcoord = spawner.GetPackCoord(theSpawn.SubGroup);
                        }
                        Point3D loc = spawner.GetSpawnPosition(requiresurface, theSpawn.PackRange, packcoord, spawnpositioning);

                        if (!smartspawn)
                        {
                            item.OnBeforeSpawn(loc, map);
                        }

                        // standard placement for all items in the world
                        item.MoveToWorld(loc, map);
                    }
                }
                else
                {
                    // if the spawner has already been deleted then delete the item since it cannot be cleaned up by spawner deletion any longer
                    item.Delete();
                    return;
                }
            }
            else
            {
                if (!smartspawn)
                {
                    item.OnBeforeSpawn(location, map);
                }
                // use the location and map info passed in
                // this allows AddSpawnItem to be called by objects other than spawners as long as they pass in a valid SpawnObject
                item.MoveToWorld(location, map);
            }

            // clear the taken flag on all newly spawned items
            ItemFlags.SetTaken(item, false);

            if (!smartspawn)
            {
                item.OnAfterSpawn();
            }

            // apply the parsed arguments from the typestring using setcommand
            // be sure to do this after setting map and location so that errors dont place the mob on the internal map
            BaseXmlSpawner.ApplyObjectStringProperties(spawner, propertyString, item, trigmob, spawner, out status_str);

            // if the object has an OnAfterSpawnAndModify method, then invoke it
            //InvokeOnAfterSpawnAndModify(item);
        }
Beispiel #14
0
 public static void AddSpawnItem(XmlSpawner spawner, XmlSpawner.SpawnObject theSpawn, Item item, Point3D location, Map map, Mobile trigmob, bool requiresurface,
     List<XmlSpawner.SpawnPositionInfo> spawnpositioning, string propertyString, bool smartspawn, out string status_str)
 {
     AddSpawnItem(spawner, spawner, theSpawn, item, location, map, trigmob, requiresurface, spawnpositioning, propertyString, smartspawn, out status_str);
 }
Beispiel #15
0
 public static void AddSpawnItem(XmlSpawner spawner, object invoker, XmlSpawner.SpawnObject theSpawn, Item item, Point3D location, Map map, Mobile trigmob, bool requiresurface,
     string propertyString, out string status_str)
 {
     AddSpawnItem(spawner, invoker, theSpawn, item, location, map, trigmob, requiresurface, null, propertyString, false, out status_str);
 }
Beispiel #16
0
        public static Mobile FindMobileByName(XmlSpawner fromspawner, string name, string typestr)
        {
            if (name == null) return (Mobile)null;

            int count = 0;

            Mobile foundmobile = FindInRecentMobileSearchList(fromspawner, name, typestr);

            if (foundmobile != null) return foundmobile;

            Type targettype = null;
            if (typestr != null)
            {
                targettype = SpawnerType.GetType(typestr);
            }

            // search through all mobiles in the world and find one with a matching name
            foreach (Mobile mobile in World.Mobiles.Values)
            {
                Type mobtype = mobile.GetType();
                if (!mobile.Deleted && (typestr == null ||
                    (mobtype != null && targettype != null && (mobtype.Equals(targettype) || mobtype.IsSubclassOf(targettype))))
                    && ((name.Length == 0 || String.Compare(mobile.Name, name, true) == 0)))
                {

                    foundmobile = mobile;
                    count++;
                    // added the break in to return the first match instead of forcing uniqueness (overrides the count test)
                    break;
                }
                //if(count > 1) break;
            }

            // if a unique item is found then success
            if (count == 1)
            {
                // add this to the recent search list
                AddToRecentMobileSearchList(fromspawner, foundmobile);

                return (foundmobile);
            }
            else
                return (Mobile)null;
        }
Beispiel #17
0
        public static XmlSpawner FindSpawnerByName(XmlSpawner fromspawner, string name)
        {
            if (name == null) return (XmlSpawner)null;

            int count = 0;

            // do a quick search through the recent search list to see if it is there
            XmlSpawner foundspawner = FindInRecentSpawnerSearchList(fromspawner, name);

            if (foundspawner != null) return foundspawner;

            // search through all xmlspawners in the world and find one with a matching name
            foreach (Item item in World.Items.Values)
            {
                if (item is XmlSpawner)
                {
                    XmlSpawner spawner = (XmlSpawner)item;
                    if (!spawner.Deleted && (String.Compare(spawner.Name, name, true) == 0))
                    {
                        foundspawner = spawner;

                        count++;
                        // added the break in to return the first match instead of forcing uniqueness (overrides the count test)
                        break;
                    }
                    //if(count > 1) break;
                }
            }

            // if a unique item is found then success
            if (count == 1)
            {
                // add this to the recent search list
                AddToRecentSpawnerSearchList(fromspawner, foundspawner);

                return (foundspawner);
            }
            else
                return (XmlSpawner)null;
        }
Beispiel #18
0
        // -------------------------------------------------------------
        // End modified Beta-36 Properties.cs code
        // -------------------------------------------------------------
        public static string ApplyToProperty(XmlSpawner spawner, object getobject, object setobject, string getpropertystring, string setpropertystring)
        {
            Type ptype;

            string getvalue = GetPropertyValue(spawner, getobject, getpropertystring, out ptype);

            if (getvalue == null)
            {
                return "Null object or property";
            }

            if (ptype == null)
            {
                return getvalue;
            }

            string value2 = ParseGetValue(getvalue, ptype);

            if (value2 != null)
            {
                // set the property value using returned get value as the the value
                string result = SetPropertyValue(spawner, setobject, setpropertystring, value2);

                // see if it was successful
                if (result != "Property has been set.")
                {
                    return setpropertystring + " : " + result;
                }
            }

            return null;
        }
Beispiel #19
0
        public static string GetPropertyValue(XmlSpawner spawner, object o, string name, out Type ptype)
        {
            ptype = null;
            if (o == null || name == null) return null;

            Type type = o.GetType();
            object po = null;

            if ( o != null && o is PlayerMobile && ((PlayerMobile)o).AccessLevel >= AccessLevel.Administrator )
                return "Access denied";

            PropertyInfo[] props = null;

            try
            {
                props = type.GetProperties(BindingFlags.Static | BindingFlags.Instance | BindingFlags.Public);
            }
            catch
            {
                Console.WriteLine("GetProperties error with type {0}", type);
                return null;
            }

            // parse the strings of the form property.attribute into two parts
            // first get the property
            string[] arglist = ParseString(name, 2, ".");
            string propname = arglist[0];
            // parse up to 4 comma separated args for special keyword properties
            string[] keywordargs = ParseString(propname, 4, ",");

            // check for special keywords
            if (keywordargs[0] == "ATTACHMENT")
            {
                // syntax is ATTACHMENT,type,name,property
                if (keywordargs.Length < 4)
                {
                    return "Invalid ATTACHMENT format";
                }

                string apropname = keywordargs[3];
                string aname = keywordargs[2];
                Type attachtype = SpawnerType.GetType(keywordargs[1]);

                // allow empty string specifications to be used to indicate a null string which will match any name
                if (aname == "") aname = null;

                ArrayList attachments = XmlAttach.FindAttachments(o, attachtype, aname);

                if (attachments != null && attachments.Count > 0)
                {
                    string getvalue = GetPropertyValue(spawner, attachments[0], apropname, out ptype);

                    return getvalue;
                }
                else
                    return "Attachment not found";
            }
            else
                if (keywordargs[0] == "SKILL")
                {
                    // syntax is SKILL,skillname
                    if (keywordargs.Length < 2)
                    {
                        return "Invalid SKILL format";
                    }
                    bool found = true;
                    try
                    {
                        SkillName skillname = (SkillName)Enum.Parse(typeof(SkillName), keywordargs[1], true);

                        if (o is Mobile)
                        {
                            Skill skill = ((Mobile)o).Skills[skillname];
                            ptype = skill.Value.GetType();

                            return String.Format("{0} = {1}", skillname, skill.Value);
                        }
                        else
                            return "Object is not mobile";
                    }
                    catch { found = false; }

                    if (!found)
                        return "Skill not found.";
                }
                else
                    if (keywordargs[0] == "SERIAL")
                    {

                        bool found = true;
                        try
                        {
                            if (o is Mobile)
                            {
                                ptype = ((Mobile)o).Serial.GetType();

                                return String.Format("Serial = {0}", ((Mobile)o).Serial);
                            }
                            else
                                if (o is Item)
                                {
                                    ptype = ((Item)o).Serial.GetType();

                                    return String.Format("Serial = {0}", ((Item)o).Serial);
                                }
                                else
                                    return "Object is not item/mobile";
                        }
                        catch { found = false; }

                        if (!found)
                            return "Serial not found.";
                    }
                    else
                        if (keywordargs[0] == "TYPE")
                        {
                            ptype = typeof(Type);

                            return String.Format("Type = {0}", o.GetType().Name);

                        }
                        else
                            if (keywordargs[0] == "STEALABLE")
                            {

                                bool found = true;
                                try
                                {

                                    if (o is Item)
                                    {
                                        ptype = typeof(bool);

                                        return String.Format("Stealable = {0}", ItemFlags.GetStealable(o as Item));
                                    }
                                    else
                                        return "Object is not an item";
                                }
                                catch { found = false; }

                                if (!found)
                                    return "Stealable flag not found.";
                            }

            // do a bit of parsing to handle array references
            string[] arraystring = arglist[0].Split('[');
            int index = -1;
            if (arraystring.Length > 1)
            {
                // parse the property name from the indexing
                propname = arraystring[0];

                // then parse to get the index value
                string[] arrayvalue = arraystring[1].Split(']');

                if (arrayvalue.Length > 0)
                {
                    try
                    {
                        index = int.Parse(arrayvalue[0]);
                    }
                    catch { }
                }
            }

            if (arglist.Length == 2)
            {
                // use the lookup table for optimization if possible
                PropertyInfo plookup = LookupPropertyInfo(spawner, type, propname);

                if (plookup != null)
                {

                    if (!plookup.CanRead)
                        return "Property is write only.";

                    //if ( BaseXmlSpawner.IsProtected(type, propname) )
                    //return "Property is protected.";

                    ptype = plookup.PropertyType;
                    if (ptype.IsPrimitive)
                    {
                        po = plookup.GetValue(o, null);
                    }
                    else if ((ptype.GetInterface("IList") != null) && index >= 0)
                    {
                        try
                        {
                            object arrayvalue = plookup.GetValue(o, null);
                            po = ((IList)arrayvalue)[index];
                        }
                        catch { }
                    }
                    else
                    {
                        po = plookup.GetValue(o, null);
                    }
                    // now set the nested attribute using the new property list
                    return (GetPropertyValue(spawner, po, arglist[1], out ptype));
                }
                else
                {
                    // is a nested property with attributes so first get the property
                    foreach (PropertyInfo p in props)
                    {
                        //if ( Insensitive.Equals( p.Name, arglist[0] ) )
                        if (Insensitive.Equals(p.Name, propname))
                        {

                            if (!p.CanRead)
                                return "Property is write only.";

                            //if ( BaseXmlSpawner.IsProtected(type, propname) )
                            //return "Property is protected.";

                            ptype = p.PropertyType;
                            if (ptype.IsPrimitive)
                            {
                                po = p.GetValue(o, null);
                            }
                            else if ((ptype.GetInterface("IList") != null) && index >= 0)
                            {
                                try
                                {
                                    object arrayvalue = p.GetValue(o, null);
                                    po = ((IList)arrayvalue)[index];
                                }
                                catch { }
                            }
                            else
                            {
                                po = p.GetValue(o, null);
                            }
                            // now set the nested attribute using the new property list
                            return (GetPropertyValue(spawner, po, arglist[1], out ptype));

                        }
                    }
                }
            }
            else
            {
                // use the lookup table for optimization if possible
                PropertyInfo plookup = LookupPropertyInfo(spawner, type, propname);

                if (plookup != null)
                {

                    if (!plookup.CanRead)
                        return "Property is write only.";

                    ptype = plookup.PropertyType;

                    return InternalGetValue(o, plookup, index);
                }
                else
                {
                    // its just a simple single property
                    foreach (PropertyInfo p in props)
                    {

                        //if ( Insensitive.Equals( p.Name, name ) )
                        if (Insensitive.Equals(p.Name, propname))
                        {

                            if (!p.CanRead)
                                return "Property is write only.";

                            ptype = p.PropertyType;

                            return InternalGetValue(o, p, index);
                        }
                    }
                }
            }

            return "Property not found.";
        }
Beispiel #20
0
        public static bool AddItemToTarget(XmlSpawner spawner, object o, string[] keywordargs, string[] arglist, Mobile trigmob,
            object refobject, bool equip, out string remainder, out string status_str)
        {
            remainder = "";
            status_str = null;

            if (o == null || keywordargs == null || arglist == null) return false;

            // if the object is a mobile then add the item in the next arg to its pack.  Use the format /ADD,drop_probability/itemtype/
            // or /ADD,drop_probability/<itemtype/propname1/value1/propname2/value2/...>/
            double drop_probability = 1;

            if (keywordargs.Length > 1)
            {
                bool converterror = false;
                try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                catch { status_str = "Invalid drop probability : " + arglist[1]; converterror = true; }

                if (converterror) return false;
            }

            Mobile m = null;
            if (o is Mobile || (o is Container))
            {
                Container pack = null;

                if (o is Mobile)
                {
                    m = (Mobile)o;

                    if (!m.Deleted)
                    {
                        pack = m.Backpack;

                        // auto add a pack if the mob doesnt have one
                        if (pack == null)
                        {
                            pack = new Backpack();
                            m.AddItem(pack);
                        }
                    }
                }
                else
                {
                    pack = o as Container;

                }

                if (pack != null)
                {
                    // handle the nested item property specification using <>
                    string itemargstring = null;

                    // itemtypestr will be the actual item type to be created.  In the simple form  it will be arglist[1]
                    // for the string /arg1/ADD/arg2/arg3/arg4/arg5 arglist [0] will contain ADD , arglist[1] will be arg2,
                    // and arglist[2] will be arg3/arg4/arg5
                    // if nested property specs
                    // arglist[1] will be <arg2 and arglist[2] will be arg3/ar4>/arg5
                    // the drop probability will be in probargs
                    string[] probargs = ParseCommaArgs(arglist[0], 2);

                    string itemtypestr = arglist[1];

                    // get the argument list after the < if any , note for the string /arg1/ADD/<arg2/arg3/arg4>/arg5 arglist [0] will contain ADD
                    // arglist[1] will be <arg2 and arglist[2] will be arg3/ar4>/arg5
                    // but note arglist[1] could also be <arg2>
                    // remainder will have ADD/<arg2/arg3/arg4>/arg5
                    //
                    // also need to deal with nested cases of ADD/<args/ADD/<args>>  and ADD/<args/ADD/<args>/ADD<args>>
                    string additemstr = arglist[1];

                    if (arglist.Length > 2)
                        additemstr = arglist[1] + "/" + arglist[2];

                    // check to see if the first char is a "<"
                    if (additemstr.IndexOf("<") == 0)
                    {
                        // itemarglist[1] will contain arg2/arg3/arg4>/arg5
                        // additemstr should have the full list of args <arg2/arg3/arg4>/arg5 if they are there.  In the case of /arg1/ADD/arg2
                        // it will just have arg2
                        string[] itemarglist = ParseString(additemstr, 2, "<");

                        // take that argument list that should like like arg2/ag3/arg4>/arg5
                        // need to find the matching ">"
                        //string[] itemargs = ParseString(itemarglist[1],2,">");

                        string[] itemargs = ParseToMatchingParen(itemarglist[1], '<', '>');

                        // and get the first part of the string without the >  so itemargs[0] should be arg2/ag3/arg4
                        itemargstring = itemargs[0];

                        // and itemargs[1] should be the remainder
                        if (itemargs.Length > 1)
                        {
                            // but have to get rid of any trailing / that might be after the >
                            string[] trailstr = ParseSlashArgs(itemargs[1], 2);
                            if (trailstr.Length > 1)
                                remainder = trailstr[1];
                            else
                                remainder = itemargs[1];
                        }
                        else
                            remainder = "";

                        // get the type info by pulling out the first arg in itemargstring
                        string[] tempitemarg = ParseSlashArgs(itemargstring, 2);

                        // and get the type info from it
                        itemtypestr = tempitemarg[0];

                    }
                    else
                    {
                        // otherwise its just a regular case with arglist[2] containing the rest of the arguments
                        if (arglist.Length > 2)
                            remainder = arglist[2];
                        else
                            remainder = "";
                    }

                    // test the drop probability
                    if (Utility.RandomDouble() >= drop_probability) return true;

                    // is it a valid item specification?
                    string baseitemtype = ParseObjectType(itemtypestr);

                    if (IsSpecialItemKeyword(baseitemtype))
                    {

                        // itemtypestr will have the form keyword[,x[,y]]
                        string[] itemkeywordargs = ParseCommaArgs(itemtypestr, 3);

                        itemKeyword kw = (itemKeyword)itemKeywordHash[baseitemtype];

                        switch (kw)
                        {
                            // deal with the special keywords

                            case itemKeyword.ARMOR:
                                {
                                    // syntax is ARMOR,min,max
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int min = 0;
                                        int max = 0;
                                        bool converterror = false;
                                        try { min = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid ARMOR args : " + itemtypestr; converterror = true; }

                                        try { max = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid ARMOR args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        Item item = MagicArmor(min, max, false, false);

                                        if (item != null)
                                        {
                                            if (equip && m != null)
                                            {
                                                if (!m.EquipItem(item)) pack.DropItem(item);
                                            }
                                            else
                                            {

                                                pack.DropItem(item);
                                            }
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "ARMOR takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.WEAPON:
                                {
                                    // syntax is WEAPON,min,max
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int min = 0;
                                        int max = 0;
                                        bool converterror = false;
                                        try { min = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid WEAPON args : " + itemtypestr; converterror = true; }

                                        try { max = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid WEAPON args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        Item item = MagicWeapon(min, max, false);
                                        if (item != null)
                                        {
                                            if (equip && m != null)
                                            {
                                                if (!m.EquipItem(item)) pack.DropItem(item);
                                            }
                                            else
                                                pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "WEAPON takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.JEWELRY:
                                {
                                    // syntax is JEWELRY,min,max
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int min = 0;
                                        int max = 0;
                                        bool converterror = false;
                                        try { min = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid JEWELRY args : " + itemtypestr; converterror = true; }

                                        try { max = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid JEWELRY args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        Item item = MagicJewelry(min, max);
                                        if (item != null)
                                        {
                                            if (equip && m != null)
                                            {
                                                if (!m.EquipItem(item)) pack.DropItem(item);
                                            }
                                            else
                                                pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "JEWELRY takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.SHIELD:
                                {
                                    // syntax is SHIELD,min,max
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int min = 0;
                                        int max = 0;
                                        bool converterror = false;
                                        try { min = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid SHIELD args : " + itemtypestr; converterror = true; }

                                        try { max = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid SHIELD args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        Item item = MagicShield(min, max);
                                        if (item != null)
                                        {
                                            if (equip && m != null)
                                            {
                                                if (!m.EquipItem(item)) pack.DropItem(item);
                                            }
                                            else
                                                pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "SHIELD takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.JARMOR:
                                {
                                    // syntax is JARMOR,min,max
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int min = 0;
                                        int max = 0;
                                        bool converterror = false;
                                        try { min = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid JARMOR args : " + itemtypestr; converterror = true; }

                                        try { max = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid JARMOR args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        Item item = MagicArmor(min, max, true, true);
                                        if (item != null)
                                        {
                                            if (equip && m != null)
                                            {
                                                if (!m.EquipItem(item)) pack.DropItem(item);
                                            }
                                            else
                                                pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "JARMOR takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.SARMOR:
                                {
                                    // syntax is SARMOR,min,max
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int min = 0;
                                        int max = 0;
                                        bool converterror = false;
                                        try { min = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid SARMOR args : " + itemtypestr; converterror = true; }

                                        try { max = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid SARMOR args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        Item item = MagicArmor(min, max, false, true);
                                        if (item != null)
                                        {
                                            if (equip && m != null)
                                            {
                                                if (!m.EquipItem(item)) pack.DropItem(item);
                                            }
                                            else
                                                pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "SARMOR takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.JWEAPON:
                                {
                                    // syntax is JWEAPON,min,max
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int min = 0;
                                        int max = 0;
                                        bool converterror = false;
                                        try { min = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid JWEAPON args : " + itemtypestr; converterror = true; }

                                        try { max = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid JWEAPON args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        Item item = MagicWeapon(min, max, true);
                                        if (item != null)
                                        {
                                            if (equip && m != null)
                                            {
                                                if (!m.EquipItem(item)) pack.DropItem(item);
                                            }
                                            else
                                                pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "JWEAPON takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.SCROLL:
                                {
                                    // syntax is SCROLL,mincircle,maxcircle
                                    //get the min,max
                                    if (itemkeywordargs.Length == 3)
                                    {
                                        int minCircle = 0;
                                        int maxCircle = 0;
                                        bool converterror = false;
                                        try { minCircle = int.Parse(itemkeywordargs[1]); }
                                        catch { status_str = "Invalid SCROLL args : " + itemtypestr; converterror = true; }

                                        try { maxCircle = int.Parse(itemkeywordargs[2]); }
                                        catch { status_str = "Invalid SCROLL args : " + itemtypestr; converterror = true; }

                                        if (converterror) return false;
                                        int circle = Utility.RandomMinMax(minCircle, maxCircle);
                                        int min = (circle - 1) * 8;
                                        Item item = Loot.RandomScroll(min, min + 7, SpellbookType.Regular);
                                        if (item != null)
                                        {
                                            pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "SCROLL takes 2 args : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.POTION:
                                {
                                    // syntax is POTION
                                    Item item = Loot.RandomPotion();
                                    if (item != null)
                                    {
                                        pack.DropItem(item);
                                        // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                        if (itemargstring != null)
                                        {
                                            ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                        }
                                    }
                                    break;
                                }
                            case itemKeyword.TAKEN:
                                {
                                    // syntax is TAKEN

                                    Item item = GetTaken(refobject);

                                    if (item != null)
                                    {
                                        pack.DropItem(item);
                                        // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                        if (itemargstring != null)
                                        {
                                            ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                        }
                                    }
                                    break;
                                }
                            case itemKeyword.GIVEN:
                                {
                                    // syntax is GIVEN

                                    Item item = GetGiven(refobject);

                                    if (item != null)
                                    {
                                        pack.DropItem(item);
                                        // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                        if (itemargstring != null)
                                        {
                                            ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                        }
                                    }
                                    break;
                                }
                            case itemKeyword.LOOT:
                                {
                                    // syntax is LOOT,methodname
                                    if (itemkeywordargs.Length == 2)
                                    {

                                        Item item = null;

                                        // look up the method
                                        Type ltype = typeof(Loot);
                                        if (ltype != null)
                                        {
                                            MethodInfo method = null;

                                            try
                                            {
                                                // get the zero-arg method with the specified name
                                                method = ltype.GetMethod(itemkeywordargs[1], new Type[0]);

                                            }
                                            catch { }

                                            if (method != null && method.IsStatic)
                                            {
                                                ParameterInfo[] pinfo = method.GetParameters();
                                                // check to make sure the method for this object has the right args
                                                if (pinfo.Length == 0)
                                                {
                                                    // method must be public static with no arguments returning an Item class object
                                                    try
                                                    {
                                                        item = method.Invoke(null, null) as Item;
                                                    }
                                                    catch { }
                                                }
                                                else
                                                {
                                                    status_str = "LOOT method must be zero arg : " + itemtypestr;
                                                    return false;
                                                }
                                            }
                                            else
                                            {
                                                status_str = "LOOT no valid method found : " + itemtypestr;
                                                return false;
                                            }
                                        }

                                        if (item != null)
                                        {
                                            pack.DropItem(item);
                                            // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                            if (itemargstring != null)
                                            {
                                                ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "LOOT takes 1 arg : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.NECROSCROLL:
                                {
                                    // syntax is NECROSCROLL,index
                                    if (itemkeywordargs.Length == 2)
                                    {
                                        int index = 0;
                                        bool converterror = false;
                                        try
                                        {
                                            index = int.Parse(itemkeywordargs[1]);
                                        }
                                        catch
                                        {
                                            status_str = "Invalid NECROSCROLL args : " + itemtypestr;
                                            converterror = true;
                                        }

                                        if (converterror) return false;

                                        if (Core.AOS)
                                        {
                                            Item item = Loot.Construct(Loot.NecromancyScrollTypes, index);
                                            if (item != null)
                                            {
                                                pack.DropItem(item);
                                                // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                                if (itemargstring != null)
                                                {
                                                    ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                                }
                                            }
                                        }
                                    }
                                    else
                                    {
                                        status_str = "NECROSCROLL takes 1 arg : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                            case itemKeyword.LOOTPACK:
                                {
                                    // syntax is LOOTPACK,type
                                    if (itemkeywordargs.Length == 2)
                                    {
                                        LootPack lootpack = null;
                                        string loottype = itemkeywordargs[1];

                                        if (loottype.ToLower() == "poor")
                                        {
                                            lootpack = LootPack.Poor;
                                        }
                                        else if (loottype.ToLower() == "meager")
                                        {
                                            lootpack = LootPack.Meager;
                                        }
                                        else if (loottype.ToLower() == "average")
                                        {
                                            lootpack = LootPack.Average;
                                        }
                                        else if (loottype.ToLower() == "rich")
                                        {
                                            lootpack = LootPack.Rich;
                                        }
                                        else if (loottype.ToLower() == "filthyrich")
                                        {
                                            lootpack = LootPack.FilthyRich;
                                        }
                                        else if (loottype.ToLower() == "ultrarich")
                                        {
                                            lootpack = LootPack.UltraRich;
                                        }
                                        else if (loottype.ToLower() == "superboss")
                                        {
                                            lootpack = LootPack.SuperBoss;
                                        }
                                        else
                                        {
                                            status_str = "Invalid LOOTPACK type: " + loottype;
                                            return false;
                                        }

                                        int m_KillersLuck = 0;
                                        if (trigmob != null)
                                        {
                                            m_KillersLuck = LootPack.GetLuckChanceForKiller(trigmob);
                                        }

                                        bool converterror = false;
                                        try
                                        {
                                            // generate the nospawn component of the lootpack
                                            lootpack.Generate(m, pack, false, m_KillersLuck);

                                            // generate the spawn component (basically gold) requires a mobile and wont work in containers
                                            // because Generate does a test for TryDropItem for stackables which requires a valid mob argument,
                                            // any stackable generated in a container will fail
                                            // so just test for a valid mobile and only do the atspawn generate for them.
                                            if (m != null)
                                                lootpack.Generate(m, pack, true, m_KillersLuck);
                                        }
                                        catch
                                        {
                                            status_str = "Unable to add LOOTPACK";
                                            converterror = true;
                                        }

                                        if (converterror) return false;

                                    }
                                    else
                                    {
                                        status_str = "LOOTPACK takes 1 arg : " + itemtypestr;
                                        return false;
                                    }
                                    break;
                                }
                        }

                    }
                    else
                    {
                        Type type = null;
                        try
                        {
                            type = SpawnerType.GetType(ParseObjectType(itemtypestr));
                        }
                        catch { }

                        // if so then create it
                        if (type != null)
                        {
                            object newo = XmlSpawner.CreateObject(type, itemtypestr);
                            if (newo is Item)
                            {
                                Item item = newo as Item;

                                if (equip && m != null)
                                {
                                    if (!m.EquipItem(item)) pack.DropItem(item);
                                }
                                else
                                    pack.DropItem(item);

                                // could call applyobjectstringproperties on a nested propertylist here to set item attributes
                                if (itemargstring != null)
                                {
                                    ApplyObjectStringProperties(spawner, itemargstring, item, trigmob, refobject, out status_str);
                                }
                            }
                            else
                            {
                                status_str = "Invalid ADD. No such item : " + itemtypestr;

                                if (newo is BaseCreature)
                                    ((BaseCreature)newo).Delete();

                                return false;
                            }

                        }
                        else
                        {
                            status_str = "Invalid ADD. No such item : " + itemtypestr;
                            return false;
                        }
                    }
                }
                else
                {
                    status_str = "Invalid ADD. mobile has no pack.";

                    if (arglist.Length < 3) return false;

                    remainder = arglist[2];
                    return false;
                }
            }
            else
            {
                status_str = "Invalid ADD. must be mobile or container.";

                if (arglist.Length < 3) return false;

                remainder = arglist[2];
                return false;
            }
            return true;
        }
Beispiel #21
0
        public static string ParseForKeywords(XmlSpawner spawner, object o, string valstr, Mobile trigmob, bool literal, out Type ptype)
        {
            ptype = null;

            if (valstr == null || valstr.Length <= 0) return null;

            string str = valstr.Trim();

            // look for keywords
            // need to handle the case of nested arglists like arg,arg,<arg,arg>
            // handle value keywords that may take comma args

            // itemarglist[1] will contain arg2/arg3/arg4>/arg5
            // additemstr should have the full list of args <arg2/arg3/arg4>/arg5 if they are there.  In the case of /arg1/ADD/arg2
            // it will just have arg2
            string[] groupedarglist = ParseString(str, 2, "[");

            // take that argument list that should like like arg2/ag3/arg4>/arg5
            // need to find the matching ">"

            string[] groupargs = null;
            string groupargstring = null;
            if (groupedarglist.Length > 1)
            {
                groupargs = ParseToMatchingParen(groupedarglist[1], '[', ']');

                // and get the first part of the string without the >  so itemargs[0] should be arg2/ag3/arg4
                groupargstring = groupargs[0];
            }

            // need to handle comma args that may be grouped with the () such as the (ATTACHMENT,args) arg

            //string[] arglist = ParseString(groupedarglist[0],4,",");
            string[] arglist = groupedarglist[0].Trim().Split(',');
            if (groupargstring != null && groupargstring.Length > 0)
            {
                if (arglist != null && arglist.Length > 0)
                    arglist[arglist.Length - 1] = groupargstring;
            }

            string pname = arglist[0].Trim();
            char startc = str[0];

            // first see whether it is a standard numeric value
            if ((startc == '.') || (startc == '-') || (startc == '+') || (startc >= '0' && startc <= '9'))
            {
                // determine the type
                if (str.IndexOf(".") >= 0)
                {
                    ptype = typeof(Double);
                }
                else
                {
                    ptype = typeof(Int32);
                }
                return str;
            }
            else
                // or a string
                if (startc == '"' || startc == '(')
                {
                    ptype = typeof(String);
                    return str;
                }
                else
                    // or an enum
                    if (startc == '#')
                    {
                        ptype = typeof(String);
                        return str.Substring(1);
                    }
                    // or a bool
                    else if ((str.ToLower()) == "true" || (str.ToLower() == "false"))
                    {
                        ptype = typeof(Boolean);
                        return str;
                    }
                    // then look for a keyword
                    else if (IsValueKeyword(pname))
                    {
                        valueKeyword kw = (valueKeyword)valueKeywordHash[pname];

                        //if(pname == "GETONMOB" && arglist.Length > 2)
                        if ((kw == valueKeyword.GETONMOB) && arglist.Length > 2)
                        {
                            // syntax is GETONMOB,mobname[,mobtype],property

                            string propname = arglist[2];
                            string typestr = null;

                            if (arglist.Length > 3)
                            {
                                typestr = arglist[2];
                                propname = arglist[3];
                            }

                            Mobile testmobile = FindMobileByName(spawner, arglist[1], typestr);

                            string getvalue = GetPropertyValue(spawner, testmobile, propname, out ptype);

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GET) && arglist.Length > 2)
                        {
                            // syntax is GET,itemname[,itemtype],property

                            string propname = arglist[2];
                            string typestr = null;

                            if (arglist.Length > 3)
                            {
                                typestr = arglist[2];
                                propname = arglist[3];
                            }

                            // is the itemname a serialno?
                            object testitem = null;
                            if (arglist[1].StartsWith("0x"))
                            {
                                int serial = -1;
                                try
                                {
                                    serial = Convert.ToInt32(arglist[1], 16);
                                }
                                catch { }
                                if (serial >= 0)
                                    testitem = World.FindEntity(serial);
                            }
                            else
                            {
                                testitem = FindItemByName(spawner, arglist[1], typestr);
                            }

                            string getvalue = GetPropertyValue(spawner, testitem, propname, out ptype);

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GETONCARRIED) && arglist.Length > 2)
                        {
                            // syntax is GETONCARRIED,itemname[,itemtype],property

                            string propname = arglist[2];
                            string typestr = null;

                            // if the itemtype arg has been specified then check it
                            if (arglist.Length > 3)
                            {
                                propname = arglist[3];
                                typestr = arglist[2];
                            }

                            Item testitem = SearchMobileForItem(trigmob, ParseObjectType(arglist[1]), typestr, false);

                            string getvalue = GetPropertyValue(spawner, testitem, propname, out ptype);

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GETONNEARBY) && arglist.Length > 3)
                        {
                            // syntax is GETONNEARBY,range,name[,type][,searchcontainers],property
                            // or GETONNEARBY,range,name[,type][,searchcontainers],[ATTACHMENT,type,name,property]

                            string targetname = arglist[2];
                            string propname = arglist[3];
                            string typestr = null;
                            bool searchcontainers = false;
                            int range = -1;
                            try
                            {
                                range = int.Parse(arglist[1]);
                            }
                            catch { }

                            if (arglist.Length > 4)
                            {
                                typestr = arglist[3];
                                propname = arglist[4];
                            }

                            if (arglist.Length > 5)
                            {
                                try
                                {
                                    searchcontainers = bool.Parse(arglist[4]);
                                }
                                catch
                                {
                                }
                                propname = arglist[5];
                            }

                            Type targettype = null;
                            if (typestr != null)
                            {
                                targettype = SpawnerType.GetType(typestr);
                            }

                            if (range >= 0)
                            {
                                // get all of the nearby objects
                                ArrayList nearbylist = GetNearbyObjects(spawner, targetname, targettype, typestr, range, searchcontainers, null);

                                // apply the properties from the first valid thing on the list
                                foreach (object nearbyobj in nearbylist)
                                {
                                    string getvalue = GetPropertyValue(spawner, nearbyobj, propname, out ptype);
                                    return ParseGetValue(getvalue, ptype);
                                }
                            }
                            else
                                return null;
                        }
                        else if ((kw == valueKeyword.GETONTRIGMOB) && arglist.Length > 1)
                        {
                            // syntax is GETONTRIGMOB,property
                            string getvalue = GetPropertyValue(spawner, trigmob, arglist[1], out ptype);

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GETVAR) && arglist.Length > 1)
                        {
                            // syntax is GETVAR,varname
                            string varname = arglist[1];

                            if (o is XmlAttachment)
                                o = ((XmlAttachment)o).AttachedTo;

                            // look for the xmllocalvariable attachment with the given name
                            XmlLocalVariable var = (XmlLocalVariable)XmlAttach.FindAttachment(o, typeof(XmlLocalVariable), varname);

                            if (var != null)
                            {

                                return var.Data;
                            }
                            else
                            {
                                return null;
                            }
                        }
                        else if ((kw == valueKeyword.GETONPARENT) && arglist.Length > 1)
                        {
                            // syntax is GETONPARENT,property

                            string getvalue = null;

                            if (o is Item)
                            {
                                getvalue = GetPropertyValue(spawner, ((Item)o).Parent, arglist[1], out ptype);
                            }
                            else
                                if (o is XmlAttachment)
                                {

                                    getvalue = GetPropertyValue(spawner, ((XmlAttachment)o).AttachedTo, arglist[1], out ptype);
                                }

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GETONGIVEN) && arglist.Length > 1)
                        {
                            // syntax is GETONGIVEN,property

                            Item taken = null;
                            if (o is XmlAttachment)
                            {
                                taken = GetGiven(((XmlAttachment)o).AttachedTo);
                            }
                            else
                            {
                                taken = GetGiven(o);
                            }

                            string getvalue = GetPropertyValue(spawner, taken, arglist[1], out ptype);

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GETONTAKEN) && arglist.Length > 1)
                        {
                            // syntax is GETONTAKEN,property

                            Item taken = null;
                            if (o is XmlAttachment)
                            {
                                taken = GetTaken(((XmlAttachment)o).AttachedTo);
                            }
                            else
                            {
                                taken = GetTaken(o);
                            }

                            string getvalue = GetPropertyValue(spawner, taken, arglist[1], out ptype);

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GETONTHIS) && arglist.Length > 1)
                        {
                            // syntax is GETONTHIS,property

                            string getvalue = GetPropertyValue(spawner, o, arglist[1], out ptype);

                            return ParseGetValue(getvalue, ptype);
                        }
                        else if ((kw == valueKeyword.GETONSPAWN) && arglist.Length > 2)
                        {
                            // syntax is GETONSPAWN[,spawnername],subgroup,property
                            // get the target from the spawn list
                            string subgroupstr = arglist[1];
                            string propstr = arglist[2];
                            string spawnerstr = null;

                            if (arglist.Length > 3)
                            {
                                spawnerstr = arglist[1];
                                subgroupstr = arglist[2];
                                propstr = arglist[3];
                            }

                            int subgroup = -1;
                            try { subgroup = int.Parse(subgroupstr); }
                            catch { }

                            if (subgroup == -1) return null;

                            if (spawnerstr != null)
                            {
                                spawner = FindSpawnerByName(spawner, spawnerstr);
                            }

                            // check for the special COUNT property keyword
                            if (propstr == "COUNT")
                            {
                                ptype = typeof(int);

                                // get all of the currently active spawns with the specified subgroup
                                ArrayList so = XmlSpawner.GetSpawnedList(spawner, subgroup);

                                if (so == null) return "0";

                                // and return the count
                                return so.Count.ToString();
                            }
                            else
                            {

                                object targetobj = XmlSpawner.GetSpawned(spawner, subgroup);
                                if (targetobj == null) return null;

                                string getvalue = GetPropertyValue(spawner, targetobj, propstr, out ptype);

                                return ParseGetValue(getvalue, ptype);
                            }
                        }
                        else if ((kw == valueKeyword.GETFROMFILE) && arglist.Length > 1)
                        {
                            // syntax is GETFROMFILE,filename
                            ptype = typeof(string);

                            string filename = arglist[1];
                            string filestring = null;

                            // read in the string from the file
                            if (System.IO.File.Exists(filename) == true)
                            {

                                try
                                {
                                    // Create an instance of StreamReader to read from a file.
                                    // The using statement also closes the StreamReader.
                                    using (StreamReader sr = new StreamReader(filename))
                                    {
                                        string line;
                                        // Read and display lines from the file until the end of
                                        // the file is reached.
                                        while ((line = sr.ReadLine()) != null)
                                        {
                                            filestring += line;
                                        }

                                        sr.Close();
                                    }
                                }
                                catch { }
                            }

                            return filestring;
                        }
                        else if ((kw == valueKeyword.GETACCOUNTTAG) && arglist.Length > 1)
                        {
                            // syntax is GETACCOUNTTAG,tagname
                            ptype = typeof(string);

                            string tagname = arglist[1];
                            string tagvalue = null;

                            // get the value of the account tag from the triggering mob
                            if (trigmob != null && !trigmob.Deleted)
                            {
                                Account acct = trigmob.Account as Account;
                                if (acct != null)
                                {
                                    tagvalue = '"' + acct.GetTag(tagname) + '"';
                                }
                            }

                            return tagvalue;
                        }
                        else if ((kw == valueKeyword.RND) && arglist.Length > 2)
                        {
                            // syntax is RND,min,max
                            string randvalue = "0";
                            ptype = typeof(Int32);

                            try
                            {
                                randvalue = String.Format("{0}", Utility.RandomMinMax(int.Parse(arglist[1]), int.Parse(arglist[2])));
                            }
                            catch { }

                            // return the random number as the value
                            return randvalue;
                        }
                        else if ((kw == valueKeyword.RNDBOOL))
                        {
                            // syntax is RNDBOOL

                            ptype = typeof(bool);

                            // return the random number as the value
                            return Utility.RandomBool().ToString();
                        }
                        else if ((kw == valueKeyword.RNDLIST) && arglist.Length > 1)
                        {
                            // syntax is RNDLIST,val1,val2,...

                            ptype = typeof(Int32);

                            // compute a random index into the arglist

                            int randindex = Utility.Random(1, arglist.Length - 1);

                            // return the list entry as the value

                            return arglist[randindex];

                        }
                        else if ((kw == valueKeyword.RNDSTRLIST) && arglist.Length > 1)
                        {
                            // syntax is RNDSTRLIST,val1,val2,...

                            ptype = typeof(string);

                            // compute a random index into the arglist

                            int randindex = Utility.Random(1, arglist.Length - 1);

                            // return the list entry as the value

                            return arglist[randindex];

                        }
                        else if ((kw == valueKeyword.AMOUNTCARRIED) && arglist.Length > 1)
                        {
                            // syntax is AMOUNTCARRIED,itemtype

                            ptype = typeof(Int32);

                            int amount = 0;

                            string typestr = arglist[1];

                            if (typestr != null)
                            {
                                // get the list of items being carried of the specified type
                                Type targetType = SpawnerType.GetType(typestr);

                                if (targetType != null && trigmob != null && trigmob.Backpack != null)
                                {
                                    amount = trigmob.Backpack.GetAmount(targetType);
                                }
                            }

                            return amount.ToString();

                        }
                        else if ((kw == valueKeyword.PLAYERSINRANGE) && arglist.Length > 1)
                        {
                            // syntax is PLAYERSINRANGE,range

                            ptype = typeof(Int32);

                            int nplayers = 0;
                            int range = 0;
                            // get the number of players in range
                            try
                            {
                                range = int.Parse(arglist[1]);
                            }
                            catch { }

                            // count nearby players

                            if (o is Item)
                            {
                                foreach (Mobile p in ((Item)o).GetMobilesInRange(range))
                                {
                                    if (p.Player && p.AccessLevel == AccessLevel.Player) nplayers++;
                                }

                            }
                            else if (o is Mobile)
                            {
                                foreach (Mobile p in ((Mobile)o).GetMobilesInRange(range))
                                {
                                    if (p.Player && p.AccessLevel == AccessLevel.Player) nplayers++;
                                }
                            }

                            return nplayers.ToString();

                        }
                        else if ((kw == valueKeyword.TRIGSKILL) && arglist.Length > 1)
                        {
                            if (spawner != null && spawner.TriggerSkill != null)
                            {
                                // syntax is TRIGSKILL,name|value|cap|base
                                if (arglist[1].ToLower() == "name")
                                {
                                    ptype = typeof(string);
                                    return spawner.TriggerSkill.Name;
                                }
                                else if (arglist[1].ToLower() == "value")
                                {
                                    ptype = typeof(double);
                                    return spawner.TriggerSkill.Value.ToString();
                                }
                                else if (arglist[1].ToLower() == "cap")
                                {
                                    ptype = typeof(double);
                                    return spawner.TriggerSkill.Cap.ToString();
                                }
                                else if (arglist[1].ToLower() == "base")
                                {
                                    ptype = typeof(double);
                                    return spawner.TriggerSkill.Base.ToString();
                                }
                            }

                            return null;
                        }
                        if ((kw == valueKeyword.RANDNAME) && arglist.Length > 1)
                        {
                            // syntax is RANDNAME,nametype
                            return NameList.RandomName(arglist[1]);
                        }
                        else
                        {
                            // an invalid keyword format will be passed as literal
                            return str;
                        }
                    }
                    else if (literal)
                    {
                        ptype = typeof(String);
                        return str;
                    }
                    else
                    {
                        // otherwise treat it as a property name
                        string result = GetPropertyValue(spawner, o, pname, out ptype);

                        return ParseGetValue(result, ptype);
                    }
        }
Beispiel #22
0
        public static bool CheckPropertyString(XmlSpawner spawner, object o, string testString, Mobile trigmob, out string status_str)
        {
            status_str = null;

            if (o == null) return false;

            if (testString == null || testString.Length < 1)
            {
                status_str = "Null property test string";
                return false;
            }
            // parse the property test string for and(&)/or(|) operators
            string[] arglist = ParseString(testString, 2, "&|");
            if (arglist.Length < 2)
            {
                bool returnval = CheckSingleProperty(spawner, o, testString, trigmob, out status_str);

                // simple conditional test with no and/or operators
                return returnval;
            }
            else
            {
                // test each half independently and combine the results
                bool first = CheckSingleProperty(spawner, o, arglist[0], trigmob, out status_str);

                // this will recursively parse the property test string with implicit nesting for multiple logical tests of the
                // form A * B * C * D    being grouped as A * (B * (C * D))
                bool second = CheckPropertyString(spawner, o, arglist[1], trigmob, out status_str);

                int andposition = testString.IndexOf("&");
                int orposition = testString.IndexOf("|");

                // combine them based upon the operator
                if ((andposition > 0 && orposition <= 0) || (andposition > 0 && andposition < orposition))
                {
                    // and operator
                    return (first && second);
                }
                else
                    if ((orposition > 0 && andposition <= 0) || (orposition > 0 && orposition < andposition))
                    {
                        // or operator
                        return (first || second);
                    }
                    else
                    {
                        // should never get here
                        return false;
                    }
            }
        }
Beispiel #23
0
        public static string SetPropertyObject(XmlSpawner spawner, object o, string name, object value)
        {
            if (o == null)
            {
                return "Null object";
            }

            if ( o != null && o is PlayerMobile && ((PlayerMobile)o).AccessLevel >= AccessLevel.Administrator )
                return "Access denied";

            Type ptype = null;
            object po = null;
            Type type = o.GetType();

            PropertyInfo[] props = type.GetProperties(BindingFlags.Static | BindingFlags.Instance | BindingFlags.Public);

            // parse the strings of the form property.attribute into two parts
            // first get the property
            string[] arglist = ParseString(name, 2, ".");

            if (arglist.Length == 2)
            {
                // is a nested property with attributes so first get the property

                // use the lookup table for optimization if possible
                PropertyInfo plookup = LookupPropertyInfo(spawner, type, arglist[0]);

                if (plookup != null)
                {

                    //if ( !plookup.CanWrite )
                    //return "Property is read only.";

                    if (BaseXmlSpawner.IsProtected(type, arglist[0]))
                        return "Property is protected.";

                    ptype = plookup.PropertyType;

                    po = plookup.GetValue(o, null);

                    // now set the nested attribute using the new property list
                    return (SetPropertyObject(spawner, po, arglist[1], value));
                }
                else
                {

                    foreach (PropertyInfo p in props)
                    {
                        if (Insensitive.Equals(p.Name, arglist[0]))
                        {

                            //if ( !p.CanWrite )
                            //return "Property is read only.";

                            if (BaseXmlSpawner.IsProtected(type, arglist[0]))
                                return "Property is protected.";

                            ptype = p.PropertyType;

                            po = p.GetValue(o, null);

                            // now set the nested attribute using the new property list
                            return (SetPropertyObject(spawner, po, arglist[1], value));

                        }
                    }
                }
            }
            else
            {
                // its just a simple single property

                // use the lookup table for optimization if possible
                PropertyInfo plookup = LookupPropertyInfo(spawner, type, name);

                if (plookup != null)
                {

                    if (!plookup.CanWrite)
                        return "Property is read only.";

                    if (BaseXmlSpawner.IsProtected(type, name))
                        return "Property is protected.";

                    if (plookup.PropertyType == typeof(Server.Mobile))
                    {
                        plookup.SetValue(o, value, null);

                        return "Property has been set.";
                    }
                    else
                    {
                        return "Property is not of type Mobile.";
                    }
                }
                else
                {
                    foreach (PropertyInfo p in props)
                    {
                        if (Insensitive.Equals(p.Name, name))
                        {

                            if (!p.CanWrite)
                                return "Property is read only.";

                            if (BaseXmlSpawner.IsProtected(type, name))
                                return "Property is protected.";

                            if (p.PropertyType == typeof(Server.Mobile))
                            {
                                p.SetValue(o, value, null);

                                return "Property has been set.";
                            }
                            else
                            {
                                return "Property is not of type Mobile.";
                            }
                        }
                    }
                }
            }

            return "Property not found.";
        }
Beispiel #24
0
        public static bool CheckSingleProperty(XmlSpawner spawner, object o, string testString, Mobile trigmob, out string status_str)
        {
            status_str = null;

            if (o == null || testString == null || testString.Length == 0) return false;

            //get the prop name and test value
            // format will be prop=prop, or prop>prop, prop<prop, prop!prop
            // also support the 'not' operator ~ at the beginning of a test, like ~prop=prop
            testString = testString.Trim();

            bool invertreturn = false;

            if (testString.Length > 0 && testString[0] == '~')
            {
                invertreturn = true;
                testString = testString.Substring(1, testString.Length - 1);
            }

            string[] arglist = ParseString(testString, 2, "=><!");
            if (arglist.Length < 2)
            {
                status_str = "invalid property string : " + testString;
                return false;
            }
            bool hasequal = false;
            bool hasnotequals = false;
            bool hasgreaterthan = false;
            bool haslessthan = false;

            if (testString.IndexOf("=") > 0)
            {
                hasequal = true;
            }
            else
                if (testString.IndexOf("!") > 0)
                {
                    hasnotequals = true;
                }
                else
                    if (testString.IndexOf(">") > 0)
                    {
                        hasgreaterthan = true;
                    }
                    else
                        if (testString.IndexOf("<") > 0)
                        {
                            haslessthan = true;
                        }

            // does it have a valid operator?
            if (!hasequal && !hasgreaterthan && !haslessthan && !hasnotequals)
                return false;

            Type ptype1;
            Type ptype2;

            string value1 = ParseForKeywords(spawner, o, arglist[0].Trim(), trigmob, false, out ptype1);

            // see if it was successful
            if (ptype1 == null)
            {
                status_str = arglist[0] + " : " + value1;

                return invertreturn;
                //return false;
            }

            string value2 = ParseForKeywords(spawner, o, arglist[1].Trim(), trigmob, false, out ptype2);

            // see if it was successful
            if (ptype2 == null)
            {
                status_str = arglist[1] + " : " + value2;

                return invertreturn;
                //return false;
            }

            // look for hex numeric specifications
            int base1 = 10;
            int base2 = 10;
            if (IsNumeric(ptype1) && value1.StartsWith("0x"))
            {
                base1 = 16;
            }

            if (IsNumeric(ptype2) && value2.StartsWith("0x"))
            {
                base2 = 16;
            }

            // and do the type dependent comparisons
            if (ptype2 == typeof(TimeSpan) || ptype1 == typeof(TimeSpan))
            {
                if (hasequal)
                {
                    try
                    {
                        if (TimeSpan.Parse(value1) == TimeSpan.Parse(value2)) return !invertreturn;
                    }
                    catch
                    {
                        status_str = "invalid timespan comparison : {0}" + testString;
                    }
                }
                else
                    if (hasnotequals)
                    {
                        try
                        {
                            if (TimeSpan.Parse(value1) != TimeSpan.Parse(value2)) return !invertreturn;
                        }
                        catch
                        {
                            status_str = "invalid timespan comparison : {0}" + testString;
                        }
                    }
                    else
                        if (hasgreaterthan)
                        {
                            try
                            {
                                if (TimeSpan.Parse(value1) > TimeSpan.Parse(value2)) return !invertreturn;
                            }
                            catch { status_str = "invalid timespan comparison : {0}" + testString; }
                        }
                        else
                            if (haslessthan)
                            {
                                try
                                {
                                    if (TimeSpan.Parse(value1) < TimeSpan.Parse(value2)) return !invertreturn;
                                }
                                catch { status_str = "invalid timespan comparison : {0}" + testString; }
                            }
            }
            else
                // and do the type dependent comparisons
                if (ptype2 == typeof(DateTime) || ptype1 == typeof(DateTime))
                {
                    if (hasequal)
                    {
                        try
                        {
                            if (DateTime.Parse(value1) == DateTime.Parse(value2)) return !invertreturn;
                        }
                        catch
                        {
                            status_str = "invalid DateTime comparison : {0}" + testString;
                        }
                    }
                    else
                        if (hasnotequals)
                        {
                            try
                            {
                                if (DateTime.Parse(value1) != DateTime.Parse(value2)) return !invertreturn;
                            }
                            catch
                            {
                                status_str = "invalid DateTime comparison : {0}" + testString;
                            }
                        }
                        else
                            if (hasgreaterthan)
                            {
                                try
                                {
                                    if (DateTime.Parse(value1) > DateTime.Parse(value2)) return !invertreturn;
                                }
                                catch { status_str = "invalid DateTime comparison : {0}" + testString; }
                            }
                            else
                                if (haslessthan)
                                {
                                    try
                                    {
                                        if (DateTime.Parse(value1) < DateTime.Parse(value2)) return !invertreturn;
                                    }
                                    catch { status_str = "invalid DateTime comparison : {0}" + testString; }
                                }
                }
                else
                    // and do the type dependent comparisons
                    if (IsNumeric(ptype2) && IsNumeric(ptype1))
                    {
                        if (hasequal)
                        {
                            try
                            {
                                if (Convert.ToInt64(value1, base1) == Convert.ToInt64(value2, base2)) return !invertreturn;
                            }
                            catch
                            {
                                status_str = "invalid int comparison : {0}" + testString;
                            }
                        }
                        else
                            if (hasnotequals)
                            {
                                try
                                {
                                    if (Convert.ToInt64(value1, base1) != Convert.ToInt64(value2, base2)) return !invertreturn;
                                }
                                catch
                                {
                                    status_str = "invalid int comparison : {0}" + testString;
                                }
                            }
                            else
                                if (hasgreaterthan)
                                {
                                    try
                                    {
                                        if (Convert.ToInt64(value1, base1) > Convert.ToInt64(value2, base2)) return !invertreturn;
                                    }
                                    catch { status_str = "invalid int comparison : {0}" + testString; }
                                }
                                else
                                    if (haslessthan)
                                    {
                                        try
                                        {
                                            if (Convert.ToInt64(value1, base1) < Convert.ToInt64(value2, base2)) return !invertreturn;
                                        }
                                        catch { status_str = "invalid int comparison : {0}" + testString; }
                                    }
                    }
                    else
                        if ((ptype2 == typeof(double)) && IsNumeric(ptype1))
                        {
                            if (hasequal)
                            {
                                try
                                {
                                    if (Convert.ToInt64(value1, base1) == double.Parse(value2)) return !invertreturn;
                                }
                                catch
                                {
                                    status_str = "invalid int comparison : {0}" + testString;
                                }
                            }
                            else
                                if (hasnotequals)
                                {
                                    try
                                    {
                                        if (Convert.ToInt64(value1, base1) != double.Parse(value2)) return !invertreturn;
                                    }
                                    catch
                                    {
                                        status_str = "invalid int comparison : {0}" + testString;
                                    }
                                }
                                else
                                    if (hasgreaterthan)
                                    {
                                        try
                                        {
                                            if (Convert.ToInt64(value1, base1) > double.Parse(value2)) return !invertreturn;
                                        }
                                        catch { status_str = "invalid int comparison : {0}" + testString; }
                                    }
                                    else
                                        if (haslessthan)
                                        {
                                            try
                                            {
                                                if (Convert.ToInt64(value1, base1) < double.Parse(value2)) return !invertreturn;
                                            }
                                            catch { status_str = "invalid int comparison : {0}" + testString; }
                                        }
                        }
                        else
                            if ((ptype1 == typeof(double)) && IsNumeric(ptype2))
                            {
                                if (hasequal)
                                {
                                    try
                                    {
                                        if (double.Parse(value1) == Convert.ToInt64(value2, base2)) return !invertreturn;
                                    }
                                    catch
                                    {
                                        status_str = "invalid int comparison : {0}" + testString;
                                    }
                                }
                                else
                                    if (hasnotequals)
                                    {
                                        try
                                        {
                                            if (double.Parse(value1) != Convert.ToInt64(value2, base2)) return !invertreturn;
                                        }
                                        catch
                                        {
                                            status_str = "invalid int comparison : {0}" + testString;
                                        }
                                    }
                                    else
                                        if (hasgreaterthan)
                                        {
                                            try
                                            {
                                                if (double.Parse(value1) > Convert.ToInt64(value2, base2)) return !invertreturn;
                                            }
                                            catch { status_str = "invalid int comparison : {0}" + testString; }
                                        }
                                        else
                                            if (haslessthan)
                                            {
                                                try
                                                {
                                                    if (double.Parse(value1) < Convert.ToInt64(value2, base2)) return !invertreturn;
                                                }
                                                catch { status_str = "invalid int comparison : {0}" + testString; }
                                            }
                            }
                            else
                                if ((ptype1 == typeof(double)) && (ptype2 == typeof(double)))
                                {
                                    if (hasequal)
                                    {
                                        try
                                        {
                                            if (double.Parse(value1) == double.Parse(value2)) return !invertreturn;
                                        }
                                        catch
                                        {
                                            status_str = "invalid int comparison : {0}" + testString;
                                        }
                                    }
                                    else
                                        if (hasnotequals)
                                        {
                                            try
                                            {
                                                if (double.Parse(value1) != double.Parse(value2)) return !invertreturn;
                                            }
                                            catch
                                            {
                                                status_str = "invalid int comparison : {0}" + testString;
                                            }
                                        }
                                        else
                                            if (hasgreaterthan)
                                            {
                                                try
                                                {
                                                    if (double.Parse(value1) > double.Parse(value2)) return !invertreturn;
                                                }
                                                catch { status_str = "invalid int comparison : {0}" + testString; }
                                            }
                                            else
                                                if (haslessthan)
                                                {
                                                    try
                                                    {
                                                        if (double.Parse(value1) < double.Parse(value2)) return !invertreturn;
                                                    }
                                                    catch { status_str = "invalid int comparison : {0}" + testString; }
                                                }
                                }
                                else
                                    if (ptype2 == typeof(Boolean) && ptype1 == typeof(Boolean))
                                    {
                                        if (hasequal)
                                        {
                                            try
                                            {
                                                if (Convert.ToBoolean(value1) == Convert.ToBoolean(value2)) return !invertreturn;
                                            }
                                            catch (Exception se) { status_str = "invalid bool comparison : {0}" + testString + se.Message; }
                                        }
                                        else
                                            if (hasnotequals)
                                            {
                                                try
                                                {
                                                    if (Convert.ToBoolean(value1) != Convert.ToBoolean(value2)) return !invertreturn;
                                                }
                                                catch (Exception se) { status_str = "invalid bool comparison : {0}" + testString + se.Message; }
                                            }
                                    }
                                    else
                                        if (ptype2 == typeof(Double) || ptype2 == typeof(Double))
                                        {
                                            if (hasequal)
                                            {
                                                try
                                                {
                                                    if (Convert.ToDouble(value1) == Convert.ToDouble(value2)) return !invertreturn;
                                                }
                                                catch { status_str = "invalid double comparison : {0}" + testString; }
                                            }
                                            else
                                                if (hasnotequals)
                                                {
                                                    try
                                                    {
                                                        if (Convert.ToDouble(value1) != Convert.ToDouble(value2)) return !invertreturn;
                                                    }
                                                    catch { status_str = "invalid double comparison : {0}" + testString; }
                                                }
                                                else
                                                    if (hasgreaterthan)
                                                    {
                                                        try
                                                        {
                                                            if (Convert.ToDouble(value1) > Convert.ToDouble(value2)) return !invertreturn;
                                                        }
                                                        catch { status_str = "invalid double comparison : {0}" + testString; }
                                                    }
                                                    else
                                                        if (haslessthan)
                                                        {
                                                            try
                                                            {
                                                                if (Convert.ToDouble(value1) < Convert.ToDouble(value2)) return !invertreturn;
                                                            }
                                                            catch { status_str = "invalid double comparison : {0}" + testString; }
                                                        }
                                        }
                                        else
                                        {
                                            // by default just do a string comparison
                                            if (hasequal)
                                            {
                                                if (value1 == value2) return !invertreturn;
                                            }
                                            else
                                                if (hasnotequals)
                                                {
                                                    if (value1 != value2) return !invertreturn;
                                                }
                                        }
            return invertreturn;
        }
Beispiel #25
0
 public static bool SpawnTypeKeyword(object invoker, XmlSpawner.SpawnObject TheSpawn, string typeName, string substitutedtypeName, bool requiresurface,
     Mobile triggermob, Point3D location, Map map, XmlGumpCallback gumpcallback, out string status_str)
 {
     return SpawnTypeKeyword(invoker, TheSpawn, typeName, substitutedtypeName, requiresurface, null,
         triggermob, location, map, gumpcallback, out status_str);
 }
Beispiel #26
0
        public static Mobile FindInRecentMobileSearchList(XmlSpawner spawner, string name, string typestr)
        {
            if (spawner == null || name == null || spawner.RecentMobileSearchList == null) return null;

            ArrayList deletelist = null;
            Mobile foundmobile = null;

            Type targettype = null;
            if (typestr != null)
            {
                targettype = SpawnerType.GetType(typestr);
            }

            foreach (Mobile m in spawner.RecentMobileSearchList)
            {
                if (m.Deleted)
                {
                    // clean it up
                    if (deletelist == null)
                        deletelist = new ArrayList();
                    deletelist.Add(m);
                }
                else
                    if (name.Length == 0 || String.Compare(m.Name, name, true) == 0)
                    {

                        if (typestr == null ||
                            (m.GetType() != null && targettype != null && (m.GetType().Equals(targettype) || m.GetType().IsSubclassOf(targettype))))
                        {
                            foundmobile = m;
                            break;
                        }
                    }
            }

            if (deletelist != null)
            {
                foreach (Mobile i in deletelist)
                    spawner.RecentMobileSearchList.Remove(i);
            }

            return (foundmobile);
        }
Beispiel #27
0
        public static bool SpawnTypeKeyword(object invoker, XmlSpawner.SpawnObject TheSpawn, string typeName, string substitutedtypeName, bool requiresurface,
            List<XmlSpawner.SpawnPositionInfo> spawnpositioning, Mobile triggermob, Point3D location, Map map, XmlGumpCallback gumpcallback, out string status_str)
        {
            status_str = null;

            if (typeName == null || TheSpawn == null || substitutedtypeName == null) return false;

            XmlSpawner spawner = invoker as XmlSpawner;

            // check for any special keywords that might appear in the type such as SET, GIVE, or TAKE

            if (IsTypeKeyword(typeName))
            {
                typeKeyword kw = (typeKeyword)typeKeywordHash[typeName];

                switch (kw)
                {
                    case typeKeyword.SET:
                        {

                            // the syntax is SET/prop/value/prop2/value...
                            // check for the SET,itemname[,itemtype]/prop/value form is used
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            string[] keywordargs = ParseString(arglist[0], 3, ",");

                            if (keywordargs.Length > 1)
                            {
                                string typestr = null;
                                if (keywordargs.Length > 2)
                                {
                                    typestr = keywordargs[2];
                                }

                                // is the itemname a serialno?
                                object setitem = null;
                                if (keywordargs[1].StartsWith("0x"))
                                {
                                    int serial = -1;
                                    try
                                    {
                                        serial = Convert.ToInt32(keywordargs[1], 16);
                                    }
                                    catch { }
                                    if (serial >= 0)
                                        setitem = World.FindEntity(serial);
                                }
                                else
                                {
                                    // just look it up by name
                                    setitem = FindItemByName(spawner, keywordargs[1], typestr);
                                }

                                if (setitem == null)
                                {
                                    status_str = "cant find unique item :" + keywordargs[1];
                                    return false;
                                }
                                else
                                {
                                    ApplyObjectStringProperties(spawner, substitutedtypeName, setitem, triggermob, invoker, out status_str);
                                }
                            }
                            else if (spawner != null)
                            {
                                ApplyObjectStringProperties(spawner, substitutedtypeName, spawner.SetItem, triggermob, invoker, out status_str);
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONMOB:
                        {
                            // the syntax is SETONMOB,mobname[,mobtype]/prop/value/prop2/value...
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            Mobile mob = null;
                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length > 1)
                                {
                                    string typestr = null;
                                    if (keywordargs.Length > 2)
                                    {
                                        typestr = keywordargs[2];
                                    }

                                    mob = FindMobileByName(spawner, keywordargs[1], typestr);

                                    if (mob == null)
                                    {
                                        status_str = String.Format("named mob '{0}' not found", keywordargs[1]);
                                    }
                                }
                                else
                                {
                                    status_str = "missing mob name in SETONMOB";
                                }
                            }
                            if (mob != null)
                            {
                                ApplyObjectStringProperties(spawner, substitutedtypeName, mob, triggermob, invoker, out status_str);
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONTHIS:
                        {
                            // the syntax is SETONTHIS/prop/value/prop2/value...
                            //string [] arglist = ParseString(substitutedtypeName,3,"/");

                            if (invoker != null)
                            {
                                ApplyObjectStringProperties(spawner, substitutedtypeName, invoker, triggermob, invoker, out status_str);
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONTRIGMOB:
                        {
                            // the syntax is SETONTRIGMOB/prop/value/prop2/value...
                            ApplyObjectStringProperties(spawner, substitutedtypeName, triggermob, triggermob, invoker, out status_str);
                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETACCOUNTTAG:
                        {
                            // the syntax is SETACCOUNTTAG,tagname/value
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 2);

                            if (arglist.Length > 1)
                            {
                                string[] objstr = ParseString(arglist[0], 2, ",");

                                if (objstr.Length < 2)
                                {
                                    status_str = "missing tagname in SETACCOUNTTAG";
                                    return false;
                                }

                                string tagname = objstr[1];
                                string tagval = arglist[1];

                                // set the tag value
                                // get the value of the account tag from the triggering mob
                                if (triggermob != null && !triggermob.Deleted)
                                {
                                    Account acct = triggermob.Account as Account;
                                    if (acct != null)
                                    {
                                        acct.SetTag(tagname, tagval);
                                    }
                                }
                            }
                            else
                            {
                                status_str = "no value assigned to SETACCOUNTTAG";
                                return false;
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETVAR:
                        {
                            // the syntax is SETVAR,varname/value

                            string[] arglist = ParseSlashArgs(substitutedtypeName, 2);

                            if (arglist.Length > 1)
                            {
                                string[] objstr = ParseString(arglist[0], 2, ",");

                                if (objstr.Length < 2)
                                {
                                    status_str = "missing varname in SETVAR";
                                    return false;
                                }

                                string varname = objstr[1];
                                string varval = arglist[1];

                                // find the xmllocalvariable attachment with that name
                                XmlLocalVariable a = (XmlLocalVariable)XmlAttach.FindAttachment(invoker, typeof(XmlLocalVariable), varname);

                                if (a == null)
                                {
                                    // doesnt already exist so add it
                                    XmlAttach.AttachTo(invoker, new XmlLocalVariable(varname, varval));

                                }
                                else
                                {
                                    a.Data = varval;
                                }
                            }
                            else
                            {
                                status_str = "no value assigned to SETVAR";
                                return false;
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONNEARBY:
                        {
                            // the syntax is SETONNEARBY,range,name[,type][,searchcontainers][,proptest]/prop/value/prop/value...

                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            string typestr = null;
                            string targetname = null;
                            string proptest = null;
                            int range = -1;
                            bool searchcontainers = false;

                            if (arglist.Length > 0)
                            {
                                string[] objstr = ParseString(arglist[0], 6, ",");
                                if (objstr.Length < 3)
                                {
                                    status_str = "missing range or name in SETONNEARBY";
                                    return false;
                                }

                                try
                                {
                                    range = int.Parse(objstr[1]);
                                }
                                catch { }

                                if (range < 0)
                                {
                                    status_str = "invalid range in SETONNEARBY";
                                    return false;
                                }

                                targetname = objstr[2];

                                if (objstr.Length > 3)
                                {
                                    typestr = objstr[3];
                                }

                                if (objstr.Length > 4)
                                {
                                    try
                                    {
                                        searchcontainers = bool.Parse(objstr[4]);
                                    }
                                    catch { }
                                }

                                if (objstr.Length > 5)
                                {
                                       proptest = objstr[5];
                                }
                            }
                            else
                            {
                                status_str = "missing args to SETONNEARBY";
                                return false;
                            }

                            Type targettype = null;
                            if (typestr != null)
                            {
                                targettype = SpawnerType.GetType(typestr);
                            }
                            ArrayList nearbylist = GetNearbyObjects(invoker, targetname, targettype, typestr, range, searchcontainers, proptest);

                            // apply the properties to everything on the list
                            foreach (object nearbyobj in nearbylist)
                            {
                                ApplyObjectStringProperties(spawner, substitutedtypeName, nearbyobj, triggermob, invoker, out status_str);
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONPETS:
                        {
                            // the syntax is SETONPETS,range/prop/value/prop/value...

                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            string typestr = "BaseCreature";
                            string targetname = null;
                            int range = -1;
                            bool searchcontainers = false;

                            if (arglist.Length > 0)
                            {
                                string[] objstr = ParseString(arglist[0], 2, ",");
                                if (objstr.Length < 2)
                                {
                                    status_str = "missing range or name in SETONPETS";
                                    return false;
                                }

                                try
                                {
                                    range = int.Parse(objstr[1]);
                                }
                                catch { }

                                if (range < 0)
                                {
                                    status_str = "invalid range in SETONPETS";
                                    return false;
                                }

                            }
                            else
                            {
                                status_str = "missing args to SETONPETS";
                                return false;
                            }

                            Type targettype = null;

                            if (typestr != null)
                            {
                                targettype = SpawnerType.GetType(typestr);
                            }

                            // get all of the nearby pets
                            ArrayList nearbylist = GetNearbyObjects(triggermob, targetname, targettype, typestr, range, searchcontainers, null);

                            // apply the properties to everything on the list
                            foreach (object nearbyobj in nearbylist)
                            {
                                // is this a pet of the triggering mob
                                BaseCreature pet = nearbyobj as BaseCreature;

                                if (pet != null && pet.Controlled && pet.ControlMaster == triggermob)
                                {
                                    ApplyObjectStringProperties(spawner, substitutedtypeName, nearbyobj, triggermob, invoker, out status_str);
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }

                    case typeKeyword.SETONCARRIED:
                        {
                            // the syntax is SETONCARRIED,itemname[,itemtype][,equippedonly]/prop/value/prop2/value...
                            // or SETONCARRIED,itemname[,itemtype]/prop/value

                            // first find the carried item
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            string typestr = null;
                            string itemname = null;
                            bool equippedonly = false;

                            if (arglist.Length > 0)
                            {
                                string[] objstr = ParseString(arglist[0], 4, ",");
                                if (objstr.Length < 2)
                                {
                                    status_str = "missing itemname in SETONCARRIED";
                                    return false;
                                }

                                itemname = objstr[1];

                                if (objstr.Length > 2)
                                {
                                    typestr = objstr[2];
                                }

                                if (objstr.Length > 3)
                                {
                                    if (objstr[3].ToLower() == "equippedonly")
                                    {
                                        equippedonly = true;
                                    }
                                    else
                                    {
                                        try
                                        {
                                            equippedonly = bool.Parse(objstr[3]);
                                        }
                                        catch { }
                                    }
                                }
                            }
                            else
                            {
                                status_str = "missing args to SETONCARRIED";
                                return false;
                            }

                            Item testitem = SearchMobileForItem(triggermob, ParseObjectType(itemname), typestr, false, equippedonly);

                            ApplyObjectStringProperties(spawner, substitutedtypeName, testitem, triggermob, invoker, out status_str);

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONSPAWN:
                        {
                            // the syntax is SETONSPAWN[,spawnername],subgroup/prop/value/prop2/value...
                            // or SETONSPAWN[,spawnername],subgroup/prop/value

                            // first find the spawn
                            int subgroup = -1;
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            XmlSpawner targetspawner = spawner;
                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "missing subgroup in SETONSPAWN";
                                    return false;
                                }
                                else
                                {
                                    string subgroupstr = keywordargs[1];
                                    string spawnerstr = null;
                                    if (keywordargs.Length > 2)
                                    {
                                        spawnerstr = keywordargs[1];
                                        subgroupstr = keywordargs[2];
                                    }
                                    if (spawnerstr != null)
                                    {
                                        targetspawner = FindSpawnerByName(spawner, spawnerstr);
                                    }
                                    try { subgroup = int.Parse(subgroupstr); }
                                    catch { }
                                }
                            }
                            if (subgroup == -1)
                            {
                                status_str = "invalid subgroup in SETONSPAWN";
                                return false;
                            }

                            ArrayList spawnedlist = XmlSpawner.GetSpawnedList(targetspawner, subgroup);
                            if (spawnedlist == null) return true;
                            foreach (object targetobj in spawnedlist)
                            {
                                if (targetobj == null) return true;

                                // dont apply it to keyword tags
                                if (targetobj is KeywordTag) continue;

                                // set the properties on the target object
                                ApplyObjectStringProperties(spawner, substitutedtypeName, targetobj, triggermob, spawner, out status_str);
                            }
                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONSPAWNENTRY:
                        {
                            // the syntax is SETONSPAWNENTRY[,spawnername],entrystring/prop/value/prop2/value...

                            // find the spawn entry
                            string entrystring = null;
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            XmlSpawner targetspawner = spawner;

                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "missing entrystring in SETONSPAWNENTRY";
                                    return false;
                                }
                                else
                                {
                                    entrystring = keywordargs[1];
                                    string spawnerstr = null;
                                    if (keywordargs.Length > 2)
                                    {
                                        spawnerstr = keywordargs[1];
                                        entrystring = keywordargs[2];
                                    }
                                    if (spawnerstr != null)
                                    {
                                        targetspawner = FindSpawnerByName(spawner, spawnerstr);
                                    }
                                }
                            }
                            if (entrystring == null || entrystring.Length == 0)
                            {
                                status_str = "invalid entrystring in SETONSPAWNENTRY";
                                return false;
                            }

                            int entryindex = -1;
                            // is the entrystring a number?
                            if (entrystring[0] >= '0' && entrystring[0] <= '9')
                            {
                                try
                                {
                                    entryindex = int.Parse(entrystring);
                                }
                                catch { }

                            }

                            if (targetspawner == null || targetspawner.SpawnObjects == null) return true;

                            for (int i = 0; i < targetspawner.SpawnObjects.Length; i++)
                            {
                                XmlSpawner.SpawnObject targetobj = targetspawner.SpawnObjects[i];

                                // is this references by entrystring or entryindex?
                                if ((entryindex == i)
                                || (entryindex == -1 && targetobj != null && targetobj.TypeName != null && targetobj.TypeName.IndexOf(entrystring) >= 0))
                                {
                                    // set the properties on the spawn entry object
                                    ApplyObjectStringProperties(spawner, substitutedtypeName, targetobj, triggermob, spawner, out status_str);
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SETONPARENT:
                        {
                            // the syntax is SETONPARENT/prop/value/prop2/value...
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);

                            if (invoker != null && (invoker is Item))
                            {
                                ApplyObjectStringProperties(spawner, substitutedtypeName, ((Item)invoker).Parent, triggermob, invoker, out status_str);
                            }
                            else if (invoker != null && (invoker is XmlAttachment))
                            {
                                ApplyObjectStringProperties(spawner, substitutedtypeName, ((XmlAttachment)invoker).Attached, triggermob, invoker, out status_str);
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.GIVE:
                        {
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);

                            string remainder;
                            if (arglist.Length > 1)
                            {
                                // check for any special keywords such as the additem option or the subproperty specification
                                // note this will be an arg to some property
                                string[] keywordargs = ParseString(arglist[0], 2, ",");
                                AddItemToTarget(spawner, triggermob, keywordargs, arglist, triggermob, invoker, false, out remainder, out status_str);

                            }
                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.TAKE:
                        {
                            // syntax TAKE[,prob[,quantity[,true,[type]]]]/itemname
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            string targetName;
                            string typestr = null;
                            if (arglist.Length > 1)
                            {
                                targetName = arglist[1];
                            }
                            else
                            {
                                status_str = "invalid TAKE specification";
                                return false;
                            }
                            string[] keywordargs = ParseString(arglist[0], 5, ",");
                            double drop_probability = 1;
                            int quantity = 0;
                            bool banksearch = false;
                            Item savedItem = null;
                            if (keywordargs.Length > 1)
                            {
                                bool converterror = false;
                                try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                catch { status_str = "Invalid TAKE probability : " + arglist[1]; converterror = true; }
                                if (converterror) return false;
                            }
                            if (keywordargs.Length > 2)
                            {
                                bool converterror = false;
                                try { quantity = int.Parse(keywordargs[2]); }
                                catch { status_str = "Invalid TAKE quantity : " + arglist[1]; converterror = true; }
                                if (converterror) return false;
                            }
                            if (keywordargs.Length > 3)
                            {
                                bool converterror = false;
                                try { banksearch = bool.Parse(keywordargs[3]); }
                                catch { status_str = "Invalid TAKE bankflag : " + arglist[1]; converterror = true; }
                                if (converterror) return false;
                            }
                            if (keywordargs.Length > 4)
                            {
                                typestr = keywordargs[4];
                            }
                            if (drop_probability == 1 || Utility.RandomDouble() < drop_probability)
                            {
                                // search the trigger mob for the named item
                                Item itemTarget = SearchMobileForItem(triggermob, targetName, typestr, banksearch);

                                // found the item so get rid of it
                                if (itemTarget != null)
                                {
                                    // if a quantity was specified and the item is stackable, then try to take the quantity
                                    if (quantity > 0 && itemTarget.Stackable)
                                    {
                                        // create a copy of the stacked item to be saved
                                        //savedItem = itemTarget.Dupe(0);
                                        savedItem = Mobile.LiftItemDupe(itemTarget, itemTarget.Amount);
                                        if (savedItem != null)
                                        {
                                            savedItem.Internalize();
                                        }

                                        int totaltaken = 0;

                                        int remaining = itemTarget.Amount - quantity;
                                        if (remaining <= 0)
                                        {
                                            int taken = itemTarget.Amount;
                                            totaltaken += taken;

                                            itemTarget.Delete();
                                            while (remaining < 0)
                                            {
                                                quantity -= taken;
                                                // if didnt get the full amount then keep looking for other stacks
                                                itemTarget = SearchMobileForItem(triggermob, targetName, typestr, banksearch);
                                                if (itemTarget == null) break;

                                                remaining = itemTarget.Amount - quantity;

                                                if (remaining <= 0)
                                                {
                                                    taken = itemTarget.Amount;
                                                    totaltaken += taken;

                                                    itemTarget.Delete();
                                                }
                                                else
                                                {
                                                    totaltaken += quantity;
                                                    itemTarget.Amount = remaining;
                                                }
                                            }
                                        }
                                        else
                                        {
                                            totaltaken = quantity;
                                            itemTarget.Amount = remaining;
                                        }

                                        if (savedItem != null)
                                        {
                                            savedItem.Amount = totaltaken;
                                        }
                                    }
                                    else
                                    {
                                        // dont save quest holders
                                        if (itemTarget is XmlQuestBook || itemTarget is IXmlQuest)
                                        {
                                            itemTarget.Delete();
                                        }
                                        else
                                            savedItem = itemTarget;
                                    }

                                    // if the saved item was being held then release it otherwise the player can take it back
                                    if (triggermob != null && triggermob.Holding == savedItem)
                                    {
                                        triggermob.Holding = null;
                                    }

                                    XmlSaveItem si = (XmlSaveItem)XmlAttach.FindAttachment(invoker, typeof(XmlSaveItem), "Taken");

                                    if (si == null)
                                    {
                                        XmlAttach.AttachTo(invoker, new XmlSaveItem("Taken", savedItem, triggermob));
                                    }
                                    else
                                    {
                                        si.SavedItem = savedItem;
                                        si.WasOwnedBy = triggermob;
                                    }
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.TAKEBYTYPE:
                        {
                            // syntax TAKEBYTYPE[,prob[,quantity[,true]]]/itemtype
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            string targetName;
                            if (arglist.Length > 1)
                            {
                                targetName = arglist[1];
                            }
                            else
                            {
                                status_str = "invalid TAKEBYTYPE specification";
                                return false;
                            }
                            string[] keywordargs = ParseString(arglist[0], 4, ",");
                            double drop_probability = 1;
                            int quantity = 0;
                            bool banksearch = false;
                            Item savedItem = null;

                            if (keywordargs.Length > 1)
                            {
                                bool converterror = false;
                                try { drop_probability = Convert.ToDouble(keywordargs[1], CultureInfo.InvariantCulture); }
                                catch { status_str = "Invalid TAKEBYTYPE probability : " + arglist[1]; converterror = true; }
                                if (converterror) return false;
                            }
                            if (keywordargs.Length > 2)
                            {
                                bool converterror = false;
                                try { quantity = int.Parse(keywordargs[2]); }
                                catch { status_str = "Invalid TAKEBYTYPE quantity : " + arglist[1]; converterror = true; }
                                if (converterror) return false;
                            }
                            if (keywordargs.Length > 3)
                            {
                                bool converterror = false;
                                try { banksearch = bool.Parse(keywordargs[3]); }
                                catch { status_str = "Invalid TAKEBYTYPE bankflag : " + arglist[1]; converterror = true; }
                                if (converterror) return false;
                            }
                            if (drop_probability == 1 || Utility.RandomDouble() < drop_probability)
                            {
                                // search the trigger mob for the named item
                                Item itemTarget = SearchMobileForItemType(triggermob, targetName, banksearch);

                                // found the item so get rid of it
                                if (itemTarget != null)
                                {
                                    // if a quantity was specified and the item is stackable, then try to take the quantity
                                    if (quantity > 0 && itemTarget.Stackable)
                                    {

                                        // create a copy of the stacked item to be saved
                                        //savedItem = itemTarget.Dupe(0);
                                        savedItem = Mobile.LiftItemDupe(itemTarget, itemTarget.Amount);
                                        if (savedItem != null)
                                        {
                                            savedItem.Internalize();
                                        }

                                        int totaltaken = 0;

                                        int remaining = itemTarget.Amount - quantity;
                                        if (remaining <= 0)
                                        {
                                            int taken = itemTarget.Amount;
                                            totaltaken += taken;

                                            itemTarget.Delete();

                                            while (remaining < 0)
                                            {
                                                quantity -= taken;
                                                // if didnt get the full amount then keep looking for other stacks
                                                itemTarget = SearchMobileForItemType(triggermob, targetName, banksearch);

                                                if (itemTarget == null) break;

                                                remaining = itemTarget.Amount - quantity;
                                                if (remaining <= 0)
                                                {
                                                    taken = itemTarget.Amount;
                                                    totaltaken += taken;

                                                    itemTarget.Delete();

                                                }
                                                else
                                                {
                                                    totaltaken += quantity;
                                                    itemTarget.Amount = remaining;
                                                }
                                            }
                                        }
                                        else
                                        {

                                            totaltaken = quantity;
                                            itemTarget.Amount = remaining;
                                        }

                                        if (savedItem != null)
                                        {
                                            savedItem.Amount = totaltaken;
                                        }
                                    }
                                    else
                                    {
                                        // dont save quest holders
                                        if (itemTarget is XmlQuestBook || itemTarget is XmlQuestHolder || itemTarget is XmlQuestToken)
                                        {
                                            itemTarget.Delete();
                                        }
                                        else
                                            savedItem = itemTarget;
                                    }
                                }

                                // is there an existing xmlsaveitem attachment

                                XmlSaveItem si = (XmlSaveItem)XmlAttach.FindAttachment(invoker, typeof(XmlSaveItem), "Taken");

                                if (si == null)
                                {
                                    XmlAttach.AttachTo(invoker, new XmlSaveItem("Taken", savedItem, triggermob));
                                }
                                else
                                {
                                    si.SavedItem = savedItem;
                                    si.WasOwnedBy = triggermob;
                                }
                            }
                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.GUMP:
                        {
                            // the syntax is GUMP,title,type/string
                            // can alternatively accept a gump constructor name
                            // GUMP,title,type,constructorname/string
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            string gumpText;
                            if (arglist.Length > 1)
                            {
                                gumpText = arglist[1];
                            }
                            else
                            {
                                status_str = "invalid GUMP specification";
                                return false;
                            }

                            string[] gumpkeywordargs = ParseString(arglist[0], 4, ",");
                            string gumpTitle = "";
                            int gumpNumber = 0; // 0=simple text gump, 1=yes/no gump, 2=reply gump, 3=quest gump

                            if (gumpkeywordargs.Length > 2)
                            {
                                gumpTitle = gumpkeywordargs[1];
                                bool converterror = false;
                                try { gumpNumber = int.Parse(gumpkeywordargs[2]); }
                                catch { status_str = "Invalid GUMP args"; converterror = true; }
                                if (converterror) return false;
                            }
                            else
                            {
                                status_str = "invalid GUMP specification";
                                return false;
                            }
                            string gumptypestr = "XmlSimpleGump"; // default gump constructor

                            if (gumpkeywordargs.Length > 3)
                            {
                                // get the gump constructor type
                                gumptypestr = gumpkeywordargs[3].Trim();
                            }
                            Type type = null;
                            if (gumptypestr != null)
                            {
                                try
                                {
                                    type = SpawnerType.GetType(gumptypestr);
                                }
                                catch { }
                            }
                            if (type == null)
                            {
                                status_str = "invalid GUMP constructor : " + gumptypestr;
                                return false;
                            }

                            // prepare the keyword tag for the gump
                            KeywordTag newtag = new KeywordTag(substitutedtypeName, spawner, 1);
                            if (triggermob != null && !triggermob.Deleted && (triggermob is PlayerMobile))
                            {
                                object newgump = null;
                                object[] gumpargs = new object[7];
                                gumpargs[0] = invoker;
                                gumpargs[1] = gumpText;
                                gumpargs[2] = gumpTitle;
                                gumpargs[3] = gumpNumber;
                                gumpargs[4] = newtag;
                                gumpargs[5] = triggermob;
                                gumpargs[6] = gumpcallback;

                                //spawner.TriggerMob.SendGump( new XmlSimpleGump(this, gumpText,gumpTitle, gumpType ));
                                try
                                {
                                    newgump = Activator.CreateInstance(type, gumpargs);
                                }
                                catch { status_str = "Error in creating gump type : " + gumptypestr; newtag.Delete(); return false; }
                                if (newgump != null)
                                {
                                    if (newgump is Gump)
                                    {
                                        triggermob.SendGump((Gump)newgump);
                                    }
                                    else if (newgump is Item)
                                    {
                                        ((Item)newgump).Delete();
                                        status_str = gumptypestr + " is not a Gump type";
                                        newtag.Delete();
                                        return false;
                                    }
                                    else if (newgump is Mobile)
                                    {
                                        ((Mobile)newgump).Delete();
                                        status_str = gumptypestr + " is not a Gump type";
                                        newtag.Delete();
                                        return false;
                                    }
                                    else
                                    {
                                        status_str = gumptypestr + " is not a Gump type";
                                        newtag.Delete();
                                        return false;
                                    }
                                }
                            }
                            TheSpawn.SpawnedObjects.Add(newtag);

                            break;
                        }
                    case typeKeyword.BROWSER:
                        {
                            // the syntax is BROWSER/url
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 2);
                            string url;

                            if (arglist.Length > 1)
                            {
                                if (arglist[1] != null && arglist[1].Length > 0 && arglist[1][0] == '@')
                                {
                                    url = arglist[1].Substring(1);
                                }
                                else
                                    url = arglist[1];
                            }
                            else
                            {
                                status_str = "invalid BROWSER specification";
                                return false;
                            }

                            if (triggermob != null && !triggermob.Deleted && (triggermob is PlayerMobile))
                            {
                                triggermob.LaunchBrowser(url);
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SENDMSG:
                        {
                            // the syntax is SENDMSG[,hue]/string
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            // check for literal
                            string msgText;
                            int hue = 0x3B2;
                            int font = 3;

                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 2, ",");
                                if (keywordargs.Length > 1)
                                {
                                    try
                                    {
                                        hue = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "invalid hue arg to SENDMSG"; }
                                }
                            }
                            if (arglist.Length > 1)
                            {
                                if (arglist[1] != null && arglist[1].Length > 0 && arglist[1][0] == '@')
                                {
                                    arglist = ParseSlashArgs(substitutedtypeName, 2);
                                    msgText = arglist[1].Substring(1);
                                }
                                else
                                    msgText = arglist[1];
                            }
                            else
                            {
                                status_str = "invalid SENDMSG specification";
                                return false;
                            }
                            if (triggermob != null && !triggermob.Deleted && (triggermob is PlayerMobile))
                            {
                                //triggermob.SendMessage(msgText);
                                triggermob.Send(new UnicodeMessage(Serial.MinusOne, -1, MessageType.Regular, hue, font, "ENU", "System", msgText));
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SENDASCIIMSG:
                        {
                            // the syntax is SENDASCIIMSG[,hue][,font#]/string
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            // check for literal
                            string msgText;
                            int hue = 0x3B2;
                            int font = 3;

                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length > 1)
                                {
                                    try
                                    {
                                        hue = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "invalid hue arg to SENDASCIIMSG"; }
                                }
                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        font = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "invalid font arg to SENDASCIIMSG"; }
                                }
                            }
                            if (arglist.Length > 1)
                            {
                                if (arglist[1] != null && arglist[1].Length > 0 && arglist[1][0] == '@')
                                {
                                    arglist = ParseSlashArgs(substitutedtypeName, 2);
                                    msgText = arglist[1].Substring(1);
                                }
                                else
                                    msgText = arglist[1];
                            }
                            else
                            {
                                status_str = "invalid SENDASCIIMSG specification";
                                return false;
                            }
                            if (triggermob != null && !triggermob.Deleted && (triggermob is PlayerMobile))
                            {
                                triggermob.Send(new AsciiMessage(Serial.MinusOne, -1, MessageType.Regular, hue, font, "System", msgText));
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.WAITUNTIL:
                        {
                            // the syntax is WAITUNTIL[,delay][,timeout][/condition][/thendogroup]
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 4);
                            double delay = 0;
                            double timeout = 0;
                            string condition = null;
                            int gotogroup = -1;
                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length > 1)
                                {
                                    try
                                    {
                                        delay = double.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "invalid delay arg to WAITUNTIL"; }
                                }
                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        timeout = double.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "invalid timeout arg to WAITUNTIL"; }
                                }
                            }
                            if (arglist.Length > 1)
                            {
                                condition = arglist[1];
                            }
                            if (arglist.Length > 2)
                            {
                                try
                                {
                                    gotogroup = int.Parse(arglist[2]);
                                }
                                catch { status_str = "invalid goto arg to WAITUNTIL"; }
                            }
                            if (status_str != null)
                            {
                                return false;
                            }
                            // suppress sequential advancement
                            //spawner.HoldSequence = true;

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner, TimeSpan.FromMinutes(delay), TimeSpan.FromMinutes(timeout), condition, gotogroup));

                            break;
                        }
                    case typeKeyword.WHILE:
                        {
                            // the syntax is WHILE/condition/dogroup
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 4);
                            string condition = null;
                            int gotogroup = -1;
                            if (arglist.Length < 3)
                            {
                                status_str = "insufficient args to WHILE";
                            }
                            else
                            {
                                condition = arglist[1];
                                try
                                {
                                    gotogroup = int.Parse(arglist[2]);
                                }
                                catch { status_str = "invalid dogroup arg to WHILE"; }
                            }
                            if (status_str != null)
                            {
                                return false;
                            }
                            // test the condition
                            if (TestItemProperty(spawner, spawner, condition, triggermob, out status_str))
                            {
                                // try to spawn the dogroup
                                if (spawner != null && !spawner.Deleted)
                                {
                                    if (gotogroup >= 0)
                                    {
                                        // spawn the subgroup
                                        spawner.SpawnSubGroup(gotogroup);

                                        // advance the sequence to that group
                                        //spawner.SequentialSpawn = gotogroup;
                                    }
                                    // and suppress sequential advancement
                                    spawner.HoldSequence = true;

                                }

                            }
                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.IF:
                        {

                            // the syntax is IF/condition/thengroup [/elsegroup]
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 5);
                            string condition = null;
                            int thengroup = -1;
                            int elsegroup = -1;
                            if (arglist.Length < 3)
                            {
                                status_str = "insufficient args to IF";
                            }
                            else
                            {
                                condition = arglist[1];
                                try
                                {
                                    thengroup = int.Parse(arglist[2]);
                                }
                                catch { status_str = "invalid thengroup arg to IF"; }
                            }
                            if (arglist.Length > 3)
                            {
                                try
                                {
                                    elsegroup = int.Parse(arglist[3]);
                                }
                                catch { status_str = "invalid elsegroup arg to IF"; }
                            }

                            if (status_str != null)
                            {
                                return false;
                            }

                            // test the condition
                            if (TestItemProperty(spawner, spawner, condition, triggermob, out status_str))
                            {
                                // try to spawn the thengroup
                                if (thengroup >= 0 && spawner != null && !spawner.Deleted)
                                {

                                    // spawn the subgroup
                                    spawner.SpawnSubGroup(thengroup);

                                    // advance the sequence to that group
                                    //spawner.SequentialSpawn = thengroup;
                                }
                                // and suppress sequential advancement
                                //spawner.HoldSequence = true;
                            }
                            else
                            {

                                // try to spawn the elsegroup
                                if (elsegroup >= 0 && spawner != null && !spawner.Deleted)
                                {

                                    // spawn the subgroup
                                    spawner.SpawnSubGroup(elsegroup);

                                    // advance the sequence to that group
                                    //spawner.SequentialSpawn = elsegroup;
                                }
                                // and suppress sequential advancement
                                //spawner.HoldSequence = true;
                            }
                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.DESPAWN:
                        {
                            // the syntax is DESPAWN[,spawnername],subgroup

                            // first find the spawner and group
                            int subgroup = -1;
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            XmlSpawner targetspawner = spawner;
                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "missing subgroup in DESPAWN";
                                    return false;
                                }
                                else
                                {
                                    string subgroupstr = keywordargs[1];
                                    string spawnerstr = null;
                                    if (keywordargs.Length > 2)
                                    {
                                        spawnerstr = keywordargs[1];
                                        subgroupstr = keywordargs[2];
                                    }
                                    if (spawnerstr != null)
                                    {
                                        targetspawner = FindSpawnerByName(spawner, spawnerstr);
                                    }
                                    try { subgroup = int.Parse(subgroupstr); }
                                    catch { }
                                }
                            }
                            if (subgroup == -1)
                            {
                                status_str = "invalid subgroup in DESPAWN";
                                return false;
                            }

                            if (targetspawner != null)
                            {
                                targetspawner.ClearSubgroup(subgroup);
                            }
                            else
                            {
                                status_str = "invalid spawner in DESPAWN";
                                return false;
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SPAWN:
                        {
                            // the syntax is SPAWN[,spawnername],subgroup

                            // first find the spawner and group
                            int subgroup = -1;
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            XmlSpawner targetspawner = spawner;
                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "missing subgroup in SPAWN";
                                    return false;
                                }
                                else
                                {
                                    string subgroupstr = keywordargs[1];
                                    string spawnerstr = null;
                                    if (keywordargs.Length > 2)
                                    {
                                        spawnerstr = keywordargs[1];
                                        subgroupstr = keywordargs[2];
                                    }
                                    if (spawnerstr != null)
                                    {
                                        targetspawner = FindSpawnerByName(spawner, spawnerstr);
                                    }
                                    try { subgroup = int.Parse(subgroupstr); }
                                    catch { }
                                }
                            }
                            if (subgroup == -1)
                            {
                                status_str = "invalid subgroup in SPAWN";
                                return false;
                            }

                            if (targetspawner != null)
                            {
                                if (spawner != targetspawner)
                                {
                                    // allow spawning of other spawners to be forced and ignore the normal loop protection
                                    targetspawner.SpawnSubGroup(subgroup, false, true);
                                }
                                else
                                {
                                    targetspawner.SpawnSubGroup(subgroup);
                                }
                            }
                            else
                            {
                                status_str = "invalid spawner in SPAWN";
                                return false;
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.GOTO:
                        {
                            // the syntax is GOTO/subgroup
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            int group = -1;
                            if (arglist.Length < 2)
                            {
                                status_str = "insufficient args to GOTO";
                            }
                            else
                            {
                                try
                                {
                                    group = int.Parse(arglist[1]);
                                }
                                catch { status_str = "invalid subgroup arg to GOTO"; }
                            }
                            if (status_str != null)
                            {
                                return false;
                            }

                            // move the sequence to the specified subgroup
                            if (group >= 0 && spawner != null && !spawner.Deleted)
                            {
                                // note, this will activate sequential spawning if it wasnt already set
                                spawner.SequentialSpawn = group;

                                // and suppress sequential advancement so that the specified group is the next to spawn
                                spawner.HoldSequence = true;
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner, 2));

                            break;
                        }
                    case typeKeyword.COMMAND:
                        {
                            // the syntax is COMMAND/commandstring
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            if (arglist.Length > 0)
                            {
                                // mod to use a dummy char to issue commands
                                if (CommandMobileName != null)
                                {
                                    Mobile dummy = FindMobileByName(spawner, CommandMobileName, "Mobile");
                                    if (dummy != null)
                                    {
                                        CommandSystem.Handle(dummy, String.Format("{0}{1}", CommandSystem.Prefix, arglist[1]));
                                    }
                                }
                                else
                                    if (triggermob != null && !triggermob.Deleted)
                                    {
                                        CommandSystem.Handle(triggermob, String.Format("{0}{1}", CommandSystem.Prefix, arglist[1]));
                                    }

                            }
                            else
                            {
                                status_str = "insufficient args to COMMAND";
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.MUSIC:
                        {
                            // the syntax is MUSIC,name,range
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            if (arglist.Length > 0)
                            {
                                SendMusicToPlayers(arglist[0], triggermob, invoker, out status_str);
                                if (status_str != null)
                                {
                                    return false;
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.SOUND:
                        {
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);

                            if (arglist.Length > 0)
                            {
                                // Syntax is SOUND,soundnumber
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                int sound = -1;
                                // try to get the soundnumber argument
                                if (keywordargs.Length < 2)
                                {
                                    status_str = "Missing sound number";
                                }
                                else
                                {
                                    try
                                    {
                                        sound = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper sound number format"; }
                                }
                                if (sound >= 0 && spawner != null && !spawner.Deleted)
                                {
                                    Effects.PlaySound(spawner.Location, spawner.Map, sound);
                                }
                                if (status_str != null)
                                {
                                    return false;
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    //
                    //  MEFFECT keyword
                    //
                    case typeKeyword.MEFFECT:
                        {
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 9, ",");

                                if (keywordargs.Length < 9)
                                {
                                    status_str = "Missing args";
                                }
                                else
                                {
                                    int effect = -1;
                                    int duration = 0;
                                    int speed = 1;
                                    Point3D eloc1 = new Point3D(0, 0, 0);
                                    Point3D eloc2 = new Point3D(0, 0, 0);
                                    Map emap = Map.Internal;

                                    // syntax is MEFFECT,itemid,speed,x,y,z,x2,y2,z2

                                    // try to get the effect argument

                                    try
                                    {
                                        effect = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper effect number format"; }

                                    try
                                    {
                                        speed = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "Improper effect speed format"; }

                                    int x = 0;
                                    int y = 0;
                                    int z = 0;
                                    try
                                    {
                                        x = int.Parse(keywordargs[3]);
                                        y = int.Parse(keywordargs[4]);
                                        z = int.Parse(keywordargs[5]);
                                    }
                                    catch { status_str = "Improper effect location format"; }
                                    eloc1 = new Point3D(x, y, z);

                                    try
                                    {
                                        x = int.Parse(keywordargs[6]);
                                        y = int.Parse(keywordargs[7]);
                                        z = int.Parse(keywordargs[8]);
                                    }
                                    catch { status_str = "Improper effect location format"; }
                                    eloc2 = new Point3D(x, y, z);

                                    if (effect >= 0 && emap != Map.Internal)
                                    {
                                        Effects.SendPacket(eloc1, emap, new HuedEffect(EffectType.Moving, -1, -1, effect, eloc1, eloc2, speed, duration, false, false, 0, 0));
                                    }
                                }
                                if (status_str != null)
                                {
                                    return false;
                                }
                            }
                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));
                            break;
                        }
                    case typeKeyword.EFFECT:
                        {
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            if (spawner == null || spawner.Deleted) return false;
                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 6, ",");
                                int effect = -1;
                                int duration = 1;
                                // syntax is EFFECT,itemid,duration[,x,y,z] or EFFECT,itemid,duration[,trigmob]
                                // try to get the effect argument
                                // some interesting effects are explosion(14013,15), sparkle(14155,15), explosion2(14000,13)
                                if (keywordargs.Length < 3)
                                {
                                    status_str = "Missing effect number and duration";
                                }
                                else
                                {
                                    try
                                    {
                                        effect = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "Improper effect number format"; }
                                    try
                                    {
                                        duration = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "Improper effect duration format"; }
                                }
                                // by default just use the spawner location
                                Point3D eloc = spawner.Location;
                                Map emap = spawner.Map;
                                if (keywordargs.Length > 3)
                                {
                                    // is this applied to the trig mob or to a location?
                                    if (keywordargs.Length > 5)
                                    {
                                        int x = spawner.Location.X;
                                        int y = spawner.Location.Y;
                                        int z = spawner.Location.Z;
                                        try
                                        {
                                            x = int.Parse(keywordargs[3]);
                                            y = int.Parse(keywordargs[4]);
                                            z = int.Parse(keywordargs[5]);
                                        }
                                        catch { status_str = "Improper effect location format"; }
                                        eloc = new Point3D(x, y, z);
                                    }
                                }
                                if (status_str != null)
                                {
                                    return false;
                                }
                                if (effect >= 0)
                                {
                                    Effects.SendLocationEffect(eloc, emap, effect, duration);
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.POISON:
                        {
                            // the syntax is POISON,name,range
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            if (arglist.Length > 0)
                            {
                                ApplyPoisonToPlayers(arglist[0], triggermob, invoker, out status_str);
                                if (status_str != null)
                                {
                                    return false;
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.DAMAGE:
                        {
                            // the syntax is DAMAGE,damage,phys,fire,cold,pois,energy[,range]
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            if (arglist.Length > 0)
                            {
                                ApplyDamageToPlayers(arglist[0], triggermob, invoker, out status_str);
                                if (status_str != null)
                                {
                                    return false;
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.RESURRECT:
                        {
                            // the syntax is RESURRECT[,range][,PETS]
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            if (arglist.Length > 0)
                            {
                                ResurrectPlayers(arglist[0], triggermob, invoker, out status_str);
                                if (status_str != null)
                                {
                                    return false;
                                }
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    case typeKeyword.CAST:
                        {
                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);
                            // Syntax is CAST,spellnumber[,arg] or CAST,spellname[,arg]
                            string[] keywordargs = ParseString(arglist[0], 3, ",");
                            int spellnumber = 0;
                            bool hasnumber = true;
                            // try it as spellnumber
                            if (keywordargs.Length > 1)
                            {
                                try { spellnumber = int.Parse(keywordargs[1]); }
                                catch { hasnumber = false; }
                            }
                            else
                            {
                                status_str = "invalid CAST specification";
                                // note that returning true means that Spawn will assume that it worked and will not try to recast
                                return true;
                            }
                            // call this with the 3 argument version that includes the bodytype arg
                            int keywordarg2 = 0;
                            if (keywordargs.Length > 2)
                            {
                                try { keywordarg2 = int.Parse(keywordargs[2]); }
                                catch { }
                            }

                            Spell spell = null;

                            // the trigger mob will cast the spells

                            Mobile caster = triggermob;
                            if (caster == null)
                            {
                                // note that returning true means that Spawn will assume that it worked and will not try to recast
                                return true;
                            }

                            // make the placeholder wand to avoid reagent and mana use
                            // this has been removed because Divinity doesn't have ClumsyWand
                            //BaseWand cwand = new ClumsyWand();
                            //cwand.Parent = caster;

                            BaseWand cwand = null;
                            spell = null;
                            /*if (hasnumber)
                            {
                                spell = SpellRegistry.NewSpell(spellnumber, caster, cwand);
                            }
                            else
                            {
                                spell = SpellRegistry.NewSpell(keywordargs[1], caster, cwand);
                            }*/
                            if (spell != null)
                            {
                                bool casterror = false;
                                try
                                {
                                    // deal with the 3 types of spells, mob targeted, location targeted, and self targeted

                                    // dont go through all of the warm up stuff, get right to the casting
                                    spell.State = SpellState.Sequencing;

                                    Type spelltype = spell.GetType();
                                    // deal with any special cases here
                                    if (spelltype == typeof(Server.Spells.Seventh.PolymorphSpell))
                                    {
                                        if (keywordarg2 == 0)
                                        {
                                            // this is invalid so dont cast
                                            throw (new ArgumentNullException());
                                        }
                                        object[] polyargs = new object[3];
                                        polyargs[0] = caster;
                                        polyargs[1] = cwand;
                                        polyargs[2] = keywordarg2;
                                        spell = (Spell)Activator.CreateInstance(spelltype, polyargs);

                                        if (spell == null)
                                        {
                                            throw (new ArgumentNullException());
                                        }
                                        spell.State = SpellState.Sequencing;
                                    }
                                    MethodInfo spelltargetmethod = null;

                                    // get the targeting method from the spell
                                    // note, the precedence is important as the target call should override oncast if it is present
                                    if (spelltype != null && (spelltargetmethod = spelltype.GetMethod("Target")) != null)
                                    {

                                    }
                                    // if it doesnt have it then check for self targeted types
                                    else if (spelltype != null && (spelltargetmethod = spelltype.GetMethod("OnCast")) != null)
                                    {

                                    }
                                    else
                                    {

                                        throw (new ArgumentNullException());
                                    }
                                    // Get the parameters for the target method.
                                    ParameterInfo[] spelltargetparms = spelltargetmethod.GetParameters();
                                    // target will have one parm
                                    // selftarg will have none
                                    object[] targetargs = null;
                                    // check the parameters
                                    if (spelltargetparms != null && spelltargetparms.Length > 0)
                                    {
                                        if (spelltargetparms[0].ParameterType == typeof(Server.Mobile))
                                        {
                                            // set the target parameter
                                            targetargs = new object[1];
                                            targetargs[0] = triggermob;
                                        }
                                        else if (spelltargetparms[0].ParameterType == typeof(Server.IPoint3D))
                                        {
                                            // set the target parameter
                                            targetargs = new object[1];
                                            // pick a random point around the caster
                                            int range = keywordarg2;
                                            if (range == 0) range = 1;
                                            int randx = Utility.RandomMinMax(-range, range);
                                            int randy = Utility.RandomMinMax(-range, range);
                                            if (randx == 0 && randy == 0) randx = 1;
                                            targetargs[0] = new Point3D(triggermob.Location.X + randx,
                                                triggermob.Location.Y + randy,
                                                triggermob.Location.Z);
                                        }
                                        else
                                        {
                                            // dont handle any other types of args
                                            throw (new ArgumentNullException());
                                        }
                                    }
                                    // set the spell on the caster
                                    caster.Spell = spell;
                                    // invoke the spell method with the appropriate args
                                    spelltargetmethod.Invoke(spell, targetargs);

                                    // get rid of the placeholder wand
                                    if (cwand != null && !cwand.Deleted)
                                        cwand.Delete();
                                }
                                catch
                                {
                                    status_str = "bad spell call : " + spell.Name;
                                    casterror = true;
                                    // get rid of the placeholder wand
                                    if (cwand != null && !cwand.Deleted)
                                        cwand.Delete();
                                }

                                if (casterror) return true;
                            }
                            else
                            {
                                status_str = "spell invalid or disabled : " + keywordargs[1];

                                //return true;
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));
                            // note that returning true means that Spawn assume that it worked and will not try to recast
                            break;
                        }
                    case typeKeyword.BCAST:
                        {
                            // syntax is BCAST[,hue][,font]/message

                            string[] arglist = ParseSlashArgs(substitutedtypeName, 3);

                            int hue = 0x482;
                            int font = -1;

                            if (arglist.Length > 0)
                            {
                                string[] keywordargs = ParseString(arglist[0], 3, ",");
                                if (keywordargs.Length > 1)
                                {
                                    try
                                    {
                                        hue = int.Parse(keywordargs[1]);
                                    }
                                    catch { status_str = "invalid hue arg to BCAST"; }
                                }
                                if (keywordargs.Length > 2)
                                {
                                    try
                                    {
                                        font = int.Parse(keywordargs[2]);
                                    }
                                    catch { status_str = "invalid font arg to BCAST"; }
                                }
                            }

                            if (arglist.Length > 1)
                            {
                                string msg = arglist[1];
                                if (arglist[1] != null && arglist[1].Length > 0 && arglist[1][0] == '@')
                                {
                                    arglist = ParseSlashArgs(substitutedtypeName, 2);
                                    msg = arglist[1].Substring(1);
                                }
                                if (font >= 0)
                                {
                                    // broadcast an ascii message to all players
                                    BroadcastAsciiMessage(AccessLevel.Player, hue, font, msg);
                                }
                                else
                                {
                                    // standard unicode message format
                                    CommandHandlers.BroadcastMessage(AccessLevel.Player, hue, msg);
                                }

                            }
                            else
                            {
                                status_str = "missing msg arg in BCAST";
                                return false;
                            }

                            TheSpawn.SpawnedObjects.Add(new KeywordTag(substitutedtypeName, spawner));

                            break;
                        }
                    default:
                        {
                            status_str = "unrecognized keyword";
                            // should never get here
                            break;
                        }
                }
                // indicate successful keyword spawn
                return true;
            }
            else
                if (IsSpecialItemKeyword(typeName))
                {
                    // these are special keyword item drops
                    string[] arglist = ParseSlashArgs(substitutedtypeName, 2);
                    string itemtypestr = arglist[0];
                    string baseitemtype = typeName;

                    // itemtypestr will have the form keyword[,x[,y]]
                    string[] itemkeywordargs = ParseString(itemtypestr, 3, ",");

                    // deal with the special keywords
                    itemKeyword kw = (itemKeyword)itemKeywordHash[baseitemtype];

                    switch (kw)
                    {
                        case itemKeyword.ARMOR:
                            {
                                // syntax is ARMOR,min,max
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int min = 0;
                                    int max = 0;
                                    bool converterror = false;
                                    try { min = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid ARMOR args : " + itemtypestr; converterror = true; }
                                    try { max = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid ARMOR args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    Item item = MagicArmor(min, max, false, false);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "ARMOR takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.WEAPON:
                            {
                                // syntax is WEAPON,min,max
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int min = 0;
                                    int max = 0;
                                    bool converterror = false;
                                    try { min = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid WEAPON args : " + itemtypestr; converterror = true; }
                                    try { max = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid WEAPON args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    Item item = MagicWeapon(min, max, false);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "WEAPON takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.JARMOR:
                            {
                                // syntax is JARMOR,min,max
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int min = 0;
                                    int max = 0;
                                    bool converterror = false;
                                    try { min = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid JARMOR args : " + itemtypestr; converterror = true; }
                                    try { max = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid JARMOR args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    Item item = MagicArmor(min, max, true, true);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "JARMOR takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.JWEAPON:
                            {
                                // syntax is JWEAPON,min,max
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int min = 0;
                                    int max = 0;
                                    bool converterror = false;
                                    try { min = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid JWEAPON args : " + itemtypestr; converterror = true; }
                                    try { max = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid JWEAPON args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    Item item = MagicWeapon(min, max, true);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "JWEAPON takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.SARMOR:
                            {
                                // syntax is SARMOR,min,max
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int min = 0;
                                    int max = 0;
                                    bool converterror = false;
                                    try { min = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid SARMOR args : " + itemtypestr; converterror = true; }
                                    try { max = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid SARMOR args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    Item item = MagicArmor(min, max, false, true);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "SARMOR takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.SHIELD:
                            {
                                // syntax is SHIELD,min,max
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int min = 0;
                                    int max = 0;
                                    bool converterror = false;
                                    try { min = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid SHIELD args : " + itemtypestr; converterror = true; }
                                    try { max = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid SHIELD args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    Item item = MagicShield(min, max);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "SHIELD takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.JEWELRY:
                            {
                                // syntax is JEWELRY,min,max
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int min = 0;
                                    int max = 0;
                                    bool converterror = false;
                                    try { min = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid JEWELRY args : " + itemtypestr; converterror = true; }
                                    try { max = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid JEWELRY args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    Item item = MagicJewelry(min, max);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "JEWELRY takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.SCROLL:
                            {
                                // syntax is SCROLL,mincircle,maxcircle
                                //get the min,max
                                if (itemkeywordargs.Length == 3)
                                {
                                    int minCircle = 0;
                                    int maxCircle = 0;
                                    bool converterror = false;
                                    try { minCircle = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid SCROLL args : " + itemtypestr; converterror = true; }
                                    try { maxCircle = int.Parse(itemkeywordargs[2]); }
                                    catch { status_str = "Invalid SCROLL args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    int circle = Utility.RandomMinMax(minCircle, maxCircle);
                                    int min = (circle - 1) * 8;
                                    Item item = Loot.RandomScroll(min, min + 7, SpellbookType.Regular);
                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "SCROLL takes 2 args : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.LOOT:
                            {
                                // syntax is LOOT,methodname
                                if (itemkeywordargs.Length == 2)
                                {
                                    Item item = null;

                                    // look up the method
                                    Type ltype = typeof(Loot);
                                    if (ltype != null)
                                    {
                                        MethodInfo method = null;

                                        try
                                        {
                                            // get the zero arg method with the specified name
                                            method = ltype.GetMethod(itemkeywordargs[1], new Type[0]);
                                        }
                                        catch { }

                                        if (method != null && method.IsStatic)
                                        {
                                            ParameterInfo[] pinfo = method.GetParameters();
                                            // check to make sure the method for this object has the right args
                                            if (pinfo.Length == 0)
                                            {
                                                // method must be public static with no arguments returning an Item class object
                                                try
                                                {
                                                    item = method.Invoke(null, null) as Item;
                                                }
                                                catch { }
                                            }
                                            else
                                            {
                                                status_str = "LOOT method must be zero arg : " + itemtypestr;
                                                return false;
                                            }
                                        }
                                        else
                                        {
                                            status_str = "LOOT no valid method found : " + itemtypestr;
                                            return false;
                                        }
                                    }

                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "LOOT takes 1 arg : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        case itemKeyword.POTION:
                            {
                                // syntax is POTION
                                Item item = Loot.RandomPotion();
                                if (item != null)
                                {
                                    AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                }
                                break;
                            }
                        case itemKeyword.TAKEN:
                            {
                                // syntax is TAKEN
                                // find the XmlSaveItem attachment

                                Item item = GetTaken(invoker);

                                if (item != null)
                                {
                                    AddSpawnItem(spawner, invoker, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                }
                                break;
                            }
                        case itemKeyword.GIVEN:
                            {
                                // syntax is GIVEN
                                // find the XmlSaveItem attachment

                                Item item = GetGiven(invoker);

                                if (item != null)
                                {
                                    AddSpawnItem(spawner, invoker, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                }
                                break;
                            }

                        case itemKeyword.NECROSCROLL:
                            {
                                // syntax is NECROSCROLL,index
                                if (itemkeywordargs.Length == 2)
                                {
                                    int necroindex = 0;
                                    bool converterror = false;
                                    try { necroindex = int.Parse(itemkeywordargs[1]); }
                                    catch { status_str = "Invalid NECROSCROLL args : " + itemtypestr; converterror = true; }
                                    if (converterror) return false;
                                    if (Core.AOS)
                                    {
                                        Item item = Loot.Construct(Loot.NecromancyScrollTypes, necroindex);
                                        if (item != null)
                                        {
                                            AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                        }
                                    }
                                }
                                else
                                {
                                    status_str = "NECROSCROLL takes 1 arg : " + itemtypestr;
                                    return false;
                                }
                                break;

                            }
                        case itemKeyword.MULTIADDON:
                            {
                                // syntax is MULTIADDON,filename
                                if (itemkeywordargs.Length == 2)
                                {
                                    string filename = itemkeywordargs[1];

                                    // read in the multi.txt file

                                    Item item = XmlSpawnerAddon.ReadMultiFile(filename, out status_str);

                                    if (item != null)
                                    {
                                        AddSpawnItem(spawner, TheSpawn, item, location, map, triggermob, requiresurface, spawnpositioning, substitutedtypeName, out status_str);
                                    }
                                }
                                else
                                {
                                    status_str = "MULTIADDON takes 1 arg : " + itemtypestr;
                                    return false;
                                }
                                break;
                            }
                        default:
                            {
                                status_str = "unrecognized keyword";
                                // should never get here
                                break;
                            }
                    }

                    return true;
                }
                else
                {
                    // should never get here
                    status_str = "unrecognized keyword";
                    return false;
                }
        }
Beispiel #28
0
        public static XmlSpawner FindInRecentSpawnerSearchList(XmlSpawner spawner, string name)
        {
            if (spawner == null || name == null || spawner.RecentSpawnerSearchList == null) return null;

            ArrayList deletelist = null;
            XmlSpawner foundspawner = null;

            foreach (XmlSpawner s in spawner.RecentSpawnerSearchList)
            {
                if (s.Deleted)
                {
                    // clean it up
                    if (deletelist == null)
                        deletelist = new ArrayList();
                    deletelist.Add(s);
                }
                else
                    if (String.Compare(s.Name, name, true) == 0)
                    {
                        foundspawner = s;
                        break;
                    }
            }

            if (deletelist != null)
            {
                foreach (XmlSpawner i in deletelist)
                    spawner.RecentSpawnerSearchList.Remove(i);
            }

            return (foundspawner);
        }
Beispiel #29
0
        public static bool TestMobProperty(XmlSpawner spawner, Mobile mobile, string testString, Mobile trigmob, out string status_str)
        {
            status_str = null;
            // now make sure the mobile itself is there
            if (mobile == null || mobile.Deleted)
            {
                return false;
            }

            bool testreturn = CheckPropertyString(spawner, mobile, testString, trigmob, out status_str);

            return testreturn;
        }
Beispiel #30
0
        public static Item FindItemByName(XmlSpawner fromspawner, string name, string typestr)
        {
            if (name == null) return (Item)null;

            int count = 0;

            Item founditem = FindInRecentItemSearchList(fromspawner, name, typestr);

            if (founditem != null)
            {
                return founditem;
            }

            Type targettype = null;
            if (typestr != null)
            {
                targettype = SpawnerType.GetType(typestr);
            }

            // search through all items in the world and find the first one with a matching name
            foreach (Item item in World.Items.Values)
            {
                Type itemtype = item.GetType();

                if (typestr == null ||
                        (itemtype != null && targettype != null && (itemtype.Equals(targettype) || itemtype.IsSubclassOf(targettype))))
                {
                    if (!item.Deleted && (name.Length == 0 || String.Compare(item.Name, name, true) == 0))
                    {
                        founditem = item;
                        count++;
                        // added the break in to return the first match instead of forcing uniqueness (overrides the count test)
                        break;
                    }
                }
                //if(count > 1) break;
            }

            // if a unique item is found then success
            if (count == 1)
            {
                // add this to the recent search list
                AddToRecentItemSearchList(fromspawner, founditem);

                return (founditem);
            }
            else
                return (Item)null;
        }