Mostrando entradas con la etiqueta Scripts. Mostrar todas las entradas
Mostrando entradas con la etiqueta Scripts. Mostrar todas las entradas

lunes, 3 de enero de 2011

Slime Trainer Script - Muttley Bot

lunes, enero 03, 2011  TibiaBot MX  Deja tu Comentario
Silme Trainer Script:

1) Primero tenemos que Obtener el ID del slime madre, lo atacamos un poco para reconocerlo.
2) Luego abrimos el "Spy", vemos cual es el del Slime Madre (por el % de la vida) y le damos click en su nombre.


3) en el cuadro de texto de abajo obtendremos el ID del Slime Madre (copiamos) y entramos en "Script" y copiamos lo siguiente:
uint IdMatki = 0; / /Aqui ponemos el "ID" Del slime madre, siempre dejen el punto y coma al final
if (core.Client.LoggedIn)
{
uint AttackedId = core.Player.TargetId;

if (AttackedId != 0)
{
Tibia.Objects.Creature c = null;

c = core.Client.BattleList.GetCreatures().FirstOrDefault(cr => cr.Id == AttackedId);

if (c == null)
AttackedId = 0;
else
return;
}
Tibia.Objects.Creature Creature = null;
Creature = core.Client.BattleList.GetCreatures().FirstOrDefault(cr => cr.Name == "Slime" && cr.Id != IdMatki && cr.Location.IsAdjacentTo(core.Player.Location));
if (Creature != null)
Creature.Attack();
}
Creditos: Bryan Rodriguez

jueves, 23 de diciembre de 2010

Alerta Cuando Tengas Pocas Healths, Manas o UH - Script TibiaBot NG

jueves, diciembre 23, 2010  TibiaBot MX  Deja tu Comentario
Script - Alerta Cuando Tengas Pocas Healts, Manas o UH.
Se pueden usar todo tipo de Healths, Manas y UH, solo deben tener su ID.
Const
UH_ID = 3160 // Coloque el ID de la Potion o de la UH
MF_ID = 2874 // Coloque el ID de la Mana Potion o de las demas Manas
UH_Alert = 5 // Alerta cuando te queden 5 UH o Healths
MF_Alert = 10 // Alerta cuando te queden 10 Manas

While not terminated do
begin
UpdateWorld;

A:=0;
B:=0;
for i:= 0 to Self.Containers.Count -1 do
begin
for G:= 0 to Self.Containers.Container.Count -1 do
begin
if Self.Containers.Container.Item[G].ID = UH_ID
then A:= A +1;
if Self.Containers.Container.Item[G].ID = MF_ID then
if Self.Containers.Container.Item[G].amount = 10
then B:= B + 1;
Sleep(100);
end;
Sleep(100);
end;
if (A <= UH_Alert) or ( B <= MF_Alert ) then
PlaySound('C:\Windows\Media\Notify.wav');
sleep(100);
end;
Script - Alerta Cuando Tengas Pocas Healths, Manas o UH.
los siguientes datos son los que se tienen que modificar:

UH_ID = 3160 - es donde debemos poner la ID del Health o UH que vamos a usar.
MF_ID = 2874 - es donde debemos poner la ID del Mana que vamos a usar.
UH_Alert = 5 - debemos de poner a cuantos healths o UH queremos que suene la alerta.
MF_Alert = 10 - debemos de poner a cuantas manas queremos que suene la alerta.

viernes, 10 de diciembre de 2010

Script Para Entrenar Con Slimes - TibiaBot NG

viernes, diciembre 10, 2010  TibiaBot MX  Deja tu Comentario
Nota: Antes de ejecutar el Script, tienes que ponerle "Follow" al Slime (Madre).
function Attacking: boolean;
begin
UpdateWorld;
for x := 0 to Creatures.Count - 1 do
begin
UpdateWorld;
if Creatures.Creature[x].Attacking then
begin
Result := True;
Exit;
end;
end;
Result := False;
Exit;
end;

function GetFollowedCreatureID: integer;
begin
UpdateWorld;
for x := 0 to Creatures.Count - 1 do
begin
UpdateWorld;

if Creatures.Creature[x].Following then
begin
Result := Creatures.Creature[x].ID;
Exit;
end;
end;
end;

var
MotherSlime, X1, Y1: integer;
begin
MotherSlime := GetFollowedCreatureID;
while not Terminated do
begin
UpdateWorld;
if not Attacking then
begin
UpdateWorld;
for x := 0 to Creatures.Count - 1 do
begin
UpdateWorld;
if Creatures.Creature[x].ID <> MotherSlime then
begin
if (Creatures.Creature[x].Name <> Self.Name) and Creatures.Creature[x].NPC then
begin
UpdateWorld;
X1 := Creatures.Creature[x].X;
Y1 := Creatures.Creature[x].Y;
if (X1 - Self.X = 1) or (X1 - Self.X = 0) or (X1 - Self.X = -1) then
begin
UpdateWorld;
if (Y1 - Self.Y = 1) or (Y1 - Self.Y = 0) or (Y1 - Self.Y = -1) then
begin
Creatures.Creature[x].Attacking := true;
Break;
end;
end;
end;
end;
end;
end;
Sleep(1000);
end;
end;

Recomiendo el Siguiente Tutorial >> ( Tutorial Ejecutar Script en TibiaBot NG )

miércoles, 24 de noviembre de 2010

Script Anti Paralize - TibiaBot NG

miércoles, noviembre 24, 2010  TibiaBot MX  Deja tu Comentario
Utani Hur
while not Terminated do
begin
UpdateWorld;
if Self.Mana > minMana then
begin
if Self.Slowed then
Self.Say('utani hur');
end;
Sleep(300);
end;
Utani Gran Hur
while not Terminated do
begin
UpdateWorld;
if Self.Mana > minMana then
begin
if Self.Slowed then
Self.Say('utani Gran hur');
end;
Sleep(300);
end;
* El Script sirve para cuando te paralizen, Automaticamente use la magia "Utani Hur o Utani Gran Hur" Este Script solo funciona en TibiaBot NG.

domingo, 21 de noviembre de 2010

Script Health Potions TibiaBot NG

domingo, noviembre 21, 2010  TibiaBot MX  1 Comentario
Ultimate Health Potion.gif Script Ultimate Health Potion
Great Health Potion.gif Script Great Health Potion
Strong Health Potion.gif Script Strong Health Potion
Health Potion.gif Script Health Potion

sábado, 23 de octubre de 2010

Script Ultimate Health Potion - TibiaBot NG

sábado, octubre 23, 2010  TibiaBot MX  Deja tu Comentario
const
Potion_ID = 7643// ID de la Potion que quiera usar.
Health_Heal = 200 // Con cuanto de HP quiere usar la Potion.

while not terminated do
begin
updateworld;
if self.health <= Health_Heal then begin Self.Containers.UseItemWithSelf(Potion_ID) Sleep(700) end; Sleep(100); end;

miércoles, 20 de octubre de 2010

Script Great Health Potion - TibiaBot NG

miércoles, octubre 20, 2010  TibiaBot MX  Deja tu Comentario
const
Potion_ID = 239// ID de la Potion que quiera usar.
Health_Heal = 200 // Con cuanto de HP quiere usar la Potion.

while not terminated do
begin
updateworld;
if self.health <= Health_Heal then begin Self.Containers.UseItemWithSelf(Potion_ID) Sleep(700) end; Sleep(100); end;

martes, 5 de octubre de 2010

Script Strong Health Potion - TibiaBot NG

martes, octubre 05, 2010  TibiaBot MX  Deja tu Comentario
const
Potion_ID = 236// ID de la Potion que quiera usar.
Health_Heal = 200 // Con cuanto de HP quiere usar la Potion.

while not terminated do
begin
updateworld;
if self.health <= Health_Heal then begin Self.Containers.UseItemWithSelf(Potion_ID) Sleep(700) end; Sleep(100); end;

viernes, 1 de octubre de 2010

Script Health Potion - TibiaBot NG

viernes, octubre 01, 2010  TibiaBot MX  Deja tu Comentario
const
Potion_ID = 266// ID de la Potion que quiera usar.
Health_Heal = 200 // Con cuanto de HP quiere usar la Potion.

while not terminated do
begin
updateworld;
if self.health <= Health_Heal then begin Self.Containers.UseItemWithSelf(Potion_ID) Sleep(700) end; Sleep(100); end;

viernes, 28 de mayo de 2010

Script De Alerta Cuando Spears Se Acaben ( TibiaBot NG )

viernes, mayo 28, 2010  TibiaBot MX  Deja tu Comentario
Este script sirve para cuando estes usando spears y estas se acaben da un sonido de alerta, es muy bueno para los arqueros, este script solo funciona enTibiaBot NG, esta 100% probado, funciona perfectamente, deben tener en cuenta que no debera tener ninguna letra borrada o mal copiado, por esa razon verifiquen si lo han copiado correctamente. 


SCRIPT:


const
spear_amount = 5 //numero de royals spears que te queden para dar alerta
pause_time = 10 // numero de segundos de pausa entre las alertas
alert_file = 'c:\windows\media\notify.wav' // must be a wav file

begin
while not terminated do begin
UpdateWorld;
if Self.RightHand.Amount <= spear_amount then
begin
PlaySound (alert_file);
sleep(pause_time*1000);
end;
sleep(100);
end;
end;

martes, 25 de mayo de 2010

Script De Anti Paralize ( TibiaBot NG )

martes, mayo 25, 2010  TibiaBot MX  4 Comentarios
Este script sirve para no paralizarte mientras usas tibiabot ng es muy basico, y este comando funciona solo en el TibiaBot NG, esta 100% probado y funciona perfectamente, deben tener en cuenta que no debera tener ninguna letra borrada o mal copiado, por esa razon verifiquen si lo han copiado correctamente. 


SCRIPT:

while not Terminated do
begin
UpdateWorld;
if Self.Mana > minMana then
begin
if Self.Slowed then
Self.Say('utani hur');
end;
Sleep(300);
end;

lunes, 24 de mayo de 2010

Script Para Usar Mana Potion ( TibiaBot NG )

lunes, mayo 24, 2010  TibiaBot MX  10 Comentarios
Este Script sirve para poder usar mana potion, y este comando funciona solo en el TibiaBot NG, esta 100% probado y funciona perfectamente, deben tener en cuenta que no debera tener ninguna letra borrada o mal copiado, por esa razon verifiquen si lo han copiado bien. 


SCRIPT:


const
minMana =10;

while not Terminated do
begin
UpdateWorld;
if (Self.Mana < minMana) then
begin
Self.Containers.UseItemWithSelf(268);// SE VC QUER USAR OUTRA mana troque o id aki mana pequena
Sleep(1000);
end;
Sleep(100);
end;

domingo, 23 de mayo de 2010

Script Para Entrenar Con Ghoul ( TibiaBot NG )

domingo, mayo 23, 2010  TibiaBot MX  Deja tu Comentario
Este Script es para poder entrenar con ghoul mientras usar el TibiaBot NG, esta probado y funciona correctamente, deben fijarse en que este bien copiado porque con alguna letra faltante el script no funcionara.


SCRIPT:

Const

SwitchAt=50;
AttackAt=90;
var
creature:tcreature;
function GetCreatureByNameHPHIGH(Name: string): 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].Name = Name then
if Creatures.Creature[x].Health>AttackAt then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
function Attacking: boolean;
var
x: integer;
begin
Result := False;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;
if Creatures.Creature[x].Attacking then
begin
Result := True;
Exit;
end;
end;
end;
function GetAttackedCreature: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].Attacking=true then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
begin
while not Terminated do
begin
UpdateWorld;
if not attacking then
begin
Creature:=GetCreatureByNameHPHIGH('Ghoul'); //Nome do monstro
if Creature <> nil then
creature.attacking:=true;
end;
if attacking then
begin
Creature:=GetAttackedCreature;
if Creature <> nil then
if creature.Health < SwitchAt then creature.attacking:=false;
end;
sleep(1000);
end;
end;

Script Para Entrenar Con Rotworm ( TibiaBot NG )

domingo, mayo 23, 2010  TibiaBot MX  Deja tu Comentario
Este Script sirve para poder entrenar con rotworm, y este comando funciona solo en el TibiaBot NG, esta 100% probado y funciona perfectamente, deben tener en cuenta que no debera tener ninguna letra borrada o mal copiado, por esa razon verifiquen si lo han copiado bien. 


SCRIPT:


Const
NumberOfMonsters = 3 /// Numero de monstros pra trocar arma
StrongWeapon = 3324 /// ID da arma FORTE
WearWeapon = 3304 /// ID da arma FRACA
function GetItemFromOpenBackpack(ID: integer): TItem;

var
y: integer;
begin
Result := nil;
for x := 0 to Self.Containers.Count - 1 do
begin
if x >= Self.Containers.Count then Break;
for y := 0 to Self.Containers.Container[x].Count - 1 do
begin
if y >= Self.Containers.Container[x].Count then Break;
if Self.Containers.Container[x].Item[y].ID = ID then
begin
Result := Self.Containers.Container[x].Item[y];
Exit;
end;
end;
end;
end;

function CountMonstersBesideYou:Integer;
begin
Result := 0;
UpdateWorld;
for i := 0 to creatures.Count -1 do
begin
if i >= Creatures.Count then break
for x := -1 to 1 do
begin
if x >= 2 then break
for y := -1 to 1 do
begin
if y > 1 then break;
if Creatures.Creature[i].NPC then
if (Creatures.Creature[i].x = Self.X +x) and (Creatures.Creature[i].y = Self.y + y) and (Creatures.Creature[i].Z = Self.Z) then
Result := Result + 1;
end;
end;
end;
end;

while not terminated do
begin
UpdateWorld;
if CountMonstersBesideYou >= NumberOfMonsters then
begin
if Self.RightHand.ID <> StrongWeapon then
begin
Boots := GetItemFromOpenBackpack(StrongWeapon);
if Boots <> nil then
Boots.MoveToBody(Self.RightHand,0);
else Self.Displaytext('Strong Weapon werent found in open backpack!');
end;
end;
if CountMonstersBesideYou < NumberOfMonsters then begin if Self.RightHand.ID <> WearWeapon then
begin
Boots := GetItemFromOpenBackpack(WearWeapon);
if Boots <> nil then
Boots.MoveToBody(Self.RightHand,0);
else Self.Displaytext('Wear Weapon werent found in open backpack!');
end;
end;
End;

Script Para Entrenar Con Slimes ( TibiaBot NG )

domingo, mayo 23, 2010  TibiaBot MX  3 Comentarios
Este Script sirve para poder entrenar con slimes, antes de ejecutar el script debes estar preparado completamente en el sitio donde entrenaras porque cuando el script se ejecuta empezara a atacar a los slimes, este comando funciona para el TibiaBot NG.


SCRIPT:


function Attacking: boolean;
begin
   UpdateWorld;
   for x := 0 to Creatures.Count - 1 do
   begin
      UpdateWorld;
      if Creatures.Creature[x].Attacking then
      begin
         Result := True;
         Exit;
      end;
   end;
   Result := False;
   Exit;
end;

function GetFollowedCreatureID: integer;
begin
   UpdateWorld;
   for x := 0 to Creatures.Count - 1 do
   begin
      UpdateWorld;
      if Creatures.Creature[x].Following then
      begin
         Result := Creatures.Creature[x].ID;
         Exit;
      end;
   end;
end;

var
   MotherSlime, X1, Y1: integer;
begin
   MotherSlime := GetFollowedCreatureID;
   while not Terminated do
   begin
      UpdateWorld;
      if not Attacking then
      begin
         UpdateWorld;
         for x := 0 to Creatures.Count - 1 do
         begin
            UpdateWorld;
            if Creatures.Creature[x].ID <> MotherSlime then
            begin
               if (Creatures.Creature[x].Name <> Self.Name) and Creatures.Creature[x].NPC then
               begin
                  UpdateWorld;
                  X1 := Creatures.Creature[x].X;
                  Y1 := Creatures.Creature[x].Y;
                  if (X1 - Self.X = 1) or (X1 - Self.X = 0) or (X1 - Self.X = -1) then
                  begin
                     UpdateWorld;
                     if (Y1 - Self.Y = 1) or (Y1 - Self.Y = 0) or (Y1 - Self.Y = -1) then
                     begin
                        Creatures.Creature[x].Attacking := true;
                        Break;
                     end;
                  end;
               end;
            end;
         end;
      end;
      Sleep(1000);
   end;
end;

martes, 30 de marzo de 2010

Script Recoger Loot - TibiaBot NG

martes, marzo 30, 2010  TibiaBot MX  3 Comentarios


DESCRIPCION:

Este es un Script para TibiaBot NG que su funcion es recoger loot de las criaturas.

COMO INSTALAR:


1: Primero descargamos el Script y lo extraemos.
2: Despues vemos el siguiente tutorial de como usar un script en tibiabot ng -->CLICK AQUI
3: Usted debe configurar el cave hunting como normalmente lo hacia el script se encargara solo de recoger, no de configurar que recogera, usted mismo debera configurar que recojer, como normalmente lo hace.
4: Por ultimo siempre debemos tener abierto nuestro backpack para que el script funcione bien.

LINK DE DESCARGA:

Compartelo

Twitter Delicious Facebook Digg Stumbleupon Favorites More