@;@ RHP_name: Pile of Gems v1.12
@;@ For: The Forest Outhouse v2.15+
@;@ Written_by: Donald Tidmore
@;@ Email: ktidmore@bellsouth.net, donald.tidmore@usa.net
@;@ This is included so your users have an extra Random Happening.
@;@ URL: http://camelot.legendarydragons.com/Scripts/
@;@
@;@@PROGRAM@ OUTHOUSE
@;@@VERSION@ 2.15
@;@@NAME@ Pile of Gems
@;@@SCRIPTVERSION@ 1.12

                  `%Event In The Forest`0
  `#---------------------------------------------------------
  `!Lady Fortune `0smiles upon thee today `%... `0and you find `%...
  `0a small pile of `$Gems and Gold `0lying on the ground!

@GEMS@ +LEVEL*1
@GOLD@ +LEVEL*150

    `%Your reward:  `#Some beautiful `!Sapphires, Rubies, and Emeralds!
    `$And a bunch of beautiful `$Gold Coins!
  `0 -----------------------------------------------------

@;@---------------- Used in testing new MALE/FEMALE math coding:
@IF@ FEMALE   `%A voice says `0"You are a sexy and beautiful Lady warrior."
@IF@ MALE   `%A voice says `0"You are a strong and handsome Warrior.
@VARIABLE1@ =0
@IF@ MALE @VARIABLE1@ LEVEL*MALE
@IF@ FEMALE @VARIABLE1@ LEVEL*FEMALE
`%  You find a magical charm stone lying on the ground.

`!    You pick it up and `%....

    `0It magically increases your attractiveness.

@CHARM@ +VARIABLE1
@MORE@
  `0 -----------------------------------------------------
@;@  Verified MALE code worked in actual Outhouse IGM usage. 07/01/03.

@;@     ---------------- For Testing new HORSE math coding:
@IF@ HORSE   `%You pause a moment to rest your horse ...
@VARIABLE1@ =0
@VARIABLE1@ HORSE*4
`2  You find a bag lying on the ground, and look inside ...

@IF@ HORSE @GOTO@ @#HasHorse
`#    It was empty.  `2You drop it, and move onward.
@GOTO@ @#EndHorse

@#HasHorse
`#    It has `2Oats `%inside.  `!Your horse loves them!

@FOREST@ +VARIABLE1
@#EndHorse
  `0 -----------------------------------------------------
@;@  Verified Horse code worked in actual Outhouse IGM usage. 07/01/03.

@;@    ============================ Testing use of FLIRTED code:
@IF@ FLIRTED   `%You think about the warrior you flirted with earlier ...
@VARIABLE1@ =0
@VARIABLE1@ FLIRTED*12
`0  You discover a bracelet hanging from a rock ...

@IF@ FLIRTED @GOTO@ @#HasFlirted
`#    You put it on, and nothing happens.
@GOTO@ @#EndFlirt

@#HasFlirted
`!    It is a magical, `0Emerald bracelet.  `!As you put it on,
`!    you can feel a surge in the power of your `$`a.

@DEFENSE@ +VARIABLE1
@#EndFlirt
`0 -------------------------------------------------------------
@;@  Verified Flirted code worked in actual Outhouse IGM usage. 07/01/03.
@MORE@

@;@     ---------------- For Testing new SPIRITS math coding:
@IF@ SPIRITS   `%You remember how lovely `@Jennie's `%gift was earlier.
@VARIABLE1@ =0
@VARIABLE1@ SPIRITS*5
`2  You find a `!Green Crystal `2and pick it up ...

@IF@ SPIRITS @GOTO@ @#Crystal
`#    It is a pretty bauble.  Maybe someone in town will buy it.
`%    You stash it in a pocket and move onward.
@GOTO@ @#NoValue2

@#Crystal
`#    It is a `!magical crystal!  `0It grants you some `$Max Hitpoints.

@HITMAX@ +VARIABLE1
@#NoValue2
@;@  Verified Spirits code worked in actual Outhouse IGM usage. 07/01/03.

@END@

@;@ Changed version field to 2.10, for 05/13/03 official release.
@;@ Adaptation of my Two-Gems LORD LADY Script. 04/08/2003.
@;@ 05/13: Lowered amount of Gems to 1*LEVEL.
@;@ 06/04/03: Moved script commands down below "a small pile ..." line.

@;@ 07/01/03: v1.06.   Charm reward. Testing of MALE/FEMALE in math command.
@;@    Forest Fights reward, tested HORSE usage in math command.
@;@    Defense points reward. tested FLIRTED with math command.
@;@    Max Hitpoints reward. Tested SPIRITS with math command.
@;@ 11/26/04: v1.08.  Gold reward formula increased from 100*level to 150*level.

@;@ 04/21/2007: updated email info in headers.
@;@ 06/27/2007: Added web-site URL line.  v1.05.

@;@ 06/07/08: Fixed glitches with use of LEVEL command. v1.12