Again...Taking requests/suggestions

TyroneG

Master
Any improvements you could make to this?

Code:
if not listexists 'tameables'
  createlist 'tameables'
  pushlist 'tameables' 0x4a //Imp
  pushlist 'tameables' 0x7t //Hellcat (Large)
  pushlist 'tameables' 0x62 //Hellhound
  pushlist 'tameables' 0xbc //Savage Ridgeback
  pushlist 'tameables' 0xbb //Ridgeback
  pushlist 'tameables' 0x17 //Dire Wolf
  pushlist 'tameables' 0xce //Lava Lizard
  pushlist 'tameables' 0x14 //Frost spider
  pushlist 'tameables' 0xc9 //Hellcat (Small)
  pushlist 'tameables' 0xda //Frenzied Ostard
  pushlist 'tameables' 0x50 //Giant Toad
  pushlist 'tameables' 0xe8 //Bull
  pushlist 'tameables' 0xe9 //Bull2
  pushlist 'tameables' 0x22 //White Wolf
  pushlist 'tameables' 0x25 //White Wolf2
endif
if not @inrange 'tobetamed' 5
  @unsetalias 'tobetamed'
  for 0 in 'tameables'
    if @findtype tameables[] 'any' 'ground' 1 5
      @setalias 'tobetamed' 'found'
      break
    endif
  endfor
endif
@clearjournal
useskill 'Peacemaking'
target 'tobetamed'
pause 200
if @injournal 'hypnotic' 'system'
  pause 5000
  autotargetobject 'tobetamed'
  useskill 'Animal Taming'
else if @injournal 'calmed' 'system'
  autotargetobject 'tobetamed'
  pause 1000
  useskill 'Animal Taming'
endif

Here's a few changes that I think work good. If anyone can give a list of animals/skill levels I can automatically add animals to tame based on skill level.

Code:
///////////////////////
//Peace/Tame script ///
//Made by Aga       ///
//Do not loop       ///
///////////////////////
@clearlist 'nameoftames'
@clearlist 'numberoffollowers'
@clearlist 'peacemakeyesorno'
@clearlist 'pathfinding'
@clearlist 'tameables'
@createlist 'nameoftames'
@createlist 'numberoffollowers'
@createlist 'peacemakeyesorno'
@createlist 'pathfinding'
/////////////////////////
//Setup section      ////
/////////////////////////
pushlist 'nameoftames' 'thxaga'       //Change thxaga to whatever name you want
pushlist 'numberoffollowers' '1'      //Change 1 to however many followers you currently have
pushlist 'peacemakeyesorno' 'yes'     //yes or no if you want to peacemake
pushlist 'pathfinding' 'no'           //yes or no if you want to pathfind to tame
/////////////////////////
//End Setup          ////
/////////////////////////
@clearjournal
if not timerexists 'skilltimer'
  createtimer 'skilltimer'
  settimer 'skilltimer' 10000
endif
@createlist 'tameables'
pushlist 'tameables' 0x4a //Imp
pushlist 'tameables' 0x7t //Hellcat (Large)
pushlist 'tameables' 0x62 //Hellhound
pushlist 'tameables' 0xbc //Savage Ridgeback
pushlist 'tameables' 0xbb //Ridgeback
pushlist 'tameables' 0x17 //Dire Wolf
pushlist 'tameables' 0xce //Lava Lizard
pushlist 'tameables' 0x14 //Frost spider
pushlist 'tameables' 0xc9 //Hellcat (Small)
pushlist 'tameables' 0xda //Frenzied Ostard
pushlist 'tameables' 0x50 //Giant Toad
pushlist 'tameables' 0xe8 //Bull
pushlist 'tameables' 0xe9 //Bull2
pushlist 'tameables' 0x22 //White Wolf
pushlist 'tameables' 0x25 //White Wolf2
while not dead 'self'
  if not @inrange 'currentlytaming' 10
    @headmsg 'Too far away! Ignoring for now.' 34 'currentlytaming'
    @unsetalias 'currentlytaming'
    for 0 to 'tameables'
      if @findtype tameables[] 'any' 'ground' 1 8
        @setalias 'currentlytaming' 'found'
        if innocent 'currentlytaming'
          @headmsg 'This is already tame' 34 'currentlytaming'
          ignoreobject 'currentlytaming'
          unsetalias 'currentlytaming'
        endif
      endif
    endfor
  endif
  if not @inrange 'currentlytaming' 2
    @headmsg 'Not close enough!' 34 'currentlytaming'
  endif
  if @inlist 'peacemakeyesorno' 'Yes' or @inlist 'peacemakeyesorno' 'yes'
    if war 'currentlytaming'
      if war 'self'
        warmode 'off'
      endif
      if timer 'skilltimer' > 10000
        @cleartargetqueue
        @canceltarget
        while not targetexists 'any'
          useskill 'Peacemaking'
        endwhile
        settimer 'skilltimer' 0
        target 'currentlytaming'
        if war 'self'
          warmode 'off'
        endif
      endif
    endif
  endif
  if @inlist 'peacemakeyesorno' 'No' or @inlist 'peacemakeyesorno' 'no'
    if @inrange 'currentlytaming' 2
      if war 'self'
        warmode 'off'
      endif
      if timer 'skilltimer' > 10000
        @cleartargetqueue
        @canceltarget
        while not targetexists 'any'
          useskill 'Animal Taming'
        endwhile
        settimer 'skilltimer' 0
        target 'currentlytaming'
        pause 200
        if @injournal 'That is too far away' 'system'
          settimer 'skilltimer' 10001
          clearjournal'
        endif
        if @injournal 'You have no chance of taming this creature' 'system' or @injournal 'do not have a clear path to the animal' 'system'
          ignoreobject 'currentlytaming'
          unsetalias 'currentlytaming'
          @clearjournal
        endif
        if @injournal 'This animal has had too many owners' 'system' or @injournal 'That animal looks tame already' 'system'
          ignoreobject 'currentlytaming'
          unsetalias 'currentlytaming'
          @clearjournal
        endif
      endif
    endif
  endif
  if @inlist 'peacemakeyesorno' 'Yes' or @inlist 'peacemakeyesorno' 'yes'
    if not war 'currentlytaming'
      if @inrange 'currentlytaming' 2
        if war 'self'
          warmode 'off'
        endif
        if timer 'skilltimer' > 10000
          @cleartargetqueue
          @canceltarget
          while not targetexists 'any'
            useskill 'Animal Taming'
          endwhile
          settimer 'skilltimer' 0
          target 'currentlytaming'
          pause 200
          if @injournal 'That is too far away' 'system'
            settimer 'skilltimer' 10001
            @clearjournal
          endif
          if @injournal 'You have no chance of taming this creature' 'system' or @injournal 'do not have a clear path to the animal' 'system'
            ignoreobject 'currentlytaming'
            unsetalias 'currentlytaming'
            @clearjournal
          endif
          if @injournal 'This animal has had too many owners' 'system' or @injournal 'That animal looks tame already' 'system'
            ignoreobject 'currentlytaming'
            unsetalias 'currentlytaming'
            @clearjournal
          endif
        endif
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '0'
    if followers > 0
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '1'
    if followers > 1
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '2'
    if followers > 2
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '3'
    if followers > 3
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '4'
    if followers > 4
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'pathfinding' 'yes' or @inlist 'pathfinding' 'Yes'
    if not @inrange 'currentlytaming' 1
      if @x 'currentlytaming' > x 'self' and @y 'currentlytaming' > y 'self'
        walk 'Southeast'
      elseif @x 'currentlytaming' < x 'self' and @y 'currentlytaming' > y 'self'
        walk 'Southwest'
      elseif @x 'currentlytaming' > x 'self' and @y 'currentlytaming' < y 'self'
        walk 'Northeast'
      elseif @x 'currentlytaming' < x 'self' and @y 'currentlytaming' < y 'self'
        walk 'Northwest'
      elseif @x 'currentlytaming' > x 'self' and @y 'currentlytaming' == y 'self'
        walk 'East'
      elseif @x 'currentlytaming' < x 'self' and @y 'currentlytaming' == y 'self'
        walk 'West'
      elseif @x 'currentlytaming' == x 'self' and @y 'currentlytaming' > y 'self'
        walk 'South'
      elseif @x 'currentlytaming' == x 'self' and @y 'currentlytaming' < y 'self'
        walk 'North'
      endif
    endif
  endif
endwhile
 
Last edited:
Here's a few changes that I think work good. If anyone can give a list of animals/skill levels I can automatically add animals to tame based on skill level.

Code:
///////////////////////
//Peace/Tame script ///
//Made by Aga       ///
//Do not loop       ///
///////////////////////
@clearlist 'nameoftames'
@clearlist 'numberoffollowers'
@clearlist 'peacemakeyesorno'
@clearlist 'pathfinding'
@clearlist 'tameables'
@createlist 'nameoftames'
@createlist 'numberoffollowers'
@createlist 'peacemakeyesorno'
@createlist 'pathfinding'
/////////////////////////
//Setup section      ////
/////////////////////////
pushlist 'nameoftames' 'thxaga'       //Change thxaga to whatever name you want
pushlist 'numberoffollowers' '1'      //Change 1 to however many followers you currently have
pushlist 'peacemakeyesorno' 'yes'     //yes or no if you want to peacemake
pushlist 'pathfinding' 'no'           //yes or no if you want to pathfind to tame
/////////////////////////
//End Setup          ////
/////////////////////////
@clearjournal
if not timerexists 'skilltimer'
  createtimer 'skilltimer'
  settimer 'skilltimer' 10000
endif
@createlist 'tameables'
pushlist 'tameables' 0x4a //Imp
pushlist 'tameables' 0x7t //Hellcat (Large)
pushlist 'tameables' 0x62 //Hellhound
pushlist 'tameables' 0xbc //Savage Ridgeback
pushlist 'tameables' 0xbb //Ridgeback
pushlist 'tameables' 0x17 //Dire Wolf
pushlist 'tameables' 0xce //Lava Lizard
pushlist 'tameables' 0x14 //Frost spider
pushlist 'tameables' 0xc9 //Hellcat (Small)
pushlist 'tameables' 0xda //Frenzied Ostard
pushlist 'tameables' 0x50 //Giant Toad
pushlist 'tameables' 0xe8 //Bull
pushlist 'tameables' 0xe9 //Bull2
pushlist 'tameables' 0x22 //White Wolf
pushlist 'tameables' 0x25 //White Wolf2
while not dead 'self'
  if not @inrange 'currentlytaming' 10
    @headmsg 'Too far away! Ignoring for now.' 34 'currentlytaming'
    @unsetalias 'currentlytaming'
    for 0 to 'tameables'
      if @findtype tameables[] 'any' 'ground' 1 8
        @setalias 'currentlytaming' 'found'
        if innocent 'currentlytaming'
          @headmsg 'This is already tame' 34 'currentlytaming'
          ignoreobject 'currentlytaming'
          unsetalias 'currentlytaming'
        endif
      endif
    endfor
  endif
  if not @inrange 'currentlytaming' 2
    @headmsg 'Not close enough!' 34 'currentlytaming'
  endif
  if @inlist 'peacemakeyesorno' 'Yes' or @inlist 'peacemakeyesorno' 'yes'
    if war 'currentlytaming'
      if war 'self'
        warmode 'off'
      endif
      if timer 'skilltimer' > 10000
        @cleartargetqueue
        @canceltarget
        while not targetexists 'any'
          useskill 'Peacemaking'
        endwhile
        settimer 'skilltimer' 0
        target 'currentlytaming'
        if war 'self'
          warmode 'off'
        endif
      endif
    endif
  endif
  if @inlist 'peacemakeyesorno' 'No' or @inlist 'peacemakeyesorno' 'no'
    if @inrange 'currentlytaming' 2
      if war 'self'
        warmode 'off'
      endif
      if timer 'skilltimer' > 10000
        @cleartargetqueue
        @canceltarget
        while not targetexists 'any'
          useskill 'Animal Taming'
        endwhile
        settimer 'skilltimer' 0
        target 'currentlytaming'
        pause 200
        if @injournal 'That is too far away' 'system'
          settimer 'skilltimer' 10001
          clearjournal'
        endif
        if @injournal 'You have no chance of taming this creature' 'system' or @injournal 'do not have a clear path to the animal' 'system'
          ignoreobject 'currentlytaming'
          unsetalias 'currentlytaming'
          @clearjournal
        endif
        if @injournal 'This animal has had too many owners' 'system' or @injournal 'That animal looks tame already' 'system'
          ignoreobject 'currentlytaming'
          unsetalias 'currentlytaming'
          @clearjournal
        endif
      endif
    endif
  endif
  if @inlist 'peacemakeyesorno' 'Yes' or @inlist 'peacemakeyesorno' 'yes'
    if not war 'currentlytaming'
      if @inrange 'currentlytaming' 2
        if war 'self'
          warmode 'off'
        endif
        if timer 'skilltimer' > 10000
          @cleartargetqueue
          @canceltarget
          while not targetexists 'any'
            useskill 'Animal Taming'
          endwhile
          settimer 'skilltimer' 0
          target 'currentlytaming'
          pause 200
          if @injournal 'That is too far away' 'system'
            settimer 'skilltimer' 10001
            @clearjournal
          endif
          if @injournal 'You have no chance of taming this creature' 'system' or @injournal 'do not have a clear path to the animal' 'system'
            ignoreobject 'currentlytaming'
            unsetalias 'currentlytaming'
            @clearjournal
          endif
          if @injournal 'This animal has had too many owners' 'system' or @injournal 'That animal looks tame already' 'system'
            ignoreobject 'currentlytaming'
            unsetalias 'currentlytaming'
            @clearjournal
          endif
        endif
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '0'
    if followers > 0
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '1'
    if followers > 1
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '2'
    if followers > 2
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '3'
    if followers > 3
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'numberoffollowers' '4'
    if followers > 4
      settimer 'skilltimer' 0
      @rename 'currentlytaming' nameoftames[0]
      if name 'currentlytaming' == nameoftames[0]
        waitforcontext 'currentlytaming' 8 15000
        while not @gumpexists 0x909cc741
          pause 500
        endwhile
        pause 500
        replygump 0x909cc741 2
        ignoreobject 'currentlytaming'
        unsetalias 'currentlytaming'
        pause 500
        settimer 'skilltimer' 10001
      endif
    endif
  endif
  if @inlist 'pathfinding' 'yes' or @inlist 'pathfinding' 'Yes'
    if not @inrange 'currentlytaming' 1
      if @x 'currentlytaming' > x 'self' and @y 'currentlytaming' > y 'self'
        walk 'Southeast'
      elseif @x 'currentlytaming' < x 'self' and @y 'currentlytaming' > y 'self'
        walk 'Southwest'
      elseif @x 'currentlytaming' > x 'self' and @y 'currentlytaming' < y 'self'
        walk 'Northeast'
      elseif @x 'currentlytaming' < x 'self' and @y 'currentlytaming' < y 'self'
        walk 'Northwest'
      elseif @x 'currentlytaming' > x 'self' and @y 'currentlytaming' == y 'self'
        walk 'East'
      elseif @x 'currentlytaming' < x 'self' and @y 'currentlytaming' == y 'self'
        walk 'West'
      elseif @x 'currentlytaming' == x 'self' and @y 'currentlytaming' > y 'self'
        walk 'South'
      elseif @x 'currentlytaming' == x 'self' and @y 'currentlytaming' < y 'self'
        walk 'North'
      endif
    endif
  endif
endwhile

hell of a script.. and very clever to use lists as settings
 

TyroneG

Master
i cant get your item id wiith skill going, ids 1 item thn stops. turning on loop doesnt work.

Try this. I'm guessing this is the script you are talking about. I changed a few things around. Don't loop.

Code:
// Author: Experience (Edited from Burger's version)
// Description: Auto-ID items in a bag, sort out awesome weapons
// to a seperate bag
// Important:
// 1) frombag is your bag of unidentified items, tobag is the bag of crap you
//    are going to sell, usually it's in my backpack so there is a weight check..
//    awesomebag is for weapons I want to keep or look closer at..
// 3) comment the next 3 lines to make it not prompt you for new bags each time
unsetalias 'frombag'
unsetalias 'tobag'
unsetalias 'toawesomebag'
if not @findobject 'frombag'
  headmsg 'Select From Bag'
  promptalias 'frombag'
endif
pause 700
if not @findobject 'tobag'
  headmsg 'Select Sell/To Bag'
  promptalias 'tobag'
endif
pause 700
if not @findobject 'toawesomebag'
  headmsg 'Select Awesome Bag'
  promptalias 'toawesomebag'
endif
pause 700
if not listexists 'ItemTypes'
  createlist 'ItemTypes'
endif
useobject 'frombag'
useobject 'tobag'
useobject 'toawesomebag'
clearlist 'ItemTypes'
clearignorelist
//Shields
@pushlist 'ItemTypes' 0x1b72 //BronzeShields
@pushlist 'ItemTypes' 0x1b73 //Buckler
@pushlist 'ItemTypes' 0x1b7b //MetalShield
@pushlist 'ItemTypes' 0x1b74 //Metal Kite Shield
@pushlist 'ItemTypes' 0x1b79 //Tear Kite Shield
@pushlist 'ItemTypes' 0x1b7a //WoodenShield
@pushlist 'ItemTypes' 0x1b76 //HeaterShield
//Platemail
@pushlist 'ItemTypes' 0x1408 //Close Helmet
@pushlist 'ItemTypes' 0x1410 //Platemail Arms
@pushlist 'ItemTypes' 0x1411 //Platemail Legs
@pushlist 'ItemTypes' 0x1412 //Plate Helm
@pushlist 'ItemTypes' 0x1413 //Plate Gorget
@pushlist 'ItemTypes' 0x1414 //Platemail Gloves
@pushlist 'ItemTypes' 0x1415 //Plate Chest
@pushlist 'ItemTypes' 0x140a //Helmet
@pushlist 'ItemTypes' 0x140c //Bascinet
@pushlist 'ItemTypes' 0x140e //Norse Helm
//Chainmail
@pushlist 'ItemTypes' 0x13bb //Chainmail Coif
@pushlist 'ItemTypes' 0x13be //Chainmail Leggins
@pushlist 'ItemTypes' 0x13bf //Chainmail Tunic
//Ringmail
@pushlist 'ItemTypes' 0x13ee //Ringmail Sleeves
@pushlist 'ItemTypes' 0x13eb //Ringmail Gloves
@pushlist 'ItemTypes' 0x13ec //Ringmail Tunic
@pushlist 'ItemTypes' 0x13f0 //Ringmail Leggins
//Studded
@pushlist 'ItemTypes' 0x13da //Studded Leggings
@pushlist 'ItemTypes' 0x13db //Studded Tunic
@pushlist 'ItemTypes' 0x13d5 //Studded Gloves
@pushlist 'ItemTypes' 0x13d6 //Studded Gorget
@pushlist 'ItemTypes' 0x13dc //Studded Sleeves
//Leather
@pushlist 'ItemTypes' 0x13c6 //Leather Gloves
@pushlist 'ItemTypes' 0x13cd //Leather Sleeves
@pushlist 'ItemTypes' 0x13cc //Leather Tunic
@pushlist 'ItemTypes' 0x13cb //Leather Pants
@pushlist 'ItemTypes' 0x13c7 //Leather Gorget
@pushlist 'ItemTypes' 0x1db9 //Leather Cap
//Female Armor
@pushlist 'ItemTypes' 0x1c04 //Female Plate
@pushlist 'ItemTypes' 0x1c0c //Female Studded Bustier
@pushlist 'ItemTypes' 0x1c02 //Female Studded Armor
@pushlist 'ItemTypes' 0x1c00 //Female Leather Shorts
@pushlist 'ItemTypes' 0x1c08 //Female Leather Skirt
@pushlist 'ItemTypes' 0x1c06 //Female Leather Armor
@pushlist 'ItemTypes' 0x1c0a //Female Leather Bustier
//Fencing
@pushlist 'ItemTypes' 0xf62  //Spear
@pushlist 'ItemTypes' 0x1403 //Short Spear
@pushlist 'ItemTypes' 0xe87  //Pitchfork
@pushlist 'ItemTypes' 0x1405 //Warfork
@pushlist 'ItemTypes' 0x1401 //Kryss
@pushlist 'ItemTypes' 0xf52  //Dagger
//Macing
@pushlist 'ItemTypes' 0x13b0 //War axe
@pushlist 'ItemTypes' 0xdf0  //Black Staff
@pushlist 'ItemTypes' 0x1439 //War Hammer
@pushlist 'ItemTypes' 0x1407 //War Mace
@pushlist 'ItemTypes' 0xe89  //Quarter Staff
@pushlist 'ItemTypes' 0x143d //Hammer Pick
@pushlist 'ItemTypes' 0x13b4 //Club
@pushlist 'ItemTypes' 0xe81  //Shepherds Crook
@pushlist 'ItemTypes' 0x13f8 //Gnarled Staff
@pushlist 'ItemTypes' 0xf5c  //Mace
@pushlist 'ItemTypes' 0x143b //Maul
//Swords
@pushlist 'ItemTypes' 0x13b9 //Viking Sword
@pushlist 'ItemTypes' 0xf61  //Longsword
@pushlist 'ItemTypes' 0x1441 //Cutlass
@pushlist 'ItemTypes' 0x13b6 //Scimitar
@pushlist 'ItemTypes' 0xec4  //Skinning Knife
@pushlist 'ItemTypes' 0x13f6 //Butcher Knife
@pushlist 'ItemTypes' 0xf5e  //Broadsword
@pushlist 'ItemTypes' 0x13ff //Katana
@pushlist 'ItemTypes' 0xec3  //Cleaver
//Axes
@pushlist 'ItemTypes' 0xf43 //Hatchet
@pushlist 'ItemTypes' 0xf45 //Executioner's Axe
@pushlist 'ItemTypes' 0xf4d //Bardiche
@pushlist 'ItemTypes' 0xf4b  //Double Axe
@pushlist 'ItemTypes' 0x143e //Halberd
@pushlist 'ItemTypes' 0x13fb //Large Battle Axe
@pushlist 'ItemTypes' 0x1443 //Two Handed Axe
@pushlist 'ItemTypes' 0xf47  //Battle Axe
@pushlist 'ItemTypes' 0xf49  //Axe
@pushlist 'ItemTypes' 0xe85  //Pickaxe
@pushlist 'ItemTypes' 0xe86  //Pickaxe
//Bows
@pushlist 'ItemTypes' 0x13fd //HeavyXbow
@pushlist 'ItemTypes' 0xf50  //Xbow
@pushlist 'ItemTypes' 0x13b2 //bow
for 0 to 'ItemTypes'
  while @findtype 'ItemTypes[]' 'any' 'frombag'
    pause 500
    @clearjournal
    while not targetexists 'any'
      pause 100
      useskill 'Item Identification'
    endwhile
    target! found
    pause 500
    if @injournal 'Silver' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Silver'
      @clearjournal
    elseif @injournal 'Vanquishing' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Vanquishing'
      @clearjournal
    elseif @injournal 'Power' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Power'
      @clearjournal
    elseif @injournal 'Exorcism' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Exorcisim'
      @clearjournal
    elseif @injournal 'Daemon' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Daemon'
      @clearjournal
    elseif @injournal 'Gargoyle' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Gargoyle'
      @clearjournal
    elseif @injournal 'Fey' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Fey'
      @clearjournal
    elseif @injournal 'Respond' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Respond'
      @clearjournal
    elseif @injournal 'Vacuum' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Vacuum'
      @clearjournal
    elseif @injournal 'Flame' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Flame'
      @clearjournal
    elseif @injournal 'Elemental' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Elemental'
      @clearjournal
    elseif @injournal 'Earth' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Earth'
      @clearjournal
    elseif @injournal 'Water' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Water'
      @clearjournal
    elseif @injournal 'Ogre' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Ogre'
      @clearjournal
    elseif @injournal 'Orc Slaying' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Orc'
      @clearjournal
    elseif @injournal 'Arachnid' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Arachnid'
      @clearjournal
    elseif @injournal 'Spider' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Spider'
      @clearjournal
    elseif @injournal 'Scorpion' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Scorpion'
      @clearjournal
    elseif @injournal 'Terathan' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Terathan'
      @clearjournal
    elseif @injournal 'Reptile' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Reptile'
      @clearjournal
    elseif @injournal 'Dragon' 'system'
      headmsg 'Dragon'
      moveitem found 'toawesomebag'
      @clearjournal
    elseif @injournal 'Lizardman' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Lizardman'
      @clearjournal
    elseif @injournal 'Ophidian' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Ophidan'
      @clearjournal
    elseif @injournal 'Snake' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Snake'
      @clearjournal
    elseif @injournal 'Undead' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Undead'
      @clearjournal
    elseif @injournal 'Blood' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Blood'
      @clearjournal
    elseif @injournal 'Poison' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Poison'
      @clearjournal
    elseif @injournal 'Indestructable/Invulnerability' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Indestructable/Invulnerability'
      @clearjournal
    elseif @injournal 'Exceptional/Indestruct' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Gold Weapon'
      @clearjournal
    elseif @injournal 'Exceptional/Fortified' 'system'
      moveitem found 'toawesomebag'
      headmsg 'Bronze Weapon'
      @clearjournal
    elseif not @injournal 'You are not certain' 'system'
      moveitem found 'tobag'
      headmsg 'Item type not in keep list'
      @clearjournal
    endif
    if weight >= maxweight
      headmsg 'Go and sell this crap'
      stop
    endif
  endwhile
endfor
headmsg 'completed!'
 
Last edited:

TyroneG

Master
Little more of an update. Bit easier to add or take away things

Code:
// Author: Experience (Edited from Burger's version)
//Further edited by aga
// Description: Auto-ID items in a bag, sort out awesome weapons
// to a seperate bag
// Important:
// 1) frombag is your bag of unidentified items, tobag is the bag of crap you
//    are going to sell, usually it's in my backpack so there is a weight check..
//    awesomebag is for weapons I want to keep or look closer at..
// 3) comment the next 3 lines to make it not prompt you for new bags each time
unsetalias 'frombag'
unsetalias 'tobag'
unsetalias 'toawesomebag'
if not @findobject 'frombag'
  headmsg 'Select From Bag'
  promptalias 'frombag'
endif
pause 700
if not @findobject 'tobag'
  headmsg 'Select Sell/To Bag'
  promptalias 'tobag'
endif
pause 700
if not @findobject 'toawesomebag'
  headmsg 'Select Awesome Bag'
  promptalias 'toawesomebag'
endif
pause 700
useobject 'frombag'
useobject 'tobag'
useobject 'toawesomebag'
clearignorelist
if not listexists 'ItemQuality'
  createlist 'ItemQuality'
  @pushlist 'ItemQuality' 'Silver'
  @pushlist 'ItemQuality' 'Vanquishing'
  @pushlist 'ItemQuality' 'Power'
  @pushlist 'ItemQuality' 'Exorcism'
  @pushlist 'ItemQuality' 'Daemon'
  @pushlist 'ItemQuality' 'Gargoyle'
  @pushlist 'ItemQuality' 'Fey'
  @pushlist 'ItemQuality' 'Repond'
  @pushlist 'ItemQuality' 'Vacuum'
  @pushlist 'ItemQuality' 'Flame'
  @pushlist 'ItemQuality' 'Elemental'
  @pushlist 'ItemQuality' 'Earth'
  @pushlist 'ItemQuality' 'Water'
  @pushlist 'ItemQuality' 'Ogre'
  @pushlist 'ItemQuality' 'Orc Slaying'
  @pushlist 'ItemQuality' 'Spider'
  @pushlist 'ItemQuality' 'Scorpion'
  @pushlist 'ItemQuality' 'Terathan'
  @pushlist 'ItemQuality' 'Reptile'
  @pushlist 'ItemQuality' 'Dragon'
  @pushlist 'ItemQuality' 'Lizardman'
  @pushlist 'ItemQuality' 'Ophidian'
  @pushlist 'ItemQuality' 'Snake'
  @pushlist 'ItemQuality' 'Undead'
  @pushlist 'ItemQuality' 'Blood'
  @pushlist 'ItemQuality' 'Poison'
  @pushlist 'ItemQuality' 'Indestructable/Invulnerability'
  @pushlist 'ItemQuality' 'Exceptional/Indestruct'
  @pushlist 'ItemQuality' 'Exceptional/Fortified'
endif
if not listexists 'ItemTypes'
  createlist 'ItemTypes'
  //Shields
  @pushlist 'ItemTypes' 0x1b72 //BronzeShields
  @pushlist 'ItemTypes' 0x1b73 //Buckler
  @pushlist 'ItemTypes' 0x1b7b //MetalShield
  @pushlist 'ItemTypes' 0x1b74 //Metal Kite Shield
  @pushlist 'ItemTypes' 0x1b79 //Tear Kite Shield
  @pushlist 'ItemTypes' 0x1b7a //WoodenShield
  @pushlist 'ItemTypes' 0x1b76 //HeaterShield
  //Platemail
  @pushlist 'ItemTypes' 0x1408 //Close Helmet
  @pushlist 'ItemTypes' 0x1410 //Platemail Arms
  @pushlist 'ItemTypes' 0x1411 //Platemail Legs
  @pushlist 'ItemTypes' 0x1412 //Plate Helm
  @pushlist 'ItemTypes' 0x1413 //Plate Gorget
  @pushlist 'ItemTypes' 0x1414 //Platemail Gloves
  @pushlist 'ItemTypes' 0x1415 //Plate Chest
  @pushlist 'ItemTypes' 0x140a //Helmet
  @pushlist 'ItemTypes' 0x140c //Bascinet
  @pushlist 'ItemTypes' 0x140e //Norse Helm
  //Chainmail
  @pushlist 'ItemTypes' 0x13bb //Chainmail Coif
  @pushlist 'ItemTypes' 0x13be //Chainmail Leggins
  @pushlist 'ItemTypes' 0x13bf //Chainmail Tunic
  //Ringmail
  @pushlist 'ItemTypes' 0x13ee //Ringmail Sleeves
  @pushlist 'ItemTypes' 0x13eb //Ringmail Gloves
  @pushlist 'ItemTypes' 0x13ec //Ringmail Tunic
  @pushlist 'ItemTypes' 0x13f0 //Ringmail Leggins
  //Studded
  @pushlist 'ItemTypes' 0x13da //Studded Leggings
  @pushlist 'ItemTypes' 0x13db //Studded Tunic
  @pushlist 'ItemTypes' 0x13d5 //Studded Gloves
  @pushlist 'ItemTypes' 0x13d6 //Studded Gorget
  @pushlist 'ItemTypes' 0x13dc //Studded Sleeves
  //Leather
  @pushlist 'ItemTypes' 0x13c6 //Leather Gloves
  @pushlist 'ItemTypes' 0x13cd //Leather Sleeves
  @pushlist 'ItemTypes' 0x13cc //Leather Tunic
  @pushlist 'ItemTypes' 0x13cb //Leather Pants
  @pushlist 'ItemTypes' 0x13c7 //Leather Gorget
  @pushlist 'ItemTypes' 0x1db9 //Leather Cap
  //Female Armor
  @pushlist 'ItemTypes' 0x1c04 //Female Plate
  @pushlist 'ItemTypes' 0x1c0c //Female Studded Bustier
  @pushlist 'ItemTypes' 0x1c02 //Female Studded Armor
  @pushlist 'ItemTypes' 0x1c00 //Female Leather Shorts
  @pushlist 'ItemTypes' 0x1c08 //Female Leather Skirt
  @pushlist 'ItemTypes' 0x1c06 //Female Leather Armor
  @pushlist 'ItemTypes' 0x1c0a //Female Leather Bustier
  //Fencing
  @pushlist 'ItemTypes' 0xf62  //Spear
  @pushlist 'ItemTypes' 0x1403 //Short Spear
  @pushlist 'ItemTypes' 0xe87  //Pitchfork
  @pushlist 'ItemTypes' 0x1405 //Warfork
  @pushlist 'ItemTypes' 0x1401 //Kryss
  @pushlist 'ItemTypes' 0xf52  //Dagger
  //Macing
  @pushlist 'ItemTypes' 0x13b0 //War axe
  @pushlist 'ItemTypes' 0xdf0  //Black Staff
  @pushlist 'ItemTypes' 0x1439 //War Hammer
  @pushlist 'ItemTypes' 0x1407 //War Mace
  @pushlist 'ItemTypes' 0xe89  //Quarter Staff
  @pushlist 'ItemTypes' 0x143d //Hammer Pick
  @pushlist 'ItemTypes' 0x13b4 //Club
  @pushlist 'ItemTypes' 0xe81  //Shepherds Crook
  @pushlist 'ItemTypes' 0x13f8 //Gnarled Staff
  @pushlist 'ItemTypes' 0xf5c  //Mace
  @pushlist 'ItemTypes' 0x143b //Maul
  //Swords
  @pushlist 'ItemTypes' 0x13b9 //Viking Sword
  @pushlist 'ItemTypes' 0xf61  //Longsword
  @pushlist 'ItemTypes' 0x1441 //Cutlass
  @pushlist 'ItemTypes' 0x13b6 //Scimitar
  @pushlist 'ItemTypes' 0xec4  //Skinning Knife
  @pushlist 'ItemTypes' 0x13f6 //Butcher Knife
  @pushlist 'ItemTypes' 0xf5e  //Broadsword
  @pushlist 'ItemTypes' 0x13ff //Katana
  @pushlist 'ItemTypes' 0xec3  //Cleaver
  //Axes
  @pushlist 'ItemTypes' 0xf43 //Hatchet
  @pushlist 'ItemTypes' 0xf45 //Executioner's Axe
  @pushlist 'ItemTypes' 0xf4d //Bardiche
  @pushlist 'ItemTypes' 0xf4b  //Double Axe
  @pushlist 'ItemTypes' 0x143e //Halberd
  @pushlist 'ItemTypes' 0x13fb //Large Battle Axe
  @pushlist 'ItemTypes' 0x1443 //Two Handed Axe
  @pushlist 'ItemTypes' 0xf47  //Battle Axe
  @pushlist 'ItemTypes' 0xf49  //Axe
  @pushlist 'ItemTypes' 0xe85  //Pickaxe
  @pushlist 'ItemTypes' 0xe86  //Pickaxe
  //Bows
  @pushlist 'ItemTypes' 0x13fd //HeavyXbow
  @pushlist 'ItemTypes' 0xf50  //Xbow
  @pushlist 'ItemTypes' 0x13b2 //bow
endif
///////////////////////
///////////////////////
///////////////////////
for 0 to 'ItemTypes'
  while @findtype 'ItemTypes[]' 'any' 'frombag'
    @setalias 'currentlyid' 'found'
    pause 300
    @clearjournal
    while not targetexists 'any'
      pause 100
      useskill 'Item Identification'
    endwhile
    target! 'currentlyid'
    pause 300
    for 0 to 'ItemQuality'
      if @injournal 'ItemQuality[]' 'system'
        moveitem 'currentlyid' 'toawesomebag'
        headmsg ItemQuality[] 22
        @unsetalias 'currentlyid'
        ignoreobject 'currentlyid'
      endif
    endfor
    if @findobject 'currentlyid' 'frombag' and not @injournal 'You are not certain' 'system'
      moveitem 'currentlyid' 'tobag'
      headmsg 'Item not in list'
      @unsetalias 'currentlyid'
      ignoreobject 'currentlyid'
    endif
    if @injournal 'You are not certain' 'system'
      headmsg 'skill failed'
    endif
    if weight >= maxweight
      headmsg 'Go and sell this crap'
      stop
    endif
    @clearjournal
  endwhile
endfor
headmsg 'completed!'
 

De Medici

Grandmaster
What is the condition for an alchy pot or spell beeinf loaded and gump rdy.

I want to tell steam to not do spicific things while a spell is loaded or a pot is cooking.

While not gumprdy or what is it
 

De Medici

Grandmaster
Thx

Is targetexist not having a last target set?

maybe its just not possible.

I want to the these things while i have a person on last target but not if i have a gump rdy. For example if i bandage my seld during a spell is loaded the spell dispoears and so on.
 

TyroneG

Master
no ideas?

Not really sure what you are wanting. targetexists checks to see if a target is currently up. This can be 'any' target, a 'beneficial' target, a 'harmful' target, a 'neutral' target, a 'server' target, or a 'system' target.

So for example if you wanted to bandage yourself if you do not currently have a spell up you could do something like this:

Code:
if not targetexists 'any'
   bandageself
endif

Or if for example you wanted to use your spell if you have one up then bandage yourself you could do this:

Code:
if targetexists 'beneficial'
   target 'self'
elseif targetexists 'negative'
   target 'last'
endif
bandageself

This would heal target yourself with a beneficial spell if you have one up then bandage yourself after. If you have a negative spell up it will target your last target then bandage yourself after.
 

Fuego

Grandmaster
Can you slighly edit your id with skill script? Power wps are hard to move so can it only keep power katanas, kryss's, warforks, war axes, spearss, bows, and all axes.
Same with slayers only keep super slayers and power or up lessers
 

De Medici

Grandmaster
I heard it is possible to auto pull bars with steam. Is this true? And if yes how would the script look like? I also read that its possible to get the right pot zhrowing timing by makro bur im pretty sure ita not possible cause you cant read the timer number in steam, or is it?
 

Experience

Grandmaster
It is possible to GET the health bar. and no its not possible to get the right pot throwing time unless your using an illegal modified version of UOS
 
Top