// creator  : weidu.exe (version 23100)
// argument : KORGANP.DLG
// game		 : .
// source	 : ./override/KORGANP.DLG
// dialog	 : ./DIALOG.TLK
// dialogF  : (none)

BEGIN ~KORGANP~

IF ~~ THEN BEGIN 0 // from:
  SAY #2417 /* ~Ye nay made your way to the accursed crypt then? Ye can ne'er send a longlimb to do what's a dwarven task by divine right!  What is it that ye want?~ */
  IF ~~ THEN REPLY #2428 /* ~We seek a strong warrior to accompany us. Would you be such a person?~ */ GOTO 2
  IF ~~ THEN REPLY #2551 /* ~Stop your pitiful whining, dwarf, and waddle aside.~ */ GOTO 1
  IF ~~ THEN REPLY #2429 /* ~Sorry for bothering you Korgan, we'll be on our way.~ */ GOTO 7
END

IF ~~ THEN BEGIN 1 // from: 8.2 0.1
  SAY #2552 /* ~Ye've tested me mettle fer the last and final time! Ye'll beg me to kill ye soon enough! Have at thee!~ */
  IF ~~ THEN DO ~Enemy()~ EXIT
END

IF ~~ THEN BEGIN 2 // from: 8.0 0.0
  SAY #2553 /* ~Aye. Strength is me birthright. Courage me inheritance. War me destiny. But why should I join a motley band of beggars like ye?~ */
  IF ~~ THEN REPLY #2554 /* ~Good company, great risk, and... treasure. Perhaps more than you could imagine.~ */ GOTO 3
  IF ~~ THEN REPLY #2556 /* ~If that's the way you feel about us, then so be it. We'll leave you to yourself.~ */ GOTO 4
  IF ~PartyGoldGT(199)~ THEN REPLY #2559 /* ~We have loot. Money. And we'll give you 100 gold of it if you join our party for the next few months.~ */ GOTO 5
  IF ~PartyGoldGT(499)~ THEN REPLY #2560 /* ~For your mercenary services, we'll offer 500 gold. Any questions?~ */ GOTO 6
END

IF ~~ THEN BEGIN 3 // from: 2.0
  SAY #2561 /* ~Hell and damnation, fools! Me head can imagine a fair horde. I've no impulse to travel with a sad bunch of may-dewed prickmedaintys. Return when the reason is better then yer company alone.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 4 // from: 2.1
  SAY #2562 /* ~Good! Then leave a farctated dwarf before I rend ye limbless.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 5 // from: 2.2
  SAY #2563 /* ~100 gold? Nay nearly enough of the kingdom's coin to interest one so battle-proven!  Return when the moneypurse ye carry grows deeper.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 6 // from: 2.3
  SAY #2565 /* ~500 gold? Aye, there be a fair venture. Consider me a comrade-in-arms. I'll just secret the coin away from ye, so's ye don't think o' cheatin' away with it.~ */
  IF ~~ THEN DO ~TakePartyGold(500)
DestroyGold(500)
SetGlobal("KickedOut","LOCALS",0)
JoinParty()
~ EXIT
END

IF ~~ THEN BEGIN 7 // from: 8.1 0.2
  SAY #2430 /* ~Cease yer prattle then... unless ye've something useful in that cakehole.~ */
  IF ~~ THEN EXIT
END

IF ~Global("KickedOut","LOCALS",1)
~ THEN BEGIN 8 // from:
  SAY #2567 /* ~So what musters yer interest in just another bibulous dwarf?~ [KORGAN87] */
  IF ~~ THEN REPLY #2568 /* ~We seek a strong warrior to accompany us. Would you be such a person?~ */ GOTO 2
  IF ~~ THEN REPLY #2569 /* ~We're sorry for bothering you, Korgan. We'll see ourselves out.~ */ GOTO 7
  IF ~~ THEN REPLY #2570 /* ~Gnaw my chainmailed arse, half-pint! We just have no use for short, drunk blowhards who spend more time on a barstool than a battlefield.~ */ GOTO 1
END

IF ~Global("KickedOut","LOCALS",0)
HappinessLT(Myself,-299)
~ THEN BEGIN 9 // from:
  SAY #23464 /* ~Ye have proven... to be not worth me time, so I'm saying so long with a smile. Mayhap we meet again, though a blade'll be me handshake! Good riddance!~ [KORGAN88] */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 10 // from: 11.1
  SAY #23465 /* ~Ah, I'd like me some time to put up me feet anyway. Find me when yer through wandering and want to do some serious travel. I'll be at the Copper Coronet until then.~ */
  IF ~!AreaCheck("AR0602")
!AreaCheck("AR0603")
!AreaCheck("AR0410")
!AreaCheck("AR0411")
!AreaCheck("AR0412")
!AreaCheck("AR0413")
!AreaCheck("AR0414")
!AreaCheck("AR1512")
!AreaCheck("AR1513")
!AreaCheck("AR1514")
!AreaCheck("AR1515")
!AreaCheck("AR1516")
!AreaCheck("AR1501")
!AreaCheck("AR1502")
!AreaCheck("AR1503")
!AreaCheck("AR1504")
!AreaCheck("AR1505")
!AreaCheck("AR1506")
!AreaCheck("AR1507")
!AreaCheck("AR1508")
!AreaCheck("AR1509")
!AreaCheck("AR1510")
!AreaCheck("AR1511")
!AreaCheck("AR2100")
!AreaCheck("AR2101")
!AreaCheck("AR2102")
!AreaCheck("AR2200")
!AreaCheck("AR2202")
!AreaCheck("AR2203")
!AreaCheck("AR2204")
!AreaCheck("AR2205")
!AreaCheck("AR2206")
!AreaCheck("AR2207")
!AreaCheck("AR2208")
!AreaCheck("AR2209")
!AreaCheck("AR2210")
!AreaCheck("AR2300")
!AreaCheck("AR2400")
!AreaCheck("AR2401")
!AreaCheck("AR2402")
!AreaCheck("AR2900")
!AreaCheck("AR2901")
!AreaCheck("AR2902")
!AreaCheck("AR2903")
!AreaCheck("AR2904")
!AreaCheck("AR2905")
!AreaCheck("AR2906")
~ THEN REPLY #49749 /* ~All right, we'll meet you there if we change our minds.~ */ DO ~SetGlobal("KickedOut","LOCALS",1)
MoveGlobal("AR0406","Korgan",[950.1867])
~ EXIT
  IF ~!AreaCheck("AR0301")
!AreaCheck("AR0302")
!AreaCheck("AR0303")
!AreaCheck("AR0304")
!AreaCheck("AR0305")
!AreaCheck("AR0306")
!AreaCheck("AR0307")
!AreaCheck("AR0509")
!AreaCheck("AR0510")
!AreaCheck("AR0511")
!AreaCheck("AR1102")
!AreaCheck("AR1107")
!AreaCheck("AR0801")
!AreaCheck("AR0803")
!AreaCheck("AR1300")
!AreaCheck("AR1301")
!AreaCheck("AR1302")
!AreaCheck("AR1303")
!AreaCheck("AR0604")
!AreaCheck("AR0605")
!AreaCheck("AR0606")
!InWatchersKeep()
~ THEN REPLY #49750 /* ~You can't do that.  Just wait here, Korgan.  We'll come back for you if we need your skills.~ */ DO ~SetGlobal("KickedOut","LOCALS",1)
~ EXIT
END

IF ~Global("KickedOut","LOCALS",0)
~ THEN BEGIN 11 // from:
  SAY #48311 /* ~Back to the grind, eh? Are we off?~ [KORGAN89] */
  IF ~~ THEN REPLY #48312 /* ~Yes, let's go.~ */ GOTO 12
  IF ~~ THEN REPLY #48313 /* ~No, I think we should go our separate ways for now.~ */ GOTO 10
END

IF ~~ THEN BEGIN 12 // from: 11.0
  SAY #48315 /* ~Good and good. There's gold aplenty to be had together.~ */
  IF ~~ THEN DO ~JoinParty()
~ EXIT
END
