// First Night with Quentin, by Kulyok

BEGIN O#QUENT


CHAIN IF ~Gender(Player1,MALE)~ THEN O#QUENT q00000
@0
EXIT 

CHAIN IF ~!%ISGABBERPLAYER1%
Global("O#QuentinRE1","GLOBAL",1)~ THEN O#QUENT q0
@0
EXIT

CHAIN IF ~%ISGABBERPLAYER1%
Global("O#QuentinRE1","GLOBAL",1)~ THEN O#QUENT q1
@1
END
++ @2 EXTERN O#QUENT q1.1
++ @3 EXTERN O#QUENT q1.1
++ @4 EXTERN O#QUENT q1.1

CHAIN O#QUENT q1.0
@5
DO ~SetGlobal("O#QuentinRE1","GLOBAL",99) EscapeArea()~
EXIT

CHAIN O#QUENT q1.1
@6
= @7
= @8
END
++ @9 EXTERN O#QUENT q1.2
++ @10 EXTERN O#QUENT q1.3
++ @11 EXTERN O#QUENT q1.4
++ @12 EXTERN O#QUENT q1.0

CHAIN O#QUENT q1.2
@13
END
IF ~~ EXTERN O#QUENT q1.5

CHAIN O#QUENT q1.3
@14
END
IF ~~ EXTERN O#QUENT q1.5

CHAIN O#QUENT q1.4
@15
END
IF ~~ EXTERN O#QUENT q1.6

CHAIN O#QUENT q1.5
@16
END
IF ~~ EXTERN O#QUENT q1.6

CHAIN O#QUENT q1.6
@17
END
++ @18 EXTERN O#QUENT q1.8
++ @19 EXTERN O#QUENT q1.7
++ @20 EXTERN O#QUENT q1.9

CHAIN O#QUENT q1.7
@21
END
IF ~~ EXTERN O#QUENT q1.9

CHAIN O#QUENT q1.8
@22
END
IF ~~ EXTERN O#QUENT q1.9

CHAIN O#QUENT q1.9
@23
== O#QUENT @24
END
++ @25 EXTERN O#QUENT q1.10
++ @26 EXTERN O#QUENT q1.10
++ @27 EXTERN O#QUENT q1.0

CHAIN O#QUENT q1.10
@28
END
++ @29 EXTERN O#QUENT q1.11
++ @30 EXTERN O#QUENT q1.12
++ @31 EXTERN O#QUENT q1.14
++ @32 EXTERN O#QUENT q1.0

CHAIN O#QUENT q1.11
@33
END
IF ~~ EXTERN O#QUENT q1.13

CHAIN O#QUENT q1.12
@34
END
IF ~~ EXTERN O#QUENT q1.13

CHAIN O#QUENT q1.13
@35
END
IF ~~ EXTERN O#QUENT q1.15

CHAIN O#QUENT q1.14
@36
END
IF ~~ EXTERN O#QUENT q1.15

CHAIN O#QUENT q1.15
@37
DO ~SetGlobal("O#QuentinRE1","GLOBAL",2) SetGlobal("O#QuentinRE1Next","GLOBAL",1) EscapeArea()~
EXIT

CHAIN IF ~!%ISGABBERPLAYER1%
Global("O#QuentinRE1","GLOBAL",3)~ THEN O#QUENT q00
@38
EXIT

CHAIN IF ~%ISGABBERPLAYER1%
Global("O#QuentinRE1","GLOBAL",3) 
!See(Player2)
!See(Player3)
!See(Player4)
!See(Player5)
!See(Player6)~ THEN O#QUENT q2
@39
END
++ @40 EXTERN O#QUENT q2.1
++ @41 EXTERN O#QUENT q2.2
++ @42 EXTERN O#QUENT q2.3
++ @43 EXTERN O#QUENT q2.4
++ @44 EXTERN O#QUENT q2.5


CHAIN IF ~%ISGABBERPLAYER1%
Global("O#QuentinRE1","GLOBAL",3) 
//OR(5)      //-> taken out for BG1. This state omly triggers if the above is not true, i.e. if another group memeber is near by.
//See(Player2)
//See(Player3)
//See(Player4)
//See(Player5)
//See(Player6)
~ THEN O#QUENT q000
@45
EXIT

CHAIN O#QUENT q2.0
@46
DO ~SetGlobal("O#QuentinRE1","GLOBAL",999) EscapeArea()~
EXIT

CHAIN O#QUENT q2.1
@47
END
IF ~~ EXTERN O#QUENT q2.6

CHAIN O#QUENT q2.2
@48
= @49
END
IF ~~ EXTERN O#QUENT q2.6

CHAIN O#QUENT q2.3
@50
END
IF ~~ EXTERN O#QUENT q2.6

CHAIN O#QUENT q2.4
@51
END
IF ~~ EXTERN O#QUENT q2.6

CHAIN O#QUENT q2.5
@52
END
IF ~~ EXTERN O#QUENT q2.6

CHAIN O#QUENT q2.6
@53
DO ~SetGlobal("O#QuentinRE1","GLOBAL",4)
SetGlobal("RE1_QuentinFlirt","GLOBAL",1)~
== O#QUENT @54
END
++ @55 EXTERN O#QUENT q2.7
++ @56 EXTERN O#QUENT q2.7
++ @57 EXTERN O#QUENT q2.8
++ @58 EXTERN O#QUENT q2.8
++ @59 EXTERN O#QUENT q2.0

CHAIN O#QUENT q2.7
@60
END
IF ~~ EXTERN O#QUENT q2.9

CHAIN O#QUENT q2.8
@61
END
IF ~~ EXTERN O#QUENT q2.9

CHAIN O#QUENT q2.9
@62
END
++ @63 EXTERN O#QUENT q2.10
++ @64 EXTERN O#QUENT q2.11
++ @65 EXTERN O#QUENT q2.12
++ @66 EXTERN O#QUENT q2.13
++ @67 EXTERN O#QUENT q2.0

CHAIN O#QUENT q2.10
@68
END
IF ~~ EXTERN O#QUENT q2.14

CHAIN O#QUENT q2.11
@69
END
IF ~~ EXTERN O#QUENT q2.14

CHAIN O#QUENT q2.12
@70
END
IF ~~ EXTERN O#QUENT q2.14

CHAIN O#QUENT q2.13
@71
= @72
END
++ @73 EXTERN O#QUENT q2.14
++ @74 EXTERN O#QUENT q2.13a
++ @75 EXTERN O#QUENT q2.0

CHAIN O#QUENT q2.13a
@76
END
IF ~~ EXTERN O#QUENT q2.pt

CHAIN O#QUENT q2.14
@77
END
+ ~Global("C#LC_Details","GLOBAL",1) Global("C#LC_DescriptionText","GLOBAL",1)~ + @78 EXTERN O#QUENT q2.14a
++ @79 EXTERN O#QUENT q2.14b
+ ~Global("C#LC_Details","GLOBAL",1) Global("C#LC_DescriptionText","GLOBAL",1)~ + @80 EXTERN O#QUENT q2.0
+ ~Global("C#LC_Details","GLOBAL",0) Global("C#LC_DescriptionText","GLOBAL",0)~ + @80 EXTERN O#QUENT q2.0
+ ~Global("C#LC_Details","GLOBAL",0) Global("C#LC_DescriptionText","GLOBAL",1)~ + @80 EXTERN O#QUENT q2.0
+ ~Global("C#LC_Details","GLOBAL",1) Global("C#LC_DescriptionText","GLOBAL",0)~ + @80 EXTERN O#QUENT q2.0

CHAIN O#QUENT q2.14a
@81
END
++ @82 EXTERN O#QUENT q2.16
++ @83 EXTERN O#QUENT q2.17
++ @84 EXTERN O#QUENT q2.15
++ @85 EXTERN O#QUENT q2.13a

CHAIN O#QUENT q2.14b
@86
END
IF ~~ DO ~SetGlobal("RE1_QuentinSex","GLOBAL",1)
ClearAllActions()
StartCutSceneMode()
StartCutScene("O#QuentC")~ EXIT

CHAIN O#QUENT q2.15
@87
END
IF ~~ EXTERN O#QUENT q2.18

CHAIN O#QUENT q2.16
@88
END
IF ~~ EXTERN O#QUENT q2.18

CHAIN O#QUENT q2.17
@89
END
IF ~~ EXTERN O#QUENT q2.18

CHAIN O#QUENT q2.18
@90
= @91
= @92
END
++ @93 EXTERN O#QUENT q2.19
++ @94 EXTERN O#QUENT q2.19
++ @95 EXTERN O#QUENT q2.0

CHAIN O#QUENT q2.19
@96
END
++ @97 EXTERN O#QUENT q2.20
++ @98 EXTERN O#QUENT q2.21
++ @99 EXTERN O#QUENT q2.22

CHAIN O#QUENT q2.20
@100
END
IF ~~ EXTERN O#QUENT q2.23

CHAIN O#QUENT q2.21
@101
END
IF ~~ EXTERN O#QUENT q2.23

CHAIN O#QUENT q2.22
@102
END
IF ~~ EXTERN O#QUENT q2.23

CHAIN O#QUENT q2.23
@103
END
++ @104 EXTERN O#QUENT q2.23a
++ @105 EXTERN O#QUENT q2.23a
++ @106 EXTERN O#QUENT q2.13a

CHAIN O#QUENT q2.23a
@107
END
++ @108 EXTERN O#QUENT q2.24
++ @109 EXTERN O#QUENT q2.25
++ @110 EXTERN O#QUENT q2.13a 

CHAIN O#QUENT q2.24
@111
END
IF ~~ EXTERN O#QUENT q2.25a

CHAIN O#QUENT q2.25
@112
END
IF ~~ EXTERN O#QUENT q2.25a

CHAIN O#QUENT q2.25a
@113
= @114
= @115
END
++ @116 EXTERN O#QUENT q2.26
++ @117 EXTERN O#QUENT q2.26
++ @118 EXTERN O#QUENT q2.26
++ @119 EXTERN O#QUENT q2.13a

CHAIN O#QUENT q2.26
@120
= @121
END
++ @122 EXTERN O#QUENT q2.29
++ @123 EXTERN O#QUENT q2.27
++ @124 EXTERN O#QUENT q2.28
++ @125  EXTERN O#QUENT q2.13a

CHAIN O#QUENT q2.27
@126
END
IF ~~ EXTERN O#QUENT q2.29

CHAIN O#QUENT q2.28
@127
END
IF ~~ EXTERN O#QUENT q2.29

CHAIN O#QUENT q2.29
@128
DO ~SetGlobal("RE1_QuentinSex","GLOBAL",1)~
== O#QUENT @129
= @130
= @131
END
IF ~~ EXTERN O#QUENT q2.29a

CHAIN IF ~Global("O#QuentinRE1Next","GLOBAL",1)~ THEN O#QUENT q2.29a
@132
END
++ @133 EXTERN O#QUENT q2.30
++ @134 EXTERN O#QUENT q2.30
++ @135 EXTERN O#QUENT q2.31

CHAIN  O#QUENT q2.30
@136
END
++ @137 EXTERN O#QUENT q2.30a
++ @138 EXTERN O#QUENT q2.pt
++ @139 EXTERN O#QUENT q2.32

CHAIN O#QUENT q2.30a
@140
END
IF ~~ EXTERN O#QUENT q2.pt

CHAIN  O#QUENT q2.31
@141
END
IF ~~ EXTERN O#QUENT q2.32

CHAIN  O#QUENT q2.32
@142
== O#QUENT @143
END
++ @144 EXTERN O#QUENT q2.34
++ @145 EXTERN O#QUENT q2.33
++ @146 EXTERN O#QUENT q2.33
++ @147 EXTERN O#QUENT q2.33

CHAIN O#QUENT q2.33
@148
DO ~SetGlobal("O#QuentinRE1","GLOBAL",5) EscapeArea()~
EXIT

CHAIN O#QUENT q2.34
@149
END
++ @150 EXTERN O#QUENT q2.35
++ @151 EXTERN O#QUENT q2.36
++ @152 EXTERN O#QUENT q2.33

CHAIN  O#QUENT q2.35
@153
END
IF ~~ EXTERN O#QUENT q2.33

CHAIN  O#QUENT q2.36
@154
END
IF ~~ EXTERN O#QUENT q2.33

CHAIN  O#QUENT q2.pt
@155
= @156
= @157
END
++ @158 EXTERN O#QUENT q2.pt2
++ @159 EXTERN O#QUENT q2.pt2
++ @160 EXTERN O#QUENT q2.pt2

CHAIN  O#QUENT q2.pt2
@161
= @162
= @163
= @164
END
++ @165 EXTERN O#QUENT q2.pt3
++ @166 EXTERN O#QUENT q2.pt4
++ @167 EXTERN O#QUENT q2.pt4
++ @168 EXTERN O#QUENT q2.32

CHAIN O#QUENT q2.pt3
@169
END
IF ~~ EXTERN O#QUENT q2.pt5

CHAIN O#QUENT q2.pt4
@170
END
IF ~~ EXTERN O#QUENT q2.pt5

CHAIN O#QUENT q2.pt5
@171
END
++ @172 EXTERN O#QUENT q2.pt6
++ @173 EXTERN O#QUENT q2.pt6
++ @174 EXTERN O#QUENT q2.32

CHAIN O#QUENT q2.pt6
@175
= @176
END
++ @177 EXTERN O#QUENT q2.pt7
++ @178 EXTERN O#QUENT q2.pt7
++ @179 EXTERN O#QUENT q2.pt7

CHAIN O#QUENT q2.pt7
@180
= @181
END
++ @182 EXTERN O#QUENT q2.32
++ @183 EXTERN O#QUENT q2.pt9
++ @184 EXTERN O#QUENT q2.32

CHAIN O#QUENT q2.pt9
@185
END
IF ~~ EXTERN O#QUENT q2.32
