@;@ RHP_name:  The Secluded Alcove
@;@ For:  The Outlands Tavern v1.61+
@;@ Written_by:  Donald Tidmore
@;@   Fidonet Email:  1:/123/450
@;@   Email: ktidmore@bellsouth.net, donald.tidmore@usa.net
@;@   URL: http://camelot.legendarydragons.com/Scripts/
@;@
@;@@PROGRAM@ OUTLANDS
@;@@VERSION@ 1.8
@;@@NAME@ The Secluded Alcove
@;@@SCRIPTVERSION@ 1.36
@;@
@;@ Note to reader:  Script does not reward marital infidelity.

@SHOW@
`0You decide to check around for some romance after remembering
that the `!Tavern's `0secluded, `$Secret Alcove `0is considered
the place to go to, for making out. So you head off from the Bar
into the hallway leading to it, hoping to get lucky.

@IF@ MALE @GOTO@ @#MEN
@IF@ FEMALE @GOTO@ @#WOMEN

@#MEN
`0As you approach the Alcove room, you spot the restroom farther
down the hall.  You also spot a gorgeous lady warrior standing by
the doorway to the Alcove.  You compliment her on her beauty, and
she responds in similar fashion.  You spend a few minutes getting
to know each other. You think about kissing her.  Your move?

`$(K)`%iss her sexy lips
`$(T)`%ake off for the restroom.
@PROMPT@ KT

@##T
`#You choose to be a gentlemen, say goodbye, and walk to the
nearby restroom.  You feel good about your decision.

@EXPERIENCE@ +LEVEL*2000
@CHARM@ +LEVEL*2
@;@   06/08/08: Added LEVEL to CHARM/EXPERIENCE formulas.
   `0You now have `$@*@CHARM@*@ `%Charm Points.
   `0You now have `$@*@EXPERIENCE@*@ `%Experience Points.
@END@

@##K
@CLEAR@
`0Taking the gorgeous redhead into your arms, you kiss her very
sexy mouth.  The two of you step into the Alcove for some
privacy, and close the door behind you.

@IF@ CHARM>49 @GOTO@ @#MCouchGood
@IF@ CHARM<50 @GOTO@ @#MCouchBad


@#MCouchBad
@CLEAR@
`0During the passionate kissing, she looks at the couch, and
pulls back.  `!"I'm not ready to go any farther", `%she says,
`0and then she leaves you alone in the room.

@CHARM@ -LEVEL*4
@;@   06/08/08: Added LEVEL to CHARM/EXPERIENCE formulas.
@EXPERIENCE@ -LEVEL*5000
   `!You now have `$@*@CHARM@*@ `%Charm Points.
   `!You now have `$@*@EXPERIENCE@*@ `%Experience Points.

`0You kick yourself mentally for moving too fast, and head back
for the Bar.  Maybe you'll be more charming next time, and have
better luck with the ladies.
@END@


@#MCouchGood
`0After a lot of heavy necking, and some foreplay, both of you
are really turned on.  You see the couch and think about
lowering her down onto it.  Your move?

`#(L)`%ower her to the couch
`#(Q)`%uit while you are ahead
@PROMPT@ LQ

@##Q

`#You choose to slow down, and don't take advantage of her. She
smiles, and says `!"Thanks for being a gentleman".  `#Then you
both leave in separate directions.
@EXPERIENCE@ +LEVEL*2000
@CHARM@ +LEVEL*5
   `!You now have `$@*@CHARM@*@ `%Charm Points.
   `!You now have `$@*@EXPERIENCE@*@ `%Experience Points.
@;@   06/08/08: Added LEVEL to CHARM/EXPERIENCE formulas.

@IF@ CHARM>99 @HEAL@
@;@  If male player has 99+ Charm points, heal any wounds he may have.
`%Being a gentleman sometimes has a `$special reward.

@END@

@##L
@CLEAR@

`0After some more passionate necking, you have her blouse
unfastened. After caressing her awesome breasts for awhile,
you start lowering her down onto the couch.

@MORE@
@IF@ CHARM>69 @GOTO@ @#MSEXGOOD
@IF@ CHARM<70 @GOTO@ @#MSEXBAD


@#MSEXBAD
`0She pulls away from you, and calls you a jerk.  After slapping
you, she walks away.  As she disappears down the hall, you wish
that you had apologized quickly before she left.

@CHARM@ -LEVEL*6
@EXPERIENCE@ -LEVEL*6000
@;@   06/08/08: Added LEVEL to CHARM/EXPERIENCE formulas.
   `!You now have `$@*@CHARM@*@ `%Charm Points.
   `!You now have `$@*@EXPERIENCE@*@ `%Experience Points.

`0You return to the `@Bar, `0the red marks on your cheek telling
the story to the others.  They all realize that you got turned
down, and you request another drink to forget yourself in.
@END@

@#MSEXGOOD
`0Having moved onto the couch, you start undressing each other.
The kissing and foreplay are getting hotter by the minute.
Things are really sizzling between you!
@IF@ MARRIED @GOTO@ @#MAN_MARRIED

`0You quickly finish removing each other's clothes, and settle
down for some fantastic love-making.  You spend a long time
making passionate love to her.

`0Later on, as you are getting dressed, she smiles at you.
`#"You are a great lover, darling."  `0Then you both leave,
feeling `%VERY `0good, and you head back to the Bar.  The huge
smile on your face tells the others there, that you got `#lucky!

`0You wonder if you'll ever see that hot redhead again, and
hope the answer is yes, and `%SOON!
@NEWS@
  `$`n `%got laid in `!The Outlands Tavern`%'s `#Secret Alcove!
@NEWSLINE@

@EXPERIENCE@ +LEVEL*7500
@LAYS@ +1
@CHARM@ +LEVEL*6
   `0You now have `$@*@CHARM@*@ `%Charm Points.
   `0You now have `$@*@EXPERIENCE@*@ `%Experience Points.
   `0You now have `$@*@LAYS@*@ `%Lay Points.
@;@   06/08/08: Added LEVEL to CHARM/EXPERIENCE formulas.
@NEWSEND@   @;@ 08/06/07. added NewsEnd command line.

@END@

@#MAN_MARRIED

`#Oops, she noticed your wedding ring.  She's definitely not
happy about that.  Throwing you off of her, she jumps up, and
kicks you in the groin.  Tossing in a hard slap for good
measure, she quickly gets dressed and leaves.  After calling
you a few choice names.

@EXPERIENCE@ -LEVEL*9000
@;@   06/08/08: Added LEVEL to EXPERIENCE formulas.
@HITPOINTS@ =1
   `0You now only have `$ONE `%Hit-Point left!
   `0You now have `$@*@EXPERIENCE@*@ `%Experience Points.

@IF@ CHARM<201 @CHARM@ -LEVEL*8
@IF@ CHARM>200 @CHARM@ -LEVEL*12
@;@   06/08/08: Rewrote CHARM formulas.
   `0You now have `$@*@CHARM@*@ `%Charm Points.

@NEWS@
  `#`n `%was caught cheating on his wife `$`m
  `%in `!The Outlands Tavern`%'s `0Secret Alcove.
    `!Rumors say that she may be getting a `#Divorce `!soon ...
@NEWSLINE@
@NEWSEND@   @;@ 08/06/07. added NewsEnd command line.

@END@


@#WOMEN
`0As you approach the Alcove room, you see a lady's favorite
hangout in the Tavern -- the restroom - farther down the hall.
You also spot a handsome, tall, and very muscular warrior
standing by the Alcove's doorway.   You chat awhile with him,
and can hardly control your hands.  You spend a good number of
minutes getting to know each other. You consider kissing him.
`#Your move?

`$(K)`%iss the guy passionately
`$(T)`%ake off for the restroom.
@PROMPT@ KT

@##T
`#You realize that ladies don't just start kissing guys with
that much passion on the first date.  So you say goodbye, and
head to the restroom to freshen up.

@EXPERIENCE@ +LEVEL*4000
@CHARM@ +LEVEL*2
@;@   Rewrote EXPERIENCE and CHARM statements 06/08/08.
   `0You now have `$@*@CHARM@*@ `%Charm Points.
   `0You now have `$@*@EXPERIENCE@*@ `%Experience Points.

@END@

@##K
@CLEAR@
`0Feeling turned on, you lean forward and kiss him on the mouth.
He returns the kiss with equal intensity.  Then you press your
body against his, and you move into the Alcove.  Closing the door
behind you for privacy.

@IF@ CHARM>49 @GOTO@ @#WKISSGOOD
@IF@ CHARM<50 @GOTO@ @#WKISSBAD


@#WKISSBAD
@CLEAR@
`0He lets you kiss him a couple of times, then pulls away.
Looking at you, he remarks that he's had better kisses.
Saying that you're moving too fast for him, he leaves.

@CHARM@ -LEVEL*4
@EXPERIENCE@ -LEVEL*5000
@;@   Rewrote EXPERIENCE and CHARM statements 06/08/08.
   `!You now have `$@*@CHARM@*@ `%Charm Points.
   `!You now have `$@*@EXPERIENCE@*@ `%Experience Points.

`0Well you decide to visit `#Seth the Bard `0a lot more often,
and work on your kissing skills.  And you walk back to the Bar
to get a new drink.  Wondering if the other ladies realize
that you got turned down.
@END@


@#WKISSGOOD
`0After several minutes of heavy kissing, he has your blouse
opened, and you are caressing his bare chest.  Holding onto
him, you think about moving to the Alcove's couch. `!What do
you do next?

`#(P)`%ull him down with you to the couch
`#(R)`%emember you're a Lady, and leave
@PROMPT@ PR

@##R
`#You realize you're not ready to go any farther, and move out
of his arms.  Fastening your blouse, you thank him for the
experience and rush off to the restroom.  Breathing heavily,
you really need to freshen up now.

@EXPERIENCE@ +LEVEL*5000
@CHARM@ +LEVEL*5
@;@   Rewrote EXPERIENCE and CHARM statements 06/08/08.
   `!You now have `$@*@CHARM@*@ `%Charm Points.
   `!You now have `$@*@EXPERIENCE@*@ `%Experience Points.

@IF@ CHARM>99 @HEAL@
@;@  If female player has 99+ Charm points, heal any wounds she may have.
`%Being a Lady sometimes has a `$special reward.
@END@

@##P
@CLEAR@
`%Holding onto him, you recline backward onto the nearby couch.

@MORE@
@IF@ CHARM>69 @GOTO@ @#WCouchGood
@IF@ CHARM<70 @GOTO@ @#WCouchBad


@;@  Rephrased section on 08/26/02.
@#WCOUCHBAD
`0He pulls away from you, and calls you a `#brazen hussy.
`0Leaving you lying there on the couch, he opens the door, and
walks off quickly.  You wish that you had gone slower, and
had apologized quickly before he left.

@CHARM@ -LEVEL*6
@EXPERIENCE@ -LEVEL*6000
@;@   Rewrote EXPERIENCE and CHARM statements 06/08/08.
   `!You now have `$@*@CHARM@*@ `%Charm Points.
   `!You now have `$@*@EXPERIENCE@*@ `%Experience Points.

`0Feeling bad, you return to the bar, hoping no one there will
notice that you got turned down.  The guys all look at you,
with the `%"look".  `0Yep, she's back mighty soon.  Must have
got dumped by someone.  You call for another drink and try to
forget yourself in it.
@END@

@#WCOUCHGOOD
`0Sitting on the couch together, you start undressing him
farther, and he's doing the same to you.  The kissing and
foreplay are getting hotter by the minute.  Things are really
sizzling between you!
@IF@ MARRIED @GOTO@ @#WOMAN_MARRIED

@#WSEXGOOD
`0The two of you quickly finish undressing each other, still
kissing passionately.  Lying on the couch, caressing each
other's body, you spend a good while making passionate love.
Later, while getting dressed, he looks at you.  Smiling, he
says `$"You are an awesome lover, baby."

`0Then you both leave, feeling `%VERY `0good.  You wonder if
you'll ever see the handsome warrior again.  Realizing you
never got his name, you realize that's OK.  And you head to
the restroom to clean up, before returning to the Bar.
@NEWS@
  `$`n `%got laid in `!The Outlands Tavern`%'s `#Secret Alcove!
@NEWSLINE@

@EXPERIENCE@ +LEVEL*7500
@LAYS@ +1
@CHARM@ +LEVEL*6
@;@   Rewrote EXPERIENCE and CHARM statements 06/08/08.
   `!You now have `$@*@CHARM@*@ `%Charm Points.
   `!You now have `$@*@EXPERIENCE@*@ `%Experience Points.
   `!You now have `$@*@LAYS@*@ `%Lay Points.
@NEWSEND@   @;@ 08/06/07. added NewsEnd command line.

@END@

@#WOMAN_MARRIED

`#Oops, he finally notices your wedding ring.  He is not happy
about that.  He throws you off of him onto the floor.  Then he
calls you a brazen tramp, and says he doesn't take `%MARRIED
`#women to bed.  He leaves you lying there, in pain.  You feel
`%VERY `#ashamed of yourself.  The rejection really hurts.

@EXPERIENCE@ -LEVEL*4500
@HITPOINTS@ =1
@;@   Rewrote EXPERIENCE statement 06/08/08.
   `0You now have `$@*@EXPERIENCE@*@ `%Experience Points.
   `0You now have `$ONE `%Hit-Point Left!

@IF@ CHARM<201 @CHARM@ -LEVEL*4
@IF@ CHARM>200 @CHARM@ -LEVEL*8
@;@   Rewrote CHARM formulas 06/08/08.
   `0You now have `$@*@CHARM*@ `%Charm Points.

@NEWS@
  `#`n `%was caught cheating on her husband `$`m
  `%in `!The Outlands Tavern`%'s `0Secret Alcove.
    `!Rumors say that he may be getting a `#Divorce `!soon ...
@NEWSLINE@
@NEWSEND@   @;@ 08/06/07. added NewsEnd command line.

@END@

@;@ 06/15/03: color code tweaking.
@;@ 06/24/03: Reduced marriage penalty values by 50 percent. v1.26
@;@ Decided I would rather do that, than remove it altogether. DGT.
@;@ 06/25/03: Removed NEWSEND lines from file.
@;@ 11/21/03: changed wording of News line entries to allow for
@;@     player names being up to 20 spaces in length.
@;@ 04/21/2007: updated email info in headers.

@;@ Last edits:  June 24, 2003. v1.26. marriage penalties cut in half.
@;@              Dec. 08, 2003. v1.27. Tweaked lognow.txt news entry.
@;@              Jun. 20, 2004. text color code usage editing.

@;@ Edits info:  Jun. 27, 2007: v1.30. Changed headers info.
@;@
@;@ v1.32.  08/06/07: Added missing NEWSEND commands.

@;@ v1.34. 03/14/08: Adapted to work with new RHP Code Library.
@;@        03/29/08: Added missing SHOW RHP command statement.
@;@ v1.36. 06/08/08: Rewrote most formulas to use Game Level.
@;@          Removed all percentage commands.

@;@ 07/03/08: fixed a glitch. Redesigned color coding.