Vendor Stones for Players to buy Resources

[Zylara]

I take no credit for these scripts. All credit goes to the RunUO Team and Lucid Nagual. The scripts came from the RunUO default download Vendor Stones and Resource Bags combined together with the ones in Lucid Nagual's script release of Daat99's BOD update....or one of Lucid's packages....I installed most of them. My daughter is a lazy crafter and wants to be able to buy her crafting supplies from stones. All I did was change them all to be named and designed in the same fashion, and hopefully have no duplicate name issues.

These should be drag N drop with no problems.....unless you are not using the Druid Reagents from some of the other script releases. If not useing the Druid Reg package, just delete the Druid Stone and Bag. Only each Bag and Stone set are tied together, so you can use one, four, or all of them. Prices on the bags can be change in the Stone files. Colors can be changed also on the Bags and Stones. Included a Pic of what they look like in game and what is in the bags. Prices are set along with the prices of default vendors. Amounts in bags are fairly low, so a player will be able to carry the bags and not become overweight. It removes the gold from the Players backpack, not the bank.

To install: Unzip and put the Stone and Bag files you wish to use into the \scripts\customs folder inside RunUO directory. If you do not use a Customs folder then they can be placed anywhere in the \RunUO\scripts\ folder. Reboot your server. In the game type [add vendstone and it will pull up all the stones to be added. [add vendbag will pull up all the bags a player can buy.

For RunUO2 RC1

Any problems just yell....but these are pretty simple scripts.

Zylara

[WarandPeace]

Do you have a script where i can literally set what items i want it to sell?

[Zylara]

This is the only vendor stones and bags I did. It is fairly easy to change the script looks like this:

		public ReagentVendBag() : this( 100 ) //How many of each you want to have put into the bag
		{
			Movable = true;
			Hue = 0x4F1;
			Name = "Reagent Vendor Bag";
		}

		[Constructable]
		public ReagentVendBag( int amount )
		{
			DropItem( new BlackPearl   ( amount ) );  //the list of items you want put in the bag
			DropItem( new Bloodmoss    ( amount ) );
			DropItem( new Garlic       ( amount ) );
			DropItem( new Ginseng      ( amount ) );
			DropItem( new MandrakeRoot ( amount ) );
			DropItem( new Nightshade   ( amount ) );
			DropItem( new SulfurousAsh ( amount ) );
			DropItem( new SpidersSilk  ( amount ) );
		}

[WarandPeace]

Great thank you ive been looking forever for something related to this!

-Zackary

[Zylara]

They are out there....just mixed in with other scripts, which makes them hard to find. Its just as easy to change the names on the stones and bag as it is to change the items in the bags. Just make sure they all match up.

5 places in the bag you need to change the name:

	public class ReagentVendBag : Bag // 1
	{
		[Constructable]
		public ReagentVendBag() : this( 100 ) // 2
		{
			Movable = true;
			Hue = 0x4F1; // color
			Name = "Reagent Vendor Bag"; // 3 actual name the players see
		}

		[Constructable]
		public ReagentVendBag( int amount ) // 4
		{
			DropItem( new BlackPearl   ( amount ) );
		}

		public ReagentVendBag( Serial serial ) : base( serial ) //5

and for the stone to match, 4 places to change the stones name
and 4 places to change to the matching bag name

	public class ReagentVendStone : Item // 1
	{
		[Constructable]
		public ReagentVendStone() : base( 0xEDC ) // 2
		{
			Movable = false;
			Hue = 0x4F1; // stone color
			Name = "Reagent Vendor Stone"; // 3 actual name the players see
		}

		public override void OnDoubleClick( Mobile from )
		{
                  // Bag Cost---2800 Gold
		   	Item[] Token = from.Backpack.FindItemsByType( typeof( Gold ) );
		   	if ( from.Backpack.ConsumeTotal( typeof( Gold ), 2800 ) )
		{
         	   	ReagentVendBag ReagentVendBag = new ReagentVendBag(); // 3 places to change to matching bag name here
		   	from.AddToBackpack( ReagentVendBag );     // and 1 for the matching bag name here
			from.SendMessage( "2800 gold has been removed from your pack." );
		}
		   	else
		   	{
		   		from.SendMessage( "You do not have enough funds for that." );
		   	}
					
		}

		public ReagentVendStone( Serial serial ) : base( serial ) // 4

Price and colors can be changed just as easy

[WarandPeace]

I got like 15 errors :P not on script but editing

[Zylara]

Well if you get errors, post them and I can help you fix it. The more you work on the scripts....the more you learn as time passes. It will start sinking in, it is pretty cool when you do something and it works, makes you feel really good. Heh

[WarandPeace]

Its ok I fixed now its selling potions and newb armor :P

[beeboo]

i tried to add your script to my server and all that i got was some errors if i could get some help with this i would appericate it thanks and here'sRunUO - [www.runuo.com] Version 2.0, Build 3567.2838
Core: Running on .NET Framework Version 2.0.50727
Core: Optimizing for 2 processors
Scripts: Compiling C# scripts...failed (1 errors, 8 warnings)
Warnings:
+ custom/Market/MarketAddon.cs:
CS0105: Line 14: The using directive for 'Server.Items' appeared previously
in this namespace
+ custom/Forsaken Set/ForsakenRobe.cs:
CS0114: Line 12: 'Server.Items.ForsakenRobe.InitMinHits' hides inherited mem
ber 'Server.Items.BaseClothing.InitMinHits'. To make the current member override
that implementation, add the override keyword. Otherwise add the new keyword.
CS0114: Line 13: 'Server.Items.ForsakenRobe.InitMaxHits' hides inherited mem
ber 'Server.Items.BaseClothing.InitMaxHits'. To make the current member override
that implementation, add the override keyword. Otherwise add the new keyword.
+ custom/Chat system RC2 Compatible/Chat General files/MultiConnection.cs:
CS0168: Line 65: The variable 'e' is declared but never used
CS0168: Line 134: The variable 'e' is declared but never used
CS0168: Line 165: The variable 'e' is declared but never used
CS0168: Line 184: The variable 'e' is declared but never used
CS0168: Line 201: The variable 'e' is declared but never used
CS0168: Line 252: The variable 'e' is declared but never used
+ custom/Chat system RC2 Compatible/Error Reporting/Errors.cs:
CS0618: Line 91: 'System.Web.Mail.MailMessage' is obsolete: 'The recommended
alternative is System.Net.Mail.MailMessage. Search Microsoft.com
kid=14202'
CS0618: Line 91: 'System.Web.Mail.MailMessage' is obsolete: 'The recommended
alternative is System.Net.Mail.MailMessage. Search Microsoft.com
kid=14202'
CS0618: Line 102: 'System.Web.Mail.SmtpMail' is obsolete: 'The recommended a
lternative is System.Net.Mail.SmtpClient. Search Microsoft.com
=14202'
+ custom/OrbRemoteServer/OrbServer.cs:
CS0618: Line 199: 'System.Runtime.Remoting.Channels.ChannelServices. Register
Channel(System.Runtime.Remoting.Channels.IChannel) ' is obsolete: 'Use System.Run
time.Remoting.ChannelServices.RegisterChannel(ICha nnel chnl, bool ensureSecurity
) instead.'
+ custom/AoAAuctionStone.cs:
CS0472: Line 100: The result of the expression is always 'true' since a valu
e of type 'int' is never equal to 'null' of type 'int?'
+ custom/CEOBlackJack.cs:
CS0618: Line 894: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete: '
Use CloseGump( Type ) instead.'
CS0618: Line 936: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete: '
Use CloseGump( Type ) instead.'
CS0618: Line 978: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete: '
Use CloseGump( Type ) instead.'
CS0618: Line 991: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete: '
Use CloseGump( Type ) instead.'
CS0618: Line 1057: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete:
'Use CloseGump( Type ) instead.'
CS0618: Line 1784: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete:
'Use CloseGump( Type ) instead.'
CS0618: Line 1788: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete:
'Use CloseGump( Type ) instead.'
+ custom/HiLoCards.cs:
CS0618: Line 504: 'Server.Mobile.CloseGump(System.Type, int)' is obsolete: '
Use CloseGump( Type ) instead.'
Errors:
+ custom/stones/VendorStones/VendorBags/DruidVend Bag.cs:
CS0246: Line 43: The type or namespace name 'PetrifiedWood' could not be fou
nd (are you missing a using directive or an assembly reference?)
CS1502: Line 43: The best overloaded method match for 'Server.Items.Containe
r.DropItem(Server.Item)' has some invalid arguments
CS1503: Line 43: Argument '1': cannot convert from 'PetrifiedWood' to 'Serve
r.Item'
CS0246: Line 44: The type or namespace name 'DestroyingAngel' could not be f
ound (are you missing a using directive or an assembly reference?)
CS1502: Line 44: The best overloaded method match for 'Server.Items.Containe
r.DropItem(Server.Item)' has some invalid arguments
CS1503: Line 44: Argument '1': cannot convert from 'DestroyingAngel' to 'Ser
ver.Item'
CS0246: Line 45: The type or namespace name 'SpringWater' could not be found
(are you missing a using directive or an assembly reference?)
CS1502: Line 45: The best overloaded method match for 'Server.Items.Containe
r.DropItem(Server.Item)' has some invalid arguments
CS1503: Line 45: Argument '1': cannot convert from 'SpringWater' to 'Server.
Item'
Scripts: One or more scripts failed to compile or no script files were found.
- Press return to exit, or R to try again.
the errors that i got

[Zylara]

You are prolly using a newer RunUO then what this was put together for, this was for RunUO2 RC1, and from these lines:

custom/stones/VendorStones/VendorBags/DruidVend Bag.cs:
The type or namespace name 'PetrifiedWood' could not be found
The type or namespace name 'DestroyingAngel' could not be found
The type or namespace name 'SpringWater' could not be found

those show you do not have the Druid Reagents. As in the first post: If not using the Druid Reg package, just delete the Druid Stone and Bag. Try deleting the Druidstone and bag and see if it works then. I have not even looked at the newer RunUO release. So if there is a problem in the version change I can't help you...but try removing the 2 Druid items first and see if it works that way.

*hugs* Zylara

[Zylara]

Just to let you know.....you have several warnings there from other scripts. Look at where the '+' symbols are...that tells you what script is putting out a warning or errors. Warnings you will not see unless you have an actual error that stops it from working.

+ custom/Market/MarketAddon.cs:----this is an issue with MarketAddon.cs
+ custom/Forsaken Set/ForsakenRobe.cs:------------ForsakenRobe.cs
and all the way down to:
+ custom/HiLoCards.cs:----------------HiLoCards.cs

Your server will come up with warnings.....but it will not come up if you have errors....you just dont have the druid pack, so just delete those 2 files or install the druid pack. Should work fine then....sorry, just waking up here and not too alert yet.

*hugs* Zylara

[beeboo]

thanks i got it i really appericate the help

[graverobbing]

REALLY GOOD ONE! iM USING IT ON MY SHARD! I just miss the arrow suply stone


CONGRATULATIONS!

[Murzin]

wouldnt it be easier to have a single stone that sells the different bags, with options at the beginning of the script for the individual shard operator to use?

like a true/false for each type, and an int for the cost of each, and an int for the amount for each one...

say variable for mage bag set to true, the magecount would be 100, and the magecost would be say 2000...

the option to buy a mage bag would be there, it would give you 100 each reg, and it would cost 2,000 gold?

and if the option is false, there wouldnt be an option to buy the mage bag at all.