002-5,28,27,0	script	#teleporterNavio	NPC32767,117,29,{
    end;

OnEvent:
    if (PC_DEST == 1) goto L_Destino1;
    if (PC_DEST == 2) goto L_Destino2;
    if (PC_DEST == 3) goto L_Destino3;
    end;

L_Destino1:
    message strcharinfo(0), "" + strcharinfo(0) + " desembarcou na Ilha de Bhramir.";
    warp "007", 21, 94;
    PC_DEST = 0;
    @timer_navio_running = 0;
    end;

L_Destino2:
    message strcharinfo(0), "" + strcharinfo(0) + " desembarcou no Polo Norte.";
    warp "010", 178, 67;
    PC_DEST = 0;
    @timer_navio_running = 0;
    end;

L_Destino3:
    message strcharinfo(0), "" + strcharinfo(0) + " desembarcou nas Terras Desconhecidas.";
    warp "org016", 51, 102;
    PC_DEST = 0;
    @timer_navio_running = 0;
    end;
}

002-5,79,23,0	script	Capitão Mirc	NPC303,{
    set @porto, 0; // Em alto mar
    callfunc "CapitaoMirc";
    close2;
    if (PC_DEST != 0 && @timer_navio_running == 0) goto L_Timer;
    end;

L_Timer:
    addtimer 42000, "#teleporterNavio::OnEvent";
    @timer_navio_running = 1;
    end;
}