constminMana = 20; //Mana que precisa para soltar exurawhile not Terminated dobeginUpdateWorld;if Self.Mana > minMana thenbeginif Self.Slowed thenSelf.Say('exura');Sleep(300);end;end; ConstMoveWhere = 'north' // mude conforme o lado da portaprocedure Event_Attacked(ID:integer);beginUpdateWorld;for i := 0 to Creatures.Count -1 dobeginif Creatures.Creature.ID = ID thenbegincase MoveWhere of'north': Self.MoveUp;'south': Self.MoveDown;'east': Self.MoveLeft;'west': Self.MoveRight;end;Leave := true;end;sleep(100);end;end;while not terminated dobeginupdateWorld;if (MoveWhere <> 'north') and (MoveWhere <> 'south') and (MoveWhere <> 'west') and (MoveWhere <> 'east')thenbeginSelf.DisplayText('You MUST enter north, south, east or west! Script will close now, please try again.');break;end;Leave := false;UpdateWorld;ProcessEvents;if Leave then break;sleep(500);end; *~Lembrete~*Escript para Usar MF No TibiaBOT NG! na parte 200 Significa a Quantidade minima para Usar, quando estiver com 200 ele vai usar a MFID: 268Se voce quiser muda o id para usar uma MF para o desejado level da MF basta muda o ID do item que no caso e 268.constminMana = 200; //Mana pra usar Mf pequenawhile not Terminated dobeginUpdateWorld;if (Self.Mana < minMana) thenbeginSelf.Containers.UseItemWithSelf(268)Sleep(1000);end;Sleep(100);end; ConstSoft=6529; //6529 ID Softboots in bagSoftbody=3549;//3549 ID soft in useBsteel=3079; // obs 3554 is ID of Steel bootsManaMin=500;// to start use softManaMax=700;//mana to stop softvarFeetID: integer;function GetItemFromOpenBackpack(ID: integer): TItem;vary: integer;beginResult := nil;for x := 0 to Self.Containers.Count - 1 dobeginif x >= Self.Containers.Count then Break;for y := 0 to Self.Containers.Container[x].Count - 1 dobeginif y >= Self.Containers.Container[x].Count then Break;if Self.Containers.Container[x].Item[y].ID = ID thenbeginResult := Self.Containers.Container[x].Item[y];Exit;end;end;end;end;beginFeetID := Bsteel;while not Terminated dobeginUpdateWorld;if Self.Mana > ManaMax thenbeginif Self.Feet.ID = Softbody thenbeginFeet := GetItemFromOpenBackpack(Bsteel);if Feet <> nil thenbeginFeet.MoveToBody(Self.Feet, 0);end;end;endelsebeginBoh := GetItemFromOpenBackpack(Soft);if Self.Mana < ManaMin thenif Self.Feet.ID = Bsteel thenbeginBoh.MoveToBody(Self.Feet, 0);end;end;Sleep(100);end;end; ConstSpearID = 3277Spell = 'Exeta con'MinMana = 600MinSoul = 5WeaponID = 3291function GetItemFromOpenBackpack(ID: integer): TItem;vary: integer;beginResult := nil;for x := 0 to Self.Containers.Count - 1 dobeginif x >= Self.Containers.Count then Break;for y := 0 to Self.Containers.Container[x].Count - 1 dobeginif y >= Self.Containers.Container[x].Count then Break;if Self.Containers.Container[x].Item[y].ID = ID thenbeginResult := Self.Containers.Container[x].Item[y];Exit;end;end;end;end;While not terminated dobeginUpdateWorld;if Self.Mana >= MinMana thenif Self.Soul >= MinSoul thenbeginSpear := GetItemFromOpenBackpack(SpearID);if Spear <> nil thenSpear.MoveToBody(Self.RightHand,1);Sleep(800);UpdateWorld;If Self.RightHand.ID = SpearID thenSelf.Say(Spell);UpdateWorld;Weapon := GetItemFromOpenBackpack(WeaponID);if Weapon <> nil thenWeapon.MoveToBody(Self.RightHand,0);end;sleep(500);end; Ele: Ontem eu te vi de maos dadas com outro cara. Ele era.. da hora. Mas ele segurava nas suas maos de maneira errada e ele te deixou andar do lado de fora da calcada. Olha, eu sei que terminei com voce falando que queria curti. E curti, curti muita fossa, muito choro e muita gente falando que eu era idiota. Eu podia ter feito voce tao feliz. Eu deveria ter sujado sua boca com o sorvete, eu deveria ter pego voce no colo e te jogado na areia da praia. Lembra quando voce cortou o cabelo e eu nao falei nada? Eu deveria ter falado que aquele corte te deixou mais linda, que quando o vento batia nos seus cabelos e voce olhava para baixo eu tinha certeza de que queria ficar com voce pra sempre. Eu nao to mentindo, tentei por vezes criar coragem e vir ate aqui. Me chama, vai, me chama de burro. Me chama de burro por nao ter visto que seu sorriso era o mais lindo do mundo, por nao ter visto a curva dos seus cilios quase tocando nas suas sobrancelhas. Me