Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // creator : weidu (version 23800)
- // argument : BGVICONI.DLG
- // game : .
- // source : ./DATA/TB#GEN95.BIF
- // dialog : ./dialog.tlk
- // dialogF : (none)
- BEGIN ~BGVICONI~
- IF ~ NumberOfTimesTalkedTo(0)
- ~ THEN BEGIN 0 // from:
- SAY #96246 /* ~Help me! If you don't help me, they'll kill me.~ */
- IF ~~ THEN REPLY #96247 /* ~Sorry lady, it's not our business.~ */ GOTO 2
- IF ~~ THEN REPLY #96248 /* ~Calm down, we'll help you. Just tell us who you are.~ */ GOTO 1
- IF ~ Global("X#SHARTEELVICONI1","GLOBAL",0)
- IfValidForPartyDialogue("sharteel")
- InMyArea("sharteel")
- !StateCheck("sharteel",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#SHARTEELVICONI1","GLOBAL",1)
- ~ EXTERN ~SHARTJ~ 115
- IF ~ Global("SanVicInve","GLOBAL",0)
- IfValidForPartyDialogue("CVSandr")
- ~ THEN DO ~SetGlobal("SanVicInve","GLOBAL",1)
- ~ EXTERN ~CVSANDRJ~ 1062
- END
- IF ~~ THEN BEGIN 1 // from: 17.1 0.1
- SAY #96249 /* ~My name is Viconia, I... I'm not from around here, thank you so much for helping.~ */
- IF ~~ THEN DO ~CreateCreature("FLAM2",[1400.310],14)
- ActionOverride("FlamingFist2",SetInterrupt(FALSE))
- ActionOverride("FlamingFist2",ChangeAIScript("INITDLG",OVERRIDE))
- ActionOverride("FlamingFist2",MoveToPoint([1440.270]))
- ActionOverride("FlamingFist2",SetInterrupt(TRUE))
- ~ EXIT
- END
- IF ~~ THEN BEGIN 2 // from: 17.0 0.0
- SAY #96250 /* ~I should have expected that from craven surface dwellers. May you rot in all the hells.~ */
- IF ~~ THEN DO ~EscapeAreaDestroy(90)
- ~ EXIT
- END
- IF ~~ THEN BEGIN 3 // from:
- SAY #96251 /* ~They lie, I've done nothing wrong.~ */
- IF ~~ THEN REPLY #96252 /* ~If you want her, have her. We won't get in your way.~ */ EXTERN ~FLAM2~ 3
- IF ~~ THEN REPLY #96253 /* ~You'll have to get through us if you want her.~ */ EXTERN ~FLAM2~ 2
- IF ~~ THEN REPLY #96254 /* ~What do you intend to do once you have her?~ */ EXTERN ~FLAM2~ 1
- IF ~ Global("BGavinViconia1","GLOBAL",0)
- IfValidForPartyDialogue("B!GAVIN")
- InMyArea("B!GAVIN")
- !StateCheck("B!GAVIN",CD_STATE_NOTVALID)
- !Global("endofbg1","GLOBAL",2)
- ~ THEN DO ~SetGlobal("BGavinViconia1","GLOBAL",1)
- ~ EXTERN ~B!GAVINJ~ 107
- END
- IF ~~ THEN BEGIN 4 // from:
- SAY #96255 /* ~Just like surface dwellers, traitorous scum!~ */
- IF ~~ THEN DO ~Enemy()
- ~ EXIT
- END
- IF ~ Dead("FlamingFist2")
- ReactionGT(LastTalkedToBy,NEUTRAL_UPPER)
- ~ THEN BEGIN 5 // from:
- SAY #96256 /* ~I thank you for risking yourselves on my behalf. I know what you are thinking, you see my dark skin and won't trust me for it. I am a dark elf, but I'm an outcast, I need your help. I no longer receive my powers from the spider goddess you surface dwellers fear so; the Goddess Shar grants me wisdom, and she is a surface divinity. If you'd let me join your group, I would be most grateful. I have nowhere else to go.~ */
- IF ~~ THEN REPLY #96257 /* ~Sorry, we can't harbor a drow.~ */ GOTO 8
- IF ~~ THEN REPLY #96258 /* ~We don't judge someone by their race, we'll take you in.~ */ GOTO 9
- IF ~~ THEN REPLY #96259 /* ~It has nothing to do with race, we just don't need another person along to worry about. Sorry.~ */ GOTO 8
- IF ~ Global("X#JaheiraViconia2","GLOBAL",0)
- IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#JaheiraViconia2","GLOBAL",1)
- ~ EXTERN ~JAHEIRAJ~ 684
- IF ~ Global("SanVicObli1","GLOBAL",0)
- IfValidForPartyDialogue("CVSandr")
- ~ THEN DO ~SetGlobal("SanVicObli1","GLOBAL",1)
- ~ EXTERN ~CVSANDRJ~ 1063
- END
- IF ~ Dead("FlamingFist2")
- ReactionLT(LastTalkedToBy,FRIENDLY_LOWER)
- ReactionGT(LastTalkedToBy,HOSTILE_UPPER)
- ~ THEN BEGIN 6 // from:
- SAY #96260 /* ~I thank you. I know you may not be willing to give me a chance because of my dark skin. I am a drow, but if you give me a chance you won't regret it. Can I join with you? I need friends, now more than ever.~ */
- IF ~~ THEN REPLY #96261 /* ~We'll never trust a dark elf, get out of our sight!~ */ GOTO 8
- IF ~~ THEN REPLY #96262 /* ~We need the extra help, so of course we'll take you in.~ */ GOTO 9
- IF ~~ THEN REPLY #96263 /* ~We can't afford any dead weight, sorry.~ */ GOTO 8
- IF ~ Global("X#JaheiraViconia3","GLOBAL",0)
- IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#JaheiraViconia3","GLOBAL",1)
- ~ EXTERN ~JAHEIRAJ~ 683
- IF ~ Global("SanVicObli2","GLOBAL",0)
- IfValidForPartyDialogue("CVSandr")
- ~ THEN DO ~SetGlobal("SanVicObli2","GLOBAL",1)
- ~ EXTERN ~CVSANDRJ~ 1064
- END
- IF ~ Dead("FlamingFist2")
- ReactionLT(LastTalkedToBy,NEUTRAL_LOWER)
- ~ THEN BEGIN 7 // from:
- SAY #96264 /* ~I thank you for your help, but more will be on their way, perhaps our paths will cross again.~ */
- IF ~~ THEN DO ~EscapeAreaDestroy(90)
- ~ EXIT
- IF ~ Global("X#JaheiraViconia4","GLOBAL",0)
- IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#JaheiraViconia4","GLOBAL",1)
- ~ EXTERN ~JAHEIRAJ~ 682
- IF ~ Global("SanVicObli3","GLOBAL",0)
- IfValidForPartyDialogue("CVSandr")
- ~ THEN DO ~SetGlobal("SanVicObli3","GLOBAL",1)
- ~ EXTERN ~CVSANDRJ~ 1065
- END
- IF ~~ THEN BEGIN 8 // from: 16.2 16.0 15.2 15.0 6.2 6.0 5.2 5.0
- SAY #96265 /* ~You surface dwellers are so weak, I should be glad that you turned me down.~ */
- IF ~~ THEN DO ~EscapeAreaDestroy(90)
- ~ EXIT
- IF ~ Global("SanVicObli4","GLOBAL",0)
- IfValidForPartyDialogue("CVSandr")
- ~ THEN DO ~SetGlobal("SanVicObli4","GLOBAL",1)
- ~ EXTERN ~CVSANDRJ~ 1066
- END
- IF ~~ THEN BEGIN 9 // from: 16.1 15.1 6.1 5.1
- SAY #96266 /* ~I won't disappoint you, I promise.~ */
- IF ~~ THEN DO ~ReallyForceSpellRES("fjxpmooc",Myself)
- DestroyItem("minhp1")
- JoinParty()
- ~ EXIT
- IF ~ Global("X#VICONI9","GLOBAL",0)
- IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#VICONI9","GLOBAL",1)
- ~ GOTO 18
- IF ~ Global("X#VICONI9","GLOBAL",0)
- IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#VICONI9","GLOBAL",1)
- ~ EXTERN ~JAHEIRAJ~ 1054
- IF ~ Global("X#VICONI9","GLOBAL",0)
- IfValidForPartyDialogue("ajantis")
- InMyArea("ajantis")
- !StateCheck("ajantis",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#VICONI9","GLOBAL",1)
- ~ GOTO 20
- IF ~ Global("X#VICONI9","GLOBAL",0)
- IfValidForPartyDialogue("ajantis")
- InMyArea("ajantis")
- !StateCheck("ajantis",CD_STATE_NOTVALID)
- ~ THEN DO ~SetGlobal("X#VICONI9","GLOBAL",1)
- ~ EXTERN ~AJANTJ~ 340
- END
- IF ~ StateCheck(Myself,STATE_CHARMED)
- ~ THEN BEGIN 10 // from:
- SAY #95592 /* ~I come from the city of Menzoberranzan. My family was slaughtered, and I was forced to flee to the surface. When I reached the realms of light, the traitor Lolth abandoned me. I would have been lost had it not been for the divine Shar! She took me in and gave me the will and strength to survive! It makes me so happy that I have found friends such as you to make my acclimatization to the surface a little easier.~ */
- IF ~~ THEN EXIT
- END
- IF ~ True()
- ~ THEN BEGIN 11 // from:
- SAY #96267 /* ~I am sorry to be so nervous, but the surface is so large, unending when compared to my homeland.~ */
- IF ~~ THEN EXIT
- END
- IF ~ False()
- ~ THEN BEGIN 12 // from:
- SAY #95585 /* ~A welcome release. Your weakling surface ways have left a bitter taste in my mouth. Perhaps I should seek shelter back under the cover of the earth. I understood my fellows there.~ */
- IF ~~ THEN DO ~LeaveParty()
- EscapeAreaDestroy(90)
- ~ EXIT
- END
- IF ~ False()
- ~ THEN BEGIN 13 // from:
- SAY #95586 /* ~You have been very kind to me in this strange and lighted world. Perhaps you are right, though. The drow were meant to be a race apart... Take care of yourselves, alright?~ */
- IF ~~ THEN DO ~LeaveParty()
- SetDialogue("viconip")
- ~ EXIT
- END
- IF ~~ THEN BEGIN 14 // from:
- SAY #133652 /* ~Your underlings lack... respect for you, rivvin, to speak out of turn... pfft...~ */
- IF ~~ THEN DO ~EscapeAreaDestroy(90)
- ~ EXIT
- END
- IF ~~ THEN BEGIN 15 // from:
- SAY #133652 /* ~Your underlings lack... respect for you, rivvin, to speak out of turn... pfft...~ */
- IF ~~ THEN REPLY #96261 /* ~We'll never trust a dark elf, get out of our sight!~ */ GOTO 8
- IF ~~ THEN REPLY #96262 /* ~We need the extra help, so of course we'll take you in.~ */ GOTO 9
- IF ~~ THEN REPLY #96263 /* ~We can't afford any dead weight, sorry.~ */ GOTO 8
- END
- IF ~~ THEN BEGIN 16 // from:
- SAY #133652 /* ~Your underlings lack... respect for you, rivvin, to speak out of turn... pfft...~ */
- IF ~~ THEN REPLY #96257 /* ~Sorry, we can't harbor a drow.~ */ GOTO 8
- IF ~~ THEN REPLY #96258 /* ~We don't judge someone by their race, we'll take you in.~ */ GOTO 9
- IF ~~ THEN REPLY #96259 /* ~It has nothing to do with race, we just don't need another person along to worry about. Sorry.~ */ GOTO 8
- END
- IF ~~ THEN BEGIN 17 // from:
- SAY #134925 /* ~Rivvin, in the Underdark a weak-spirited drow dies. The strong one lives, and I am not yet a rotting corpse.~ */
- IF ~~ THEN REPLY #96247 /* ~Sorry lady, it's not our business.~ */ GOTO 2
- IF ~~ THEN REPLY #96248 /* ~Calm down, we'll help you. Just tell us who you are.~ */ GOTO 1
- END
- IF ~~ THEN BEGIN 18 // from: 9.1
- SAY #138961 /* ~Save your pity for our foes!~ */
- IF ~~ THEN DO ~ReallyForceSpellRES("fjxpmooc",Myself)
- DestroyItem("minhp1")
- JoinParty()
- ~ EXIT
- END
- IF ~~ THEN BEGIN 19 // from:
- SAY #138961 /* ~Save your pity for our foes!~ */
- IF ~~ THEN DO ~ReallyForceSpellRES("fjxpmooc",Myself)
- DestroyItem("minhp1")
- JoinParty()
- ~ EXIT
- END
- IF ~~ THEN BEGIN 20 // from: 9.3
- SAY #138959 /* ~I bet you will, jaluk!~ */
- IF ~~ THEN DO ~ReallyForceSpellRES("fjxpmooc",Myself)
- DestroyItem("minhp1")
- JoinParty()
- ~ EXIT
- IF ~ IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN GOTO 21
- IF ~ IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN EXTERN ~JAHEIRAJ~ 1055
- END
- IF ~~ THEN BEGIN 21 // from: 20.1
- SAY #138961 /* ~Save your pity for our foes!~ */
- IF ~~ THEN DO ~ReallyForceSpellRES("fjxpmooc",Myself)
- DestroyItem("minhp1")
- JoinParty()
- ~ EXIT
- END
- IF ~~ THEN BEGIN 22 // from:
- SAY #138959 /* ~I bet you will, jaluk!~ */
- IF ~~ THEN DO ~ReallyForceSpellRES("fjxpmooc",Myself)
- DestroyItem("minhp1")
- JoinParty()
- ~ EXIT
- IF ~ IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN GOTO 23
- IF ~ IfValidForPartyDialogue("jaheira")
- InMyArea("jaheira")
- !StateCheck("jaheira",CD_STATE_NOTVALID)
- ~ THEN EXTERN ~JAHEIRAJ~ 1056
- END
- IF ~~ THEN BEGIN 23 // from: 22.1
- SAY #138961 /* ~Save your pity for our foes!~ */
- IF ~~ THEN DO ~ReallyForceSpellRES("fjxpmooc",Myself)
- DestroyItem("minhp1")
- JoinParty()
- ~ EXIT
- END
- IF ~~ THEN BEGIN 24 // from:
- SAY #249180 /* ~ Priestess, I recognise how you tried to bring this jaluk to <PRO_HISHER> senses. Maybe you will kill <PRO_HIMHER> soon to lead this group on. Take this from me - we two will meet again.~ */
- IF ~~ THEN DO ~GiveItemCreate("Sanwi1","CVSandr",0,0,0)
- AddJournalEntry(240058,QUEST)
- SetGlobal("IWasKickedOut","LOCALS",1)
- EscapeAreaMove("AR6704",800,1085,0)
- ~ EXIT
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement