Líderes

Resolvi ajudar o forum também to trazendo esse script aqui da utamo quando ver um bicho escolido ou player! --------------------------------------------------------------------------------- Const MonsterName = '(NOME DO BICHO OU PLAYER AQUI)' //Personagem Ou Criatura while not terminated do begin updateworld; for i := 0 to creatures.count - 1 do begin if creatures.creature.name = MonsterName then if Creatures.Creature.npc = true then if Creatures.Creature.Z = Self.Z then begin Self.say('utamo vita'); sleep(1000); end; end; end;

útilzinho, rep +

Esse codigo n verifica qual slime tu ta matando, ele vai matar qualquer uma. Tenta algo assim: Codigo do botão que selecionara a slime que está sendo atacada, para ser a slime mãe. TextBox1.Text = p.TargetId Codigo para treinar, bote isso num timer. If p.TargetId = 0 Then For Each x As Creature In c.BattleList.GetCreatures If x.Name = "Slime" And Not x.Id = TextBox1.Text Then x.Attack End If Next End If Espero ter ajudado.

O certo não é ignorar uma criatura, e sim atacar apenas os slimes, uma vez que o Slime Mãe (Mother) ja esta com o nome diferente. Crie um timer e ponha o seguinte código. C# if (p.TargetId == 0) { Creature monster = c.BattleList.GetCreatures().FirstOrDefault(cr => cr.Name == "Slime" && cr.Location.IsAdjacentTo(p.Location)); if (monster != null) { monster.Attack(); } } VB.Net If p.TargetId = 0 Then Dim monster As Creature = c.BattleList.GetCreatures().FirstOrDefault(Function(cr) cr.Name = "Slime" AndAlso cr.Location.IsAdjacentTo(p.Location)) If monster IsNot Nothing Then monster.Attack() End If End If e depois no checkbox C# if (checkBox3.Checked != false) { timer_slime.Start(); } else { timer_slime.Stop(); } VB.Net If checkBox3.Checked <> False Then timer_slime.Start() Else timer_slime.[Stop]() End If Testei em um OT 8.60.

Pessoal, hoje eu estava explorando as funções "p" e "c" e na função "p" achei uma coisinha interessante... Você precisará apenas de um CheckBox, apenas! Dentro do CheckBox você adiciona: if c.LoggedIn Then If checkbox1.checked then p.Skull = Skull.Black else p.Skull = Skull.None end if End if Isto você ficará com o Black Skull... Você pode trocar o Black por: p.Skull = Skull.Green p.Skull = Skull.Yellow p.Skull = Skull.None p.Skull = Skull.Red p.Skull = Skull.White Prontinho... Créditos: Felipe Sartori Kaiofirma