BeaconReset(Script)

CoffeeMUD
Administrator                                                  Builder                                                              Player

=CoffeeMUD Builder Information=
Basics	Praetor     Player Support     Commands     Zapper Masks	Advanced	Races     Classes     Abilities     Socials     Scripting
Building	Behaviors     Properties     Areas     Rooms     Exits     Items     Mobs	Systems	Achievements     Crafting     Help Info     Ships     Planes of Existence     Quests     Triumphs

Beacon Modifying Scripts

Beacon is the command used to designate a player's (or ship's) starting room. These scripts are often placed on a MOB (but could be placed on an item or room) to change where a player will RECALL to.

Changing Recall from a start zone to a new location for free

This script requires the mob to meet the following requirements:

• Must have a specific tattoo (ncitizen, which is given to low level players within the starting zone)
• Must be a player (Would not want people to change the start rooms of mobs, which could lead to all sorts of bad issues (like the mob not reloading in the correct room after death or leaving the player's party, and cluttering the target area with a ton of mobs on server startup))
• Must be less than or equal to level 10 (don't want high level players getting a free beacon change)

speech_prog midgaard midgaard. midgaard! midgaard?
     if (hastattoo($n nzcitizen) and ispc($n) and level($n <= 10))
          sayto $n I can transport you there, traveler, if that is where you desire to go.
          mpalarm 1 smile $n
          mpalarm 2 sayto $n If you truly desire to go to Midgaard then say '^pReady to go!^?' in the next 30 seconds.
          mptattoo $n '10 mayormidgaard'
     else
     endif
~

Charging for a Beacon Change

This script is placed on our Midgaard mayor, to enable people to change their beacon back to the normal Midgaard Recall room.

• We added a prog to provide the cost of changing your recall to this location.
  • The bribe_prog is always set to a value, and can be paid in the area's appropriate currency.

speech_prog citizen recall beacon
     say $n So you want to be a citizen of Midgaard?  Let me see.%0DHmmm..2000 gold or 20 golden notes would be sufficient!

~
bribe_prog 2000
     if ispc($n)
	MPBEACON midgaard#3001 $n
	say $n Welcome, $n, to the city of Midgaard.  We are proud to have such outstanding citizens such as yourself.
	hshake $n
	CHAT $n is now a citizen of Midgaard.
     endif
     smile
     mpgset $i MONEY 25
~

Notes

.