Skill Scroll Sorter

amonseti

Grandmaster
Another sorting macro , to save you from tendonitis (Or in my case lazyness) .
This macro will sort your skill scrolls .. Please see code comments for Usage and more info.


Code:
// $$$$$$$$ Skill Scroll Sorter   $$$$$$$$$$$$$$$$$$$
// $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
// ?? By Amonseti
// ?? V1.3
// ??????????????????????????????????????????????????
// ??
// ?? Macro will sort all Skill scrolls by color , and +0.1
// ?? skill scrolls sorted into its own bulk container.
// ??
// ?? USAGE:
// ?? All that is required for this macro is at least
// ?? 1 destination container. The macro will ask you for
// ?? 7, one for each skill catagory and 1 for all +0.1
// ?? Skill scrolls. Simply run the macro and follow the
// ?? Prompts.
// ??
// ???????????????????????????????????????
//
// !!*** Init Data ***!!
unsetalias 'frombag'
//**** Uncomment the following code to have macro
//**** Ask everytime for destination containers
//
//unsetalias 'minorSSBag'
//unsetalias 'brownBag'
//unsetalias 'redBag'
//unsetalias 'purpleBag'
//unsetalias 'greenBag'
//unsetalias 'blackBag'
//unsetalias 'blazeBag'
//
//************************************************
//
if not @findobject 'frombag'
  headmsg 'Select From Bag' '2124'
  promptalias 'frombag'
endif
pause 700
//
if not @findobject 'minorSSBag'
  headmsg 'Select the +0.1 SS Bag' '2124'
  promptalias 'minorSSBag'
endif
pause 700
//
//
if not @findobject 'brownBag'
  headmsg 'Select the Brown +1 SS Bag' '1355'
  promptalias 'brownBag'
endif
pause 700
//
if not @findobject 'redBag'
  headmsg 'Select the Red +1 SS Bag' '37'
  promptalias 'redBag'
endif
pause 700
//
if not @findobject 'purpleBag'
  headmsg 'Select the Purple +1 SS Bag' '1376'
  promptalias 'purpleBag'
endif
pause 700
//
if not @findobject 'greenBag'
  headmsg 'Select the Green +1 SS Bag' '1368'
  promptalias 'greenBag'
endif
pause 700
//
if not @findobject 'blackBag'
  headmsg 'Select the Black +1 SS Bag' '1904'
  promptalias 'blackBag'
endif
pause 700
//
if not @findobject 'blazeBag'
  headmsg 'Select the Blaze +1 SS Bag' '1161'
  promptalias 'blazeBag'
endif
pause 700
//
//
//
///////////////////////////////////////////////////////////
useobject 'frombag'
pause 200
useobject 'minorSSBag'
pause 200
useobject 'brownBag'
pause 200
useobject 'redBag'
pause 200
useobject 'purpleBag'
pause 200
useobject 'greenBag'
pause 200
useobject 'blackBag'
pause 200
useobject 'blazeBag'
pause 200
//
//
while @findtype '0x2260' 'any' 'frombag'
  @clearjournal
  //
  clickobject found
  //
  pause 1500
  if @injournal '+0.1' 'system'
    moveitem found 'minorSSBag'
    headmsg 'a +0.1 ss' '2498'
    @clearjournal
  elseif @injournal 'Lumberjacking' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Lumberjacking ss' '1355'
    @clearjournal
  elseif @injournal 'Alchemy' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Alchemy ss' '1355'
    @clearjournal
  elseif @injournal 'Fishing' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Fishing ss' '1355'
    @clearjournal
  elseif @injournal 'Inscribe' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Inscribe ss' '1355'
    @clearjournal
  elseif @injournal 'Tailoring' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Tailoring ss' '1355'
    @clearjournal
  elseif @injournal 'Mining' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Mining ss' '1355'
    @clearjournal
  elseif @injournal 'Blacksmith' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Blacksmith ss' '1355'
    @clearjournal
  elseif @injournal 'Carpentry' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Carpentry ss' '1355'
    @clearjournal
  elseif @injournal 'Tinkering' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Tinkering ss' '1355'
    @clearjournal
  elseif @injournal 'Lockpicking' 'system'
    moveitem found 'brownBag'
    headmsg '+1 Lockpicking ss' '1355'
    @clearjournal
    //
  elseif @injournal 'MagicResist' 'system'
    moveitem found 'redBag'
    headmsg '+1 MagicResist ss' '37'
    @clearjournal
  elseif @injournal 'Anatomy' 'system'
    moveitem found 'redBag'
    headmsg '+1 Anatomy ss' '37'
    @clearjournal
  elseif @injournal 'Wrestling' 'system'
    moveitem found 'redBag'
    headmsg '+1 Wrestling ss' '37'
    @clearjournal
  elseif @injournal 'Macing' 'system'
    moveitem found 'redBag'
    headmsg '+1 Macing ss' '37'
    @clearjournal
  elseif @injournal 'Tactics' 'system'
    moveitem found 'redBag'
    headmsg '+1 Tactics ss' '37'
    @clearjournal
  elseif @injournal 'EvalInt' 'system'
    moveitem found 'redBag'
    headmsg '+1 EvalInt ss' '37'
    @clearjournal
  elseif @injournal 'Parry' 'system'
    moveitem found 'redBag'
    headmsg '+1 Parry ss' '37'
    @clearjournal
  elseif @injournal 'Meditation' 'system'
    moveitem found 'redBag'
    headmsg '+1 Meditation ss' '37'
    @clearjournal
  elseif @injournal 'Fencing' 'system'
    moveitem found 'redBag'
    headmsg '+1 Fencing ss' '37'
    @clearjournal
  elseif @injournal 'Swords' 'system'
    moveitem found 'redBag'
    headmsg '+1 Swords ss' '37'
    @clearjournal
  elseif @injournal 'Healing' 'system'
    moveitem found 'redBag'
    headmsg '+1 Healing ss' '37'
    @clearjournal
  elseif @injournal 'Magery' 'system'
    moveitem found 'redBag'
    headmsg '+1 Magery ss' '37'
    @clearjournal
    //
  elseif @injournal 'Provocation' 'system'
    moveitem found 'purpleBag'
    headmsg '+1 Provocation ss' '1376'
    @clearjournal
  elseif @injournal 'Peacemaking' 'system'
    moveitem found 'purpleBag'
    headmsg '+1 Peacemaking ss' '1376'
    @clearjournal
  elseif @injournal 'Discordance' 'system'
    moveitem found 'purpleBag'
    headmsg '+1 Discordance ss' '1376'
    @clearjournal
    //
  elseif @injournal 'Herding' 'system'
    moveitem found 'greenBag'
    headmsg '+1 Herding ss' '1368'
    @clearjournal
  elseif @injournal 'Begging' 'system'
    moveitem found 'greenBag'
    headmsg '+1 Begging ss' '1368'
    @clearjournal
  elseif @injournal 'Fletching' 'system'
    moveitem found 'greenBag'
    headmsg '+1 Fletching ss' '1368'
    @clearjournal
  elseif @injournal 'Archery' 'system'
    moveitem found 'greenBag'
    headmsg '+1 Archery ss' '1368'
    @clearjournal
    //
  elseif @injournal 'Stealing' 'system'
    moveitem found 'blackBag'
    headmsg '+1 Stealing ss' '1904'
    @clearjournal
  elseif @injournal 'Stealth' 'system'
    moveitem found 'blackBag'
    headmsg '+1 Stealth ss' '1904'
    @clearjournal
  elseif @injournal 'Hiding' 'system'
    moveitem found 'blackBag'
    headmsg '+1 Hiding ss' '1904'
    @clearjournal
  elseif @injournal 'Poisoning' 'system'
    moveitem found 'blackBag'
    headmsg '+1 Poisoning ss' '1904'
    @clearjournal
    //
  elseif @injournal 'AnimalTaming' 'system'
    moveitem found 'blazeBag'
    headmsg '+1 AnimalTaming ss' '1161'
    @clearjournal
  endif
  pause 1000
endwhile
stop
headmsg 'done' '58'
msg '[e whistle'
 
Top