Temat: Szukasz skryptu? Zajrzyj tutaj!

(*
 *  This swaps the rings/amulets.
 *)

const

  MightRing_ID = 3048; 
  Elven_ID     = 3082;
  StoneSkin_ID = 3081;
  IceRapier_ID = 3284;
  
(* BEGIN CONFIGURATION SECTION *)

  use_might   = 1; // Use might rings. Change to 1 if you use them.
  use_ssa     = 0; // Use stone skin amulets. Change to 1 if you use them.
  use_elven   = 1; // Use elven amulets. Change to 1 if you use them.
  use_ice     = 0; // Use ice rapiers. Change to 1 if you use them.
  use_left    = 0; // Use left hand for weapons
  use_right   = 1; // Use right hand for weapons

(* END OF CONFIGURATION SECTION - DO NOT CHANGE ANYTHING BELOW! *)

Function GetItemFromOpenBackpack(ID: integer): TItem;
var
  x: integer;
  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;

Procedure CheckSelf;
begin
  // Moves a might ring to the ring spot if it's empty.
  if use_might then
  begin
    if Self.Ring.ID <> MightRing_ID then
    begin
       Ring := GetItemFromOpenBackpack(MightRing_ID);
       if Ring <> nil then Ring.MoveToBody(Self.Ring,0);
       sleep(100);
    end;
  end;
  if use_ssa then
  begin
    if Self.Amulet.ID <> StoneSkin_ID then
    begin
      Amulet := GetItemFromOpenBackpack(StoneSkin_ID);
      if Amulet <> nil then Amulet.MoveToBody(Self.Amulet,0);
      sleep(100);
    end;   
  end
  else
  begin
    if use_elven then
    begin
      if Self.Amulet.ID <> Elven_ID then
      begin
        Amulet := GetItemFromOpenBackpack(Elven_ID);
        if Amulet <> nil then Amulet.MoveToBody(Self.Amulet,0);
        sleep(100);
      end;
    end;  
  end;
  if use_ice then
  begin
    if Self.RightHand.ID <> IceRapier_ID then
    begin
      Rapier := GetItemFromOpenBackpack(IceRapier_ID);
      if use_right then
      begin
        if Rapier <> nil then Rapier.MoveToBody(Self.RightHand, 0);
        sleep(100);
      end
      else
      begin
        if Rapier <> nil then Rapier.MoveToBody(Self.LeftHand, 0);      
        sleep(100);
      end;
    end;  
  end;
end;
 
While not Terminated do
begin
  UpdateWorld;
  CheckSelf;
  Sleep(100); 
end;

** 0 1 "hi|hey|hello|sup|yo|yoo|hiho|huhu|Hi|Hey|Sup|Yo|Yoo|Hiho|Huhu" "hi", "hey", "hello", "Hiho", "Yo :P"
** 0 2 "food|food plz|food?|Food|Food plz|Food Pls|Food Plz?|Got food?|I need food" "no i need too","nope", "no", "nah", "Sorry but i need food too :P"
** 0 1 "botter|Botter|Bot?|Bot|NG?|BOTTER!|You Botting?" "Like i would need to use a bot :P", "Hahaha...NO", "Dont be stupid"
** 0 2 "reported|botting|cheater|cave bot|Botting|Cave Botter|Reported" "Sure -.- what ever you say", "yes ofcourse...NOT", "whuauhauauhhua"
** 0 1 "What colour are my shoes?" "blue :D", "Dont you even know the colour of your shoes? Its blue :D"
** 0 1 "no kill|mine|no attack|no atk|dont kill them|MINE|No kill|Mine|Oi thats mine|-.- That was my kill|No atk|Dont kill pls" "I need exp man :S", "we all need exp"
** 0 2 "training|Training pls|Skill|i skill|Skill|Skill pls|skill pls" "lol go for it", "xD ok man but i need exp"
** 0 1 "can you rope me up|rope?|rope|Rope pls|Rope me up please|Rope up please" "I need hunting sorry", "sorry leveling atm"
** 0 1 "noob|naab|nabb|nab|noobie|newb|newbie|NOOB|Nab|Noob|-.- Noob|-.- noob" "-.- sure man", "whahauha xD sooo funny"
** 0 1 "br|pl|nl|be|swe|Br?|Pl?|Swe?|Be?" "no"
** 0 1 "oi|hola" "not br", "english plx"
** 0 1 "no|No|NO|No!" "no?"
** 0 1 "lol|:D|rofl|lmao|ftw|wtf|Lol|Rofl|Lmao|FTW|Ftw|Wtf|WTF|" ":D" "rofl" "haha" "lmao"
** 0 1 "skills?|skill|skills|Skills?|Skill?" "look online", "secret"
** 0 1 "can I hunt here?|I am here|Me here|me here" "sorry I need level", "leave please", "leave!"
** 0 2 "What colour does a banana have?|what is the collor of a banana?|What colour is a banana?|What colour can a banana be?" "yellow, sometimes green if to when its very ripe :P why?"
** 0 1 "play fair and safe|Play on|Sorry play on|Carry on" "hehe I will xD"
** 0 2 "what are you doing here?|What are you doing here?" "Hunting :P"
** 0 1 "what colour is the sky?|what is the collor of the sky?|What colour is the sky?|" "blue..."
** 0 1 "leave|leave!|leave plxx|Leave|Leave now|LEAVE!|LEAVE" "I need exp man :S"
** 0 2 "sup?|everything ok?|whats up?|how are you?|Yo sup?|What's up|Whats up|Hows you?|How are you?" "fine but lemme hunt now"
** 0 1 "where you from?|Where are you from?" "secret ^^"
** 0 1 "what level are you?|What level are you?" "lol just look at me :p"
** 0 1 "need mana|mana gaining|Need mana|Mana gaining" "ok :)"
** 0 1 "pk help|pk|pks|pking|PK|Pk|HELP PK|PK HELP ME" "sorry cant help"
** 0 2 "fuck you|FUCK YOU|fu|FU" ":( not nice man"
** 0 1 "what is your vocation?|Voc?|Vocation?" "look at me and you'll see ^^"
** 0 1 "what color does my outfit has?|what is the collor of my outfit?|What colour is my outfit?" "blue :)"
** 0 1 "what you doing?|What are you doing?" "leveling", "hunting"
** 0 1 "key|key please|open door|key for door|Key pls?|Key?|Open door pls" "im loosing exp that way"
** 0 2 "shovel|shovel please|shovel plx|hole|open hole|Shovel pls|open hole pls|" "sorry I need to hunt"
** 0 1 "what colour does the sea have?|What colour is the sea?|What colour can the sea be?" "blue..."
** 0 1 "say: sure -.- you so funny if you bot|You sure your not a botter?" "Im not a botter xD"
** 0 1 "what monsters are you killing?|What monsters are killing?" "are you blind? -.-", "ALL THE MONSTERS HEUHUEHUEUHEU"
** 0 1 "pro|protected|protection|I have pro|Protected|Protection|Pro" "and? So do I..."
** 0 1 "?|?!" "?? what?"
** 0 2 "what?|What?!|What?" "what?"
** 0 1 "whats your problem?|What is your problem?|Whats your problem" "I got no problem"
** 0 1 "wtf|ftw|WTF|FTW" "??"
** 0 1 "me so evil|I am the devil|satan|evul|Evul|Satan" "LOL whuahuahuahu"
** 0 1 "move|walk|gogogo|move!|MOVE|Move now or die|Gogogogo|Walk|Move out the way" "Why? I have time xD"
** 0 1 "stop|STOP|stop plx|stop!|Stop|Oi Stop it|" "-.- I need level!!"
** 0 1 "ban|banned|banishment|banning you|Ban|Banned|Going to ban you" "why man? im not doing anything wrong :S"
** 0 1 "help me|HELP|help!|Help|helping" "no man find other help"
** 0 1 "..I..|..l..|loser|dickhead|butthead|fucker" "I laugh with your face"
** 0 1 "what colour does an apple have?|What colour is apples?|" "In tibia they are red, in rl they can be green, red and some more colours:P"
** 0 1 "what is my name?|What is my name?" "dont you know your own name? xD"
** 0 1 "block|blocked|stuck|trap|trapped|traped|Trapped|Blocked|Haha Blocked|Blocked botter" "lol funny that you trap me :p"
** 0 1 "time|whats the time?|clock?|time?|What is the time?|Time pls" "lol look at the clock -.-"
** 0 1 "answer please|answer me|answer!|ANSWER|Answer me :@|Answer now or dead" "I am, I am, patience :)"
** 0 1 "Ho are you?|how are you?|ho are you?|How are you?" "fine thank you"
** 0 1 "talk to me please|talk to me|talk!|Talk to me please|Talk pls|Talk now" "i no good english"
** 0 1 "fun|pleasure|having fun|funny|Fun|Funny|Having fun?" "tibia big fun!"
** 0 1 "cool|very cool|Cool|COOL|ubercool|kewl|cewl|KEWL" "yes very cool"
** 0 1 "kill|kill them|KILL|kill monsters" "..."
** 0 1 "...|.|.." "..."
** 0 1 "bad|good|Good|Bad" "yeps"
** 0 1 "NG|tibiaauto|blackD|tibiaNG|TibiaBotNG|ng|Tibia bot|Botttttt" "what that?", "wtf u saying?", "???"
** 0 1 "heal|healing please|healplx|HEAL|HEALING|Heal Pls|Heal pls|Heal|Heal plx" "heal yourself...", "go ask someone else"
** 0 1 "hehe|haha|hihi|HEHE|Hehe" "^^"
** 0 1 "friends?|friend|friend?|friends|amigo" "Ill think about it ;]"
** 0 1 "runemaking|runes|rune|RUNEMAKING" "I am runemaking :)", "why?"
** 0 1 "fishing|fishing rod|Fishing|fishing fast|fish fast" "yes I can fish good", "im a fishing owner lol :p"
** 0 1 "typ|typ fast|TYP|fast|Fast typer :D|Very Fast typer" "Yes im really fast", "trained alot on speed", "im one hell of a racemachine"
** 0 1 "nice|very nice|Nice|NICE" "nice! :D"
** 0 1 "what world do you play?|world?|what world is this?|What world is this?" "XXX"
** 0 1 "What is your vocation?|what is your vocation|what is your voc?|whats your vocation?|whats ur vocation?" "XXX and I like it"
** 0 1 "leveling|hunting|skilling|killing monsters|Leaveling|Hunting here|Im here|Me here" "leave I need full exp"
** 0 1 "what is your name?|name?|rl name|your name?|Name?" "LOL it is secret xD"
** 0 1 "good exp?|enough exp?|Is the cave big enough?|cave big?|big cave?|Good exp?|Cave big enough for 2 of us", "trained alot on speed", "im one hell of a racemachine"
** 0 1 "What collor is your hair?|What colour is your hair?" "euhm in rl brown and here..ya can see :p"
** 0 1 "what collor is the gras?|what colour does grass have?|What colour is the grass?" "green :)", "normal grass is green xD"
** 0 1 "how do you talk?|how you talk to people?|How do you talk?" "typ and do enter..."
** 0 1 "what is the name of this game?|name of this game?|How is this game called?|What is this game called?|What game called?" "tibia? :P"
** 0 1 "bye|Bye|cya|Cya|See you later|See ya|see ya|baba|bb|goodbye|Goodbye" "cya :)"
** 0 1 "Auto responder?|Autorespond|Responder?" ":o tibia has that now? wow"
** 0 1 "Think your cool?|think your cool?" "My mum said i was cool =]", "Cooler than you :P"
** 0 1 "Stop killing my stuff" "I was here first", "now its my stuff :D"