// creator  : weidu.exe (version 23600)
// argument : LUCKY.DLG
// game     : .
// source   : ./override/LUCKY.DLG
// dialog   : lang\en_us/dialog.tlk
// dialogF  : (none)

BEGIN ~LUCKY~

IF ~  True()
~ THEN BEGIN 0 // from:
  SAY #11701 /* ~Hi folks, welcome to Lucky Aello's, where the prices are so low there's gotta be something wrong. Nobody sells it lower than me, because nobody buys it cheaper. If you can find a price lower than mine this side of Calimshan the item will probably kill you. What can I get for you?~ */
  IF ~~ THEN REPLY #11705 /* ~So you've got the cheapest goods around? Let's have a look.~ */ DO ~StartStore("stocheap",LastTalkedToBy(Myself))
~ EXIT
  IF ~~ THEN REPLY #11706 /* ~No, thanks. You get what you pay for.~ */ EXIT
  IF ~Global("X#EdwinLucky","GLOBAL",0)
InParty("edwin")
InMyArea("edwin")
!StateCheck("edwin",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#EdwinLucky","GLOBAL",1)~ EXTERN ~EDWINJ~ 92
  IF ~Global("X#AloraLucky","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#AloraLucky","GLOBAL",1)~ EXTERN ~ALORAJ~ 36
  IF ~Global("X#CoranLucky","GLOBAL",0)
InParty("coran")
InMyArea("coran")
!StateCheck("coran",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#CoranLucky","GLOBAL",1)~ EXTERN ~CORANJ~ 101
END

IF ~~ THEN BEGIN 1 // from:
  SAY #46662 /* ~I swear, sir, it is not quite as bad as it er... appears.~ */
  IF ~~ THEN REPLY #11705 /* ~So you've got the cheapest goods around? Let's have a look.~ */ DO ~StartStore("stocheap",LastTalkedToBy(Myself))
~ EXIT
  IF ~~ THEN REPLY #11706 /* ~No, thanks. You get what you pay for.~ */ EXIT
END

IF ~~ THEN BEGIN 2 // from:
  SAY #46847 /* ~Those are completely unfounded accusations! Why, that boy only suffered minor burns, and I'm sure her ladyship's scars will heal, in time...~ */
  IF ~~ THEN REPLY #11705 /* ~So you've got the cheapest goods around? Let's have a look.~ */ DO ~StartStore("stocheap",LastTalkedToBy(Myself))
~ EXIT
  IF ~~ THEN REPLY #11706 /* ~No, thanks. You get what you pay for.~ */ EXIT
  IF ~Global("X#EdwinLucky","GLOBAL",0)
InParty("edwin")
InMyArea("edwin")
!StateCheck("edwin",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#EdwinLucky","GLOBAL",1)~ EXTERN ~EDWINJ~ 92
  IF ~  InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN GOTO 3
END

IF ~~ THEN BEGIN 3 // from: 2.3
  SAY #46848 /* ~For the sake of her lord husband, I hope they do...~ */
  IF ~~ THEN REPLY #11705 /* ~So you've got the cheapest goods around? Let's have a look.~ */ DO ~StartStore("stocheap",LastTalkedToBy(Myself))
~ EXIT
  IF ~~ THEN REPLY #11706 /* ~No, thanks. You get what you pay for.~ */ EXIT
  IF ~Global("X#EdwinLucky","GLOBAL",0)
InParty("edwin")
InMyArea("edwin")
!StateCheck("edwin",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#EdwinLucky","GLOBAL",1)~ EXTERN ~EDWINJ~ 92
END

IF ~~ THEN BEGIN 4 // from:
  SAY #47278 /* ~That? That's eyes of some lady lich... or, at least, the gnome who sold it to me claimed that 'twas...~ */
  IF ~~ THEN REPLY #11705 /* ~So you've got the cheapest goods around? Let's have a look.~ */ DO ~StartStore("stocheap",LastTalkedToBy(Myself))
~ EXIT
  IF ~~ THEN REPLY #11706 /* ~No, thanks. You get what you pay for.~ */ EXIT
  IF ~Global("X#EdwinLucky","GLOBAL",0)
InParty("edwin")
InMyArea("edwin")
!StateCheck("edwin",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#EdwinLucky","GLOBAL",1)~ EXTERN ~EDWINJ~ 92
  IF ~Global("X#AloraLucky","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#AloraLucky","GLOBAL",1)~ EXTERN ~ALORAJ~ 36
END
