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

BEGIN ~SHOPKN~

IF ~  NumberOfTimesTalkedTo(0)
~ THEN BEGIN 0 // from:
  SAY #361 /* ~Interested in a little business on the side, friend? I've a man who swears by his grandmother he glimpsed a white wolf up in the Cloudpeak ice fields. It was but a short ways south, and she be easy pickings for a smart sword. I'd pay you good money for its pelt, so it's a guaranteed sale if you go. Keep it in mind on your travels. Can I interest you with anything here in my humble shop?~ */
  IF ~~ THEN REPLY #15285 /* ~Yes, what do you have for sale?~ */ DO ~StartStore("sto4803",LastTalkedToBy(Myself))
~ UNSOLVED_JOURNAL #27433 /* ~Winter Wolf Pelts
In Nashkel I found a merchant eager to buy winter wolf pelts.~ */ EXIT
  IF ~~ THEN REPLY #15286 /* ~Nothing right now.~ */ UNSOLVED_JOURNAL #27433 /* ~Winter Wolf Pelts
In Nashkel I found a merchant eager to buy winter wolf pelts.~ */ EXIT
END

IF ~  !PartyHasItem("MISC01")
~ THEN BEGIN 1 // from:
  SAY #15371 /* ~Show me a pretty bit of gold and you can have anything in the store.~ */
  IF ~~ THEN REPLY #15372 /* ~I've got the gold, but have you anything I need?~ */ DO ~StartStore("sto4803",LastTalkedToBy(Myself))
~ EXIT
  IF ~~ THEN REPLY #15373 /* ~Sorry, but I'm keeping my coins to myself today.~ */ EXIT
END

IF ~  PartyHasItem("MISC01")
~ THEN BEGIN 2 // from:
  SAY #8790 /* ~There be a fine-looking pelt, if I have ever seen one. Good on you! Here is a fair price for you. Pleasure doing business with you.~ */
  IF ~~ THEN DO ~TakePartyItem("MISC01")
DestroyItem("MISC01")
EraseJournalEntry(27433)
AddJournalEntry(27433,QUEST_DONE)
GiveGoldForce(500)
~ EXIT
END
