IF
  Global("icepack","GLOBAL",0)
THEN
  RESPONSE #100
    CreateCreature("icetrolx",[713.567],4)  // ~Ice Troll~
    CreateCreature("frost01",[428.592],4)  // ~Frost Giant~
    CreateCreature("icetrolz",[505.808],4)  // ~Ice Troll~
    CreateCreature("icetrolz",[340.748],4)  // ~Ice Troll~
    CreateCreature("icetrolz",[500.689],4)  // ~Ice Troll~
    CreateCreature("icetrolx",[909.738],4)  // ~Ice Troll~
    CreateCreature("fwormx",[1058.400],4)  // ~Frost Worm~
    CreateCreature("frost01",[800.750],4)  // ~Frost Giant~
    SetGlobal("icepack","GLOBAL",1)
END

IF
  Dead("fwormx")  // ~Frost Worm~
  CombatCounter(0)
  Global("BPCmonNow","DX2001",0)
THEN
  RESPONSE #100
    SetGlobal("BPCmonNow","DX2001",1)
    SetGlobalTimer("BPNotThatFast","DX2001",FOUR_ROUNDS)
END

IF
  GlobalTimerExpired("BPNotThatFast","DX2001")
  Global("icepack","GLOBAL",1)
  Dead("fwormx")  // ~Frost Worm~
THEN
  RESPONSE #100
    SetGlobal("icepack","GLOBAL",2)
    DisplayStringHead(Player1,@10143)
    Wait(2)
    StartCutSceneMode()
    StartCutScene("cutpack")
END

