// creator  : weidu.exe (version 23600)
// argument : UNSHEY.DLG
// game     : .
// source   : ./DATA/DIALOG.BIF
// dialog   : lang\en_us/dialog.tlk
// dialogF  : (none)

BEGIN ~UNSHEY~

IF ~  ReactionLT(LastTalkedToBy,NEUTRAL_LOWER)
NumberOfTimesTalkedTo(0)
~ THEN BEGIN 0 // from:
  SAY #14948 /* ~You smell worse than an orc. Get away from me.~ */
  IF ~~ THEN EXIT
END

IF ~  ReactionGT(LastTalkedToBy,HOSTILE_UPPER)
NumberOfTimesTalkedTo(0)
~ THEN BEGIN 1 // from:
  SAY #14949 /* ~Have you heard? There's a rogue ogre with a belt fetish to the south of the Friendly Arm Inn. I had to bargain my new girdle of piercing for my life out there. Wasn't even interested in an autographed copy of my book. Hey, if you can get that belt back to me, I'd be mighty grateful.~ */
  IF ~~ THEN UNSOLVED_JOURNAL #27497 /* ~A Rogue Ogre
According to a dwarven cleric by the name of Unshey, a rogue ogre with a belt fetish is making a name for himself just south of the Friendly Arm Inn. As Unshey claims to be an author, maybe she'd give me a copy of her book if I can get her girdle of piercing back...~ */ EXIT
END

IF ~  !NumberOfTimesTalkedTo(0)
!PartyHasItem("BELT04")
~ THEN BEGIN 2 // from:
  SAY #14950 /* ~So, did he steal a girdle off you yet?~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 3 // from:
  SAY #14951 /* ~Oh, this isn't mine. Did you find any others?~ */
  IF ~~ THEN EXIT
END

IF ~  PartyHasItem("BELT04")
ReactionLT(LastTalkedToBy,FRIENDLY_LOWER)
~ THEN BEGIN 4 // from:
  SAY #14952 /* ~He was a weird one, weren't he? Ugh, I can still smell him on you! I'll pay you 10 gold pieces for returning the girdle and another 60 to find the nearest bath.~ */
  IF ~~ THEN DO ~AddexperienceParty(800)
GivePartyGold(70)
TakePartyItem("BELT04")
EraseJournalEntry(27497)
~ SOLVED_JOURNAL #27498 /* ~Bathtime?
Unshey isn't the most charismatic person I've ever met. She gave me 70 gold pieces for returning her girdle, but only after informing me that 60 of those were to go towards my bathing fund.~ */ EXIT
END

IF ~  PartyHasItem("BELT04")
ReactionGT(LastTalkedToBy,NEUTRAL_UPPER)
~ THEN BEGIN 5 // from:
  SAY #14953 /* ~Thanks for getting this back to me. Damn weird ogre, though, don't you think? Here's 95 gold pieces for your trouble, and a new history book I've just completed.~ */
  IF ~~ THEN DO ~AddexperienceParty(800)
GivePartyGold(95)
TakePartyItem("BELT04")
EraseJournalEntry(27497)
GiveItem("BOOK32",LastTalkedToBy)
~ SOLVED_JOURNAL #27499 /* ~A Fair Reward
One dead ogre equals 95 gold pieces. Unshey claims to be a writer, but it sure is hard to argue with her math.~ */ EXIT
END

IF ~~ THEN BEGIN 6 // from:
  SAY #14954 /* ~Oh, my... This has been an unfortunate turn of events, hasn't it? Uh, here, let me give you an autographed copy of my latest book: "High Cleric Unshey's Practical Guide to Bodily Health." Oh, I'm terribly sorry about all of this.~ */
  IF ~~ THEN SOLVED_JOURNAL #27500 /* ~A Practical Reward
Unshey left the ogre's other girdle to us, but it seems to be cursed to transform its wearer into the opposite gender. Perhaps not everyone would consider that a curse, come to think of it.~ */ EXIT
END

IF ~  False()
~ THEN BEGIN 7 // from:
  SAY #14955 /* ~Hey, now, I'm just a writer. Now back off.~ */
  IF ~~ THEN EXIT
END

IF ~  True()
~ THEN BEGIN 8 // from:
  SAY #14956 /* ~Thanks for all of your help with that girdle guy. Just another notch in your belt, huh?~ */
  IF ~~ THEN EXIT
END
