I want Coran's Hanali sequence

[fruit loops]

but I can't seem to get it. is it a CN flirt or is there something special I'm suppose to do, I read the flirt file and I really want to get the sequence to activate but I can't understand the programming well enough. Someone please tell if what I need to get it, honestly I'm sick of playing BG and went on to BGII but I will play it again just to see that part. Sorry but I'm a little bit Coran obsessed

[cmorgan]

in p#corand.baf:

IF %BGT_VAR% 
RealGlobalTimerExpired("X#CoHanaliTime","GLOBAL")
RealGlobalTimerExpired("X#DreamTalk","GLOBAL")
Global("X#CoranHanaliRuneFirst","GLOBAL",0)
Global("X#CoranHanaliRune","GLOBAL",1)
InParty(Myself)
!StateCheck(Player1,CD_STATE_NOTVALID)
!StateCheck(Myself,CD_STATE_NOTVALID)
!AreaType(DUNGEON)
THEN
RESPONSE #100
RealSetGlobalTimer("X#DreamTalk","GLOBAL",180)
PlaySong(0)
PlaySound("corang")
IncrementGlobal("X#CoranHanaliRuneFirst","GLOBAL",1)
StartDialogueNoSet(Player1)
END

IF %BGT_VAR% 
RealGlobalTimerExpired("X#CoHanaliTime","GLOBAL")
RealGlobalTimerExpired("X#DreamTalk","GLOBAL")
InParty(Myself)
!StateCheck(Player1,CD_STATE_NOTVALID)
!StateCheck(Myself,CD_STATE_NOTVALID)
!AreaType(DUNGEON)
!Global("P#CoranRomanceInactive", "GLOBAL",1)
GlobalGT("P#CoranLover","GLOBAL",0)
Global("X#CoranHanali","GLOBAL",1)
OR(6)
Global("X#CoranHanaliRune","GLOBAL",4)
Global("X#CoranHanaliRune","GLOBAL",6)
Global("X#CoranHanaliRune","GLOBAL",8)
Global("X#CoranHanaliRune","GLOBAL",12)
Global("X#CoranHanaliRune","GLOBAL",14)
Global("X#CoranHanaliRune","GLOBAL",16)
THEN
RESPONSE #100
RealSetGlobalTimer("X#DreamTalk","GLOBAL",180)
PlaySong(0)
PlaySound("corang")
IncrementGlobal("X#CoranHanaliRune","GLOBAL",1)
StartDialogueNoSet(Player1)
END

 

This is a relatively complicated sequence - night talks, triggering morning after talks, etc. -

 

but as far as I can see, you need to have P#CoranLover greater than 1, not be in a dungeon, and you need to initiate it via PID.

 

Basically, the whole sequence starts by click-talking on Coran when flirts are enabled, you have set P#CoranLover greater than 1. There will be a flirt option:

 

@3200 = ~Coran, I have been praising golden Hanali in my heart, but I have never been to her temple, or talked to her priest. You, in your own words and *blush* actions are her devoted follower. Would you teach more of the goddess' ways?~

 

the code,

+ ~!Global("P#CoranDisableFlirts","GLOBAL",1) GlobalGT("P#CoranLover","GLOBAL",0) Global("X#CoranHanali","GLOBAL",0)~ + @3200 DO ~SetGlobal("X#CoranHanali","GLOBAL",1) RealSetGlobalTimer("X#CoHanaliTime","GLOBAL",10)~ + X#CoHa1

+ ~!Global("P#CoranDisableFlirts","GLOBAL",1) GlobalGT("P#CoranLover","GLOBAL",0) Global("X#CoranHanali","GLOBAL",1)~ + @3201 DO ~SetGlobal("X#CoranHanali","GLOBAL",3)~ EXIT

 

As for setting P#CoranLover, you can do that with about 31 different replies/actions, naturally occuring across flirts and lovetalks:

[F:\BG1NPC_Workspace\bg1npc-v17\bg1npc\phase3\corom\dlg\p#ciflirt.d]

Line 18 : IF ~~ THEN DO ~SetGlobal("P#CoranLover", "GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ EXIT

[F:\BG1NPC_Workspace\bg1npc-v17\bg1npc\phase3\corom\dlg\p#corlt.d]

Line 420 : ++ @162 DO ~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2) IncrementGlobal("P#CGLoveTalk","GLOBAL",1) RealSetGlobalTimer("P#CGLoveTalkTime","GLOBAL",COROM_TIMER)~ + COLT2.5

Line 445 : ++ @176 DO~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.5

Line 450 : ++ @178 DO~ SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.14

Line 451 : + ~Class(Player1,BARD)~ +@179 DO ~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.5

Line 452 : ++ @180 DO~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.5

Line 459 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~

Line 467 : ++ @186 DO~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.5

Line 478 : ++ @190 DO ~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.5

Line 489 : ++ @197 DO~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.5

Line 497 : ++ @197 DO ~SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~ + COLT2.5

Line 535 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~

Line 911 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~

Line 917 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",1) SetGlobal("P#CoranRomancePath","GLOBAL",2)~

Line 1037 : ++ @390 DO ~RestParty() SetGlobal("P#CoranRomancePath", "GLOBAL",2) SetGlobal("P#CoranLover","GLOBAL",1)~ EXIT

Line 1047 : ++ @397 DO ~RestParty() SetGlobal("P#CoranRomancePath", "GLOBAL",2) SetGlobal("P#CoranLover","GLOBAL",1)~ EXIT

Line 1060 : ++ @402 DO ~RestParty() SetGlobal("P#CoranRomancePath", "GLOBAL",2) SetGlobal("P#CoranLover","GLOBAL",1)~ EXIT

Line 1066 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranRomancePath", "GLOBAL",2) SetGlobal("P#CoranLover","GLOBAL",1)~ EXIT

Line 1870 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",2)~ EXIT

Line 1875 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",2)~ EXIT

Line 1885 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",2)~ EXIT

Line 2362 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",1)~ EXIT

Line 2406 : IF ~~ THEN DO ~RestParty() SetGlobal("P#CoranLover","GLOBAL",1)~

Line 2922 : ++ @1088 DO ~SetGlobal("P#CoranLover","GLOBAL",1) RestParty()~ EXIT

Line 2930 : IF ~~ THEN DO ~SetGlobal("P#CoranLover","GLOBAL",1) RestParty()~

Line 2936 : IF ~~ THEN DO ~SetGlobal("P#CoranLover","GLOBAL",1) RestParty()~

Line 3005 : IF ~~ THEN DO ~SetGlobal("P#CoranLover","GLOBAL",1) RestParty()~

Line 3043 : ++ @1124 DO ~SetGlobal("P#CoranLover","GLOBAL",1) RestParty()~ EXIT

Line 3060 : IF ~~ THEN DO ~SetGlobal("P#CoranLover","GLOBAL",1) RestParty()~

Line 3081 : IF ~~ THEN DO ~SetGlobal("P#CoranLover","GLOBAL",1) RestParty()~

[F:\BG1NPC_Workspace\bg1npc-v17\bg1npc\phase3\corom\dlg\p#crnpc.d]

Line 504 : DO ~SetGlobal("P#CoranLover","GLOBAL",0) SetGlobal("P#CoranRomancePath","GLOBAL",2) RestParty()~

 

I would play through and watch for the flirt option to appear, myself - or at least, if you are messing with setting the variables via CLUAConsole, save before trying to initiate it. Coran's 3 pathways all get tough to follow, and you may end up with chaotic results and unanticipated side-effects by setting them manually.

 

Side note: repairing multiple instances of spacing problem, "DO~" across project. Probably cosmetic, but it messes with regexp searches. Much easier to search with a uniform {space}DO{space}~

 

repaired multiple instances, 11/24/2008 prerelease v17