/*   Script generated by
Lilac Soul's NWN Script Generator, v. 2.3

For download info, please visit:
http://nwvault.ign.com/View.php?view=Other.Detail&id=4683&id=625    */

//Put this on action taken in the conversation editor
#include "nw_i0_tool"
void main()
{

object oPC = GetPCSpeaker();

if (GetGold(oPC) >= 5000000)
   {
   if (d100()<=15)
      {
      CreateItemOnObject("handwish", oPC);

      AssignCommand(oPC, TakeGoldFromCreature(5000000, oPC, TRUE));

      FloatingTextStringOnCreature("You have found something in the well!!!", oPC);

      }
   else if (GetGold(oPC) >= 500000)
      {
      if (d100()<=40)
         {
         RewardPartyGP(99999, oPC, FALSE);

         FloatingTextStringOnCreature("You find many coins within the well!!!!", oPC);

         }
      else
         {
         AssignCommand(oPC, TakeGoldFromCreature(300000, oPC, TRUE));

         FloatingTextStringOnCreature("Some of your gold has been turned to lead!!!!", oPC);

         }

      }
   }
}