[FACC] Elf Village - Venore

[Guilherme. 189]

Eae Galerinha ,

Bom o WPT começa bem na entrada da ELF VILLAGE, logo descendo a escada. Eu consegui quando estava sozinho fazer 15K - 20K EXP/HR.

Provavelmente você irá passar por apenas 2 Elf Arcanist, então não se preocupe muito !

Equipamentos necessários - 


• Machete

• Potions

 Lista de LOOT - 


• Heaven Blossom, 5921

• Elven Amulet, 3082

• Holy Orchid, 5922

• Wand of Cosmic Energy, 3073

• Life crystal, 3061

• Yellow Gem, 3037

Como chegar em ELF Village? SCRIPT ÓTIMO PARA ESSE WPT : Atacar Elf Arcanist Primeiro -

Const 

Name=['Elf Arcanist']; 

SwitchAt=10;// the % of the current attacked monster 

            //that if the monster has lass % hp than this, we Will NOt change to the stronger monster. 

function GetPlace(st:string):integer; 

var 

x:integer; 

begin 

Result:=1000; 

for x:=Low(Name) To High(Name) do 

  begin 

   if Name[x]=st then 

   Result:=x; 

   end; 

end; 


function GetCreatureByID(ID: integer): TCreature; 

var 

  x: integer; 

begin 

  Result := nil; 

  for x := 0 to Creatures.Count - 1 do 

  begin 

    if x >= Creatures.Count then Break; 

    if Creatures.Creature[x].ID = ID then 

    begin 

      Result := Creatures.Creature[x]; 

      Exit; 

    end; 

  end; 

end; 


function IsCreatureBesideYou(c: TCreature): boolean; 

begin 

   UpdateWorld; 

   Result := False; 

   if (abs(c.X-self.X) <= 6) and (abs(c.Y-self.Y) <= 6) then begin 

    if c.Z = self.Z then begin 

     Result := True; 

    end; 

   end; 

end; 


var 

x:integer; 

b:boolean; 

begin 

while not terminated do 

  begin 

    b:=false; 

   updateworld; 

   If (Self.Attacking<>0) then 

    begin 

    Creature:=GetCreatureByID(Self.Attacking); 

     if Creature<>nil then 

      if SwitchAt<Creature.Health then 

      begin 

       for x := 0 to Creatures.Count - 1 do 

        begin 

        updateworld; 

         if b then break; 

         if x >= Creatures.Count then Break; 

         if Creatures.Creature[x].NPC then 

         if Creatures.Creature[x].z=self.z then 

         if Creatures.Creature[x].Name<>self.name then 

         if Creatures.Creature[x].Attacking = false then 

         if IsCreatureBesideYou(Creatures.Creature[x]) then 

         if GetPlace(Creature.Name)>GetPlace(Creatures.Creature[x].Name) then 

             begin 

               sleep(100); 

                updateworld; 

                Creatures.Creature[x].attacking:=true; 

                 B:=true; 

              end; 

         end; 

       end; 

      end; 

     Sleep(100); 

   end; 

end;

ELF.wpt

FONTE: FÓRUM OFICIAL TIBIABOTNG

[Renato 659]

Ahá, muito bom gui, adorava caçar ai no level baixo!

Agora, tem como você fazer um waypoint que passa pela torre full e pelos 3 dragons?

REP+

Abraços ai!

[Evan 0]

cara esse script ta com defeito tem uma hora que ele para e não desce a escada

alguem sabe um outro script de elf vilager?

[Guilherme. 189]

Eu já vi esse erro mais não consegui arrumar, ele só para de vez em quando, acho que é quando não tem bixo no andar, mais se você tiver paciencia é só olhar de vez em quando e clickar pra descer a escada manualmente .