APPEND ACBREJ
IF ~Global("ACDSDUER","LOCALS",1)~ THEN BEGIN DSDUER
SAY @0 = @1
++ @2 DO ~SetGlobal("ACDSDUER","LOCALS",2)~ EXIT
++ @3 DO ~SetGlobal("ACDSDUER","LOCALS",2)~ + DSDUER1
END

IF ~~ THEN BEGIN DSDUER1
SAY @4 = @5
IF ~~ THEN EXIT
END

IF ~!See([ENEMY])Global("ACDSCGUIDE","GLOBAL",1)OR(18)AreaCheck("DSC020")AreaCheck("DSC021")AreaCheck("DSC022")AreaCheck("DSC023")AreaCheck("DSC024")AreaCheck("DSC025")AreaCheck("DSC026")AreaCheck("DSC027")AreaCheck("DSC028")AreaCheck("DSC029")AreaCheck("DSC030")AreaCheck("DSC031")AreaCheck("DSC032")AreaCheck("DSC033")AreaCheck("DSC034")AreaCheck("DSC035")AreaCheck("DSC036")AreaCheck("DSC037")~ THEN BEGIN GUIDE1
SAY @6
IF ~AreaCheck("DSC020")~ THEN REPLY @7 + GUIDE2
IF ~!AreaCheck("DSC020")~ THEN REPLY @7 + GUIDE3
IF ~AreaCheck("DSC027")~ THEN REPLY @8 + GUIDE4
IF ~!AreaCheck("DSC027")~ THEN REPLY @8 + GUIDE5
IF ~AreaCheck("DSC034")~ THEN REPLY @9 + GUIDE6
IF ~!AreaCheck("DSC034")~ THEN REPLY @9 + GUIDE7
++ @10 + GUIDE.END
END

IF ~~ THEN BEGIN GUIDE.END
SAY @11
IF ~~ THEN EXIT
END


IF ~~ THEN BEGIN GUIDE2
SAY @12
IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN GUIDE3
SAY @13
IF ~~ THEN DO ~SetGlobal("ACSCOTTY","GLOBAL",1)~ EXIT
END

IF ~~ THEN BEGIN GUIDE4
SAY @14
IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN GUIDE5
SAY @13
IF ~~ THEN DO ~SetGlobal("ACSCOTTY","GLOBAL",2)~ EXIT
END

IF ~~ THEN BEGIN GUIDE6
SAY @15
IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN GUIDE7
SAY @13
IF ~~ THEN DO ~SetGlobal("ACSCOTTY","GLOBAL",3)~ EXIT
END

IF ~Global("ACDSC020","LOCALS",1)~ THEN BEGIN ACGUIDE.1
SAY @16
IF ~~ THEN DO ~SetGlobal("ACDSC020","LOCALS",2)SetGlobal("ACDSCGUIDE","GLOBAL",1)~ EXIT
END
END

INTERJECT_COPY_TRANS JETLA 5 ACJETLA5
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@17
== JETLA IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@18
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@19
== JETLA IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN @53
END

INTERJECT_COPY_TRANS DSOTHO 1 ACDSOTHO1
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@20
== DSOTHO IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@21
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@22
== DSOTHO IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@23
END

INTERJECT_COPY_TRANS DSOTHO 2 ACDSOTHO1
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@24
== DSOTHO IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@25
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@26
== DSOTHO IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@27
END

INTERJECT_COPY_TRANS DSOTHO 9 ACDSOTHO9
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@28
== DSOTHO IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@29
END

INTERJECT_COPY_TRANS CONCHO 1 ACCONCHO1
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@30
== CONCHO IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@31
END

INTERJECT FERTHG 0 ACFERTHGO1
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@32
== FERTHG IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@33
COPY_TRANS FERTHG 1

INTERJECT_COPY_TRANS FERTHG 4 ACFERTHGO4
== ACBreJ IF ~InParty("ACBre")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@34
== FERTHG IF ~InParty("ACBre")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@35DO ~ GiveItem("DSHAMM01","ACBRE")~
END

INTERJECT_COPY_TRANS DSJAREN 4 ACDSJAREN4
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@36
== DSJAREN IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@37
END

INTERJECT_COPY_TRANS DSGILIAN 1 ACDSGILIAN1
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@38
== DSGILIAN IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@39
END

INTERJECT_COPY_TRANS DSOTHO 15 ACDSOTHO15
== ACBreJ IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@40
== DSOTHO IF ~InParty("ACBre")See("ACBRE")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@41
END

INTERJECT_COPY_TRANS2 DSSHAR 3 ACDSSHAR3
== ACBreJ IF ~InParty("ACBre")!StateCheck("ACBre",CD_STATE_NOTVALID)~ THEN
@42
END

CHAIN
IF ~Global("ACDSC001","LOCALS",1)~ THEN ACBREJ DSC001
@43 DO ~SetGlobal("ACDSC001","LOCALS",2)~
EXIT

CHAIN
IF ~Global("ACDSMISC10","LOCALS",1)~ THEN ACBREJ DSMISC10
@44 DO ~SetGlobal("ACDSMISC10","LOCALS",2)~
== CONCHOJ IF ~InParty("CONCHOBHAIR")See("CONCHOBHAIR")!StateCheck("CONCHOBHAIR",CD_STATE_NOTVALID)~ THEN
@45
EXIT

CHAIN
IF ~Global("ACDSC018","LOCALS",1)~ THEN ACBREJ DSC018
@46 = @47 DO ~SetGlobal("ACDSC018","LOCALS",2)~
==CUCHOINJ IF ~InParty("CUCHOINNEACH")See("CUCHOINNEACH")!StateCheck("CUCHOINNEACH",CD_STATE_NOTVALID)~ THEN
@48
EXIT

CHAIN
IF ~Global("ACDSMISC07","LOCALS",1)~ THEN ACBREJ DSCMISC07
@49 DO ~SetGlobal("ACDSMISC07","LOCALS",2)~
==CUCHOINJ IF ~InParty("CUCHOINNEACH")See("CUCHOINNEACH")!StateCheck("CUCHOINNEACH",CD_STATE_NOTVALID)~ THEN
@50
EXIT

CHAIN
IF ~Global("ACDSAMUL02","LOCALS",1)~ THEN ACBREJ DSAMUL02
@51 DO ~SetGlobal("ACDSAMUL02","LOCALS",2)~
==JETLAJ IF ~InParty("JETLAYA")See("JETLAYA")!StateCheck("JETLAYA",CD_STATE_NOTVALID)~ THEN
@52
EXIT