Skins: |

NWN SCRIPTS

- Jump to comments -

Title

HercNav's Well

Author

HercNav

Submitted / Updated

08-02-2004 / 11-22-2006

Category

Placeable Item

Expansions

Works on all versions

View Code

//::////////////////////////////////////////////////////////////////////////////
//:: TGW_OU_WELLDOWN
/*
  Synopsis: A PC clicks on a well and the screen fades out.  If the PC does
  not have the strength and/or dexterity to successfully climb down, the PC
  falls to the bottom, the screen fades in, damage is delt to the PC, he/she
  gets up, wabbles around as if stunned from the fall, then a message is sent
  to the PC. If the PC succeeds at climbing, he/she is transported to the
  destination, and a message is sent to the PC.

  This script is placed in the "OnUsed" script of a well whose tag is in the
  form of TGW_WELLxx (where xx is a two-digit number like 01, 07, 26, 99....)
  For each well with the previously mentioned tag and "OnUsed" script, a
  rope, waypoint, etc. with a tag in the form of TGW_ROPExx should be created
  somewhere in the module. To make a two-way transition, see TGW_OU_ROPE.

  The novice user is encouraged to change any Descretionary Variables
  but should not alter other aspects of this script.

  Using the default script, it is easier to climb down than up.  There is also
  more damage delt if the character fails going down.  An alternate means of
  getting out of the destination area is essential.  If you use the default,
  you can garauntee that the PC climb (or fall) down without any garauntee of
  escape.

  To see where this well/rope combination was first used, look for "CEP A TRUE
  GLOBAL WORLD" in the PW Action category online.

 */
//:: Created By: HercNav
//:: Created On: 07/24/2004

void main()
{
//::////////////////////////////////////////////////////////////////////////////
//::////////////////////////////////////////////////////////////////////////////
//Descretionary variables
    //PC must have a strength higher than this number to climb
    int nStrCheck = 10; //Default = 10
    //PC must have a dexterity higher than this number to climb
    int nDexCheck = 7; //Default = 7
    //Damage delt to player if either ability score fails
    int nDamage = d20(1); //Default = d20(1)
    //Message to PC if either ability score fails
    string sSuccess = "You successfully climb the rope."; //Default = "You successfully climb the rope."
    //Message to PC if both ability scores pass
    string sFail = "Your attempt to climb rope failed, and you fell."; //Default = "Your attempt to climb rope failed, and you fell."
//::////////////////////////////////////////////////////////////////////////////
//::////////////////////////////////////////////////////////////////////////////

//Non-descretionary variables
    //Get the well's complete tag in the form of a string
    string sOrig = GetTag(OBJECT_SELF);
    //Get the last two digits in the rope's tag
    string sLastTwo = GetStringRight(sOrig, 2);
    //Place those last two digits at the end of a string
    string sDest = "TGW_ROPE" + sLastTwo;
    //Make that string the tag of the destination
    object oDest = GetObjectByTag(sDest);
    //Make the destination object a location
    location lDest = GetLocation(oDest);
    //Make the PC an object
    object oPC = GetLastUsedBy();
//Dramatic Scene!
    //Fade out
    FadeToBlack(oPC, FADE_SPEED_SLOWEST);
    //Move the PC to the bottom of the well
    AssignCommand(oPC, ActionJumpToLocation(lDest));
    //Wait for the PC to climb down(area to load)
    ActionWait(20.0f);
        //Determine if the PC has the strength and dexterity to successfully climb the rope
        if (GetAbilityScore(oPC, ABILITY_STRENGTH) <= nStrCheck)
           {
           //PC fails to climb down; put the PC on his/her back
           DelayCommand(1.0, (AssignCommand(oPC, ActionPlayAnimation(ANIMATION_LOOPING_DEAD_BACK, 1.0, 3.0))));
           //Fade in
           DelayCommand(7.0, (FadeFromBlack(oPC, FADE_SPEED_SLOWEST)));
           //Deal Damage to PC
           DelayCommand(3.0, (ApplyEffectToObject(DURATION_TYPE_INSTANT, (EffectDamage(nDamage, DAMAGE_TYPE_BLUDGEONING, DAMAGE_POWER_NORMAL)), oPC, 0.0f)));
           //Make the PC sway as if drunk
           DelayCommand(4.0, (AssignCommand(oPC, ActionPlayAnimation(ANIMATION_LOOPING_PAUSE_DRUNK, 1.0, 5.0))));
           //Announce to PC that he/she has failed
           DelayCommand(7.0, (FloatingTextStringOnCreature(sFail, oPC, FALSE)));
           return;
           }
        if (GetAbilityScore(oPC, ABILITY_DEXTERITY) <= nDexCheck)
           {
           //PC fails to climb down; put the PC on his/her back
           DelayCommand(1.0, (AssignCommand(oPC, ActionPlayAnimation(ANIMATION_LOOPING_DEAD_BACK, 1.0, 3.0))));
           //Fade in
           DelayCommand(7.0, (FadeFromBlack(oPC, FADE_SPEED_SLOWEST)));
           //Deal Damage to PC
           DelayCommand(3.0, (ApplyEffectToObject(DURATION_TYPE_INSTANT, (EffectDamage(nDamage, DAMAGE_TYPE_BLUDGEONING, DAMAGE_POWER_NORMAL)), oPC, 0.0f)));
           //Make the PC sway as if drunk
           DelayCommand(4.0, (AssignCommand(oPC, ActionPlayAnimation(ANIMATION_LOOPING_PAUSE_DRUNK, 1.0, 5.0))));
           //Announce to PC that he/she has failed
           DelayCommand(7.0, (FloatingTextStringOnCreature(sFail, oPC, FALSE)));
           return;
           }
    //The PC has the strength and dexterity to climb down; fade in
    DelayCommand(2.0, (FadeFromBlack(oPC, FADE_SPEED_SLOWEST)));
    //Announce to the PC that he/she has succeeded
    DelayCommand(1.0f, FloatingTextStringOnCreature(sSuccess, oPC, FALSE));
}

Select All Text | View Code in separate window

Format

Module and Code

Type

Type - Other (Subtype - Other)

Includes

None

Description

A PC clicks on a well and the screen fades out. If the PC does not have the strength and/or dexterity to successfully climb down, the PC falls to the bottom, the screen fades in, damage is delt to the PC, he/she gets up, wabbles around as if stunned from the fall, then a message is sent to the PC. If the PC succeeds at climbing, he/she is transported to the destination, and a message is sent to the PC.

Files

Name	Type	Size	Downloads
HercNav1091430131046tgwwellrope.erfHercNav1091430131046tgwwellrope.erf Submitted: 08-02-2004 / Last Updated: 08-02-2004	erf	18.92Kb	184
--

SCORE OUT OF 10

10
1 votes
View Stats
Cast Your Vote!

PORTFOLIO

Add this entry to your portfolio so you can track it

Manage your existing portfolios or create a new one.

SCREENS

No Images

You Must Be Logged In to Participate.

Comments (4):

Posted by Drakken_Raed at 2005-04-10 11:28:08 Voted 10.00 on 04/10/05

Very fun script that works well.

Posted by HercNav at 2004-09-26 06:57:00

I only as that if you use this script (any of my other scripts or versions thereof) in your module, please take a few seconds out of your day to vote.

Keep in mind that it took me hours to make this script, the demo, and the directions to implement the script in your module.

Posted by HercNav at 2004-08-15 11:43:00

For more scripts like this, keyword search "HercNav's."
For the module that illustrates the versatility of this script, keyword search "HercNav's Wells and Ropes."

Posted by HercNav at 2004-08-15 11:40:00

For more scripts like this, keyword search "HercNav's."
For the module that illustrates the versatility of this script, keyword search "HercNav's Wells and Ropes."

You must be Logged In to post comments in this section.