void main()
{
  object oPC = GetPCSpeaker();
  object oDest = GetObjectByTag("WP_Shore");
  AssignCommand(oPC,ActionJumpToObject(oDest,FALSE));
  SendMessageToPC(oPC,"Is is a short journey to sail across the crater lake.");
  AddJournalQuestEntry("dungeon",30,oPC);
  // Remove any henchmen and replace them with armored ones
  object oHench = GetHenchman(oPC);
  if (GetIsObjectValid(oHench))
  {
    string sHenchname = GetTag(oHench);
    string sNewName = GetStringLeft(sHenchname,GetStringLength(sHenchname)-4);
    RemoveHenchman(oPC,oHench);
    DestroyObject(oHench);
    object oNewHench = CreateObject(OBJECT_TYPE_CREATURE,sNewName,GetLocation(oPC));
    AddHenchman(oPC,oNewHench);
  }
  // The tunnel to the Island no longer works
  object oSaltSlide = GetObjectByTag("SlideDown");
  SetLocalInt(oSaltSlide,"IslandDestroyed",1);
}
