IF
  Oncreation()
  Global("TCReveal0025","TC0025",0)
THEN
  RESPONSE #100
    Explore()
    Daynight(NOON)
    Setglobal("TCReveal0025","TC0025",1)
    Incrementchapter("")
    Clearallactions()
    Textscreen("SCENE01")
    Smallwait(1)
END

IF
  Global("TCReveal0025","TC0025",1)
  Global("TCCaptainTalk","TC0025",0)
THEN
  RESPONSE #100
    Wait(5)
    Setglobal("TCCaptainTalk","TC0025",1)
    ActionOverride("TCSALTCA",Startdialognoset(Player1))
END

IF
  Dead("TCSANBAL")
  Exists("TCSALTCA")
  !Dead("TCSALTCA")
  Global("TCMoveCaptain","TC0025",0)
THEN
  RESPONSE #100
    ActionOverride("TCSALTCA",Jumptopoint([305.2490]))
    ActionOverride("TCSALTCA",Face(2))
    Setglobal("TCMoveCaptain","TC0025",1)
    Wait(1)
    ActionOverride("TCSALTCA",Startdialognoset(Player1))
END

IF
  Globalgt("TCCaptainKnowsMayor","GLOBAL",3)
  Exists("TCSALTCA")
  Global("TCSeeCaptain","TC0025",0)
THEN
  RESPONSE #100
    Deactivate("TCSALTCA")
    Setglobal("TCSeeCaptain","TC0025",1)
END

IF
  Global("TCGoToSelgaunt","GLOBAL",1)
  Global("TCBaneChild","TC0025",0)
THEN
  RESPONSE #100
    Createcreature("TRKID01",[979.2400],12)
    Setglobal("TCBaneChild","TC0025",1)
END

IF
  Exists("TCBANE01")
  !Dead("TCBANE01")
  Delay(2)
  Global("TCBanePriestTalk","TC0025",0)
THEN
  RESPONSE #100
    Setglobal("TCBanePriestTalk","TC0025",1)
    ActionOverride("TCBANE01",Dialog(Player1))
END

IF
  Global("TCGoToBoat","GLOBAL",1)
  Global("TCFishermanSpawn","TC0025",0)
THEN
  RESPONSE #100
    Createcreature("TCMATE",[3643.3335],5)
    ActionOverride("TCMATE",Polymorph(FIGHTER_MALE_HUMAN))
    Setglobal("TCFishermanSpawn","TC0025",1)
END

IF
  Global("TCGoToBoat","GLOBAL",2)
  Global("TCFishermanSpawn","TC0025",1)
THEN
  RESPONSE #100
    Clearallactions()
    Savegame(0)
    Startcutscenemode()
    Setglobal("TCGoToBoat","GLOBAL",3)
    Fadetocolor([30.0],0)
    Wait(2)
    ActionOverride(Player1,Leavearealua("TC0060","",[133.2152],0))
    ActionOverride(Player2,Leavearealua("TC0060","",[150.2127],0))
    ActionOverride(Player3,Leavearealua("TC0060","",[170.2100],0))
    ActionOverride(Player4,Leavearealua("TC0060","",[165.2070],0))
    ActionOverride(Player5,Leavearealua("TC0060","",[168.2044],0))
    ActionOverride(Player6,Leavearealua("TC0060","",[129.2100],0))
    ActionOverride(Player1,Wait(2))
    ActionOverride(Player1,Multiplayersync())
    Endcutscenemode()
END

IF
  !Dead("TCALTHON")
  !Dead("TCAESDALE")
  !Dead("TCBLUSH")
  Inparty("TCAESDALE")
  Inparty("TCBLUSH")
  Global("TCBlushPCAesdale","GLOBAL",4)
  Global("TCBlushCut","TC0025",0)
THEN
  RESPONSE #100
    Setglobal("TCBlushPCAesdale","GLOBAL",5)
    Setglobal("TCBlushCut","TC0025",2)
    Clearallactions()
    Fadetocolor([20.0],0)
    Smallwait(1)
    Startcutscenemode()
    Startcutscene("TCMVE02A")
END

IF
  Global("TCBaneBooks","GLOBAL",1)
THEN
  RESPONSE #100
    Createcreature("TCPUMB01",[383.2293],15)
    Setglobal("TCBaneBooks","GLOBAL",2)
END

IF
  Global("TCBaneQuest","TC0025",1)
  Areacheck("TC0025")
  !Dead("TRMTOW01")
  Delay(5)
  Global("TCFarmerBane","TC0025",0)
THEN
  RESPONSE #100
    Setglobal("TCFarmerBane","TC0025",1)
    ActionOverride("TRMTOW01",Startdialognoset([PC]))
END

