Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
11873 lines (10618 sloc) 573 KB
/////////////////////////////////////////////////////////
// Aran Whitehand ToB Dialog File - cmorgan - traified //
/////////////////////////////////////////////////////////
/* ToB Interjections and commentary */
BEGIN C-ARN25A /* pre-joined ToB, just summoned */
BEGIN C-ARN25J /* joined ToB */
BEGIN C-ARN25B /* banter ToB */
BEGIN C-ARN25P /* post-joined ToB */
BEGIN C-ARWRTH /* wraith creature dialog */
/* Volo's Talk in Saradush */
EXTEND_BOTTOM SARVOLO 9 /* Which of your companions would you like to hear about now? */
IF ~InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN REPLY @11302 DO ~IncrementGlobal("c-aranvolo","GLOBAL",1)~ + a1386
END
CHAIN SARVOLO a1386
@11303
/* 2nd time */
== C-ARN25J IF ~GlobalGT("c-aranvolo","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11304
== SARVOLO IF ~GlobalGT("c-aranvolo","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11305
/* no romance 1st time */
== C-ARN25J IF ~Global("c-aranvolo","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11306
== SARVOLO IF ~Global("c-aranvolo","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11307
== C-ARN25J IF ~Global("c-aranvolo","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11308
== SARVOLO IF ~Global("c-aranvolo","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11309
/* romance 1st time */
== C-ARN25J IF ~Global("c-aranvolo","GLOBAL",0) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11310
== SARVOLO IF ~Global("c-aranvolo","GLOBAL",0) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11311
== C-ARN25J IF ~Global("c-aranvolo","GLOBAL",0) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11312
== SARVOLO IF ~Global("c-aranvolo","GLOBAL",0) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11313
== C-ARN25J IF ~Global("c-aranvolo","GLOBAL",0) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11314
END
IF ~~ THEN EXTERN SARVOLO 9
/* Fate Spirit Summons: Three options, by user choice - friend, ex-lover (broken up) , or still in the relationship */
EXTEND_TOP FATESP 6 #5
IF ~!Dead("c-aran") !InMyArea("c-aran") Global("c-aransummoned","GLOBAL",0)~ THEN REPLY @11315 DO ~CreateVisualEffect("SPPORTAL",[1999.1218]) Wait(2) CreateCreature("c-aran13",[1999.1218],0) SetGlobal("c-aransummoned","GLOBAL",1)~ GOTO 8
IF ~Gender(Player1,FEMALE) !Dead("c-aran") !InMyArea("c-aran") Global("c-aransummoned","GLOBAL",0)~ THEN REPLY @11316 DO ~CreateVisualEffect("SPPORTAL",[1999.1218]) Wait(2) CreateCreature("c-aran13",[1999.1218],0) SetGlobal("c-aransummoned","GLOBAL",1) SetGlobal("c-aranrom","GLOBAL",3)~ GOTO 8
IF ~Gender(Player1,FEMALE) !Dead("c-aran") !InMyArea("c-aran") Global("c-aransummoned","GLOBAL",0)~ THEN REPLY @11317 DO ~CreateVisualEffect("SPPORTAL",[1999.1218]) Wait(2) CreateCreature("c-aran13",[1999.1218],0) SetGlobal("c-aransummoned","GLOBAL",1) SetGlobal("c-aranrom","GLOBAL",2)~ GOTO 8
END
/* Joinables */
I_C_T BAERIE25 157 c-arn25bae157 /* It's a boy! Oh, what a beautiful son we have - look at him wiggle his toes! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11318
END
I_C_T KORGA25J 1 c-arn25korg1 /* Har! A little pickle tickle with the Sister in the back of the church, eh? Ye know what they say... nun is better! HAR! HAR! HAR! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11319
== KORGA25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11320
END
I_C_T NALIA25J 0 c-arn25nalj0 /* I applaud her efforts. It's the duty and privilege of us of the upper classes to aid the less fortunate by taking them under our protection. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11321
== NALIA25J IF ~Global("c-silencearan","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11322
END
I_C_T SAREV25J 8 c-arn25sarv8 /* <CHARNAME>, I can tell just by looking at the defenses of that stronghold that a direct assault would be pointless. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11323
== SAREV25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11324
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11325
END
/* Non-Joinables */
I_C_T 25SPELL 1 c-arn25sp1 /* Can I interest you in my wares? I've got a collection of scrolls most mages would die for! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11326
END
I_C_T 25SPELL 8 c-arn25sp8 /* I would normally invite you to look at my magical wares, but alas my shelves are completely bare. I have not even a single parchment left for you to purchase. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11327
END
I_C_T 25SPELL 22 c-arn25sp22 /* Have you made the exchange with Hectan yet? Have you recovered my spellbook? */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) !PartyHasItem("PLOT18B") InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11328
END
I_C_T ABAZIGAL 0 c-arn25abaz /* Welcome. I have watched your progress with great interest. For a lesser creature you are quite amusing. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11329
END
I_C_T AMARCH02 2 c-arn25ama2 /* I can't be wasting my time yapping with some slack jawed yokel. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11330
END
I_C_T AMBAR01 9 c-arn25amb9 /* The order ignores us. They apply restrictions on the smugglers and have even killed some, restricting the supplies the village can be brought. And then there are all the mercenaries... */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11331
END
I_C_T AMBAR01 16 c-arn25amb16 /* I have heard tales of great wars and destruction in the lands beyond the desert, and while the order has never involved itself in such things before, it seems Balthazar has changed things. He plans a war...a great and terrible war... but I do not know against whom. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11332
END
I_C_T AMBOY01 3 c-arn25amb01/* If I had a sword, Balthazar would pay me to join his army! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11333
END
I_C_T2 AMELM01 7 c-arn25amel7 /* I have to leave again, soon, so I can't help you much. But I can help you a little, whether you like it or not. It's important that this all ends, soon, but that doesn't mean I won't lift a finger over it. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11334
END
I_C_T AMLICH01 20 c-arn25lich /* You... you have killed Marlowe?! Now I shall never collect what he owed to me, fool! You may be powerful, but I shall strike you down! To me, undead ones! Kill the godling!! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11335
== AMLICH01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11336
END
I_C_T AMLICH01 21 c-arn25lich /* So... the one with great power that I sensed has arrived at last. How I... looked forward to tasting your soul, little godling. You are powerful, yes... but it is a risk I shall take!! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11337
== AMLICH01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11336
END
I_C_T AMLICH01 22 c-arn25lich /* I shall wait no longer for our business to be done, godling! I hunger for your soul, and I shall have it!! Despite your power, I shall take it!! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11337
== AMLICH01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11336
END
I_C_T AMLICH01 28 c-arn25lich /* Hissssss!! Then you shall die!! Then you shall all die!! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11337
== AMLICH01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11336
END
I_C_T AMLICH01 32 c-arn25lich /* Ah, yes. That was not part of our bargain, was it? I should have suspected as much. So be it, godling... but you shall not find me a simple target!! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11337
== AMLICH01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11336
END
I_C_T AMMAYOR 5 c-arn25mayor5 /* My daughter is a compassionate woman, but young and impulsive. She foolishly stole money from these mercenaries to ease the suffering of the starving children of our town. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11338
END
I_C_T AMSAEMON 3 c-arn25saem3 /* Your arrival is a happy coincidence, given the situation. You can actually solve my dispute with these rather upset gentlemen. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11339
END
I_C_T AMSAEMON 6 c-arn25saem6 /* I guess <CHARNAME> isn't going to cooperate. I'm afraid this can only end in violence. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11340
END
I_C_T2 AMTGEN01 1 c-arn25gen1 /* You are a spawn of Bhaal and responsible for the destruction of the city of Saradush. Your execution has been ordered, <CHARNAME>. May the gods have mercy on your soul. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11341
END
I_C_T BALTH 22 c-arn25balth22 /* My plan is much more altruistic. I have vowed to exterminate all of Bhaal's children, forever wiping the Realms clean of his tainted existence. You have merely helped me in my goal. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11342
END
I_C_T2 BAZDRA01 1 c-arn25dr1 /* No... I see I am wrong. You are not brothers of the tattooed one. *sniff* I smell the taint of Bhaal on you. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11343
END
I_C_T BAZDRA03 1 c-arn25dr03 /* On your knees before you enter the presence of Abazigal! Bow before his ruthless might! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11344
END
I_C_T BAZDRA03 2 c-arn25dr03 /* The cavern echoes with the voice of the dragon, though the words seem somewhat forced and unnatural: */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11345
END
I_C_T BAZDRA03 13 c-arn25dr03 /* You have the stench of the Bhaalspawn... the same stench as Abazigal, though he tries to hide it behind the more palatable scent of his wyrm-kind heritage. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11345
END
I_C_T BAZEYE01 0 c-arn25beh0 /* You there! Intruder type! Why do you pester Lord Abazigal's most favored servant? */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11346
END
I_C_T BAZMONK 9 c-arn25bzm9 /* There is something else. *cough* Something you must do before you can face Abazigal. The entrance to Abazigal's inner sanctum is protected by a dragon. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11347
END
I_C_T2 BOTSMITH 152 c-arn25cen /* Ummm... Cespenar only serve the great one. You'se nice, maybe, but you'se still a nobody. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) Name("c-aran",LastTalkedToBy) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11348
END
I_C_T2 BOTSMITH 152 c-arn25cen /* Ummm... Cespenar only serve the great one. You'se nice, maybe, but you'se still a nobody. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) Name("c-aran",LastTalkedToBy) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11349
END
I_C_T FINMEL01 4 c-arn25finm /* I am disappointed in you, <CHARNAME>. So much bluster, so much force. How you have managed to blunder your way through the realms and not perished sooner, I have no idea. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11350
END
I_C_T2 FINSOL01 27 c-arn25endrom /* The choice is difficult, but these are your two options, Bhaalspawn. This is where your destiny is realized, and your future begins. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11351
END
I_C_T2 FINSOL01 27 c-arn25endnorome /* The choice is difficult, but these are your two options, Bhaalspawn. This is where your destiny is realized, and your future begins. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID) Alignment(Player1,MASK_EVIL)~ THEN @11352
END
I_C_T2 FINSOL01 27 c-arn25endnoromg /* The choice is difficult, but these are your two options, Bhaalspawn. This is where your destiny is realized, and your future begins. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID) !Alignment(Player1,MASK_EVIL)~ THEN @11353
END
I_C_T2 FINSOL01 27 c-arn25endbaby /* The choice is difficult, but these are your two options, Bhaalspawn. This is where your destiny is realized, and your future begins. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) Global("AerieHadBaby","GLOBAL",1) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11354
END
I_C_T GROMG02 3 c-arn25sarg /* Slay the invaders! Attack! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11355
== GROMG02 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11356
END
I_C_T HGNYA01 2 c-arn25nya /* Why, the Nyalee is I! The Witch of the Glade, I is called, and for good reason, it is! But questions...you have so many questions, know I! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11357
END
I_C_T HGNYA01 3 c-arn25nya /* Nyalee survives very well, she does, and Nyalee is I! The Witch of the Glade, they calls me, hee hee! But so many questions you have! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11358
END
I_C_T HGNYA01 4 c-arn25nya /* You should know, spawn-child, you should know! Nyalee served the dead master, once, and Nyalee is I! Hee hee! But so many questions you have, questions questions! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11359
END
I_C_T HGNYA01 5 c-arn25nya /* Tricks, yes! Nyalee knows many tricks! Witch of the Glade, they calls me, for many good reasons. Hee hee! But so many questions you have! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11360
END
I_C_T MARLOWE 16 c-arn25marl /* As I said before, my name is Marlowe... I hail from Calimshan to the south, where I was a merchant. A successful one. I... suppose that is where I first came into contact with Vongoethe. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11361
== MARLOWE IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11362
END
I_C_T MELISS01 11 c-arn25mel11 /* Getting rid of one of the Five without it looking like my doing was one thing...but with you already in Saradush, I could turn you on Yaga-Shura as well. After I let him into Saradush to kill the other Bhaalspawn, of course. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11363
END
I_C_T2 SARBOY01 1 c-arn25sboy /* Gromnir has a big army. When I grow up I want a big army. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11364
END
I_C_T SARBUL04 3 c-arn25bulf /* (needs passback) Guess it's time to remind everyone who's in charge around here! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11365
== SARBUL04 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11366
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11367
== SARBUL04 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11368
END
I_C_T SARKIS01 7 c-arn25kisconf /* My utilization of complex locution is more a reflection of my own superincumbent mental acuity than an aspersion on your circumscribed lexicon. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11369
END
I_C_T SARMEL01 17 c-arn25srm17 /* The actions of Gromnir and his soldiers have caused dissension within the town, and made it almost impossible for the loyal Saradush militia to defend the walls. We must first defeat the enemy within before we can end this siege. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11370
END
I_C_T SARWAI01 1 c-arn25wgg /* I wish someone would stand up to them... but everyone's afraid of Gromnir. *sniff* I guess I'll just have to put up with it. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID) !Alignment(Player1,MASK_EVIL)~ THEN @11371
END
I_C_T SARWAI01 1 c-arn25wgg /* I wish someone would stand up to them... but everyone's afraid of Gromnir. *sniff* I guess I'll just have to put up with it. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID) Alignment(Player1,MASK_EVIL)~ THEN @11372
END
I_C_T YAGCON 12 c-arn25ygcon12 /* I wanted to become part of his unstoppable war machine, to revel in the slaughter, to have my blade drip with the blood of all those Yaga Shura crushed beneath his mighty boot! ~ */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11373
END
I_C_T YAGCON 18 c-arn25ygcon18 /* I have heard mention of a name from Yaga Shura's past - Nyalee, an old crone who lives in the marshes of the Mir Forests. She may know Yaga Shura's secrets. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID) !Alignment(Player1,MASK_EVIL)~ THEN @11374
END
I_C_T YAGCON 18 c-arn25ygcon18 /* I have heard mention of a name from Yaga Shura's past - Nyalee, an old crone who lives in the marshes of the Mir Forests. She may know Yaga Shura's secrets. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID) Alignment(Player1,MASK_EVIL)~ THEN @11375
END
I_C_T SARMEL01 49 c-arn25mls49 /* I can show you where that glade is... but it is only speculation. The key to the giant's invulnerability might lay there, but it might not. There may be nothing there at all. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11376
== SARMEL01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11377
END
I_C_T SARMEL01 16 c-arn25mls16 /* But Gromnir is mad. He has barricaded himself in the castle throne room, and his troops run amok through the town with no regard for the lives and rights of the citizens of Saradush. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11378
== SARMEL01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11379
END
I_C_T SARMEL01 80 c-arn25mls80 /* He runs a monastic order in a remote village in the Calim Desert...it will serve to both hide you from retribution as well as serve as a base from which you can attack the enclaves of Abazigal and Sendai. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11380
END
I_C_T SARPROVF 6 c-arn25prvf6 /* I am not interested in you... I wish only to speak with the leader of your group. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11381
END
I_C_T SARPROVF 0 c-arn25prvf0 /* You look like a mighty fine piece of man-meat. Why don't we slip away alone? I promise a night you'll remember for the rest of your life. Only fifty gold coins. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11382
== SARPROVF IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11383
END
I_C_T SARTHF2 0 c-arn25bth /* What do you want? You think you can hassle me just because I'm a kid? */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11384
END
I_C_T SENDAI 15 c-arn25sd15 /* NO! NO! My Bhaal essence is ripped from my very soul! Damn you! But I may yet rob you of the glory of your victory. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11385
== SENDAI IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11386
END
I_C_T SENGUA01 4 c-arn25sgd4 /* Could have been my imagination, though. I ain't never seen elves with black skin before. And they were only there for a second before they vanished. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11387
== SENGUA01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11388
END
I_C_T SENBEH01 10 c-arn25behdr10 /* Well, yes. Can't say I cared overmuch for that, although you *did* release me from one of the most boring tasks in Creation. Can't keep a good beholder down, I guess, eh? Heh heh. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11389
== SENBEH01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11390
END
I_C_T SARELF01 2 c-arn25srelf /* We have nowhere to stay... we have no choice but to wander the streets. I fear we will soon run afoul of Gromnir's men once more. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11391
== SARELF01 IF ~Global("c-silencearan","GLOBAL",0) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11392
END
/* ToB Version, Watcher's Keep */
I_C_T FSDRAGON 0 c-arn25dra0 /* I am the fearsome death that awaits those that would break the seal. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @416
== FSDRAGON IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @417
END
I_C_T FSSPIR2 1 c-arn25spi1 /* I am the Keeper of the Key, the One Left Behind. Duty compels me to remain, to stand guard over one of the keys to the final seal. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11393
== FSSPIR2 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @419
END
I_C_T GORAPP1 6 c-arn25ap6 /* Odren intended it be thee to sacrifice thy life, rather than make his own sacrifice willingly. He also failed to tell thee the scope of the evil that lies within...the Imprisoned One is Demogorgon, Prince of Demons. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @11394
== GORAPP1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @421
END
I_C_T GORDEMO 1 c-arn25pod1 /* You do not see anything physical within the chamber...but you feel its presence all around you. A phantasmal hand brushes your cheek, a curious gesture that startles you and is gone just as quickly. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @422
END
I_C_T GORMAD1 1 c-arn25yak1 /* Yakman talk talk talk all the time, he was told... Talkative Yakman! Once came with party, all looking for treasure, Yakman talk talk talk all the time. Now they are all dead and only Yakman left, lost lost. Lonely Yakman! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @423
== GORMAD1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @424
END
I_C_T GORMAD1 34 c-arn25tm34 /* 'Yakman'? That...that was that ridiculous nickname that atrocious little halfling kept calling me. My name is Tamorlin. Wh...where is my party? Where am I? */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @425
== GORMAD1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @426
END
I_C_T GORODR1 2 c-arn25od2 /* norom - Greetings to you, my friend. I believe I have heard of you...you are <GABBER>, one of the companions of the Child of Bhaal. Please, I must speak to <PRO_HIMHER>! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @427
== GORODR1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) !Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @428
END
I_C_T GORODR1 2 c-arn25od2 /* rom - Greetings to you, my friend. I believe I have heard of you...you are <GABBER>, one of the companions of the Child of Bhaal. Please, I must speak to <PRO_HIMHER>! */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @429
== GORODR1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) Global("c-aranrom","GLOBAL",2) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @428
END
I_C_T GORODR1 10 c-arn25od10 /* The old prison would not hold this great evil for long, He said. Our order would have to maintain a vigil, to watch for the day when the evil would begin to break the great seals and escape. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @430
== GORODR1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @431
END
I_C_T GORODR1 50 c-arn25od50 /* You knew not what you did, <GABBER>, so your foolishness can be forgiven, I am sure. Farewell to you. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @432
== GORODR1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @433
END
I_C_T GORODR1 53 c-arn25od53 /* The Imprisoned One is none other than Demogorgon, Prince of Demons. We did not think he could... be defeated... and so we sought someone else to take our place and seal the demon within the Keep. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @434
END
I_C_T GORPRI1 2 c-arn25pipe /* (needs passback) I apologize for my... undeserved reaction. I will take my slippers and let you finish your work here. Look through the sarcophagus if you wish. */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @435
== GORPRI1 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @436
END
I_C_T GORSUC01 0 c-arn25suc0 /* Ahhh, look here, dear ladies. Yet another hapless wanderer, drifting through these endless portals. Is it lost, do you think? Shall we ask it? */
== C-ARN25J IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @437
== GORSUC01 IF ~Global("c-silencearan","GLOBAL",0) GlobalGT("Chapter","GLOBAL",7) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ THEN @438
END
/* ToB C-ARN25B additions */
/* ToB: Aran > Aerie : Keeping Secrets Secret While Glowing */
CHAIN
IF ~CombatCounter(0) !Detect([ENEMY]) InParty("Aerie") See("Aerie") !StateCheck("Aerie",CD_STATE_NOTVALID) InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID) Global("AerieRomanceActive","GLOBAL",2)
Global("c-aransuspicious","GLOBAL",0) Global("AerieHadBaby","GLOBAL",0) Global("babytalk","GLOBAL",1)~ THEN C-ARN25B a3004
@11395
DO ~SetGlobal("c-aransuspicious","GLOBAL",1)~
== BAERIE25 @11396
== C-ARN25B @11397
== BAERIE25 @11398
== C-ARN25B @11399
== BAERIE25 @11400
== C-ARN25B @11401
== BAERIE25 @11402
== C-ARN25B @11403
== BAERIE25 @11404
== C-ARN25B @11405
EXIT
/* ToB C-ARN25J additions */
APPEND C-ARN25J
/* ToB Scenery Dialog : Romantic Encounters Reactions */
/* Sarevok and PC "disappear" for awhile */
IF ~Global("c-arnRESarev","LOCALS",1)~ THEN BEGIN a4872
SAY @11406
IF ~~ THEN DO ~SetGlobal("c-arnRESarev","LOCALS",2)~ EXIT
END
/* In Watcher's Keep, ToB - both C-ARANJ and C-ARN25J triggered from Global("c-aranwatchkeep","GLOBAL",1) and closed to 2 in dlg */
IF ~Global("c-aranwatchkeep","GLOBAL",1)~ THEN BEGIN a973
SAY @6471
++ @6472 DO ~SetGlobal("c-aranwatchkeep","GLOBAL",2)~ + a974
++ @6473 DO ~SetGlobal("c-aranwatchkeep","GLOBAL",2)~ + a975
+ ~Class("c-aran",THIEF_ALL)~ + @6474 DO ~SetGlobal("c-aranwatchkeep","GLOBAL",2)~ + a976
+ ~Class("c-aran",MAGE_ALL)~ + @6475 DO ~SetGlobal("c-aranwatchkeep","GLOBAL",2)~ + a977
+ ~Class("c-aran",CLERIC_ALL)~ + @6476 DO ~SetGlobal("c-aranwatchkeep","GLOBAL",2)~ + a978
+ ~Class("c-aran",FIGHTER_ALL)~ + @6477 DO ~SetGlobal("c-aranwatchkeep","GLOBAL",2)~ + a979
END
IF ~~ a974
SAY @8517
++ @8518 + a982
++ @8519 + a981
++ @11407 + a980
+ ~Class(Player1,THIEF_ALL)~ + @8521 + a980
+ ~Class(Player1,MAGE_ALL)~ + @8522 + a980
+ ~Class(Player1,CLERIC_ALL)~ + @8523 + a980
+ ~Class(Player1,FIGHTER_ALL)~ + @8524 + a980
END
IF ~~ a975
SAY @8525
++ @8518 + a982
++ @8519 + a981
++ @11407 + a980
+ ~Class(Player1,THIEF_ALL)~ + @8521 + a980
+ ~Class(Player1,MAGE_ALL)~ + @8522 + a980
+ ~Class(Player1,CLERIC_ALL)~ + @8523 + a980
+ ~Class(Player1,FIGHTER_ALL)~ + @8524 + a980
END
IF ~~ a976
SAY @8526
++ @8519 + a981
++ @8518 + a982
++ @11407 + a980
+ ~Class(Player1,THIEF_ALL)~ + @8527 + a980
+ ~Class(Player2,THIEF_ALL) !Name("c-aran",Player2)~ + @8528 + a980
+ ~Class(Player3,THIEF_ALL) !Name("c-aran",Player3)~ + @8529 + a980
+ ~Class(Player4,THIEF_ALL) !Name("c-aran",Player4)~ + @8530 + a980
+ ~Class(Player5,THIEF_ALL) !Name("c-aran",Player5)~ + @8531 + a980
+ ~Class(Player6,THIEF_ALL) !Name("c-aran",Player6)~ + @8532 + a980
END
IF ~~ a977
SAY @8533
++ @8519 + a981
++ @8518 + a982
++ @11407 + a980
+ ~Class(Player1,MAGE_ALL)~ + @8534 + a980
+ ~Class(Player2,MAGE_ALL) !Name("c-aran",Player2)~ + @8528 + a980
+ ~Class(Player3,MAGE_ALL) !Name("c-aran",Player3)~ + @8529 + a980
+ ~Class(Player4,MAGE_ALL) !Name("c-aran",Player4)~ + @8530 + a980
+ ~Class(Player5,MAGE_ALL) !Name("c-aran",Player5)~ + @8531 + a980
+ ~Class(Player6,MAGE_ALL) !Name("c-aran",Player6)~ + @8532 + a980
END
IF ~~ a978
SAY @8535
++ @8519 + a981
++ @8518 + a982
++ @8520 + a980
+ ~Class(Player1,CLERIC_ALL)~ + @8527 + a980
+ ~Class(Player2,CLERIC_ALL) !Name("c-aran",Player2)~ + @8528 + a980
+ ~Class(Player3,CLERIC_ALL) !Name("c-aran",Player3)~ + @8529 + a980
+ ~Class(Player4,CLERIC_ALL) !Name("c-aran",Player4)~ + @8530 + a980
+ ~Class(Player5,CLERIC_ALL) !Name("c-aran",Player5)~ + @8531 + a980
+ ~Class(Player6,CLERIC_ALL) !Name("c-aran",Player6)~ + @8532 + a980
END
IF ~~ a979
SAY @8536
++ @8519 + a981
++ @8518 + a982
++ @11408 + a980
+ ~Class(Player1,FIGHTER_ALL)~ + @8537 + a980
+ ~Class(Player2,FIGHTER_ALL) !Name("c-aran",Player2)~ + @8538 + a980
+ ~Class(Player3,FIGHTER_ALL) !Name("c-aran",Player3)~ + @8539 + a980
+ ~Class(Player4,FIGHTER_ALL) !Name("c-aran",Player4)~ + @8540 + a980
+ ~Class(Player5,FIGHTER_ALL) !Name("c-aran",Player5)~ + @8541 + a980
+ ~Class(Player6,FIGHTER_ALL) !Name("c-aran",Player6)~ + @8542 + a980
END
IF ~~ a980 SAY @8543 IF ~~ THEN EXIT END
IF ~~ a981 SAY @8544 IF ~~ THEN EXIT END
IF ~~ a982 SAY @8545 IF ~~ THEN EXIT END
/* ToB Plot Talk 1: Saradush */
IF ~Global("c-aransaradsush","GLOBAL",1)~ THEN BEGIN a2380
SAY @11409
++ @11410 DO ~SetGlobal("c-aransaradsush","GLOBAL",2)~ + a2289
++ @11411 DO ~SetGlobal("c-aransaradsush","GLOBAL",2)~ + a2291
++ @11412 DO ~SetGlobal("c-aransaradsush","GLOBAL",2)~ + a2292
+ ~Global("c-aranrom","GLOBAL",2)~ + @11413 DO ~SetGlobal("c-aransaradsush","GLOBAL",2)~ + a2295
++ @11414 DO ~SetGlobal("c-aransaradsush","GLOBAL",2)~ + a2296
++ @11415 DO ~SetGlobal("c-aransaradsush","GLOBAL",2)~ + a2297
END
IF ~~ a2289
SAY @11416
IF ~~ THEN GOTO a2290
END
IF ~~ a2290
SAY @11417
++ @11418 + a2294
++ @11419 + a2292
++ @11420 + a2292
++ @11421 + a2300
++ @11422 + a2297
END
IF ~~ a2291
SAY @11423
IF ~~ THEN GOTO a2290
END
IF ~~ a2292
SAY @11424
= @11425
++ @11426 + a2293
++ @11427 + a2292
++ @11428 + a2298
++ @11429 + a2299
++ @11430 + a2294
++ @11431 + a2304
END
IF ~~ a2295
SAY @11432
++ @11433 + a2289
++ @11411 + a2291
++ @11414 + a2296
++ @11415 + a2297
END
IF ~~ a2296
SAY @11434
++ @11435 + a2293
++ @11436 + a2289
++ @11437 + a2289
++ @11438 + a2290
END
IF ~~ a2297
SAY @11439
++ @11440 + a2292
++ @11441 + a2302
++ @11442 + a2299
++ @11443 + a2301
++ @11444 + a2292
++ @11445 + a2298
END
IF ~~ a2302
SAY @11446
++ @11447 + a2303
++ @11448 + a2300
END
IF ~~ a2293 SAY @11449 IF ~~ THEN EXIT END
IF ~~ a2294 SAY @11450 IF ~~ THEN EXIT END
IF ~~ a2298 SAY @11451 IF ~~ THEN EXIT END
IF ~~ a2299 SAY @11452 IF ~~ THEN EXIT END
IF ~~ a2300 SAY @11453 IF ~~ THEN EXIT END
IF ~~ a2301 SAY @11454 = @11455 IF ~~ THEN EXIT END
IF ~~ a2303 SAY @11456 IF ~~ THEN EXIT END
IF ~~ a2304 SAY @11457 = @11458 IF ~~ THEN EXIT END
/* Scenery Dialog : Aran Apologizes */
IF ~Global("c-aranapology","GLOBAL",1)~ THEN BEGIN a4999
SAY @6485
IF ~RandomNum(3,1)~ THEN DO ~SetGlobal("c-aranapology","GLOBAL",0)~ GOTO a5000
IF ~RandomNum(3,2)~ THEN DO ~SetGlobal("c-aranapology","GLOBAL",0)~ GOTO a5001
IF ~RandomNum(3,3)~ THEN DO ~SetGlobal("c-aranapology","GLOBAL",0)~ GOTO a5002
END
IF ~~ a5000 /* 7 to 11 responses */
SAY @11459
+ ~Gender(Player2,MALE) !Name("c-aran",Player2)~ + @8766 + a5003
+ ~Gender(Player3,MALE) !Name("c-aran",Player3)~ + @8767 + a5003
+ ~Gender(Player4,MALE) !Name("c-aran",Player4)~ + @8768 + a5003
+ ~Gender(Player5,MALE) !Name("c-aran",Player5)~ + @8769 + a5003
+ ~Gender(Player6,MALE) !Name("c-aran",Player6)~ + @8770 + a5003
+ ~RandomNum(3,1)~ + @8771 + a5004
+ ~RandomNum(3,2)~ + @8772 + a5005
+ ~RandomNum(3,3)~ + @8773 + a5006
+ ~RandomNum(3,1)~ + @8774 + a5007
+ ~RandomNum(3,2)~ + @8775 + a5008
+ ~RandomNum(3,3)~ + @8776 + a5008
+ ~RandomNum(3,1)~ + @8703 + a5009
+ ~RandomNum(3,2)~ + @8735 + a5009
+ ~RandomNum(3,3)~ + @8777 + a5009
+ ~RandomNum(8,1)~ + @8778 + a5010
+ ~RandomNum(8,2)~ + @8779 + a5011
+ ~RandomNum(8,3)~ + @8780 + a5012
+ ~RandomNum(8,4)~ + @8781 + a5013
+ ~RandomNum(8,5)~ + @8782 + a5013
+ ~RandomNum(8,6)~ + @8781 + a5012
+ ~RandomNum(8,7)~ + @8783 + a5011
+ ~RandomNum(8,8)~ + @8778 + a5010
++ @8720 + a5014
++ @8721 + a5019
END
IF ~~ a5001 /* 8 to 12 responses */
SAY @8784
+ ~Gender(Player2,MALE) !Name("c-aran",Player2)~ + @8785 + a5003
+ ~Gender(Player3,MALE) !Name("c-aran",Player3)~ + @8786 + a5003
+ ~Gender(Player4,MALE) !Name("c-aran",Player4)~ + @8787 + a5003
+ ~Gender(Player5,MALE) !Name("c-aran",Player5)~ + @8788 + a5003
+ ~Gender(Player6,MALE) !Name("c-aran",Player6)~ + @8770 + a5003
+ ~RandomNum(3,1)~ + @8771 + a5015
+ ~RandomNum(3,2)~ + @8789 + a5005
+ ~RandomNum(3,3)~ + @8773 + a5016
+ ~RandomNum(3,1)~ + @8790 + a5007
+ ~RandomNum(3,2)~ + @8775 + a5017
+ ~RandomNum(3,3)~ + @8776 + a5017
+ ~RandomNum(8,1)~ + @8778 + a5010
+ ~RandomNum(8,2)~ + @8779 + a5011
+ ~RandomNum(8,3)~ + @8780 + a5012
+ ~RandomNum(8,4)~ + @8781 + a5013
+ ~RandomNum(8,5)~ + @8782 + a5013
+ ~RandomNum(8,6)~ + @8781 + a5012
+ ~RandomNum(8,7)~ + @8783 + a5011
+ ~RandomNum(8,8)~ + @8778 + a5010
+ ~RandomNum(4,1)~ + @8725 + a5015
+ ~RandomNum(4,2)~ + @8726 + a5005
+ ~RandomNum(4,3)~ + @8726 + a5018
+ ~RandomNum(4,4)~ + @8724 + a5020
++ @8720 + a5014
++ @8721 + a5019
++ @8791 + a5031
END
IF ~~ a5002 /* lots of states, but only 6 to 8 are available in any given party */
SAY @8792
+ ~Gender(Player2,MALE) !Name("c-aran",Player2)~ + @8739 + a5003
+ ~Gender(Player3,MALE) !Name("c-aran",Player3)~ + @8740 + a5003
+ ~Gender(Player4,MALE) !Name("c-aran",Player4)~ + @8741 + a5003
+ ~Gender(Player5,MALE) !Name("c-aran",Player5)~ + @8742 + a5003
+ ~Gender(Player6,MALE) !Name("c-aran",Player6)~ + @8743 + a5003
+ ~Gender(Player2,FEMALE) !Name("edwin",Player2) !Name("aerie",Player2) !Name("viconia",Player2) !Name("jaheira",Player2)~ + @8793 + a5003
+ ~Gender(Player3,FEMALE) !Name("edwin",Player3) !Name("aerie",Player3) !Name("viconia",Player3) !Name("jaheira",Player3)~ + @8794 + a5003
+ ~Gender(Player4,FEMALE) !Name("edwin",Player4) !Name("aerie",Player4) !Name("viconia",Player4) !Name("jaheira",Player4)~ + @8795 + a5003
+ ~Gender(Player5,FEMALE) !Name("edwin",Player5) !Name("aerie",Player5) !Name("viconia",Player5) !Name("jaheira",Player5)~ + @8796 + a5003
+ ~Gender(Player6,FEMALE) !Name("edwin",Player6) !Name("aerie",Player6) !Name("viconia",Player6) !Name("jaheira",Player6)~ + @8797 + a5003
+ ~Gender(Player2,FEMALE) Name("edwin",Player2)~ + @8749 + a5003
+ ~Gender(Player3,FEMALE) Name("edwin",Player3)~ + @8749 + a5003
+ ~Gender(Player4,FEMALE) Name("edwin",Player4)~ + @8749 + a5003
+ ~Gender(Player5,FEMALE) Name("edwin",Player5)~ + @8749 + a5003
+ ~Gender(Player6,FEMALE) Name("edwin",Player6)~ + @8749 + a5003
/* Another female as foil: Aerie */
+ ~Gender(Player2,FEMALE) Name("aerie",Player2)~ + @8798 + a5003
+ ~Gender(Player3,FEMALE) Name("aerie",Player3)~ + @8798 + a5003
+ ~Gender(Player4,FEMALE) Name("aerie",Player4)~ + @8798 + a5003
+ ~Gender(Player5,FEMALE) Name("aerie",Player5)~ + @8798 + a5003
+ ~Gender(Player6,FEMALE) Name("aerie",Player6)~ + @8798 + a5003
/* Another female as foil: Viconia */
+ ~Gender(Player2,FEMALE) Name("viconia",Player2)~ + @8799 + a5003
+ ~Gender(Player3,FEMALE) Name("viconia",Player3)~ + @8799 + a5003
+ ~Gender(Player4,FEMALE) Name("viconia",Player4)~ + @8799 + a5003
+ ~Gender(Player5,FEMALE) Name("viconia",Player5)~ + @8799 + a5003
+ ~Gender(Player6,FEMALE) Name("viconia",Player6)~ + @8799 + a5003
/* Another female as foil: Jaheira */
+ ~Gender(Player2,FEMALE) Name("jaheira",Player2)~ + @8800 + a5003
+ ~Gender(Player3,FEMALE) Name("jaheira",Player3)~ + @8800 + a5003
+ ~Gender(Player4,FEMALE) Name("jaheira",Player4)~ + @8800 + a5003
+ ~Gender(Player5,FEMALE) Name("jaheira",Player5)~ + @8800 + a5003
+ ~Gender(Player6,FEMALE) Name("jaheira",Player6)~ + @8800 + a5003
/* make up */
+ ~RandomNum(3,1)~ + @8801 + a5016
+ ~RandomNum(3,2)~ + @8802 + a5018
+ ~RandomNum(3,3)~ + @8773 + a5015
/* do not make up */
+ ~RandomNum(3,1)~ + @8803 + a5008
+ ~RandomNum(3,2)~ + @8804 + a5021
+ ~RandomNum(3,3)~ + @8805 + a5003
/* stop romance */
++ @8720 DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranrom","GLOBAL",3)~ + a5014
/* kick him out */
++ @8721 + a5019
/* kick him out for good and try to kill him */
++ @8791 + a5031
END
IF ~~ a5003
SAY @8806
/* make up */
+ ~RandomNum(3,1)~ + @8807 + a5005
+ ~RandomNum(3,2)~ + @8808 + a5016
+ ~RandomNum(3,3)~ + @8809 + a5018
/* do not make up */
+ ~RandomNum(3,1)~ + @8810 + a5008
+ ~RandomNum(3,2)~ + @8811 + a5021
+ ~RandomNum(3,3)~ + @8812 + a5022
/* cry */
+ ~RandomNum(3,1)~ + @8703 + a5009
+ ~RandomNum(3,2)~ + @8735 + a5009
+ ~RandomNum(3,3)~ + @8813 + a5009
/* PC expects groveling by Aran */
+ ~RandomNum(3,1)~ + @8779 + a5010
+ ~RandomNum(3,2)~ + @8814 + a5011
+ ~RandomNum(3,3)~ + @8815 + a5012
/* stop romance */
++ @8720 + a5014
/* kick him out */
++ @8721 + a5019
/* kick him out for good and try to kill him */
++ @8791 + a5031
END
IF ~~ a5007
SAY @8816
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
IF ~~ a5017
SAY @8817
+ ~RandomNum(4,1)~ + @8818 + a5023
+ ~RandomNum(4,2)~ + @8819 + a5024
+ ~RandomNum(4,3)~ + @8820 + a5025
+ ~RandomNum(4,4)~ + @8821 + a5026
+ ~RandomNum(4,1)~ + @8822 + a5015
+ ~RandomNum(4,2)~ + @8823 + a5005
+ ~RandomNum(4,3)~ + @8824 + a5016
+ ~RandomNum(4,4)~ + @8825 + a5018
++ @8826 + a5023
END
IF ~~ a5008
SAY @8827
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
IF ~~ a5021
SAY @8828
+ ~RandomNum(2,1)~ + @8829 + a5023 /* reconsider, no */
+ ~RandomNum(2,2)~ + @8830 + a5024 /* reconsider, no */
+ ~RandomNum(2,1)~ + @8831 + a5025 /* reconsider, no */
+ ~RandomNum(2,2)~ + @8832 + a5026 /* reconsider, no */
+ ~RandomNum(2,1)~ + @8833 + a5015 /* reconsider, yes */
+ ~RandomNum(2,2)~ + @8834 + a5005 /* reconsider, yes */
+ ~RandomNum(2,1)~ + @8835 + a5016 /* reconsider, yes */
+ ~RandomNum(2,2)~ + @8836 + a5018 /* reconsider, yes */
++ @8837 + a5024
END
IF ~~ a5009
SAY @8838
++ @8839 + a5022
/* make up */
+ ~RandomNum(2,1)~ + @8840 + a5016
+ ~RandomNum(2,2)~ + @8841 + a5018
++ @8842 + a5027
++ @8843 + a5028
/* Gratuitous stealing of song lyrics, and if you don't know from which song, you are missing out on some great music... */
++ @8844 + a5027
END
IF ~~ a5010
SAY @8845
= @8846
++ @8847 + a5005
++ @8848 + a5005
++ @8849 + a5022
++ @8850 + a5012
++ @8851 + a5020
END
IF ~~ a5011
SAY @8852
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT /* goes to preexisting without global setting */
END
IF ~~ a5012
SAY @8853
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT /* goes to preexisting without global setting */
END
IF ~~ a5013
SAY @8854
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
IF ~~ a5020
SAY @8855
= @8856
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5027
SAY @8864
++ @8865 + a5029
++ @8866 + a5029
++ @8867 + a5028
++ @8868 + a5030
++ @8869 + a5030
END
IF ~~ a5029
SAY @8870
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5030
SAY @8871
= @8872
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0)~ EXIT /* no NPC initiated flirt restart */
END
IF ~~ a5028
SAY @8873
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5004
SAY @8876
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5006
SAY @8877
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5015
SAY @8878
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5005
SAY @8879
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5016
SAY @8880
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5018
SAY @8881
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",0)~ EXIT
END
IF ~~ a5023
SAY @8883
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
IF ~~ a5024
SAY @8884
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
IF ~~ a5025
SAY @8885
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
IF ~~ a5026
SAY @8886
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
IF ~~ a5014
SAY @8887
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranrom","GLOBAL",3)~ EXIT
END /* deal with journal entry */
IF ~~ a5019
SAY @8888
IF ~~ THEN DO ~SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranrom","GLOBAL",3) SetGlobal("KickedOut","LOCALS",1) ActionOverride("c-aran",SetLeavePartyDialogFile()) ActionOverride("c-aran",ChangeAIScript("",DEFAULT)) ActionOverride("c-aran",LeaveParty())~ EXIT
END /* deal with journal entry */
IF ~~ a5022
SAY @8859
++ @8860 + a5014
++ @8721 + a5019
++ @8861 + a5031
++ @8862 + a5027
++ @8842 + a5027
++ @8863 DO ~SetGlobal("c-aranfight","GLOBAL",1) SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobalTimer("c-aranismad","GLOBAL",ONE_DAY)~ EXIT
END
/* NightTalk: Stars, Constancy Thereof */
IF ~Global("c-tobnightone","GLOBAL",1)~ THEN BEGIN a4249
SAY @11460
++ @11461 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a4250
++ @11462 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a4251
++ @11463 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a4251
++ @11464 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a4251
+ ~Gender(Player1,MALE)~ + @11465 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a4251
+ ~GlobalGT("c-aranrom","GLOBAL",0) GlobalLT("c-aranrom","GLOBAL",3) Gender(Player1,FEMALE) !HasItemEquiped("belt05",Player1)~ + @11466 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a4251
+ ~RandomNum(5,5)~ + @11467 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a3188 /* c-aranshutup55 */
+ ~RandomNum(5,4)~ + @11467 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a3189 /* c-aranshutup56 */
+ ~RandomNum(5,3)~ + @11467 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a3190 /* c-aranshutup57 */
+ ~RandomNum(5,2)~ + @11467 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a3191 /* c-aranshutup58 */
+ ~RandomNum(5,1)~ + @11467 DO ~SetGlobal("c-tobnightone","GLOBAL",2)~ + a3192 /* c-aranshutup59 */
END
IF ~~ a4250
SAY @11468
++ @11469 + a4252
++ @11470 + a4251
+ ~OR(3) Global("c-aranrom","GLOBAL",0) Global("c-aranrom","GLOBAL",3) HasItemEquiped("belt05",Player1)~ + @11471 + a4254
+ ~GlobalGT("c-aranrom","GLOBAL",0) GlobalLT("c-aranrom","GLOBAL",3) Gender(Player1,FEMALE) !HasItemEquiped("belt05",Player1)~ + @11471 + a4253
+ ~GlobalGT("c-aranrom","GLOBAL",0) GlobalLT("c-aranrom","GLOBAL",3) Gender(Player1,FEMALE) !HasItemEquiped("belt05",Player1)~ + @11472 + a4253
+ ~RandomNum(5,5)~ + @11473 + a3188 /* c-aranshutup55 */
+ ~RandomNum(5,4)~ + @11473 + a3189 /* c-aranshutup56 */
+ ~RandomNum(5,3)~ + @11473 + a3190 /* c-aranshutup57 */
+ ~RandomNum(5,2)~ + @11473 + a3191 /* c-aranshutup58 */
+ ~RandomNum(5,1)~ + @11473 + a3192 /* c-aranshutup59 */
END
IF ~~ a4251
SAY @11474
IF ~OR(4) Global("c-aranrom","GLOBAL",0) Global("c-aranrom","GLOBAL",3) HasItemEquiped("belt05",Player1) Gender(Player1,MALE)~ THEN GOTO a4254
IF ~GlobalGT("c-aranrom","GLOBAL",0) GlobalLT("c-aranrom","GLOBAL",3) Gender(Player1,FEMALE) !HasItemEquiped("belt05",Player1)~ THEN GOTO a4253
END
IF ~~ a4252
SAY @11475
IF ~~ THEN GOTO a4254
END
IF ~~ a4253
SAY @11476
++ @6960 + a3915 /* FEMALE_MOON_LEADS */
++ @6961 + a3916 /* ARAN_MOON_LEADS */
++ @11477 + a4254
++ @6963 + a3918 /* ARAN_MOON_MIND */
++ @11478 + a3919 /* MOON_JUST_FRIENDS */
++ @11479 + a3918 /* ARAN_MOON_MIND */
++ @11480 + a3866 /* FIGHT_EXIT */
END
IF ~~ a4254
SAY @11481
IF ~~ THEN EXIT
END
/* ToB Plot Talk : Sarevok chosen as companion: Activate after a week */
/*
~Global("c-aranworriedtob","GLOBAL",1)~
DO ~SetGlobal("c-aranworriedtob","GLOBAL",2)~
GlobalGT("ADAngelSarevok","GLOBAL",2) - crossmod with Sister V
*/
/* ToB Plot Talk : Sarevok chosen as companion: death of Sarevok after warning */
/*
IF ~Global("c-aranworriedtob","GLOBAL",3)~
DO ~SetGlobal("c-aranworriedtob","GLOBAL",4)~
GlobalGT("ADAngelSarevok","GLOBAL",2)
*/
/* ToB Plot Talk : Post Wraith Talk(tm) */
IF ~Global("c-aranpostwraith","GLOBAL",1)~ THEN BEGIN a2242
SAY @11482
++ @11483 DO ~SetGlobal("c-aranpostwraith","GLOBAL",2)~ + a2243
++ @11484 DO ~SetGlobal("c-aranpostwraith","GLOBAL",2)~ + a2243
++ @3961 DO ~SetGlobal("c-aranpostwraith","GLOBAL",2)~ + a2244
++ @11485 DO ~SetGlobal("c-aranpostwraith","GLOBAL",2)~ + a2245
++ @11486 DO ~SetGlobal("c-aranpostwraith","GLOBAL",2)~ + a2243
++ @11487 DO ~SetGlobal("c-aranpostwraith","GLOBAL",2)~ + a2243
END
IF ~~ a2244
SAY @11488
++ @11489 + a2243
++ @11485 + a2245
++ @11490 + a2245
++ @11491 + a2243
++ @11492 + a2245
END
IF ~~ a2245
SAY @11493
IF ~~ THEN GOTO a2243
END
IF ~~ a2243
SAY @11494
++ @11495 + a2246
++ @11496 + a2246
++ @11497 + a2246
++ @11498 + a2246
++ @11499 + a2260
END
IF ~~ a2246
SAY @11500
= @11501
= @11502
+ ~Alignment(Player1,MASK_EVIL)~ + @11503 + a2249
+ ~Alignment(Player1,MASK_GOOD)~ + @11503 + a2250
+ ~!Alignment(Player1,MASK_EVIL) !Alignment(Player1,MASK_GOOD)~ + @11503 + a2251
++ @11504 + a2260
++ @11505 + a2247
END
IF ~~ a2247
SAY @11506
= @11507
= @11508
++ @11509 + a2257
+ ~Alignment(Player1,MASK_EVIL)~ + @11503 + a2249
+ ~Alignment(Player1,MASK_GOOD)~ + @11503 + a2250
+ ~!Alignment(Player1,MASK_EVIL) !Alignment(Player1,MASK_GOOD)~ + @11503 + a2251
++ @11510 + a2252
++ @11511 + a2253
++ @11512 + a2248
END
IF ~~ a2248
SAY @11513
IF ~~ THEN GOTO a2252
END
IF ~~ a2249
SAY @11514
++ @11515 + a2260
++ @11516 + a2260
++ @11517 + a2260
++ @11518 + a2260
++ @11519 + a2260
END
IF ~~ a2250
SAY @11514
++ @11520 + a2258
++ @11521 + a2260
++ @11517 + a2260
++ @11522 + a2258
++ @11523 + a2257
END
IF ~~ a2251
SAY @11514
++ @11520 + a2258
++ @11517 + a2260
++ @11524 + a2258
++ @11525 + a2258
++ @11523 + a2257
END
IF ~~ a2252
SAY @11526
++ @11527 + a2255
++ @11528 + a2257
++ @11529 + a2259
++ @11530 + a2259
++ @11531 + a2260
END
IF ~~ a2253
SAY @11532
++ @11527 + a2255
++ @11533 + a2254
++ @11534 + a2256
++ @11530 + a2259
END
IF ~~ a2254
SAY @11535
++ @11536 + a2257
++ @11537 + a2258
++ @11538 + a2256
++ @11539 + a2258
++ @11540 + a2258
END
IF ~~ a2255
SAY @11541
++ @11538 + a2256
++ @11542 + a2257
++ @11536 + a2257
++ @11537 + a2258
++ @11539 + a2258
END
IF ~~ a2256
SAY @11543
++ @11544 + a2258
++ @11545 + a2258
++ @11546 + a2257
++ @11547 DO ~SetGlobal("c-aranintimate","GLOBAL",1)~ + a2258
END
IF ~~ a2257
SAY @1996
= @1997
= @11548
++ @11549 DO ~SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranrom","GLOBAL",3) ActionOverride("c-aran",GivePartyAllEquipment()) ActionOverride("c-aran",LeaveParty()) ActionOverride("c-aran",EscapeArea())~ EXIT
++ @11550 DO ~SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranrom","GLOBAL",3) ActionOverride("c-aran",GivePartyAllEquipment()) ActionOverride("c-aran",LeaveParty()) ActionOverride("c-aran",EscapeArea())~ EXIT
++ @11551 DO ~SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranrom","GLOBAL",3)~ + a2260
++ @11552 DO ~SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranpostwraith","GLOBAL",3) SetGlobalTimer("c-aranwraithink","GLOBAL",FOUR_DAYS)~ + a2260 /* don't want a fight to kick this into gear. Needs follow up talk, probably. */
++ @11553 + a2260
END
IF ~~ a2258
SAY @11554
IF ~~ THEN GOTO a2259
END
IF ~~ a2259
SAY @11555
= @11556
IF ~~ THEN EXIT
END
IF ~~ a2260
SAY @3601
IF ~~ THEN EXIT
END
/* for followup: BCS
Global("c-aranpostwraith","GLOBAL",3)
GlobalTimerExpired("c-aranwraithink","GLOBAL",FOUR_DAYS)
SetGlobal("c-aranpostwraith","GLOBAL",4)
IF ~Global("c-aranpostwraith","GLOBAL",4)~ c_are_we_on_or_are_we_done
*/
/* ToB Plot Talk : Big End Battle */
IF ~Global("c-aranisthisit","GLOBAL",1)~ THEN BEGIN a2922 // not set yet; this is a dummy reference for creation later
SAY @11557
++ @11558 DO ~SetGlobal("c-aranisthisit","GLOBAL",2)~ EXIT /* PLACEHOLDER */
/*
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",0) Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",1) Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",2) Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",3) Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",4) Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",0) !Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",1) !Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",2) !Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",3) !Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
+ ~Gender(Player1,FEMALE) Global("c-aransex","GLOBAL",4) !Global("c-aranrom","GLOBAL",2)~ + ~[PC] PLACEHOLDER~ +
*/
END
/* ToB Friend Talks */
/* ToB FriendTalk 1 : "Sisters" */
IF ~Global("c-aranfriendtob","GLOBAL",1)~ THEN BEGIN a2790
SAY @11559
++ @11560 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",1) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2791
++ @11561 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",2) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2792
++ @11562 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",3) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2793
+ ~RandomNum(3,3)~ + @11563 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",6) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3204
+ ~RandomNum(3,2)~ + @11563 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",6) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3205
+ ~RandomNum(3,1)~ + @11563 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",6) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3206
++ @11564 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",4) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2794
++ @11565 DO ~SetGlobal("c-ArSisterBranch","GLOBAL",5) SetGlobal("c-aranfriendtob","GLOBAL",2) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2795
END
/*
Global("c-ArSisterBranch","GLOBAL",1) = neutral/shy
Global("c-ArSisterBranch","GLOBAL",2) = fun group
Global("c-ArSisterBranch","GLOBAL",3) = fun rigid
Global("c-ArSisterBranch","GLOBAL",4) = strong selfish
Global("c-ArSisterBranch","GLOBAL",5) = smart selfish
Global("c-ArSisterBranch","GLOBAL",6) = talk skipped - "hey, you wanna talk now?"
*/
/* ToB FriendTalk 1 : "Sisters" : goto followup */
/* ToB FriendTalk 2 : "My kingdom for a horse." Complaints of walking. Everywhere. - Idea by Igneous : initial */
IF ~Global("c-aranfriendtob","GLOBAL",3)~ THEN BEGIN a2764 /* 7 options */
SAY @11566
++ @11567 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2765
++ @11568 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2766
+ ~InParty("Aerie") !StateCheck("Aerie",CD_STATE_NOTVALID)~ + @11569 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2767
+ ~OR(2)!InParty("Aerie") StateCheck("Aerie",CD_STATE_NOTVALID)~ + @11569 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2768
+ ~!Global("c-aranrom","GLOBAL",2)~ + @11570 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2772
+ ~Global("c-aranrom","GLOBAL",2)~ + @11570 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2769
++ @11571 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2771
++ @11572 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2770
+ ~RandomNum(3,1)~ + @11573 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11574 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11575 DO ~SetGlobal("c-aranfriendtob","GLOBAL",4) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3148 /* c-aranshutup15 @1325 */
END
/* ToB FriendTalk 2 : "My kingdom for a horse." Complaints of walking. Everywhere. - Idea by Igneous : goto followup */
/* I had to give in and basically re-weave the sister branches into one common dialog. Writing six parallel tracks is an awesome idea, but I think I would need a pool of writers; since it is just me, I am leaving the original idea in code as an example on how to deal with the tracking, but to keep rolling on all six tracks means a much longer delay. */
/* ToB FriendTalk 3 : "Sisters Redux", 6 "pathway" talks, only 1 fires */
IF ~Global("c-aranfriendtob","GLOBAL",5) Global("c-ArSisterBranch","GLOBAL",1)~ THEN BEGIN a2850 /* neutral/shy */
SAY @11576
+ ~Gender(Player1,MALE)~ + @11577 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2856
+ ~Gender(Player1,FEMALE)~ + @11577 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2857
++ @11578 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2858
++ @11579 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2859
++ @11580 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2874
END
IF ~Global("c-aranfriendtob","GLOBAL",5) Global("c-ArSisterBranch","GLOBAL",2)~ THEN BEGIN a2851 /* fun group */
SAY @11576
++ @11581 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2859
++ @11582 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2860
++ @11583 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2861
++ @11580 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2874
END
IF ~Global("c-aranfriendtob","GLOBAL",5) Global("c-ArSisterBranch","GLOBAL",3)~ THEN BEGIN a2852 /* rigid */
SAY @11576
++ @11584 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2862
++ @11585 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2863
++ @11586 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2863
++ @11580 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2874
END
IF ~Global("c-aranfriendtob","GLOBAL",5) Global("c-ArSisterBranch","GLOBAL",4)~ THEN BEGIN a2853 /* strong selfish */
SAY @11576
++ @11587 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2865
++ @11588 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2866
++ @11589 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2867
++ @11580 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2874
END
IF ~Global("c-aranfriendtob","GLOBAL",5) Global("c-ArSisterBranch","GLOBAL",5)~ THEN BEGIN a2854 /* smart selfish */
SAY @11576
++ @11590 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2868
++ @11588 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2866
++ @11591 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2867
++ @11580 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2874
END
IF ~Global("c-aranfriendtob","GLOBAL",5) Global("c-ArSisterBranch","GLOBAL",6)~ THEN BEGIN a2855 /* talk skipped - "hey, you wanna talk now?" */
SAY @11576
++ @11592 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2871
++ @11593 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2872
++ @11594 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2873
++ @11580 DO ~SetGlobal("c-aranfriendtob","GLOBAL",6) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a2874
END
/* ToB FriendTalk 3 : "Sisters Redux", 6 "pathway" talks, only 1 fires : goto followup */
/* ToB FriendTalk 4 : "Digression" */
IF ~Global("c-aranfriendtob","GLOBAL",7)~ THEN BEGIN a4551
SAY @11595
++ @11596 DO ~SetGlobal("c-aranfriendtob","GLOBAL",8) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a4552
++ @11597 DO ~SetGlobal("c-aranfriendtob","GLOBAL",8) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a4553
++ @11598 DO ~SetGlobal("c-aranfriendtob","GLOBAL",8) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a4553
++ @11599 DO ~SetGlobal("c-aranfriendtob","GLOBAL",8) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a4566
++ @11600 DO ~SetGlobal("c-aranfriendtob","GLOBAL",8) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a4553
END
/* ToB FriendTalk 4 : "Digression" : goto followup */
/* ToB FriendTalk 5 : "Worrying" */
IF ~Global("c-aranfriendtob","GLOBAL",9)~ THEN BEGIN a5055
SAY @13156
++ @4589 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5056
++ @13157 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5057
++ @13158 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5058
++ @13159 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5059
+ ~RandomNum(5,5)~ + @12637 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3173 /* c-aranshutup40 */
+ ~RandomNum(5,4)~ + @11609 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3174 /* c-aranshutup41 */
+ ~RandomNum(5,3)~ + @13160 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3175 /* c-aranshutup42 */
+ ~RandomNum(5,2)~ + @13161 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3176 /* c-aranshutup43 */
+ ~RandomNum(5,1)~ + @13162 DO ~SetGlobal("c-aranfriendtob","GLOBAL",10) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a3177 /* c-aranshutup44 */
END
/* ToB FriendTalk 5 : "Worrying" : goto followup5 */
/* ToB FriendTalk 6 : "Fear and Courage" */
IF ~Global("c-aranfriendtob","GLOBAL",11)~ THEN BEGIN a5064
SAY @13202
++ @13203 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5072
++ @13204 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5065
++ @13205 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5066
++ @13206 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5067
++ @13207 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5068
++ @13208 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5069
++ @13209 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5070
++ @13210 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5071
++ @13211 DO ~SetGlobal("c-aranfriendtob","GLOBAL",12) RealSetGlobalTimer("c-aranfriendtimer","GLOBAL",%ARAN_FTT%)~ + a5073
END
/* ToB FriendTalk 6 : "Fear and Courage" : goto followup6 */
/* ToB Love Talks */
/* ToB Love Talk #1 : back in business */
IF ~Global("c-arantobrom","GLOBAL",1)~ THEN BEGIN a4813
SAY @11601
++ @11602 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4820
++ @11603 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4822
++ @11604 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4823
++ @11605 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4824
++ @11606 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4819
+ ~Global("c-aranintimate","GLOBAL",0) Global("c-aranrom","GLOBAL",2)~ + @11607 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4814
+ ~Global("c-aranintimate","GLOBAL",1) Global("c-aranrom","GLOBAL",2)~ + @11607 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4815
+ ~Global("c-aranintimate","GLOBAL",2) Global("c-aranrom","GLOBAL",2)~ + @11607 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4816
+ ~Global("c-aranintimate","GLOBAL",3) Global("c-aranrom","GLOBAL",2)~ + @11608 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4817
+ ~Global("c-aranintimate","GLOBAL",4) Global("c-aranrom","GLOBAL",2)~ + @11608 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4818
+ ~RandomNum(5,5)~ + @11609 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @11610 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @11609 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @11611 DO ~SetGlobal("c-arantobrom","GLOBAL",2) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a3187 /* c-aranshutup54 */
END
IF ~~ a4814
SAY @11612
IF ~~ THEN GOTO a4824
END
IF ~~ a4815
SAY @11613
IF ~~ THEN GOTO a4824
END
IF ~~ a4816
SAY @11614
IF ~~ THEN GOTO a4824
END
IF ~~ a4817
SAY @11615
IF ~~ THEN GOTO a4824
END
IF ~~ a4818
SAY @11616
IF ~~ THEN GOTO a4824
END
IF ~~ a4819
SAY @11617
IF ~~ THEN GOTO a4824
END
IF ~~ a4820
SAY @11618
++ @11619 + a4825
++ @11620 + a4826
++ @11621 + a4821
++ @11622 + a4827
++ @11623 + a4822
END
IF ~~ a4821
SAY @11624
IF ~~ THEN GOTO a4829
END
IF ~~ a4822
SAY @11625
++ @11626 + a4824
++ @11627 + a4828
++ @11628 + a4829
END
IF ~~ a4823
SAY @11629
++ @11630 + a4830
++ @11631 + a4826
++ @11632 + a4840
++ @11633 + a4830
END
IF ~~ a4824
SAY @11634
+ ~Global("c-aransex","GLOBAL",1)~ + @11635 + a4831
+ ~Global("c-aransex","GLOBAL",2)~ + @11636 + a4831
+ ~Global("c-aransex","GLOBAL",3)~ + @11637 + a4831
+ ~Global("c-aransex","GLOBAL",4)~ + @11638 + a4831
++ @11639 + a4832
++ @11640 + a4832
++ @11641 + a4840
++ @11642 + a4833
END
IF ~~ a4825
SAY @11643
++ @11644 + a4824
++ @11645 + a4828
++ @11646 + a4829
++ @11647 + a4833
END
IF ~~ a4826
SAY @11648
= @11649
= @11650
++ @11651 + a4832
++ @11652 + a4827
++ @11623 + a4838
++ @11653 + a4834
END
IF ~~ a4827
SAY @11654
++ @11655 + a4828
++ @11656 + a4836
++ @11657 + a4829
++ @11658 + a4830
++ @11659 + a4834
END
IF ~~ a4828
SAY @11660
++ @11661 + a4829
++ @11662 + a4829
++ @11663 + a4829
++ @11664 + a4829
++ @11656 + a4836
END
IF ~~ a4829
SAY @11665
++ @11666 + a4832
++ @11667 + a4830
++ @11668 + a4836
++ @11669 + a4840
++ @11670 + a4833
++ @11671 + a4834
END
IF ~~ a4830
SAY @11672
++ @11673 + a4837
++ @11674 + a4837
++ @11675 + a4837
++ @11676 + a4837
++ @11677 + a4834
++ @11678 + a4834
END
IF ~~ a4831
SAY @11679
++ @11680 + a4832
++ @11681 + a4832
++ @11682 + a4837
++ @11683 + a4837
++ @11684 + a4837
++ @11685 + a4836
+ ~GlobalLT("c-aransex","GLOBAL",3)~ + @11686 + a4832
+ ~GlobalGT("c-aransex","GLOBAL",2)~ + @11687 + a4836
END
IF ~~ a4832
SAY @11688
++ @11689 + a4837
++ @11690 + a4834
++ @11691 + a4834
++ @11692 + a4834
++ @11538 + a4834
+ ~GlobalLT("c-aransex","GLOBAL",3)~ + @11686 + a4832
+ ~GlobalGT("c-aransex","GLOBAL",2)~ + @11687 + a4836
END
IF ~~ a4833
SAY @11693
++ @11694 + a4835
++ @11695 + a4835
++ @11696 + a4835
++ @11697 + a4834
++ @11698 + a4834
END
IF ~~ a4834
SAY @11699
= @11700
= @11701
IF ~~ THEN EXIT
END
IF ~~ a4835 SAY @11702 IF ~~ THEN EXIT END
IF ~~ a4836 SAY @11703 IF ~~ THEN EXIT END
IF ~~ a4837 SAY @11704 IF ~~ THEN EXIT END
IF ~~ a4838 SAY @11705 IF ~~ THEN EXIT END
IF ~~ a4840 SAY @11706 IF ~~ THEN DO ~SetGlobal("c-aranrom","GLOBAL",3)~ EXIT END
/* ToB Love Talk #2 : statement of intent for seriousness : Global("c-arantobrom","GLOBAL",4) --> Global("c-arantobrom","GLOBAL",5) */
IF ~Global("c-arantobrom","GLOBAL",3)~ THEN BEGIN a4716
SAY @11707
++ @11708 DO ~SetGlobal("c-arantobrom","GLOBAL",4) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4718
++ @11709 DO ~SetGlobal("c-arantobrom","GLOBAL",4) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4718
++ @11710 DO ~SetGlobal("c-arantobrom","GLOBAL",4) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4717
++ @11711 DO ~SetGlobal("c-arantobrom","GLOBAL",4) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4718
++ @11712 DO ~SetGlobal("c-arantobrom","GLOBAL",4) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4718
END
/* GOTO ToB Love Talk #2 : statement of intent for seriousness : replies */
/* ToB Love Talk #3 : ask the big question or not */
IF ~Global("c-arantobrom","GLOBAL",5)~ THEN BEGIN c-arantemporary_question
SAY ~[ARAN] Now, we be supposed to have a big talk here about marriage an' such. But for now, do you think you might marry me someday?~
++ ~[PC] Yes!~ DO ~SetGlobal("c-arantobrom","GLOBAL",6) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + c-aran_exit_temp
++ ~[PC] No!~ DO ~SetGlobal("c-arantobrom","GLOBAL",6) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + c-aran_exit_temp
++ ~[PC] Never!!~ DO ~SetGlobal("c-arantobrom","GLOBAL",6) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + c-aran_exit_temp
END
IF ~~ c-aran_exit_temp
SAY ~[ARAN] Aye then. That be th' way things will be, then. Until I bring it up in th' next talk, that is.~
IF ~~ THEN EXIT
END
// SetGlobal("c-aranengagement","GLOBAL",0) = not asked about marriage
// SetGlobal("c-aranengagement","GLOBAL",1) = delay interested in marriage
// SetGlobal("c-aranengagement","GLOBAL",2) = engaged
// SetGlobal("c-aranengagement","GLOBAL",3) = engaged and interested in kids
// SetGlobal("c-aranengagement","GLOBAL",4) = not interested in marriage
IF ~Global("c-arantobrom","GLOBAL",7)~ THEN BEGIN a4774
SAY @11713
++ @11714 DO ~SetGlobal("c-arantobrom","GLOBAL",8) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4775
++ @11715 DO ~SetGlobal("c-arantobrom","GLOBAL",8) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4776
++ @11716 DO ~SetGlobal("c-arantobrom","GLOBAL",8) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4776
++ @11717 DO ~SetGlobal("c-arantobrom","GLOBAL",8) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4778
++ @11718 DO ~SetGlobal("c-arantobrom","GLOBAL",8) RealSetGlobalTimer("c-aranromtimer","GLOBAL",%ARAN_LTT%)~ + a4777
END
IF ~~ a4775
SAY @11719
++ @11720 + a4779
++ @11721 + a4783
++ @11722 + a4782
++ @11723 + a4779
++ @11724 + a4779
END
IF ~~ a4776
SAY @11725
= @11726
= @11727
++ @11717 + a4778
++ @11718 + a4777
++ @11728 + a4779
++ @11729 + a4778
END
IF ~~ a4777
SAY @11730
++ @11731 DO ~SetGlobal("c-aranengagement","GLOBAL",4)~ + a4784
++ @11732 + a4779
++ @11733 + a4779
++ @11734 + a4779
++ @11735 + a4784
END
IF ~~ a4778
SAY @11736
++ @11737 + a4779
++ @11738 + a4777
++ @11739 + a4777
++ @11740 + a4779
++ @1889 + a4777
END
IF ~~ a4779
SAY @11741
++ @11742 + a4780
++ @11743 DO ~SetGlobal("c-aranengagement","GLOBAL",4)~ + a4784
++ @11744 + a4781
++ @11745 + a4781
++ @11746 + a4781
++ @11747 + a4785
END
IF ~~ a4780
SAY @11748
++ @11749 + a4781
++ @11750 DO ~SetGlobal("c-aranengagement","GLOBAL",4)~ + a4784
++ @11751 + a4781
++ @11752 DO ~SetGlobal("c-aranengagement","GLOBAL",4)~ + a4784
END
IF ~~ a4781
SAY @11753
++ @11754 + a4783
++ @11755 + a4782
++ @11756 + a4783
++ @11757 + a4783
++ @11758 DO ~SetGlobal("c-aranengagement","GLOBAL",4)~ + a4784
END
IF ~~ a4782
SAY @3601
IF ~~ THEN GOTO a4783
END
IF ~~ a4783
SAY @11759
++ @11760 DO ~SetGlobal("c-aranengagement","GLOBAL",1)~ EXIT // delay interested in marriage
++ @8649 DO ~SetGlobal("c-aranengagement","GLOBAL",1)~ EXIT // delay interested in marriage
++ @2782 DO ~SetGlobal("c-aranengagement","GLOBAL",1)~ EXIT // delay interested in marriage
++ @11761 DO ~SetGlobal("c-aranengagement","GLOBAL",1)~ EXIT // delay interested in marriage
++ @11762 + a4786 // shut down talking about marriage
++ @11763 DO ~SetGlobal("c-aranengagement","GLOBAL",1)~ EXIT // delay interested in marriage
END
IF ~~ a4784
SAY @11759
= @11764
IF ~~ THEN EXIT
END
IF ~~ a4785
SAY @11765
IF ~~ THEN EXIT
END
IF ~~ a4786
SAY @11766
IF ~~ THEN DO ~SetGlobal("c-aranengagement","GLOBAL",4)~ EXIT
END
/* ToB FriendTalk 1 : "Sisters" : followup */
IF ~~ a2791
SAY @11767
++ @11768 + a2796
+ ~Gender(Player1,MALE)~ + @11769 + a2796
+ ~Gender(Player1,FEMALE)~ + @11770 + a2796
++ @11771 + a2796
++ @11772 + a2796
+ ~Gender(Player1,MALE)~ + @11773 + a2796
+ ~Gender(Player1,FEMALE)~ + @11774 + a2796
+ ~RandomNum(3,3)~ + @11563 + a3204
+ ~RandomNum(3,2)~ + @11563 + a3205
+ ~RandomNum(3,1)~ + @11563 + a3206
END
/* a2792 is a chain */
IF ~~ a2793
SAY @11775
++ @11776 + a2814
++ @11777 + a2815
++ @11778 + a2815
++ @11779 + a2816
++ @11780 + a2817
+ ~RandomNum(3,3)~ + @11563 + a3203
+ ~RandomNum(3,2)~ + @11563 + a3204
+ ~RandomNum(3,1)~ + @11563 + a3205
END
IF ~~ a2794
SAY @11781
++ @11782 + a2833
++ @11783 + a2833
++ @11784 + a2834
+ ~RandomNum(3,3)~ + @11785 + a3203 /* c-aranshutup70 */
+ ~RandomNum(3,2)~ + @11785 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,1)~ + @11785 + a3205 /* c-aranshutup72 */
++ @11786 + a2835
++ @11787 + a2836
END
IF ~~ a2795
SAY @11788
++ @11789 + a2841
++ @11790 + a2842
++ @11791 + a2842
++ @11792 + a2843
++ @11793 + a2844
+ ~RandomNum(3,3)~ + @11794 + a3203 /* c-aranshutup70 */
+ ~RandomNum(3,2)~ + @11794 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,1)~ + @11794 + a3205 /* c-aranshutup72 */
END
IF ~~ a2796
SAY @11795
++ @11796 + a2797
+ ~Gender(Player1,MALE)~ + @11797 + a2797
+ ~Gender(Player1,FEMALE)~ + @11798 + a2797
+ ~RandomNum(3,3)~ + @11563 + a3204
+ ~RandomNum(3,2)~ + @11563 + a3205
+ ~RandomNum(3,1)~ + @11563 + a3206
++ @11799 + a2797
+ ~Gender(Player1,MALE)~ + @11800 + a2797
+ ~Gender(Player1,FEMALE)~ + @11801 + a2797
++ @11802 + a2797
END
IF ~~ a2797
SAY @11803
++ @11804 + a2798
+ ~Gender(Player1,MALE)~ + @11805 + a2798
+ ~Gender(Player1,FEMALE)~ + @11806 + a2798
++ @11807 + a2798
++ @11808 + a2798
++ @11809 + a2798
END
IF ~~ a2798
SAY @11810
++ @11811 + a2849
++ @11812 + a2849
++ @11813 + a2849
++ @11814 + a2849
++ @11815 + a2849
END
IF ~~ a2808
SAY @11816
++ @11817 + a2810
++ @11818 + a2810
++ @11819 + a2811
END
IF ~~ a2809
SAY @11820
++ @11821 + a2810
++ @11822 + a2810
+ ~!Global("c-aranrom","GLOBAL",2)~ + @11823 + a2810
+ ~Global("c-aransex","GLOBAL",0) Global("c-aranrom","GLOBAL",2)~ + @11823 + a2885
+ ~Global("c-aransex","GLOBAL",1) Global("c-aranrom","GLOBAL",2)~ + @11823 + a2886
+ ~Global("c-aransex","GLOBAL",2) Global("c-aranrom","GLOBAL",2)~ + @11823 + a2887
+ ~Global("c-aransex","GLOBAL",3) Global("c-aranrom","GLOBAL",2)~ + @11823 + a2888
+ ~Global("c-aransex","GLOBAL",4) Global("c-aranrom","GLOBAL",2)~ + @11823 + a2889
END
/* a2810 is a chain */
IF ~~ a2811
SAY @11824
IF ~~ THEN GOTO a2810
END
/* a2812 is a chain */
/* a2813 is a chain */
IF ~~ a2814
SAY @11825
++ @11826 + a2815
++ @11777 + a2815
++ @11827 + a2815
++ @11828 + a2815
++ @11829 + a2818
+ ~RandomNum(3,3)~ + @11830 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,2)~ + @11830 + a3205 /* c-aranshutup72 */
+ ~RandomNum(3,1)~ + @11830 + a3206 /* c-aranshutup73 */
END
IF ~~ a2815
SAY @11831
++ @11832 + a2819
++ @11833 + a2821
++ @11834 + a2820
++ @11835 + a2820
++ @11836 + a2821
END
IF ~~ a2816
SAY @11837
++ @11838 + a2815
++ @11839 + a2815
++ @11840 + a2815
++ @11841 + a2815
++ @11842 + a2815
+ ~RandomNum(3,3)~ + @11830 + a3205 /* c-aranshutup72 */
+ ~RandomNum(3,2)~ + @11830 + a3206 /* c-aranshutup73 */
+ ~RandomNum(3,1)~ + @11830 + a3207 /* c-aranshutup74 */
END
IF ~~ a2817
SAY @11843
++ @11826 + a2815
++ @11844 + a2815
++ @11827 + a2815
++ @11828 + a2815
++ @11829 + a2818
+ ~RandomNum(3,3)~ + @11830 + a3203 /* c-aranshutup70 */
+ ~RandomNum(3,2)~ + @11830 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,1)~ + @11830 + a3205 /* c-aranshutup72 */
END
IF ~~ a2818
SAY @11845
IF ~~ THEN GOTO a2815
END
IF ~~ a2819
SAY @11846
++ @11847 + a2821
++ @11833 + a2821
++ @11848 + a2819
++ @11835 + a2822
++ @11849 + a2822
END
IF ~~ a2820
SAY @11850
++ @11851 + a2829
++ @11852 + a2829
++ @11853 + a2829
++ @11854 + a2829
++ @11855 + a2829
END
IF ~~ a2821
SAY @11856
++ @11857 + a2830
++ @11858 + a2829
++ @11859 + a2829
++ @11854 + a2829
++ @11860 + a2829
+ ~RandomNum(3,3)~ + @11830 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,2)~ + @11830 + a3205 /* c-aranshutup72 */
+ ~RandomNum(3,1)~ + @11830 + a3206 /* c-aranshutup73 */
END
IF ~~ a2822
SAY @11861
++ @11862 + a2823
++ @11863 + a2824
++ @11864 + a2825
++ @11865 + a2826
++ @11866 + a2827
END
IF ~~ a2823
SAY @11867
IF ~~ THEN GOTO a2828
END
IF ~~ a2824
SAY @11868
IF ~~ THEN GOTO a2828
END
IF ~~ a2825
SAY @11869
IF ~~ THEN GOTO a2828
END
IF ~~ a2826
SAY @11870
IF ~~ THEN GOTO a2828
END
IF ~~ a2827
SAY @11871
IF ~~ THEN GOTO a2828
END
IF ~~ a2828
SAY @11872
IF ~~ THEN EXIT
END
IF ~~ a2829
SAY @11873
++ @11874 + a2831
++ @11804 + a2831
++ @11875 + a2831
++ @11876 + a2828
++ @11877 + a2832
END
IF ~~ a2830
SAY @11878
++ @11879 + a2849
++ @11880 + a2849
++ @11881 + a2829
++ @11882 + a2829
++ @11883 + a2831
END
IF ~~ a2831
SAY @11810
++ @11811 + a2849
++ @11884 + a2849
++ @11885 + a2849
++ @11886 + a2849
++ @11887 + a2849
END
IF ~~ a2832
SAY @11888
IF ~~ THEN EXIT
END
IF ~~ a2833
SAY @11889
++ @11890 + a2838
++ @11891 + a2838
++ @11892 + a2849
++ @11893 + a2849
++ @11894 + a2849
END
IF ~~ a2834
SAY @11895
++ @11896 + a2833
+ ~RandomNum(3,3)~ + @11897 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,2)~ + @11897 + a3205 /* c-aranshutup72 */
+ ~RandomNum(3,1)~ + @11897 + a3206 /* c-aranshutup73 */
++ @11898 + a2833
++ @11899 + a2833
++ @11900 + a2837
END
IF ~~ a2835
SAY @11901
++ @11899 + a2833
+ ~RandomNum(3,3)~ + @11902 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,2)~ + @11902 + a3205 /* c-aranshutup72 */
+ ~RandomNum(3,1)~ + @11902 + a3206 /* c-aranshutup73 */
++ @11903 + a2833
++ @11904 + a2849
++ @11905 + a2849
END
IF ~~ a2836
SAY @11906
++ @11907 + a2833
+ ~RandomNum(3,3)~ + @11908 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,2)~ + @11908 + a3205 /* c-aranshutup72 */
+ ~RandomNum(3,1)~ + @11908 + a3206 /* c-aranshutup73 */
++ @11899 + a2833
++ @11909 + a2849
END
IF ~~ a2837
SAY @11910
++ @11911 + a2849
++ @11912 + a2849
++ @11913 + a2849
++ @11914 + a2849
++ @11915 + a2849
++ @11916 + a2840
END
IF ~~ a2838
SAY @11917
++ @11804 + a2839
++ @11918 + a2839
++ @11784 + a2834
++ @11919 + a2839
++ @11916 + a2840
END
IF ~~ a2839
SAY @11810
++ @11920 + a2849
++ @11921 + a2849
++ @11922 + a2849
++ @11923 + a2849
++ @11924 + a2837
END
IF ~~ a2840
SAY @11925
++ @11926 + a2849
++ @11927 + a2849
++ @11928 + a2849
++ @11929 + a2849
++ @11930 + a2849
END
IF ~~ a2841
SAY @11931
++ @11932 + a2840
++ @11933 + a2849
++ @11934 + a2845
++ @11935 + a2845
++ @11936 + a2845
END
IF ~~ a2842
SAY @11889
++ @11937 + a2845
++ @11938 + a2841
++ @11790 + a2842
++ @11791 + a2842
++ @11792 + a2843
++ @11793 + a2844
+ ~RandomNum(3,3)~ + @11939 + a3203 /* c-aranshutup70 */
+ ~RandomNum(3,2)~ + @11939 + a3204 /* c-aranshutup71 */
+ ~RandomNum(3,1)~ + @11939 + a3205 /* c-aranshutup72 */
END
IF ~~ a2843
SAY @11940
++ @11941 + a2845
++ @11942 + a2846
++ @11943 + a2847
++ @11944 + a2840
++ @11945 + a2848
END
IF ~~ a2844
SAY @11946
++ @11947 + a2845
++ @11948 + a2846
++ @11943 + a2847
++ @11944 + a2840
++ @11949 + a2848
END
IF ~~ a2845
SAY @11950
++ @11951 + a2846
++ @11952 + a2847
++ @11953 + a2840
++ @11954 + a2848
++ @11955 + a2846
END
IF ~~ a2846
SAY @11810
++ @11811 + a2849
++ @11956 + a2849
++ @11922 + a2849
++ @11957 + a2849
++ @11924 + a2837
END
IF ~~ a2847
SAY @11958
++ @11959 + a2846
++ @11960 + a2846
++ @11961 + a2849
++ @11962 + a2848
++ @11955 + a2846
END
IF ~~ a2848
SAY @11963
++ @11964 + a2846
++ @11965 + a2849
++ @11966 + a2849
++ @11967 + a2846
END
IF ~~ a2849
SAY @11968
IF ~~ THEN EXIT
END
/* ToB 2 : "My kingdom for a horse." Complaints of walking. Everywhere. - Idea by Igneous : followup */
IF ~~ a2765
SAY @11969
IF ~~ THEN GOTO a2770
END
IF ~~ a2766
SAY @11970
IF ~~ THEN GOTO a2770
END
IF ~~ a2767
SAY @11971
IF ~~ THEN GOTO a2770
END
IF ~~ a2768
SAY @11972
IF ~~ THEN GOTO a2770
END
IF ~~ a2769 /* 7 options */
SAY @11973
++ @11974 + a2770
++ @11975 + a2786
++ @11976 + a2770
++ @11977 + a2787
++ @11978 + a2788
++ @11979 + a2787
++ @11980 + a2789
END
IF ~~ a2770 /* 6 options */
SAY @11981
+ ~ReputationGT(Player1,16)~ + @11982 + a2776
+ ~ReputationLT(Player1,17) ReputationGT(Player1,11)~ + @11982 + a2777
+ ~ReputationLT(Player1,12) ReputationGT(Player1,8)~ + @11982 + a2778
+ ~ReputationLT(Player1,9)~ + @11982 + a2779
++ @11983 + a2784
++ @11984 + a2784
+ ~ReputationGT(Player1,16)~ + @11985 + a2776
+ ~ReputationLT(Player1,17) ReputationGT(Player1,11)~ + @11985 + a2781
+ ~ReputationLT(Player1,12) ReputationGT(Player1,8)~ + @11985 + a2782
+ ~ReputationLT(Player1,9)~ + @11985 + a2783
++ @11986 + a2784
+ ~RandomNum(3,1)~ + @11987 + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11988 + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11989 + a3148 /* c-aranshutup15 @1325 */
+ ~Race(Player1,ELF)~ + @11990 + a2799
+ ~Race(Player1,HUMAN)~ + @11990 + a2800
+ ~Race(Player1,DWARF)~ + @11990 + a2801
+ ~Race(Player1,HALFORC)~ + @11990 + a2802
+ ~Race(Player1,GNOME)~ + @11990 + a2803
+ ~Race(Player1,HALFLING)~ + @11990 + a2804
+ ~Race(Player1,HALF_ELF)~ + @11990 + a2805
END
IF ~~ a2771
SAY @11991
++ @11992 + a2773
++ @11993 + a2773
++ @11994 + a2774
+ ~Race(Player1,ELF)~ + @11990 + a2799
+ ~Race(Player1,HUMAN)~ + @11990 + a2800
+ ~Race(Player1,DWARF)~ + @11990 + a2801
+ ~Race(Player1,HALFORC)~ + @11990 + a2802
+ ~Race(Player1,GNOME)~ + @11990 + a2803
+ ~Race(Player1,HALFLING)~ + @11990 + a2804
+ ~Race(Player1,HALF_ELF)~ + @11990 + a2805
++ @11995 + a2775
++ @11996 + a2775
END
IF ~~ a2772 /* 6 options */
SAY @11973
++ @11997 + a2770
++ @11998 + a2770
++ @11976 + a2770
++ @11999 + a2770
++ @12000 + a2770
+ ~Race(Player1,ELF)~ + @11990 + a2799
+ ~Race(Player1,HUMAN)~ + @11990 + a2800
+ ~Race(Player1,DWARF)~ + @11990 + a2801
+ ~Race(Player1,HALFORC)~ + @11990 + a2802
+ ~Race(Player1,GNOME)~ + @11990 + a2803
+ ~Race(Player1,HALFLING)~ + @11990 + a2804
+ ~Race(Player1,HALF_ELF)~ + @11990 + a2805
++ @12001 + a2770
END
IF ~~ a2773
SAY @12002
++ @12003 + a2775
+ ~ReputationGT(Player1,16)~ + @11982 + a2776
+ ~ReputationLT(Player1,17) ReputationGT(Player1,11)~ + @11982 + a2777
+ ~ReputationLT(Player1,12) ReputationGT(Player1,8)~ + @11982 + a2778
+ ~ReputationLT(Player1,9)~ + @11982 + a2779
++ @12004 + a2780
+ ~ReputationGT(Player1,16)~ + @11985 + a2776
+ ~ReputationLT(Player1,17) ReputationGT(Player1,11)~ + @11985 + a2781
+ ~ReputationLT(Player1,12) ReputationGT(Player1,8)~ + @11985 + a2782
+ ~ReputationLT(Player1,9)~ + @11985 + a2783
++ @12005 + a2784
++ @12006 + a2785
END
IF ~~ a2774
SAY @12007
IF ~~ THEN GOTO a2773
END
IF ~~ a2775
SAY @12008
+ ~ReputationGT(Player1,16)~ + @11982 + a2776
+ ~ReputationLT(Player1,17) ReputationGT(Player1,11)~ + @11982 + a2777
+ ~ReputationLT(Player1,12) ReputationGT(Player1,8)~ + @11982 + a2778
+ ~ReputationLT(Player1,9)~ + @11982 + a2779
++ @12009 + a2784
+ ~ReputationGT(Player1,16)~ + @11985 + a2776
+ ~ReputationLT(Player1,17) ReputationGT(Player1,11)~ + @11985 + a2781
+ ~ReputationLT(Player1,12) ReputationGT(Player1,8)~ + @11985 + a2782
+ ~ReputationLT(Player1,9)~ + @11985 + a2783
++ @12010 + a2784
END
IF ~~ a2776 /* 5 to 6 options */
SAY @12011
+ ~Class("c-aran",THIEF_ALL)~ + @12012 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12013 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12014 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12015 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12017 + a2784
++ @12018 + a2784
END
IF ~~ a2777 /* 6 to 7 options */
SAY @12019
+ ~RandomNum(3,1)~ + @11987 + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11988 + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11989 + a3148 /* c-aranshutup15 @1325 */
+ ~Class("c-aran",THIEF_ALL)~ + @12020 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12021 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12022 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12023 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12024 + a2784
++ @12025 + a2784
END
IF ~~ a2778 /* 6 to 7 options */
SAY @12026
+ ~RandomNum(3,1)~ + @11987 + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11988 + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11989 + a3148 /* c-aranshutup15 @1325 */
+ ~Class("c-aran",THIEF_ALL)~ + @12027 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12028 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12029 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12030 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12031 + a2784
++ @12032 + a2784
++ @12033 + a2784
END
IF ~~ a2779
SAY @12034
+ ~RandomNum(3,1)~ + @11987 + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11988 + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11989 + a3148 /* c-aranshutup15 @1325 */
+ ~Class("c-aran",THIEF_ALL)~ + @12035 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12036 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12029 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12037 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12038 + a2784
++ @12039 + a2784
END
IF ~~ a2780
SAY @12040
+ ~Class("c-aran",THIEF_ALL)~ + @12012 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12013 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12014 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12015 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12017 + a2784
++ @12018 + a2784
END
IF ~~ a2781
SAY @12041
+ ~RandomNum(3,1)~ + @11987 + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11988 + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11989 + a3148 /* c-aranshutup15 @1325 */
+ ~Class("c-aran",THIEF_ALL)~ + @12020 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12021 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12022 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12023 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12042 + a2784
++ @12043 + a2784
END
IF ~~ a2782
SAY @12044
+ ~RandomNum(3,1)~ + @11987 + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11988 + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11989 + a3148 /* c-aranshutup15 @1325 */
+ ~Class("c-aran",THIEF_ALL)~ + @12035 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12036 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12029 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12037 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12045 + a2784
++ @12046 + a2784
END
IF ~~ a2783
SAY @12047
+ ~RandomNum(3,1)~ + @11987 + a3146 /* c-aranshutup13 @1323 */
+ ~RandomNum(3,2)~ + @11988 + a3147 /* c-aranshutup14 @1324 */
+ ~RandomNum(3,3)~ + @11989 + a3148 /* c-aranshutup15 @1325 */
+ ~Class("c-aran",THIEF_ALL)~ + @12035 + a2784
+ ~Class("c-aran",MAGE_ALL)~ + @12036 + a2784
+ ~Class("c-aran",CLERIC_ALL)~ + @12029 + a2784
+ ~Class("c-aran",FIGHTER_ALL)~ + @12037 + a2784
++ @12016 + a2784
++ @11984 + a2784
++ @12045 + a2784
++ @12048 EXIT
END
IF ~~ a2784
SAY @12049
IF ~~ THEN EXIT
END
IF ~~ a2785
SAY @12050
= @12051
IF ~~ THEN EXIT
END
IF ~~ a2786
SAY @12052
IF ~~ THEN GOTO a2770
END
IF ~~ a2787
SAY @12053
IF ~~ THEN GOTO a2770
END
IF ~~ a2788
SAY @12054
IF ~~ THEN GOTO a2770
END
IF ~~ a2789
SAY @12055
IF ~~ THEN GOTO a2770
END
IF ~~ a2799 /* ELF */
SAY @12056
++ @12057 + a2784
++ @12058 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12059 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12060 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12061 + a2784
++ @12062 + a2806
++ @12063 + a2806
END
IF ~~ a2800 /* HUMAN */
SAY @12064
++ @12065 + a2784
++ @12066 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12067 + a2806
+ ~Global("c-aransex","GLOBAL",4)~ + @12060 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12061 + a2784
++ @12068 + a2806
++ @12016 + a2784
++ @12063 + a2806
END
IF ~~ a2801 /* DWARF */
SAY @12069
++ @12065 + a2784
++ @12066 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12070 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12060 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12061 + a2784
++ @12071 + a2806
++ @12016 + a2784
++ @12072 + a2806
END
IF ~~ a2802 /* HALFORC */
SAY @12073
++ @12065 + a2784
++ @12066 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12074 + a2806
+ ~Global("c-aransex","GLOBAL",4)~ + @12060 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12061 + a2784
++ @12075 + a2806
++ @12016 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12076 + a2806
+ ~Global("c-aransex","GLOBAL",4)~ + @12077 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12078 + a2875
END
IF ~~ a2803 /* GNOME */
SAY @12069
++ @12065 + a2784
++ @12066 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12079 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12060 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12061 + a2784
++ @12080 + a2806
++ @12016 + a2784
++ @12081 + a2806
END
IF ~~ a2804 /* HALFLING */
SAY @12069
++ @12065 + a2784
++ @12066 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12082 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12060 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12061 + a2784
++ @12083 + a2806
++ @12016 + a2784
++ @12084 + a2806
END
IF ~~ a2805 /* HALF_ELF */
SAY @12069
++ @12065 + a2784
++ @12066 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12085 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12060 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12061 + a2784
++ @12086 + a2806
++ @12016 + a2784
+ ~GlobalGT("c-aransex","GLOBAL",1) GlobalLT("c-aransex","GLOBAL",4)~ + @12087 + a2806
+ ~Global("c-aransex","GLOBAL",4)~ + @12088 + a2784
+ ~Global("c-aransex","GLOBAL",4)~ + @12089 + a2875
END
IF ~~ a2806
SAY @12090
++ @12091 + a2784
++ @12092 + a2784
++ @12093 + a2784
++ @12016 + a2784
++ @12094 + a2784
++ @12095 + a2784
END
IF ~~ a2807
SAY @12096
IF ~~ THEN GOTO a2806
END
IF ~~ a2875
SAY @12097
IF ~~ THEN GOTO a2806
END
/* ToB FriendTalk 3 : "Sisters Redux", 6 "pathway" talks, only 1 fires : followup */
IF ~~ a2856
SAY @12098
++ @12099 + a2860
++ @12100 + a2858
++ @12101 + a2870
++ @11579 + a2859
++ @11580 + a2874
END
IF ~~ a2857
SAY @12098
+ ~!Global("c-aranrom","GLOBAL",2)~ + @12102 + a2869
+ ~Global("c-aranrom","GLOBAL",2)~ + @12103 + a2862
++ @12100 + a2858
++ @12101 + a2870
++ @11579 + a2859
++ @11580 + a2874
END
IF ~~ a2858
SAY @12104
++ @12105 + a2865
++ @12106 + a2869
++ @12107 + a2864
++ @12108 + a2872
++ @12109 + a2872
END
IF ~~ a2859
SAY @12110
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2860
SAY @12111
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2861
SAY @12112
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2862
SAY @12113
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2863
SAY @12114
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2864 /* good/rigid */
SAY @12115
++ @12116 + a2873
++ @12117 + a2873
++ @12118 + a2873
++ @12119 + a2873
++ @12120 + a2873
++ @12121 + a2870
END
IF ~~ a2865 /* evil/manipulative */
SAY @12115
++ @12122 + a2866
++ @12123 + a2866
++ @12124 + a2873
++ @12119 + a2873
++ @12120 + a2873
END
IF ~~ a2866
SAY @12125
++ @12126 + a4841
++ @12127 + a4841
++ @12128 + a4841
++ @12129 + a4841
++ @12130 + a2870
END
IF ~~ a2867
SAY @12131
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2868
SAY @12132
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2869
SAY @12133
IF ~Alignment(Player1,MASK_GOOD)~ THEN GOTO a4842
IF ~!Alignment(Player1,MASK_GOOD)~ THEN GOTO a4843
END
IF ~~ a2870
SAY @12134
++ @12135 + a4841
++ @12136 + a4841
++ @12137 + a4841
++ @12138 + a4841
++ @12139 + a4841
END
IF ~~ a2871
SAY @12140
IF ~~ THEN GOTO a2873
END
IF ~~ a2872
SAY @12141
IF ~~ THEN GOTO a2873
END
IF ~~ a2873
SAY @12142
++ @12143 + a4841
++ @12144 + a2870
++ @11562 + a4841
+ ~RandomNum(3,3)~ + @12145 + a3204
+ ~RandomNum(3,2)~ + @12145 + a3205
+ ~RandomNum(3,1)~ + @12145 + a3206
++ @12146 + a4841
++ @12147 + a4841
END
IF ~~ a2874
SAY @12148
IF ~~ THEN GOTO a4843
END
IF ~~ a4841
SAY @12149
IF ~~ THEN EXIT
END
IF ~~ a4842 /* good/rigid */
SAY @12150
++ @12116 + a4841
++ @12151 + a4841
++ @12118 + a4841
++ @12152 + a2870
++ @12120 + a4841
++ @12121 + a2870
END
IF ~~ a4843 /* evil/manipulative */
SAY @12150
++ @12122 + a2866
++ @12153 + a2866
++ @12124 + a2873
++ @12154 + a2873
++ @12120 + a4841
END
/* ToB FriendTalk 4 : "Digression" : followup */
IF ~~ a4552 SAY @12155 IF ~~ THEN GOTO a4553 END
IF ~~ a4553 SAY @12156 IF ~~ THEN GOTO a4554 END
IF ~~ a4554
SAY @12157
++ @12158 + a4555
++ @12159 + a4556
++ @3695 + a4566
++ @12160 + a4566
++ @12161 + a4566
END
IF ~~ a4555 SAY @12162 IF ~~ THEN GOTO a4557 END
IF ~~ a4556 SAY @12163 IF ~~ THEN GOTO a4557 END
IF ~~ a4557
SAY @12164
++ @12165 + a4558
++ @12166 + a4558
++ @12167 + a4559
++ @12168 + a4565
++ @12169 + a4566
END
IF ~~ a4558 SAY @12170 IF ~~ THEN GOTO a4560 END
IF ~~ a4559 SAY @12171 IF ~~ THEN GOTO a4560 END
IF ~~ a4560
SAY @12172
++ @12173 + a4563
++ @12174 + a4562
++ @12175 + a4565
++ @12176 + a4561
++ @12177 + a4565
END
IF ~~ a4561
SAY @12178
++ @12179 + a4563
++ @12180 + a4566
++ @12181 + a4565
END
IF ~~ a4562 SAY @12182 IF ~~ THEN GOTO a4564 END
IF ~~ a4563
SAY @12183
++ @12184 + a4564
++ @12185 + a4565
++ @12181 + a4565
END
IF ~~ a4564
SAY @12186
++ @12187 + a4565
++ @12188 + a4565
++ @12189 + a4566
END
IF ~~ a4565 SAY @12190 IF ~~ THEN EXIT END
IF ~~ a4566 SAY @12191 IF ~~ THEN EXIT END
/* ToB FriendTalk 5 : "Worrying" : followup5 */
IF ~~ a5056
SAY @13163
+ ~Gender(Player1,FEMALE) !Global("c-aranrom","GLOBAL",1) !Global("c-aranrom","GLOBAL",2)~ + @13164 + a5060
+ ~Gender(Player1,FEMALE) OR(2) Global("c-aranrom","GLOBAL",1) Global("c-aranrom","GLOBAL",2)~ + @13164 + a5060
+ ~Gender(Player1,MALE)~ + @13165 + a5063
++ @4589 + a5056
++ @13166 + a5063
++ @13167 + a5062
++ @13168 + a5062
+ ~RandomNum(5,5)~ + @13169 + a3178 /* c-aranshutup45 */
+ ~RandomNum(5,4)~ + @11609 + a3179 /* c-aranshutup46 */
+ ~RandomNum(5,3)~ + @13170 + a3180 /* c-aranshutup47 */
+ ~RandomNum(5,2)~ + @12630 + a3181 /* c-aranshutup48 */
+ ~RandomNum(5,1)~ + @13171 + a3182 /* c-aranshutup49 */
END
IF ~~ a5057
SAY @13172
++ @13173 + a5056
++ @13166 + a5063
++ @13167 + a5062
++ @13168 + a5062
++ @13174 + a5058
+ ~RandomNum(5,5)~ + @13169 + a3178 /* c-aranshutup45 */
+ ~RandomNum(5,4)~ + @11609 + a3179 /* c-aranshutup46 */
+ ~RandomNum(5,3)~ + @13175 + a3180 /* c-aranshutup47 */
+ ~RandomNum(5,2)~ + @12630 + a3181 /* c-aranshutup48 */
+ ~RandomNum(5,1)~ + @13171 + a3182 /* c-aranshutup49 */
END
IF ~~ a5058
SAY @13176
++ @13177 + a5063
++ @13167 + a5062
++ @13168 + a5062
+ ~OR(27) AreaCheck("AR3000") AreaCheck("AR3001") AreaCheck("AR3003") AreaCheck("AR3004") AreaCheck("AR3005") AreaCheck("AR3006") AreaCheck("AR3007") AreaCheck("AR3008") AreaCheck("AR3009") AreaCheck("AR3010") AreaCheck("AR3011") AreaCheck("AR3012") AreaCheck("AR3013") AreaCheck("AR3014") AreaCheck("AR3015") AreaCheck("AR3016") AreaCheck("AR3017") AreaCheck("AR3018") AreaCheck("AR3019") AreaCheck("AR3020") AreaCheck("AR3021") AreaCheck("AR3022") AreaCheck("AR3023") AreaCheck("AR3024") AreaCheck("AR3025") AreaCheck("AR3026") AreaCheck("AR3027")~ + @13178 + a5063
+ ~AreaCheck("AR4500")~ + @13179 + a5063
+ ~AreaCheck("AR5000")~ + @13180 + a5063
+ ~AreaCheck("AR5003")~ + @13181 + a5063
+ ~AreaCheck("AR5501")~ + @13182 + a5063
+ ~AreaCheck("AR5004")~ + @13183 + a5063
+ ~AreaCheck("AR5006") AreaCheck("AR5016")~ + @13184 + a5063
+ ~AreaCheck("AR5005") AreaCheck("AR5015")~ + @13185 + a5063
+ ~AreaCheck("AR5013")~ + @13186 + a5063
+ ~OR(9) AreaCheck("AR6102") AreaCheck("AR6103") AreaCheck("AR6104") AreaCheck("AR6105") AreaCheck("AR6106") AreaCheck("AR6107") AreaCheck("AR6108") AreaCheck("AR6109") AreaCheck("AR6110")~ + @13187 + a5063
+ ~AreaCheck("AR5509")~ + @13188 + a5063
+ ~OR(4) AreaCheck("AR5200") AreaCheck("AR5201") AreaCheck("AR5203") AreaCheck("AR5204")~ + @13189 + a5063
++ @13190 + a5063
END
IF ~~ a5059
SAY @13191
+ ~RandomNum(5,5)~ + @13192 + a3178 /* c-aranshutup45 */
+ ~RandomNum(5,4)~ + @11609 + a3179 /* c-aranshutup46 */
+ ~RandomNum(5,3)~ + @13175 + a3180 /* c-aranshutup47 */
+ ~RandomNum(5,2)~ + @12630 + a3181 /* c-aranshutup48 */
+ ~OR(27) AreaCheck("AR3000") AreaCheck("AR3001") AreaCheck("AR3003") AreaCheck("AR3004") AreaCheck("AR3005") AreaCheck("AR3006") AreaCheck("AR3007") AreaCheck("AR3008") AreaCheck("AR3009") AreaCheck("AR3010") AreaCheck("AR3011") AreaCheck("AR3012") AreaCheck("AR3013") AreaCheck("AR3014") AreaCheck("AR3015") AreaCheck("AR3016") AreaCheck("AR3017") AreaCheck("AR3018") AreaCheck("AR3019") AreaCheck("AR3020") AreaCheck("AR3021") AreaCheck("AR3022") AreaCheck("AR3023") AreaCheck("AR3024") AreaCheck("AR3025") AreaCheck("AR3026") AreaCheck("AR3027")~ + @13178 + a5063
+ ~AreaCheck("AR4500")~ + @13179 + a5063
+ ~AreaCheck("AR5000")~ + @13180 + a5063
+ ~AreaCheck("AR5003")~ + @13181 + a5063
+ ~AreaCheck("AR5501")~ + @13182 + a5063
+ ~AreaCheck("AR5004")~ + @13183 + a5063
+ ~AreaCheck("AR5006") AreaCheck("AR5016")~ + @13184 + a5063
+ ~AreaCheck("AR5005") AreaCheck("AR5015")~ + @13185 + a5063
+ ~AreaCheck("AR5013")~ + @13186 + a5063
+ ~OR(9) AreaCheck("AR6102") AreaCheck("AR6103") AreaCheck("AR6104") AreaCheck("AR6105") AreaCheck("AR6106") AreaCheck("AR6107") AreaCheck("AR6108") AreaCheck("AR6109") AreaCheck("AR6110")~ + @13187 + a5063
+ ~AreaCheck("AR5509")~ + @13188 + a5063
+ ~OR(4) AreaCheck("AR5200") AreaCheck("AR5201") AreaCheck("AR5203") AreaCheck("AR5204")~ + @13189 + a5063
++ @13193 + a5062
++ @13177 + a5063
++ @13167 + a5062
++ @13168 + a5062
END
IF ~~ a5060
SAY @13194
IF ~!Global("c-aranrom","GLOBAL",1) !Global("c-aranrom","GLOBAL",2)~ THEN GOTO a5057
IF ~OR(2) Global("c-aranrom","GLOBAL",1) Global("c-aranrom","GLOBAL",2)~ THEN GOTO a5061
END
IF ~~ a5061
SAY @13195
IF ~~ THEN GOTO a5057
END
IF ~~ a5062
SAY @13196
++ @13197 + a5063
++ @13198 + a5063
++ @13190 + a5063
++ @13199 + a5063
++ @13200 + a5063
END
IF ~~ a5063
SAY @13201
IF ~~ THEN EXIT
END
/* ToB FriendTalk 6 : "Fear and Courage" : followup6 */
IF ~~ a5065
SAY @13212
++ @13213 + a5073
++ @13214 + a5072
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5066
SAY @13217
++ @13218 + a5082
++ @13219 + a5082
++ @13220 + a5073
++ @13221 + a5072
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5067
SAY @13222
++ @13223 + a5082
++ @13224 + a5082
++ @13220 + a5073
++ @13221 + a5072
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5068
SAY @13225
++ @13226 + a5082
++ @13219 + a5082
++ @13220 + a5073
++ @13221 + a5072
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5069
SAY @13227
++ @13228 + a5082
++ @13219 + a5082
++ @13220 + a5073
++ @13221 + a5072
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5070
SAY @13229
++ @13218 + a5082
++ @13219 + a5082
++ @13220 + a5073
++ @13221 + a5072
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5071
SAY @13230
= @13231
++ @13232 + a5082
++ @13219 + a5082
++ @13220 + a5073
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5072
SAY @13233
++ @13234 + a5082
++ @13219 + a5082
++ @13220 + a5073
++ @13221 + a5072
+ ~RandomNum(5,5)~ + @11609 + a3183 /* c-aranshutup50 */
+ ~RandomNum(5,4)~ + @12629 + a3184 /* c-aranshutup51 */
+ ~RandomNum(5,3)~ + @11609 + a3185 /* c-aranshutup52 */
+ ~RandomNum(5,2)~ + @13215 + a3186 /* c-aranshutup53 */
+ ~RandomNum(5,1)~ + @13216 + a3187 /* c-aranshutup54 */
END
IF ~~ a5073
SAY @13235
+ ~Gender(Player1,FEMALE) Global("c-aranrom","GLOBAL",2) ReputationGT(Player1,16)~ + @13236 + a5094 // hard to believe you are real billy joel blonde over blue
+ ~Gender(Player1,FEMALE) Global("c-aranrom","GLOBAL",2) ReputationLT(Player1,17) ReputationGT(Player1,7)~ + @13236 + a5074 // scary but fun dangerous undertow lady gaga bad romance
+ ~Gender(Player1,FEMALE) Global("c-aranrom","GLOBAL",2) ReputationLT(Player1,8)~ + @13236 + a5075 // scary and self-destructive bruno mars grenade
+ ~Gender(Player1,FEMALE) !Global("c-aranrom","GLOBAL",2)~ + @13236 + a5076 // so much potential, so much prettiness and strength katy perry firework
+ ~Gender(Player1,MALE)~ + @13236 + a5077 // lead follow get out of the way... I always follow but you don't have all the answers
++ @13237 + a5078
++ @13238 + a5079
+ ~InParty(Player2) !Name("c-aran",PLAYER2)~ + @13239 + a5081
+ ~InParty(Player3) !Name("c-aran",PLAYER3)~ + @13240 + a5081
+ ~InParty(Player4) !Name("c-aran",PLAYER4)~ + @13241 + a5081
+ ~InParty(Player5) !Name("c-aran",PLAYER5)~ + @13242 + a5081
+ ~InParty(Player6) !Name("c-aran",PLAYER6)~ + @13243 + a5081
END
IF ~~ a5074
SAY @13244
IF ~~ THEN GOTO a5087
END
IF ~~ a5075
SAY @13245
IF ~~ THEN GOTO a5087
END
IF ~~ a5076
SAY @13246
IF ~~ THEN GOTO a5087
END
IF ~~ a5077
SAY @13247
IF ~~ THEN GOTO a5087
END
IF ~~ a5078
SAY @13248
IF ~~ THEN GOTO a5087
END
IF ~~ a5079
SAY @13249
= @13250
++ @13251 + a5082
++ @13252 + a5080
++ @13253 + a5080
++ @13254 + a5087
++ @13255 + a5083
END
IF ~~ a5080
SAY @3601
IF ~~ THEN GOTO a5087
END
IF ~~ a5081
SAY @13256
IF ~~ THEN GOTO a5087
END
IF ~~ a5082
SAY @13257
++ @13258 + a5085
++ @13259 + a5086
++ @13260 + a5092
++ @13261 + a5083
+ ~!InParty("minsc")~ + @13262 + a5091
+ ~InParty("minsc")~ + @13263 + a5090
END
IF ~~ a5083
SAY @13264
++ @13265 + a5092
++ @13266 + a5084
+ ~!InParty("minsc")~ + @13262 + a5091
+ ~InParty("minsc")~ + @13263 + a5090
END
IF ~~ a5084
SAY @13267
= @13268
++ @13269 + a5089
++ @13270 + a5089
++ @13271 + a5085
++ @13272 + a5085
++ @13273 + a5092
+ ~!InParty("minsc")~ + @13274 + a5091
+ ~InParty("minsc")~ + @13275 + a5090
END
IF ~~ a5085
SAY @13276
IF ~~ THEN GOTO a5087
END
IF ~~ a5086
SAY @13277
IF ~~ THEN GOTO a5087
END
IF ~~ a5087
SAY @13278
= @13279
++ @13280 + a5088
++ @13281 + a5093
++ @13282 + a5088
++ @13283 + a5088
++ @13284 + a5088
++ @13285 + a5088
END
IF ~~ a5088
SAY @13286
= @13287
++ @13288 + a5092
++ @13289 + a5092
++ @13290 + a5092
++ @13291 + a5092
+ ~!InParty("minsc")~ + @13262 + a5091
+ ~InParty("minsc")~ + @13263 + a5090
END
IF ~~ a5089
SAY @13292
= @13293
IF ~~ THEN EXIT
END
IF ~~ a5090
SAY @13294
IF ~~ THEN EXIT
END
IF ~~ a5091
SAY @13295
IF ~~ THEN EXIT
END
IF ~~ a5092
SAY @13296
IF ~~ THEN EXIT
END
IF ~~ a5093
SAY @13297
IF ~~ THEN EXIT
END
IF ~~ a5094
SAY @13298
= @13299
IF ~~ THEN GOTO a5087
END
/* ToB Love Talk #2 : statement of intent for seriousness : replies */
IF ~~ a4717
SAY @12192
IF ~~ THEN GOTO a4718
END
IF ~~ a4718
SAY @12193
++ @12194 + a4719
++ @12195 + a4724
++ @12196 + a4724
++ @12197 + a4721
++ @12198 + a4724
END
IF ~~ a4719
SAY @12199
++ @12200 + a4721
++ @12201 + a4723
++ @12202 + a4720
++ @12203 + a4720
++ @12204 + a4720
END
IF ~~ a4720
SAY @12205
++ @12206 + a4723
++ @12207 + a4723
++ @12208 + a4722
++ @12209 + a4724
++ @12210 + a4724
END
IF ~~ a4721
SAY @3601
++ @12208 + a4722
++ @12211 + a4724
++ @12206 + a4723
++ @12212 + a4724
++ @12213 + a4722
END
IF ~~ a4722
SAY @12214
++ @12201 + a4723
++ @12215 + a4724
++ @12216 + a4724
++ @12217 + a4724
++ @12218 + a4724
END
IF ~~ a4723
SAY @12219
++ @12220 + a4724
++ @12221 + a4724
++ @12222 + a4724
++ @12223 + a4724
++ @12224 + a4724
END
IF ~~ a4724
SAY @12225
++ @12226 + a4725
++ @12227 + a4725
++ @12228 + a4725
++ @12229 + a4725
++ @12230 + a4725
END
IF ~~ a4725
SAY @12231
++ @12232 + a4726
++ @12233 + a4726
++ @12234 + a4726
++ @12235 + a4726
++ @12236 + a4726
END
IF ~~ a4726
SAY @12237
++ @12238 + a4727
++ @12239 + a4727
++ @12240 + a4727
++ @12241 + a4736
++ @12242 + a4727
END
IF ~~ a4727
SAY @12243
++ @12244 + a4736
++ @12245 + a4728
++ @12246 + a4728
++ @12247 + a4728
++ @12248 + a4728
END
IF ~~ a4728
SAY @12249
++ @12250 + a4729
++ @12244 + a4736
++ @12251 + a4729
++ @12252 + a4729
++ @12253 + a4729
END
IF ~~ a4729
SAY @12254
++ @12255 + a4730
++ @12256 + a4730
++ @12257 + a4736
++ @12258 + a4730
++ @12259 + a4730
END
IF ~~ a4730
SAY @12260
++ @12261 + a4731
++ @12262 + a4731
++ @12263 + a4731
++ @12264 + a4731
++ @12265 + a4736
END
IF ~~ a4731
SAY @12266
++ @12267 + a4732
++ @12268 + a4732
++ @12269 + a4732
++ @12270 + a4736
++ @3589 + a4736
END
IF ~~ a4732
SAY @12271
++ @12272 + a4735
++ @12273 + a4733
++ @12274 + a4736
++ @12275 + a4734
++ @12276 + a4736
END
IF ~~ a4733
SAY @12277
IF ~~ THEN GOTO a4735
END
IF ~~ a4734
SAY @12278
IF ~~ THEN EXIT
END
IF ~~ a4735 // romance continued
SAY @12279
IF ~~ THEN EXIT
END
IF ~~ a4736 // romance retired
SAY @12280
= @12281
IF ~~ THEN DO ~SetGlobal("c-aranflirtstop","GLOBAL",1) SetGlobal("c-aranfight","GLOBAL",0) SetGlobal("c-aranrom","GLOBAL",3)~ EXIT // full romance shutdown
END
END /* append C-ARN25J */
/* BEGIN C-ARN25P is covered in initial dialog compilation. */
/* Sending the NPC home from the Pocket Plane, and bringing them back */
/* courtesy of berelinde, using Homeward Bound code */
EXTEND_BOTTOM FATESP 6
+ ~InParty("c-aran") InMyArea("c-aran") !StateCheck("c-aran",CD_STATE_NOTVALID)~ + @12282 DO ~SetGlobal("c-aransenthome","GLOBAL",1)
ActionOverride("c-aran",SetGlobal("KickedOut","LOCALS",1))
ActionOverride("c-aran",SetLeavePartyDialogFile())
ActionOverride("c-aran",ChangeAIScript("",DEFAULT))
ActionOverride("c-aran",LeaveParty())
ActionOverride("c-aran",GivePartyAllEquipment())
ActionOverride("c-aran",MakeGlobal())
Wait(1)
CreateVisualEffectObject("SPDIMNDR","c-aran")
Wait(4)
MoveGlobal("AR0607","c-aran",[272.294])~ EXIT /* circus tent restored */
+ ~Global("c-aransenthome","GLOBAL",1)~ + @12283 DO ~CreateVisualEffect("SPPORTAL",[1999.1228])
Wait(2)
MoveGlobal("AR4500","c-aran",[1999.1228])
Wait(1)~ + 8
END
APPEND C-ARN25P
/* just kicked out via "reform party" button = no global set. */
IF ~Global("KickedOut","LOCALS",0)~ THEN BEGIN a2753
SAY @12284
+ ~RandomNum(3,1) !AreaCheck("AR4500")~ + @12285 DO ~SetGlobal("KickedOut","LOCALS",1)~ + a1632
+ ~RandomNum(3,2) !AreaCheck("AR4500")~ + @12285 DO ~SetGlobal("KickedOut","LOCALS",1)~ + a1633
+ ~RandomNum(3,3) !AreaCheck("AR4500")~ + @12285 DO ~SetGlobal("KickedOut","LOCALS",1)~ + a1640 /* c-aranrejoin2tob */
+ ~!AreaCheck("AR5003") !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("AR0601") !AreaCheck("AR0602") !AreaCheck("AR0603") !AreaCheck("AR0604") !AreaCheck("AR0605") !AreaCheck("AR0606") !AreaCheck("AR3000") !AreaCheck("AR3001") !AreaCheck("AR3003") !AreaCheck("AR3004") !AreaCheck("AR3005") !AreaCheck("AR3006") !AreaCheck("AR3007") !AreaCheck("AR3008") !AreaCheck("AR3009") !AreaCheck("AR3010") !AreaCheck("AR3011") !AreaCheck("AR3012") !AreaCheck("AR3013") !AreaCheck("AR3014") !AreaCheck("AR3015") !AreaCheck("AR3016") !AreaCheck("AR3017") !AreaCheck("AR3018") !AreaCheck("AR3019") !AreaCheck("AR3020") !AreaCheck("AR3021") !AreaCheck("AR3022") !AreaCheck("AR3023") !AreaCheck("AR3024") !AreaCheck("AR3025") !AreaCheck("AR3026") !AreaCheck("AR3027")~ + @12286 DO ~SetGlobal("KickedOut","LOCALS",1)~ + a1639 /* c-aranwaitsaradush tob <<POSSIBLE_TO_LEAVE>> */
+ ~!AreaCheck("AR5003") OR(51) 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("AR0601") AreaCheck("AR0602") AreaCheck("AR0603") AreaCheck("AR0604") AreaCheck("AR0605") AreaCheck("AR0606") AreaCheck("AR3000") AreaCheck("AR3001") AreaCheck("AR3003") AreaCheck("AR3004") AreaCheck("AR3005") AreaCheck("AR3006") AreaCheck("AR3007") AreaCheck("AR3008") AreaCheck("AR3009") AreaCheck("AR3010") AreaCheck("AR3011") AreaCheck("AR3012") AreaCheck("AR3013") AreaCheck("AR3014") AreaCheck("AR3015") AreaCheck("AR3016") AreaCheck("AR3017") AreaCheck("AR3018") AreaCheck("AR3019") AreaCheck("AR3020") AreaCheck("AR3021") AreaCheck("AR3022") AreaCheck("AR3023") AreaCheck("AR3024") AreaCheck("AR3025") AreaCheck("AR3026") AreaCheck("AR3027")~ + @12286 DO ~SetGlobal("KickedOut","LOCALS",1)~ + a1630 /* c-araninnimpossibletob <<IMPOSSIBLE_TO_LEAVE>> */
+ ~!AreaCheck("AR5501") !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("AR0601") !AreaCheck("AR0602") !AreaCheck("AR0603") !AreaCheck("AR0604") !AreaCheck("AR0605") !AreaCheck("AR0606") !AreaCheck("AR3000") !AreaCheck("AR3001") !AreaCheck("AR3003") !AreaCheck("AR3004") !AreaCheck("AR3005") !AreaCheck("AR3006") !AreaCheck("AR3007") !AreaCheck("AR3008") !AreaCheck("AR3009") !AreaCheck("AR3010") !AreaCheck("AR3011") !AreaCheck("AR3012") !AreaCheck("AR3013") !AreaCheck("AR3014") !AreaCheck("AR3015") !AreaCheck("AR3016") !AreaCheck("AR3017") !AreaCheck("AR3018") !AreaCheck("AR3019") !AreaCheck("AR3020") !AreaCheck("AR3021") !AreaCheck("AR3022") !AreaCheck("AR3023") !AreaCheck("AR3024") !AreaCheck("AR3025") !AreaCheck("AR3026") !AreaCheck("AR3027")~ + @12287 DO ~SetGlobal("KickedOut","LOCALS",1)~ + a1638 /* c-aranwaitsamkethrantob <<POSSIBLE_TO_LEAVE>> */
+ ~!AreaCheck("AR5501") OR(51) 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("AR0601") AreaCheck("AR0602") AreaCheck("AR0603") AreaCheck("AR0604") AreaCheck("AR0605") AreaCheck("AR0606") AreaCheck("AR3000") AreaCheck("AR3001") AreaCheck("AR3003") AreaCheck("AR3004") AreaCheck("AR3005") AreaCheck("AR3006") AreaCheck("AR3007") AreaCheck("AR3008") AreaCheck("AR3009") AreaCheck("AR3010") AreaCheck("AR3011") AreaCheck("AR3012") AreaCheck("AR3013") AreaCheck("AR3014") AreaCheck("AR3015") AreaCheck("AR3016") AreaCheck("AR3017") AreaCheck("AR3018") AreaCheck("AR3019") AreaCheck("AR3020") AreaCheck("AR3021") AreaCheck("AR3022") AreaCheck("AR3023") AreaCheck("AR3024") AreaCheck("AR3025") AreaCheck("AR3026") AreaCheck("AR3027")~ + @12287 DO ~SetGlobal("KickedOut","LOCALS",1)~ + a1630 /* c-araninnimpossibletob <<IMPOSSIBLE_TO_LEAVE>> */
++ @12288 DO ~SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~AreaCheck("AR4500")~ + @12289 DO ~SetGlobal("KickedOut","LOCALS",1) MoveToPointNoInterrupt([1799.1358]) Face(14)~ EXIT
++ @10533 + a3223
+ ~OR(2)AreaCheck("AR5003") AreaCheck("AR5501")~ + @12290 DO ~SetGlobal("KickedOut","LOCALS",1)~ EXIT
+ ~!AreaCheck("AR4500") !AreaCheck("AR4000") !AreaCheck("AR6200")~ + @12291 DO ~SetGlobal("KickedOut","LOCALS",1)~ EXIT
+ ~!AreaCheck("AR4500") !AreaCheck("AR4000") !AreaCheck("AR6200")~ + @12292 DO ~SetGlobal("KickedOut","LOCALS",1)
CreateVisualEffectObject("SPDIMNDR",Myself)
Wait(2)
MoveBetweenAreas("AR4500",[1799.1358],14)~ EXIT
END
/* AR4500 = pocketplane || AR5003 = Saradush Inn || AR5501 = Amkethran Inn */
/* Adding a special dialog to the 25P for NPCs sent home from the Pocket Plane */
IF ~Global("c-aransenthome","GLOBAL",1) Global("KickedOut","LOCALS",1)~ THEN BEGIN a1641
SAY @12293
++ @12294 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~Class("c-aran",FIGHTER_ALL)~ + @12295 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~Class("c-aran",MAGE_ALL)~ + @12296 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~Class("c-aran",THIEF_ALL)~ + @12297 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~Class("c-aran",BARD_ALL)~ + @12298 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~Class("c-aran",RANGER_ALL)~ + @12299 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~Class("c-aran",SORCERER)~ + @12300 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
+ ~OR(2) Class("c-aran",CLERIC_ALL) Class("c-aran",PALADIN_ALL)~ + @12301 DO ~SetGlobal("c-aransenthome","GLOBAL",0) SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
++ @10533 DO ~SetGlobal("c-aransenthome","GLOBAL",0)~ + a3223
++ @12302 DO ~SetGlobal("c-aransenthome","GLOBAL",0)~ + a1635
+ ~RandomNum(3,1)~ + @12303 DO ~SetGlobal("c-aransenthome","GLOBAL",0)~ + a1635
+ ~RandomNum(3,2)~ + @12303 DO ~SetGlobal("c-aransenthome","GLOBAL",0)~ + a1636
+ ~RandomNum(3,3)~ + @12303 DO ~SetGlobal("c-aransenthome","GLOBAL",0)~ + a1637
END
/* Pocketplane Rejoin */
IF ~Global("KickedOut","LOCALS",1) AreaCheck("AR4500")~ THEN BEGIN a1629
SAY @12304
++ @12305 DO ~JoinParty()~ EXIT
+ ~Class("c-aran",FIGHTER_ALL)~ + @12295 DO ~JoinParty()~ EXIT
+ ~Class("c-aran",MAGE_ALL)~ + @12296 DO ~JoinParty()~ EXIT
+ ~Class("c-aran",THIEF_ALL)~ + @12297 DO ~JoinParty()~ EXIT
+ ~Class("c-aran",BARD_ALL)~ + @12306 DO ~JoinParty()~ EXIT
+ ~Class("c-aran",RANGER_ALL)~ + @12299 DO ~JoinParty()~ EXIT
+ ~Class("c-aran",SORCERER)~ + @12300 DO ~JoinParty()~ EXIT
+ ~OR(2) Class("c-aran",CLERIC_ALL) Class("c-aran",PALADIN_ALL)~ + @12301 DO ~JoinParty()~ EXIT
++ @10533 + a3223
++ @12307 + a1640
++ @12308 + a1642 /* smartalekrejointob */
END
/* Saradush or Amkethran Rejoin */
IF ~Global("KickedOut","LOCALS",1) OR(2) AreaCheck("AR5003") AreaCheck("AR5501")~ THEN BEGIN a1631
SAY @12309
++ @12310 DO ~SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
++ @12311 + a1632
++ @10533 + a3223
++ @12290 DO ~SetGlobal("KickedOut","LOCALS",1)~ EXIT
+ ~!AreaCheck("AR5003")~ + @12286 + a1639 /* c-aranwaitsaradushtob <<POSSIBLE_TO_LEAVE>> */
+ ~!AreaCheck("AR5501")~ + @12287 + a1638 /* c-aranwaitsamkethrantob <<POSSIBLE_TO_LEAVE>> */
++ @12292 DO ~SetGlobal("KickedOut","LOCALS",1)
CreateVisualEffectObject("SPDIMNDR",Myself)
Wait(2)
MoveBetweenAreas("AR4500",[1799.1358],14)~ EXIT
END
/* Any Other Area Rejoin */
IF ~Global("KickedOut","LOCALS",1) !AreaCheck("AR4500") !AreaCheck("AR5003") !AreaCheck("AR5501")~ THEN BEGIN a1643
SAY @12312
++ @12310 DO ~SetGlobal("KickedOut","LOCALS",0) JoinParty()~ EXIT
++ @10533 + a3223
+ ~RandomNum(3,1)~ + @12285 + a1632
+ ~RandomNum(3,2)~ + @12285 + a1633
+ ~RandomNum(3,3)~ + @12285 + a1640 /* c-aranrejoin2tob */
+ ~!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("AR0601") !AreaCheck("AR0602") !AreaCheck("AR0603") !AreaCheck("AR0604") !AreaCheck("AR0605") !AreaCheck("AR0606") !AreaCheck("AR3000") !AreaCheck("AR3001") !AreaCheck("AR3003") !AreaCheck("AR3004") !AreaCheck("AR3005") !AreaCheck("AR3006") !AreaCheck("AR3007") !AreaCheck("AR3008") !AreaCheck("AR3009") !AreaCheck("AR3010") !AreaCheck("AR3011") !AreaCheck("AR3012") !AreaCheck("AR3013") !AreaCheck("AR3014") !AreaCheck("AR3015") !AreaCheck("AR3016") !AreaCheck("AR3017") !AreaCheck("AR3018") !AreaCheck("AR3019") !AreaCheck("AR3020") !AreaCheck("AR3021") !AreaCheck("AR3022") !AreaCheck("AR3023") !AreaCheck("AR3024") !AreaCheck("AR3025") !AreaCheck("AR3026") !AreaCheck("AR3027")~ + @12286 + a1639 /* c-aranwaitsaradushtob <<POSSIBLE_TO_LEAVE>> */
+ ~OR(51) 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("AR0601") AreaCheck("AR0602") AreaCheck("AR0603") AreaCheck("AR0604") AreaCheck("AR0605") AreaCheck("AR0606") AreaCheck("AR3000") AreaCheck("AR3001") AreaCheck("AR3003") AreaCheck("AR3004") AreaCheck("AR3005") AreaCheck("AR3006") AreaCheck("AR3007") AreaCheck("AR3008") AreaCheck("AR3009") AreaCheck("AR3010") AreaCheck("AR3011") AreaCheck("AR3012") AreaCheck("AR3013") AreaCheck("AR3014") AreaCheck("AR3015") AreaCheck("AR3016") AreaCheck("AR3017") AreaCheck("AR3018") AreaCheck("AR3019") AreaCheck("AR3020") AreaCheck("AR3021") AreaCheck("AR3022") AreaCheck("AR3023") AreaCheck("AR3024") AreaCheck("AR3025") AreaCheck("AR3026") AreaCheck("AR3027")~ + @12286 + a1630 /* c-araninnimpossibletob <<IMPOSSIBLE_TO_LEAVE>> */
+ ~!AreaCheck("AR5501") !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("AR0601") !AreaCheck("AR0602") !AreaCheck("AR0603") !AreaCheck("AR0604") !AreaCheck("AR0605") !AreaCheck("AR0606") !AreaCheck("AR3000") !AreaCheck("AR3001") !AreaCheck("AR3003") !AreaCheck("AR3004") !AreaCheck("AR3005") !AreaCheck("AR3006") !AreaCheck("AR3007") !AreaCheck("AR3008") !AreaCheck("AR3009") !AreaCheck("AR3010") !AreaCheck("AR3011") !AreaCheck("AR3012") !AreaCheck("AR3013") !AreaCheck("AR3014") !AreaCheck("AR3015") !AreaCheck("AR3016") !AreaCheck("AR3017") !AreaCheck("AR3018") !AreaCheck("AR3019") !AreaCheck("AR3020") !AreaCheck("AR3021") !AreaCheck("AR3022") !AreaCheck("AR3023") !AreaCheck("AR3024") !AreaCheck("AR3025") !AreaCheck("AR3026") !AreaCheck("AR3027")~ + @12287 + a1638 /* c-aranwaitsamkethrantob <<POSSIBLE_TO_LEAVE>> */
+ ~!AreaCheck("AR5501") OR(51) 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("AR0601") AreaCheck("AR0602") AreaCheck("AR0603") AreaCheck("AR0604") AreaCheck("AR0605") AreaCheck("AR0606") AreaCheck("AR3000") AreaCheck("AR3001") AreaCheck("AR3003") AreaCheck("AR3004") AreaCheck("AR3005") AreaCheck("AR3006") AreaCheck("AR3007") AreaCheck("AR3008") AreaCheck("AR3009") AreaCheck("AR3010") AreaCheck("AR3011") AreaCheck("AR3012") AreaCheck("AR3013") AreaCheck("AR3014") AreaCheck("AR3015") AreaCheck("AR3016") AreaCheck("AR3017") AreaCheck("AR3018") AreaCheck("AR3019") AreaCheck("AR3020") AreaCheck("AR3021") AreaCheck("AR3022") AreaCheck("AR3023") AreaCheck("AR3024") AreaCheck("AR3025") AreaCheck("AR3026") AreaCheck("AR3027")~ + @12287 + a1630 /* c-araninnimpossibletob <<IMPOSSIBLE_TO_LEAVE>> */
++ @12292 DO ~SetGlobal("KickedOut","LOCALS",1)
CreateVisualEffectObject("SPDIMNDR",Myself)
Wait(2)
MoveBetweenAreas("AR4500",[1799.1358],14)~ EXIT
END
/* Impossible to go to an inn from here */
IF ~~ a1630
SAY @12313
IF ~~ THEN EXIT
END
IF ~~ a1642
SAY @12314
IF ~~ THEN DO ~JoinParty()~ EXIT
END
IF ~~ a1632 SAY @12315 IF ~~ THEN EXIT END
IF ~~ a1633 SAY @12316 IF ~~ THEN EXIT END
IF ~~ a1635 SAY @12317 IF ~~ THEN EXIT END
IF ~~ a1636 SAY @12318 IF ~~ THEN EXIT END
IF ~~ a1637 SAY @12319 IF ~~ THEN EXIT END
IF ~~ a1640 SAY @12320 IF ~~ THEN EXIT END
IF ~~ a1639
SAY @12321
IF ~~ THEN DO
~ActionOverride("c-aran",SetGlobal("KickedOut","LOCALS",1))
ActionOverride("c-aran",SetLeavePartyDialogFile())
ActionOverride("c-aran",ChangeAIScript("",DEFAULT))
ActionOverride("c-aran",LeaveParty())
ActionOverride("c-aran",EscapeAreaMove("AR5003",1074,707,5))~ EXIT
END
IF ~~ a1638
SAY @12322
IF ~~ THEN DO ~ActionOverride("c-aran",SetGlobal("KickedOut","LOCALS",1))
ActionOverride("c-aran",SetLeavePartyDialogFile())
ActionOverride("c-aran",ChangeAIScript("",DEFAULT))
ActionOverride("c-aran",LeaveParty())
EscapeAreaMove("AR5501",410,455,8)~ EXIT
END
END /* of append to c-arn25p */
/* A complete rebuild of Anomen's ToB pre-joining dialog, expanded, contracted, and warped out of any semblance or resemblance. */
APPEND C-ARN25A
IF ~Gender(Player1,MALE) Global("c-aransummoned","GLOBAL",1)~ THEN a2607
SAY @12323
+ ~Alignment(Player1,MASK_GOOD)~ + @12324 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2608
+ ~!Alignment(Player1,MASK_GOOD)~ + @12324 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2609
++ @12325 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2610
++ @12326 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2611
++ @12327 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2612
++ @12328 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2613
++ @12329 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2614
/* Feywarden of Corellon */
IF ~Global("c-feywarden","GLOBAL",1)~ THEN GOTO a2615
/* STRIFELEADER OF CYRIC */
IF ~Global("c-strifeleader","GLOBAL",1)~ THEN GOTO a2616
/* PAINBEARER OF ILMATER */
IF ~Global("c-painbearer","GLOBAL",1)~ THEN GOTO a2617
/* LOREKEEPER OF OGHMA - the Binder of What is Known, the Patron of Bards */
IF ~Global("c-lorekeeper","GLOBAL",1)~ THEN GOTO a2618
/* FIREWALKER OF KOSSUTH - evil - elemental fire - Thay : Global("c-firewalker","GLOBAL",1) */
IF ~Global("c-firewalker","GLOBAL",1)~ THEN GOTO a2619
/* SILVERSTAR OF SELUNE - Moonmaiden : */
IF ~Global("c-silverstar","GLOBAL",1)~ THEN GOTO a2620
/* Holy Strategist of the Red Knight - Red Fellowship (only law) */
IF ~Global("c-strategist","GLOBAL",1)~ THEN GOTO a2621
/* NIGHTCLOAK OF SHAR - Dark Lady */
IF ~Global("c-nightcloak","GLOBAL",1)~ THEN GOTO a2622
/* HEARTWARDER OF SUNE - Sune Firehair, Lady Firehair : Global("c-heartwarder","GLOBAL",1) */
IF ~Global("c-heartwarder","GLOBAL",1)~ THEN GOTO a2623
/* BATTLEGUARD OF TEMPUS - th' Foehammer (chaos) */
IF ~Global("c-battleguard","GLOBAL",1)~ THEN GOTO a2624
/* Authlim of Iyachtu Xvim - the Godson */
IF ~Global("c-authlim","GLOBAL",1)~ THEN GOTO a2625
/* MORNINGLORD OF LATHANDER */
IF ~Kit(Player1,GODLATHANDER) OR(6) Class(Player1,CLERIC) Class(Player1,FIGHTER_CLERIC) Class(Player1,CLERIC_MAGE) Class(Player1,CLERIC_THIEF) Class(Player1,FIGHTER_MAGE_CLERIC) Class(Player1,CLERIC_RANGER)~ THEN GOTO a2626
/* WATCHER OF HELM */
IF ~Kit(Player1,GODHELM) OR(6) Class(Player1,CLERIC) Class(Player1,FIGHTER_CLERIC) Class(Player1,CLERIC_MAGE) Class(Player1,CLERIC_THIEF) Class(Player1,FIGHTER_MAGE_CLERIC) Class(Player1,CLERIC_RANGER)~ THEN GOTO a2627
/* STORMLORD OF TALOS */
IF ~Kit(Player1,GODTALOS) OR(6) Class(Player1,CLERIC) Class(Player1,FIGHTER_CLERIC) Class(Player1,CLERIC_MAGE) Class(Player1,CLERIC_THIEF) Class(Player1,FIGHTER_MAGE_CLERIC) Class(Player1,CLERIC_RANGER)~ THEN GOTO a2628
END
IF ~Gender(Player1,FEMALE) !Global("c-aranrom","GLOBAL",2) Global("c-aransummoned","GLOBAL",1)~ THEN a2629
SAY @12323
+ ~Alignment(Player1,MASK_GOOD)~ + @12324 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2608
+ ~!Alignment(Player1,MASK_GOOD)~ + @12324 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2609
++ @12327 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2612
++ @12330 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2630
++ @12326 + a2611
++ @12331 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2631
++ @12332 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2610
/* Feywarden of Corellon */
IF ~Global("c-feywarden","GLOBAL",1)~ THEN GOTO a2632
/* STRIFELEADER OF CYRIC */
IF ~Global("c-strifeleader","GLOBAL",1)~ THEN GOTO a2633
/* PAINBEARER OF ILMATER */
IF ~Global("c-painbearer","GLOBAL",1)~ THEN GOTO a2634
/* LOREKEEPER OF OGHMA - the Binder of What is Known, the Patron of Bards */
IF ~Global("c-lorekeeper","GLOBAL",1)~ THEN GOTO a2635
/* FIREWALKER OF KOSSUTH - evil - elemental fire - Thay : Global("c-firewalker","GLOBAL",1) */
IF ~Global("c-firewalker","GLOBAL",1)~ THEN GOTO a2636
/* SILVERSTAR OF SELUNE - Moonmaiden : */
IF ~Global("c-silverstar","GLOBAL",1)~ THEN GOTO a2637
/* Holy Strategist of the Red Knight - Red Fellowship (only law) */
IF ~Global("c-strategist","GLOBAL",1)~ THEN GOTO a2638
/* NIGHTCLOAK OF SHAR - Dark Lady */
IF ~Global("c-nightcloak","GLOBAL",1)~ THEN GOTO a2639
/* HEARTWARDER OF SUNE - Sune Firehair, Lady Firehair : Global("c-heartwarder","GLOBAL",1) */
IF ~Global("c-heartwarder","GLOBAL",1)~ THEN GOTO a2640
/* BATTLEGUARD OF TEMPUS - th' Foehammer (chaos) */
IF ~Global("c-battleguard","GLOBAL",1)~ THEN GOTO a2641
/* Authlim of Iyachtu Xvim - the Godson */
IF ~Global("c-authlim","GLOBAL",1)~ THEN GOTO a2642
/* MORNINGLORD OF LATHANDER */
IF ~Kit(Player1,GODLATHANDER) OR(6) Class(Player1,CLERIC) Class(Player1,FIGHTER_CLERIC) Class(Player1,CLERIC_MAGE) Class(Player1,CLERIC_THIEF) Class(Player1,FIGHTER_MAGE_CLERIC) Class(Player1,CLERIC_RANGER)~ THEN GOTO a2643
/* WATCHER OF HELM */
IF ~Kit(Player1,GODHELM) OR(6) Class(Player1,CLERIC) Class(Player1,FIGHTER_CLERIC) Class(Player1,CLERIC_MAGE) Class(Player1,CLERIC_THIEF) Class(Player1,FIGHTER_MAGE_CLERIC) Class(Player1,CLERIC_RANGER)~ THEN GOTO a2644
/* STORMLORD OF TALOS */
IF ~Kit(Player1,GODTALOS) OR(6) Class(Player1,CLERIC) Class(Player1,FIGHTER_CLERIC) Class(Player1,CLERIC_MAGE) Class(Player1,CLERIC_THIEF) Class(Player1,FIGHTER_MAGE_CLERIC) Class(Player1,CLERIC_RANGER)~ THEN GOTO a2645
END
IF ~Gender(Player1,FEMALE) Global("c-aranrom","GLOBAL",2) Global("c-aransummoned","GLOBAL",1)~ THEN a2646
SAY @12333
/* Relationship Adjustment */
/* romance - dependent (1) to allow breakup or resume romance. */
+ ~Alignment(Player1,MASK_GOOD)~ + @12334 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2647
+ ~Alignment(Player1,MASK_EVIL)~ + @12334 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2648
+ ~!Alignment(Player1,MASK_GOOD) !Alignment(Player1,MASK_EVIL)~ + @12334 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2649
++ @12335 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2650
++ @12336 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2651
++ @12337 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2652
++ @12338 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2652
++ @12339 DO ~SetGlobal("c-aransummoned","GLOBAL",2)~ + a2631
/* Feywarden of Corellon */
IF ~Global("c-feywarden","GLOBAL",1)~ THEN GOTO a2632
/* STRIFELEADER OF CYRIC */
IF ~Global("c-strifeleader","GLOBAL",1)~ THEN GOTO a2633
/* PAINBEARER OF ILMATER */
IF ~Global("c-painbearer","GLOBAL",1)~ T