API tools faq
paste
Advertisement
SilvertigerL_C

Skill Training Profile

SilvertigerL_C
Dec 9th, 2017
533
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 50.56 KB | None | 0 0
raw download clone embed print report
  1. <!DOCTYPE profile>
  2. <profile>
  3. <data name="CommandPrefix">0x0</data>
  4. <data name="UseObjectsQueue">True</data>
  5. <data name="ShowCorpseNames">False</data>
  6. <data name="ShowCreatureNames">False</data>
  7. <data name="OpenCorpses">False</data>
  8. <data name="OpenCorpsesRange">0x2</data>
  9. <data name="ShowMobileHits">True</data>
  10. <data name="PositionInTitle">False</data>
  11. <data name="ForceResolution">False</data>
  12. <data name="GameWindowWidth">0x320</data>
  13. <data name="GameWindowHeight">0x258</data>
  14. <data name="FilterLight">True</data>
  15. <data name="FilterMusic">True</data>
  16. <data name="FilterBardsMusic">False</data>
  17. <data name="FilterSound">False</data>
  18. <data name="FilterWeather">False</data>
  19. <data name="FilterSeason">False</data>
  20. <data name="FixedSeason">0x0</data>
  21. <data name="FilterDeath">False</data>
  22. <data name="FilterRepeatedMessages">False</data>
  23. <data name="FilterOthersSpeechColor">False</data>
  24. <data name="FilterSnoopingMessages">False</data>
  25. <data name="FilterTradeWindow">False</data>
  26. <data name="FilterRewardGump">False</data>
  27. <data name="HandsBeforePotions">True</data>
  28. <data name="HandsBeforeCasting">False</data>
  29. <data name="SmartTarget">0x0</data>
  30. <data name="SmartTargetRange">False</data>
  31. <data name="SmartTargetRangeValue">0xc</data>
  32. <data name="HighlightCurrentTarget">False</data>
  33. <data name="BlockInvalidHeal">False</data>
  34. <data name="ActionDelay">0x226</data>
  35. <data name="UseObjectsLimit">0x5</data>
  36. <data name="TargetShare">0x0</data>
  37. <data name="MountSerial">0x0</data>
  38. <data name="BladeSerial">0xffffffff</data>
  39. <data name="BoneCutter">False</data>
  40. <data name="AutoMount">False</data>
  41. <data name="AutoBandage">False</data>
  42. <data name="AutoBandageTarget">0x0</data>
  43. <data name="AutoBandageScale">False</data>
  44. <data name="AutoBandageCount">False</data>
  45. <data name="AutoBandageStart">False</data>
  46. <data name="AutoBandageStartValue">0x5f</data>
  47. <data name="AutoBandageDelay">0x9c4</data>
  48. <data name="AutoBandageFormula">False</data>
  49. <data name="AutoBandageHidden">False</data>
  50. <data name="OpenDoors">True</data>
  51. <data name="UseDoors">False</data>
  52. <data name="SpellsColor">True</data>
  53. <data name="SpellsMode">0x2</data>
  54. <data name="SpellsTargetShare">0x0</data>
  55. <data name="OpenDoorsMode">0x0</data>
  56. <data name="OpenCorpsesMode">0x2</data>
  57. <data name="ShowMobileFlags">False</data>
  58. <data name="StateHighlightMode">0x3</data>
  59. <data name="StaticFields">False</data>
  60. <data name="CountStealthSteps">False</data>
  61. <data name="FriendsListOnly">False</data>
  62. <data name="FriendsParty">False</data>
  63. <data name="MoveConflictingItems">False</data>
  64. <data name="CustomCaption">True</data>
  65. <data name="CustomCaptionMode">0x1</data>
  66. <data name="CustomCaptionText">UO - $name $statusbar - $hits/$mana/$stam - %ss %mr %gs %ns %sa %bp %bm %gl $criminaltimer $bandagetimer $weight %cntr-2 %cntr %cntr-3 %cntr-4 $criminaltimer $weight $maxweight </data>
  67. <data name="WarnCounters">True</data>
  68. <data name="WarnCountersValue">0x5</data>
  69. <data name="HighlightReagents">True</data>
  70. <data name="DisplayCountersName">False</data>
  71. <data name="CaptionUseNotoHue">True</data>
  72. <data name="CaptionUseNotoHue">True</data>
  73. <data name="DisplayCountersImage">True</data>
  74. <data name="FilterKarmaMessages">False</data>
  75. <data name="FilterFameMessages">False</data>
  76. <data name="PreventDismount">True</data>
  77. <data name="PreventAttackFriends">False</data>
  78. <data name="AutoSearchContainers">False</data>
  79. <data name="AutoAcceptParty">True</data>
  80. <data name="StaticFieldsMode">0x0</data>
  81. <counters/>
  82. <vendors>
  83. <buystate list="" enabled="False"/>
  84. <sellstate list="Sell-1" enabled="True"/>
  85. <shoppinglist complete="False" name="Sell-1" limit="999" type="Sell">
  86. <item graphic="0xe89" amount="1"/>
  87. </shoppinglist>
  88. </vendors>
  89. <autosearchexemptions/>
  90. <objects>
  91. <obj name="anat target">0x66723</obj>
  92. <obj name="discotarget1">0xa23af</obj>
  93. <obj name="eval">0x7577a</obj>
  94. <obj name="found">0x42479c44</obj>
  95. <obj name="instrument">0x42479c44</obj>
  96. <obj name="lore pet">0xca862</obj>
  97. <obj name="pet">0x4b5f0</obj>
  98. <obj name="restock">0x418d896b</obj>
  99. <obj name="restockscribe">0x418d896b</obj>
  100. </objects>
  101. <hotkeys>
  102. <hotkey action="actions.use.lastobject" key="0xc41" pass="True"/>
  103. <hotkey action="agents.vendors.sell.sell-1" key="0x6b" pass="False"/>
  104. <hotkey action="macros.stop" key="0xc20" pass="False"/>
  105. <hotkey action="hotkeys" key="0xdd" pass="False"/>
  106. </hotkeys>
  107. <macros>
  108. <macro loop="True" name="Alchemy" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training alchemy from 30. Have //;// 5 empty kegs on you and a lot //;// of mortars and pestals. This //;// macro only makes PVP worthy //;// potions to minimize waste. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'alchemy' &lt; 60 and not @findobject 'TR';headmsg 'Select Total Refresh Keg';promptalias 'TR';endif;if skill 'alchemy' &lt; 70 and not @findobject 'GA';headmsg 'Select Greater Agility Keg';promptalias 'GA';endif;if skill 'alchemy' &lt; 80 and not @findobject 'GS';headmsg 'Select Greater Strength Keg';promptalias 'GS';endif;if skill 'alchemy' &lt; 90 and not @findobject 'GH';headmsg 'Select Greater Heal Keg';promptalias 'GH';endif;if skill 'alchemy' &lt; 100 and not @findobject 'GC';headmsg 'Select Greater Cure Keg';promptalias 'GC';endif;if skill 'alchemy' &lt; 30;headmsg 'Buy more skill!';stop;elseif skill 'alchemy' &lt; 60;if usetype 0xe9b 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 1;waitforgump 0x38920abd 15000;replygump 0x38920abd 9;waitforgump 0x38920abd 2000;endif;if @findtype 0xf0b 0x0 'backpack';moveitem 'found' 'TR';pause 600;endif;elseif skill 'alchemy' &lt; 70;if usetype 0xe9b 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 9;waitforgump 0x38920abd 2000;endif;if @findtype 0xf08 0x0 'backpack';moveitem 'found' 'GA';pause 600;endif;elseif skill 'alchemy' &lt; 80;if usetype 0xe9b 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 29;waitforgump 0x38920abd 15000;replygump 0x38920abd 9;waitforgump 0x38920abd 2000;endif;if @findtype 0xf09 0x0 'backpack';moveitem 'found' 'GS';pause 600;endif;elseif skill 'alchemy' &lt; 90;if usetype 0xe9b 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 22;waitforgump 0x38920abd 15000;replygump 0x38920abd 16;waitforgump 0x38920abd 2000;endif;if @findtype 0xf0c 0x0 'backpack';moveitem 'found' 'GH';pause 600;endif;elseif skill 'alchemy' &lt; 100;if usetype 0xe9b 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 43;waitforgump 0x38920abd 15000;replygump 0x38920abd 16;waitforgump 0x38920abd 2000;endif;if @findtype 0xf07 0x0 'backpack';moveitem 'found' 'GC';pause 600;endif;else;headmsg 'Alchemy complete!';stop;endif;</macro>
  109. <macro loop="True" name="Anatomy" interrupt="True">if not findalias 'anat target';promptalias 'anat target';endif;useskill 'Anatomy';waitfortarget 15000;target! 'anat target';</macro>
  110. <macro loop="True" name="Arms Lore" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training arms lore from 0. I //;// typically target my dagger. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findalias 'armslore';headmsg 'Select the item to train arms lore on';promptalias 'armslore';endif;if skill 'arms lore' &lt; 100;useskill 'arms lore';waitfortarget 2000;target! 'armslore';pause 1000;else;headmsg 'Arms Lore Complete!';stop;endif;</macro>
  111. <macro loop="True" name="Begging" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training begging from 0. //;// I suggest training in an shop //;// with plenty of vendors //;// wandering around. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'begging' &lt; 100;getfriend 'friend' 'innocent' 'closest';useskill 'begging';waitfortarget 2000;target! 'found';pause 13000;else;headmsg 'Begging complete!';stop;endif;</macro>
  112. <macro loop="True" name="Blacksmithy" interrupt="True">////////////////////////////////////;// Uses tongs. This macro is //;// designed for training //;// blacksmithy from 50. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'Blacksmithy' &lt; 50;headmsg 'You should have started with 50 skill!';stop;elseif skill 'Blacksmithy' &lt;= 93;if usetype 0xfbb 'any' 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 50;waitforgump 0x38920abd 15000;replygump 0x38920abd 16;pause 2000;endif;if usetype 0xfbb 'any' 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 14;waitfortarget 15000;@targettype! 0x1403 0x0 'backpack';endif;elseif skill 'blacksmithy' &lt; 100;if usetype 0xfbb 'any' 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 15;waitforgump 0x38920abd 15000;replygump 0x38920abd 16;pause 2000;endif;if usetype 0xfbb 'any' 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 14;waitfortarget 15000;@targettype! 0x1413 0x0 'backpack';endif;else;headmsg 'Blacksmithy complete!';stop;endif;</macro>
  113. <macro loop="True" name="Cooking" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training cooking from 0. This //;// macro cooks raw fish steaks //;// and skillets to train cooking. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findtype 0x97f 'any' 'backpack';headmsg 'Get more skillets!';stop;endif;if not @findtype 0x97a 'any' 'backpack';headmsg 'Get more raw fish steaks!';stop;endif;if skill 'cooking' &lt; 100;if usetype 0x97f 'any' 'backpack';waitforgump 0x38920abd 2000;replygump 0x38920abd 22;waitforgump 0x38920abd 2000;replygump 0x38920abd 16;waitforgump 0x38920abd 2000;endif;else;headmsg 'Cooking complete!';stop;endif;</macro>
  114. <macro loop="True" name="Eval Int" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training evaluating //;// intelligence from 0. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findalias 'eval';headmsg 'Select the person to train evaluating intelligence on';promptalias 'eval';endif;//if skill 'evaluating intelligence' &lt; 100;//if skill 'evaluating intelligence' &lt; 105;//if skill 'evaluating intelligence' &lt; 110;if skill 'evaluating intelligence' &lt; 115;//if skill 'evaluating intelligence' &lt; 120;useskill 'evaluating intelligence';waitfortarget 2000;target! 'eval';pause 1000;else;headmsg 'Evaluating Intelligence Complete!';stop;endif;</macro>
  115. <macro loop="True" name="Healing" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training healing from 0. It //;// requires a magical wizard hat. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not@findalias 'hat';headmsg "Select your magical wizard's hat";promptalias 'hat';endif;if not @findtype 0xe21 'any' 'backpack';headmsg 'Get more bandaids!';stop;endif;if skill 'healing' &lt; 100;equipitem 'hat' 6;pause 600;moveitem 'hat' 'backpack';pause 600;bandageself;pause 6000;equipitem 'hat' 6;pause 600;moveitem 'hat' 'backpack';pause 7000;else;headmsg 'Healing complete!';stop;endif;</macro>
  116. <macro loop="True" name="Hiding" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training hiding from 0. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'hiding' &lt; 100;useskill 'hiding';pause 11000;else;headmsg 'Hiding complete!';stop;endif;</macro>
  117. <macro loop="True" name="Hiding Snooping" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training both hiding and //;// snooping from 0. It is //;// easiest to train by using two //;// clients at once. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'snooping' &lt; 100;if not @findobject 'snoop' or not @inrange 'snoop' 1;headmsg 'Select the person to snoop';promptalias 'snoop';else;@findlayer 'snoop' 21;useobject! 'found';pause 600;endif;endif;if skill 'hiding' &lt; 100;useskill 'hiding';endif;if skill 'hiding' == 100 and skill 'snooping' == 100;headmsg 'Hiding and snooping complete!';stop;endif;</macro>
  118. <macro loop="True" name="Item Identification" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training item identification //;// from 0. I typically target my //;// dagger. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not@findalias 'itemid';headmsg 'Select the item to train ID on';promptalias 'itemid';endif;if skill 'item identification' &lt; 100;useskill 'item identification';waitfortarget 2000;target! 'itemid';pause 1000;else;headmsg 'Item Identification Complete!';stop;endif;</macro>
  119. <macro loop="True" name="Magery" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training magery from 30. It is //;// intended for characters with //;// 40+ intelligence. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;useskill 'meditation';while mana &lt; maxmana;endwhile;if skill 'magery' &lt; 22;headmsg 'Buy more skill!';stop;elseif skill 'magery' &lt; 45;cast 'bless' 'self';pause 1000;elseif skill 'magery' &lt; 55;cast 'mana drain' 'self';pause 1000;elseif skill 'magery' &lt; 75;cast 'invisibility' 'self';while waitingfortarget;endwhile;pause 1000;cast 'invisibility' 'self';while waitingfortarget;endwhile;pause 1000;cast 'invisibility' 'self';while waitingfortarget;endwhile;pause 1000;cast 'invisibility' 'self';while waitingfortarget;endwhile;pause 1000;useskill 'meditation';elseif skill 'magery' &lt; 100;cast 'mana vampire' 'self';pause 1000;useskill 'meditation';else;headmsg 'Magery complete!';stop;endif;</macro>
  120. <macro loop="True" name="Magery Resist" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training both magery and //;// resist from 30. It is intended //;// for characters with 40+ //;// intelligence. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'magery' &lt; 100;if @injournal 'insufficient mana';clearjournal;useskill 'meditation';while mana &lt; maxmana;endwhile;else;if skill 'magery' &lt; 30;headmsg 'Buy more skill!';stop;elseif skill 'magery' &lt; 45;cast 'bless' 'self';pause 1000;elseif skill 'magery' &lt; 55;cast 'mana drain' 'self';pause 1000;elseif skill 'magery' &lt; 75;cast 'invisibility' 'self';pause 1000;elseif skill 'magery' &lt; 100;cast 'mana vampire' 'self';pause 1000;else;headmsg 'Magery complete!';stop;endif;endif;elseif skill 'resisting spells' &lt; 100;useskill 'meditation';while mana &lt; maxmana;endwhile;else;cast 'mana vampire' 'self';pause 1000;endif;headmsg 'Magery and resisting spells complete!';stop;endif;</macro>
  121. <macro loop="True" name="Musicianship" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training musicianship from 0. //;// This macro uses lap harps. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;//Create Instrument List if it does not exist;if not listexists 'instrumentlist';@createlist 'instrumentlist';endif;//Add below different types of instruments to use -- Common Ones are Added already;//Standing Harp;@pushlist 'instrumentlist' 0xeb1;//Lap Harp;@pushlist 'instrumentlist' 0xeb2;//Lute;@pushlist 'instrumentlist' 0xeb3;//Drum;@pushlist 'instrumentlist' 0xe9c;//Tambourine;@pushlist 'instrumentlist' 0xe9d;//Tambourine with red tassle;@pushlist 'instrumentlist' 0xe9e;if skill 'musicianship' &lt; 100;useobject 'instrument';pause 1000;else;headmsg 'Musicianship Complete!';stop;endif;</macro>
  122. <macro loop="True" name="Peacemaking" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training peacemaking from 0. //;// This macro uses lap harps. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findtype 0xeb3 0x0 'backpack';headmsg 'Get more lap harps!';stop;endif;if skill 'peacemaking' &lt; 100;useskill 'peacemaking';waitfortarget 2000;if @injournal 'what instrument';targettype! 0xeb3 0x0 'backpack';waitfortarget 2000;target! 'self';clearjournal;pause 11000;else;target! 'self';pause 11000;endif;else;headmsg 'Peacemaking Complete!';stop;endif;</macro>
  123. <macro loop="True" name="Poisoning" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training poisoning from 30. //;// Due to the fact that this //;// macro uses kegs, it is easier //;// to macro from your house. //;// Make sure you have 50+ greater //;// cure potions on you and a //;// piece of food. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'poisoning' &lt; 30 not @findobject 'LesserPoison';headmsg 'Select the lesser poison keg';promptalias 'LesserPoison';endif;if skill 'poisoning' &lt; 40 not @findobject 'Poison';headmsg 'Select the poison keg';promptalias 'Poison';endif;if skill 'poisoning' &lt; 68 not @findobject 'GreaterPoison';headmsg 'Select the greater poison keg';promptalias 'GreaterPoison';endif;if not @findobject 'Food' 'any' 'backpack';headmsg 'Select a piece of food to be poisoned';promptalias 'Food';endif;if not @findtype 0xf07 0x0 'backpack';headmsg 'Get some greater cure potions!;stop;endif;if skill 'poisoning' &lt; 30;headmsg 'Buy more poisoning!';stop;elseif skill 'poisoning' &lt; 40;useobject! 'LesserPoison';pause 600;useskill 'Poisoning';waitfortarget 2000;targettype! 0xf0a 0x0 'backpack';waitfortarget 2000;target! 'Food';pause 1000;if poisoned 'self';usetype! 0xf07 0x0 'backpack';endif;pause 10000;elseif skill 'poisoning' &lt; 68;useobject! 'Poison';pause 600;useskill 'Poisoning';waitfortarget 2000;targettype! 0xf0a 0x0 'backpack';waitfortarget 2000;target! 'Food';pause 1000;if poisoned 'self';usetype! 0xf07 0x0 'backpack';endif;pause 10000;elseif skill 'poisoning' &lt; 100;useobject 'GreaterPoison';pause 600;useskill 'Poisoning';waitfortarget 2000;targettype! 0xf0a 0x0 'backpack';waitfortarget 2000;target! 'Food';pause 1000;if poisoned 'self';usetype! 0xf07 0x0 'backpack';endif;pause 10000;else;headmsg 'Poisoning complete!';stop;endif;</macro>
  124. <macro loop="True" name="Resist Other Cast" interrupt="True">////////////////////////////////////;// This macro is designed for //;// the caster(s) of the resist. //;// This macro can train from 0 //;// and is to be used in //;// conjunction with the below //;// recipient's macro. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findobject 'training';headmsg 'Target the person who is training resist';promptalias 'training';endif;if @injournal 'insufficient mana';clearjournal;useskill 'meditation';while mana &lt; maxmana;endwhile;else;cast 'mana vampire' 'training';pause 1000;endif;if @injournal '1122334455';headmsg 'Resist complete!';stop;endif;</macro>
  125. <macro loop="True" name="Resist Other Rec" interrupt="True">////////////////////////////////////;// This macro is designed for //;// the recipient of the resist. //;// This macro can train from 0 //;// and is to be used in //;// conjunction with the above //;// caster's macro. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'Resisting spells' == 100;msg '1122334455';headmsg 'Resist complete!';stop;endif;</macro>
  126. <macro loop="True" name="Resist Self" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training resist from 0 on //;// yourself. I suggest bringing //;// 5 less spider's silk than the //;// rest that way you can still //;// recall after macroing. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'Resisting Spells' &lt; 100;if @injournal 'insufficient mana';clearjournal;useskill 'meditation';while mana &lt; maxmana;endwhile;else;cast 'mana vampire' 'self';pause 1000;endif;else;msg '1122334455';headmsg 'Resisting spells complete!';stop;endif;</macro>
  127. <macro loop="True" name="Snooping" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training snooping from 0. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findobject 'snoop' or not @inrange 'snoop' 1;headmsg 'Select the person to snoop';promptalias 'snoop';endif;if skill 'snooping' &lt; 100;@findlayer 'snoop' 21;useobject! 'found';pause 600;else;headmsg 'Snooping complete!';stop;endif;</macro>
  128. <macro loop="True" name="Stealing" interrupt="True">moveitem 0x400f8bcb 'ground' 1781 1567 7;pause 600;moveitem 0x400f8bcb 'backpack' 44 96 0;pause 600;moveitem 0x400f8bcb 'ground' 1781 1567 7;pause 600;useobject 0x400f8bcb;moveitem 0x4007dca2 0x400f8bcb 102 93 0;pause 1000;useskill 'Stealing';waitfortarget 15000;target! 0x4007dca2;pause 10000;</macro>
  129. <macro loop="True" name="Stealth" interrupt="True">////////////////////////////////////;// Go to any public moongate for //;// this to work. Also, bring a //;// platemail tunic. This macro //;// is designed for training //;// stealth from 0. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'hiding' &lt; 80;headmsg 'Train your hiding to 80.0 first!';stop;endif;if not @findobject 'chest';headmsg 'Select your chest armor';promptalias 'chest';endif;if skill 'stealth' &lt; 80;if usetype 0xf6c 'any' 'ground';waitforgump 0xe0e675b8 15000;replygump 0xe0e675b8 1 1;pause 10000;useskill 'stealth';pause 600;endif;if usetype 0xf6c 'any' 'ground';waitforgump 0xe0e675b8 15000;replygump 0xe0e675b8 1 0;pause 10000;useskill 'stealth';pause 600;endif;elseif skill 'stealth' &lt; 100;if not @findlayer 'self' 13;@equipitem 'chest' 13;pause 600;endif;if usetype 0xf6c 'any' 'ground';waitforgump 0xe0e675b8 15000;replygump 0xe0e675b8 1 1;pause 10000;useskill 'stealth';pause 600;endif;if usetype 0xf6c 'any' 'ground';waitforgump 0xe0e675b8 15000;replygump 0xe0e675b8 1 0;pause 10000;useskill 'stealth';pause 600;endif;endif;</macro>
  130. <macro loop="True" name="Tailoring" interrupt="True">////////////////////////////////////;// Uses a sewing kit. This //;// macro is designed for //;// training tailoring from 30. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if skill 'Tailoring' &lt; 30;headmsg "Buy skill from an NPC!";stop;elseif skill 'Tailoring' &lt; 41.4;if usetype 0xf9d 0x0 'backpack';replygump 0x38920abd 15;waitforgump 0x38920abd 15000;replygump 0x38920abd 2;waitforgump 0x38920abd 15000;pause 2000;if usetype 0xf9f 0x0 'backpack';waitfortarget 2000;@targettype! 0x152e 0x0 'backpack';endif;endif;elseif skill 'Tailoring' &lt; 54;if usetype 0xf9d 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 51;pause 3000;if usetype 0xf9f 0x0 'backpack';waitfortarget 4000;@targettype! 0x1515 0x0 'backpack';endif;endif;elseif skill 'Tailoring' &lt; 74.6;if usetype 0xf9d 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 58;pause 3000;if usetype 0xf9f 0x0 'backpack';waitfortarget 4000;@targettype! 0x1f03 0x0 'backpack';endif;endif;elseif skill 'Tailoring' &lt; 99;if usetype 0xf9d 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 22;waitforgump 0x38920abd 15000;replygump 0x38920abd 23;pause 2000;if difweight &lt; 20;if usetype 0xf9f 0x0 'backpack';waitfortarget 2000;@targettype! 0x175d 0x7d1 'backpack';endif;endif;endif;elseif skill 'tailoring' &lt; 100;if usetype 0xf9d 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 43;waitforgump 0x38920abd 15000;replygump 0x38920abd 30;pause 2000;if usetype 0xf9f 0x0 'backpack';waitfortarget 2000;@targettype! 0x13db 0x0 'backpack';endif;endif;else;headmsg 'Tailoring complete!';stop;endif;</macro>
  131. <macro loop="True" name="Tinkering" interrupt="True">////////////////////////////////////;// Uses a standard tool kit. //;// This macro is designed for //;// training tinkering from 30. //;// //;// Warning: Throws away newbied //;// scissors! Bank them! //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @listexists 'tinkjunk';createlist 'tinkjunk';pushlist 'tinkjunk' 0xf9f // SCISSORS! WATCH OUT!;pushlist 'tinkjunk' 0xf9d;pushlist 'tinkjunk' 0xfbb;pushlist 'tinkjunk' 0x14fc;pushlist 'tinkjunk' 0x1849;endif;if @counttype 0x1eb8 'any' 'backpack' &lt; 2;if usetype 0x1eb8;waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 23;waitforgump 0x38920abd 15000;endif;endif;if not @findobject 'trash';headmsg 'Select your trash barrel';promptalias 'trash';endif;if skill 'tinkering' &lt; 30;headmsg 'Buy more tinkering skill!';stop;elseif skill 'tinkering' &lt; 40;if usetype 0x1eb8 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 2;waitforgump 0x38920abd 2000;endif;elseif skill 'tinkering' &lt; 65;if usetype 0x1eb8 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 44;waitforgump 0x38920abd 2000;endif;elseif skill 'tinkering' &lt; 75;if usetype 0x1eb8 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 86;waitforgump 0x38920abd 2000;endif;elseif skill 'tinkering' &lt; 94;if usetype 0x1eb8 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 121;waitforgump 0x38920abd 2000;endif;elseif skill 'tinkering' &lt; 100;if usetype 0x1eb8 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 29;waitforgump 0x38920abd 15000;replygump 0x38920abd 51;waitforgump 0x38920abd 2000;endif;else;headmsg 'Tinkering complete!';stop;endif;if contents 'backpack' > 115 or difweight &lt; 20;for 0 to tinkjunk;while @movetype tinkjunk[] 'backpack' 'trash';endwhile;endfor;endif;</macro>
  132. <macro loop="True" name="Inscription" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training inscription from 30. //;// It is intended for characters //;// with 40+ intelligence. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findobject 'restockScribe';headmsg 'Select the container with your reagents, scrolls, and ingots';promptalias 'restockScribe';useobject 'restockScribe';endif;if @counttype 0x1bf2 0x0 'backpack' &lt; 20;movetype 0x1bf2 'restockScribe' 'backpack' 0 0 0 0x0 150;pause 1000;endif;//make tinker tools;while @counttype 0x1eb8 0 'backpack' &lt; 2;usetype! 0x1eb8;waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 23;endwhile;if @ingump 0x38920abd 'You lack the required';useskill 'meditation';pause 12000;useskill 'meditation';while mana &lt; maxmana;endwhile;endif;if not @findtype 0x1eb8 0x0 'backpack';headmsg 'Get more tinker kits!';stop;endif;//make scribe pens;while @counttype 0xfbf 0 'backpack' &lt; 3;usetype! 0x1eb8;waitforgump 0x38920abd 5000;replygump 0x38920abd 8;waitforgump 0x38920abd 5000;replygump 0x38920abd 156;waitforgump 0x38920abd 5000;endwhile;if not @findtype 0xfbf 0x0 'backpack';headmsg 'Get more scribes pens!';stop;endif;//make scribe pens;while @counttype 0xfbf 0 'backpack' &lt; 3;usetype! 0x1eb8;waitforgump 0x38920abd 5000;replygump 0x38920abd 8;waitforgump 0x38920abd 5000;replygump 0x38920abd 156;waitforgump 0x38920abd 5000;endwhile;//make tinker tools;while @counttype 0x1eb8 0 'backpack' &lt; 2;usetype! 0x1eb8;waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 23;endwhile;//mana;if @ingump 0x38920abd 'You lack the required';useskill 'meditation';pause 12000;useskill 'meditation';while mana &lt; maxmana;endwhile;endif;//scribe goods;if @ingump 0x38920abd ' have the resources';headmsg 'Get more supplies!';organizer 'Scribe Goods''restockScribe''backpack';while organizing;endwhile;elseif @ingump 0x38920abd 'do not have';headmsg 'Get more supplies!';organizer 'Scribe Goods''restockScribe''backpack';while organizing;endwhile;endif;//Buy Skill;if skill 'inscription' &lt; 30;headmsg 'Buy more skill!';stop;//inscribe recall;elseif skill 'inscription' &lt; 55;if usetype 0xfbf;waitforgump 0x38920abd 15000;replygump 0x38920abd 22;waitforgump 0x38920abd 15000;replygump 0x38920abd 51;waitforgump 0x38920abd 2000;endif;//move recall to restock;if @counttype 0x1f4c 0x0 'backpack' > 0;movetype 0x1f4c 'backpack' 'restockScribe' 0 0 0 0x0 'any' 0;endif;//iscribe reveal;elseif skill 'inscription' &lt; 75;if usetype 0xfbf;waitforgump 0x38920abd 15000;replygump 0x38920abd 36;waitforgump 0x38920abd 15000;replygump 0x38920abd 51;waitforgump 0x38920abd 2000;endif;//move reveal to restock;if @counttype 0x1f5c 0x0 'backpack' > 0;movetype 0x1f5c 'backpack' 'restockScribe' 0 0 0 0x0 'any' 0;endif;elseif skill 'inscription' &lt; 95;if usetype 0xfbf;waitforgump 0x38920abd 15000;replygump 0x38920abd 43;waitforgump 0x38920abd 15000;replygump 0x38920abd 23;waitforgump 0x38920abd 2000;endif;//move gate to restock;if @counttype 0x1f60 0x0 'backpack' > 0;movetype 0x1f60 'backpack' 'restockScribe' 0 0 0 0x0 'any' 0;endif;elseif skill 'inscription' &lt; 100;if usetype 0xfbf;waitforgump 0x38920abd 15000;replygump 0x38920abd 50;waitforgump 0x38920abd 15000;replygump 0x38920abd 16;waitforgump 0x38920abd 2000;endif;//move res to restock;if @counttype 0x1f67 0x0 'backpack' > 0;movetype 0x1f67 'backpack' 'restockScribe' 0 0 0 0x0 'any' 0;endif;else;//move res to restock;if @counttype 0x1f67 0x0 'backpack' > 0;movetype 0x1f67 'backpack' 'restockScribe' 0 0 0 0x0 'any' 0;endif;headmsg 'Inscription complete!';stop;endif;</macro>
  133. <macro loop="True" name="Carpentry" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training carpentry from 30. //;// It uses standard saws. Due to //;// the weight of boards, it is //;// written to be used in a house //;// with a chest to restock from. //;// //;// Warning: Throws away deeds! //;// Bank them! //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @listexists 'carpjunk';createlist 'carpjunk';pushlist 'carpjunk' 0x9aa;pushlist 'carpjunk' 0xe3f;pushlist 'carpjunk' 0x14f0;pushlist 'carpjunk' 0x14f0 // DEED! WATCH OUT!;pushlist 'carpjunk' 0xb4a;pushlist 'carpjunk' 0xe89;pushlist 'carpjunk' 0x13f8;endif;while @counttype 0x1eb8 0 'backpack' &lt; 2;usetype! 0x1eb8;waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 23;endwhile;while @counttype 0x1034 0 'backpack' &lt; 2;usetype 0x1eb8 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 51;waitforgump 0x38920abd 15000;endwhile;if not @findobject 'trash';headmsg 'Select your trash barrel';promptalias 'trash';endif;if not @findobject 'restock';headmsg 'Select the container with your boards';promptalias 'restock';useobject 'restock';endif;if @counttype 0x1bd7 0x0 'backpack' &lt; 20;movetype 0x1bd7 'restock' 'backpack' 0 0 0 0x0 150;pause 1000;endif;if @counttype 0x1bf2 0x0 'backpack' &lt; 20;movetype 0x1bf2 'restock' 'backpack' 0 0 0 0x0 100;pause 1000;endif;if skill 'carpentry' &lt; 30;headmsg 'Buy more skill!';stop;elseif skill 'carpentry' &lt; 40;if usetype 0x1034 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 15;waitforgump 0x38920abd 15000;replygump 0x38920abd 2;waitforgump 0x38920abd 2000;endif;elseif skill 'carpentry' &lt; 50;if usetype 0x1034 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 15;waitforgump 0x38920abd 15000;replygump 0x38920abd 16;waitforgump 0x38920abd 2000;endif;elseif skill 'carpentry' &lt; 70;if usetype 0x1034 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 43;waitforgump 0x38920abd 15000;replygump 0x38920abd 128;waitforgump 0x38920abd 15000;endif;elseif skill 'carpentry' &lt; 75;if usetype 0x1034 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 8;waitforgump 0x38920abd 15000;replygump 0x38920abd 72;waitforgump 0x38920abd 2000;endif;elseif skill 'carpentry' &lt; 90;if usetype 0x1034 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 22;waitforgump 0x38920abd 15000;replygump 0x38920abd 9;waitforgump 0x38920abd 2000;endif;elseif skill 'carpentry' &lt; 100;if usetype 0x1034 0x0 'backpack';waitforgump 0x38920abd 15000;replygump 0x38920abd 22;waitforgump 0x38920abd 15000;replygump 0x38920abd 16;waitforgump 0x38920abd 2000;endif;else;headmsg 'Carpentry completed!';stop;endif;if contents 'backpack' > 115 or diffweight &lt; 20;for 0 to carpjunk;while @movetype carpjunk[] 'backpack' 'trash';endwhile;endfor;endif;</macro>
  134. <macro loop="True" name="Fishing" interrupt="True">////////////////////////////////////;// This macro is designed for //;// training fishing from a boat. //;// It uses a fishing pole. //;// Stand in front of the mast. //;// //;// Turn on loop and click play! //;// //;// ~~Made by kdivers~~ //;////////////////////////////////////;if not @findobject 'pole' and @findtype 0xdc0 0x0 'self';setalias 'pole' 'found';else;headmsg 'get a pole';endif;clearjournal;if skill 'fishing' &lt; 100;while not @injournal 'biting here';if useobject 'pole';waitfortarget 2000;targettileoffset! -4 -4 -3;pause 9000;endif;if useobject 'pole';waitfortarget 2000;targettileoffset! -4 4 -3;pause 9000;endif;if useobject 'pole';waitfortarget 2000;targettileoffset! 4 -4 -3;pause 9000;endif;if useobject 'pole';waitfortarget 2000;targettileoffset! 4 4 -3;pause 9000;endif;endwhile;for 15;msg 'forward one';pause 1000;endfor;else;headmsg 'Fishing complete!';stop;endif;</macro>
  135. <macro loop="True" name="Antomy2" interrupt="True">useskill 'Anatomy';waitfortarget 15000;target! 0x22c19;pause 1000;useskill 'Anatomy';waitfortarget 15000;target! 0x675f9;pause 1000;useskill 'Anatomy';waitfortarget 15000;target! 0x2627;pause 1000;useskill 'Anatomy';waitfortarget 15000;target! 0xc8ee;pause 1000;useskill 'Anatomy';waitfortarget 15000;target! 0xc4e5;pause 1000;useskill 'Anatomy';waitfortarget 15000;target! 0xcc82;pause 1000;</macro>
  136. <macro loop="True" name="Woodenshields" interrupt="True">replygump 0x38920abd 16;waitforgump 0x38920abd 15000;pause 1000;</macro>
  137. <macro loop="False" name="Lumberjacking" interrupt="True">//$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$;//$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$;//$$ Manual Lumberjacking assistant;//$$ By: Amonseti;//$$ V 1.8;//$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$;//$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$;//;//?????????????????????????????????????????????????????????????????????;//??? USAGE GUIDE LINES:;//??? Simply create a new macro. give it an appropreate name,;//??? Any will do.;//???;//??? Run the macro. with an axe equiped or in your backpack;//??? The macro will look for a tree first tile west;//??? of where your character is standing.;//??? The macro will tell you when to move onto the next;//??? tree until your weight has exceeded 380stones. ( This;//??? is based off of assuming your lumberjacker has 100strength);//??? There are some trees that due to terrain height are unchoppable;//??? if for some reason you find yourself just standing there not;//??? Collecting wood ... Then move on to next tree.;//???;//???;//?????????????????????????????????????????????????????????????????????;//;//;// !! Find and equip any axe in backpack ***;if not listexists 'AxeList';createlist 'AxeList';endif;// !! axe data;@clearlist 'AxeList';@pushlist 'AxeList' 0xf43 //Hatchet;@pushlist 'AxeList' 0xf45 //Executioner's Axe;@pushlist 'AxeList' 0xf4d //Bardiche;@pushlist 'AxeList' 0xf4b //Double Axe;@pushlist 'AxeList' 0x143e //Halberd;@pushlist 'AxeList' 0x13fb //Large Battle Axe;@pushlist 'AxeList' 0x1443 //Two Handed Axe;@pushlist 'AxeList' 0xf47 //Battle Axe;@pushlist 'AxeList' 0xf49 //Axe;//;// !! Equip Axe;for 0 to 'AxeList';if @findtype 'AxeList[]' 'any' 'backpack';unsetalias 'AXE';setalias 'AXE' 'found';endif;endfor;//******************************************;//;// !! Main chopping routine;while weight &lt; 380;clearjournal;if not @findlayer 'self' 2;equipitem 'AXE' 2;pause 600;endif;//;useobject 'LeftHand';waitfortarget 1000;targettileoffset -1 0 0;pause 500;//;//;//****** Wait for it **********************;// !! System hickup insurance loop;for 60;if @injournal 'enough wood here' 'system';break;elseif @injournal 'You chop' 'system';break;elseif @injournal "fail to" "system";break;elseif @injournal "You can't" "system";break;elseif @injournal "You can" "system";break;elseif not @findlayer 'self' 2;break;else;pause 100;endif;endfor;//;//******************************************;//;//*** Display proper feedback;if @injournal "You can't" "system";pause 500;endif;if @injournal 'enough wood here' 'system';headmsg 'NO MORE WOOD' '2124';headmsg 'go to next tree' '2124';msg '[e whistle';pause 2000;endif;if @injournal 'some ordinary' 'system';headmsg '--Ordinary wood--' '1150';clearjournal;endif;if @injournal 'some oak' 'system';headmsg '--OAK--' '2010';clearjournal;endif;if @injournal 'some ash' 'system';headmsg '--ASH--' '1191';clearjournal;endif;if @injournal 'some yew' 'system';headmsg '--YEW--' '1192';msg '[e ah';clearjournal;endif;if @injournal 'some heartwood' 'system';headmsg '>!!!--HEARTWOOD--!!!&lt;' '1193';msg '[e yea';clearjournal;endif;if @injournal 'some bloodwood' 'system';headmsg '>!!!--BLOODWOOD--!!!&lt;' '1194';msg '[e woohoo';clearjournal;endif;if @injournal 'some frostwood' 'system';headmsg '>!!!--FROSTWOOD--!!!&lt;' '1151';msg '[e woohoo';clearjournal;endif;//******************************************;//;//;endwhile;headmsg 'Over Weight Fatty !' '89';headmsg 'go home and unload!' '89';</macro>
  138. <macro loop="True" name="Stealing2" interrupt="True">//This macro will steal a bag from a bag on the ground,;//then after 10 attempts, will pick the bag up and replace;//it on the ground. Just gotta edit the bag types, and the;//positioning of the bag. Default is 1 tile in front of the character facing south.;for 10;useskill 'stealing';waitfortarget 15000;target! 0x43cf2887 //edit to the bag your stealing;moveitem 0x43cf2887 'backpack' 44 72 0 // //edit to the bag your stealing;pause 600;moveitem 0x43cf2887 0x43cf2887 //edit to the bag your stealing;pause 600;pause 11000;endfor;moveitem 0x43611c7e 'backpack' 48 65 0 //edit to the bag on the ground;pause 2000;moveitem 0x43611c7e 'ground' 1802 2818 255 //edit to the bag on the ground;pause 600;</macro>
  139. <macro loop="True" name="Discord" interrupt="True">for 5;//Create Instrument List if it does not exist;if not listexists 'instrumentlist';@createlist 'instrumentlist';endif;clearjournal;//Add below different types of instruments to use -- Common Ones are Added already;//Standing Harp;@pushlist 'instrumentlist' 0xeb1;//Lap Harp;@pushlist 'instrumentlist' 0xeb2;//Lute;@pushlist 'instrumentlist' 0xeb3;//Drum;@pushlist 'instrumentlist' 0xe9c;//Tambourine;@pushlist 'instrumentlist' 0xe9d;//Tambourine with red tassle;@pushlist 'instrumentlist' 0xe9e;//Select an instrument automatically to use;for 0 to 'instrumentlist';@findtype instrumentlist[];@setalias 'instrument' 'found';endfor;if not @findalias 'discotarget1' or not inrange 'discotarget1' 20;headmsg 'Select first discotarget';promptalias 'discotarget1';endif;headmsg 'Targeting 1';for 0 to 'instrumentlist';useobject 'instrument';useskill 'Discordance';@target 'discotarget1';while @injournal 'You play jarring' or @injournal 'That creature is already';pause 8500;msg 'hide' 3;useskill 'hiding';pause 17000;clearjournal;endwhile;endfor;msg 'all follow me' 325;</macro>
  140. <macro loop="True" name="Taming" interrupt="True">// Author: Di;// Description: find, chase and tame nearby pets accordingly to skill level;// v2.1: pet release and tamed detection improvements;// v2.0: improved pets list and created unstuck pathfind heuristic;// Configure skill limit;if skill 'animal taming' == 105.0;setskill 'animal taming''locked';stop;endif;@createlist 'pets';@clearlist 'pets';if skill 'animal taming' &lt; 60;// Eagle;pushlist 'pets' 0x5;// Goat;pushlist 'pets' 0xd1;// Pig;pushlist 'pets' 0xcb;pushlist 'pets' 0x122;// Hind;pushlist 'pets' 0xed;// Timber wolf;pushlist 'pets' 0xe1;// Llama;pushlist 'pets' 0xdc;// Horse;pushlist 'pets' 0xcc;pushlist 'pets' 0xe2;pushlist 'pets' 0xe4;pushlist 'pets' 0xc8;pushlist 'pets' 0x3e9f;pushlist 'pets' 0x3ea0;pushlist 'pets' 0x3ea1;pushlist 'pets' 0x3ea2;// Cow;pushlist 'pets' 0xe7;pushlist 'pets' 0xd8;// Bear;pushlist 'pets' 0xa7;pushlist 'pets' 0xd3;// Cougar;pushlist 'pets' 0x3f;elseif skill 'animal taming' &lt; 75;// Grizzly Bear;pushlist 'pets' 0xd4;// Grey Wolf;pushlist 'pets' 0x1b;pushlist 'pets' 0x19;// Snow Leopard;pushlist 'pets' 0x41;pushlist 'pets' 0x40;// Walrus;pushlist 'pets' 0xdd;// Polar Bear;pushlist 'pets' 0xd5;// Great Hart;pushlist 'pets' 0xea;elseif skill 'animal taming' &lt; 95.1;// Gaman;pushlist 'pets' 0xf8;// Bull;pushlist 'pets' 0xe8;pushlist 'pets' 0xe9;// Great Hart;pushlist 'pets' 0xea;// White Wolf;pushlist 'pets' 0x25;pushlist 'pets' 0x22;// Snow Leopard;pushlist 'pets' 0x41;pushlist 'pets' 0x40;// Ridgeback;pushlist 'pets' 0xbb;else;// Bull;pushlist 'pets' 0xe8;pushlist 'pets' 0xe9;// Unicorn;pushlist 'pets' 0x7a;// Ki-rin;pushlist 'pets' 0x84;endif;if not listexists 'errors';createlist 'errors';pushlist 'errors' 'too many owners';pushlist 'errors' 'only be tamed by';pushlist 'errors' 'no chance of taming';pushlist 'errors' 'looks tame already';//pushlist 'errors' 'clear path to the animal';pushlist 'errors' 'cannot be seen';endif;@createlist 'unstuck';if list 'unstuck' == 0;pushlist 'unstuck' 'east';pushlist 'unstuck' 'west';pushlist 'unstuck' 'south';pushlist 'unstuck' 'north';endif;@createlist 'ridgeback';pushlist 'ridgeback' 0xbb;// Search;if not @findobject 'pet';for 0 to 'pets';if @findtype 'pets[]' 'any' 'ground';@settimer 'stuck' 0;@setalias 'pet' 'found';break;endif;endfor;else;// Pathfind;@settimer 'pathfind' 0;while @findobject 'pet' and not @inrange 'pet' 2;if dead;break;elseif @timer 'pathfind' >= 5000;// Diverge;if direction == 0;@poplist 'unstuck' 'north';elseif direction == 2;@poplist 'unstuck' 'east';elseif direction == 4;@poplist 'unstuck' 'south';elseif direction == 6;@poplist 'unstuck' 'west';endif;// Unstuck;if list 'unstuck' != 0;for 5;run 'unstuck[0]';pause 100;endfor;poplist 'unstuck' 'front';endif;break;elseif @x 'pet' > x 'self' and @y 'pet' > y 'self';run 'southeast';elseif @x 'pet' &lt; x 'self' and @y 'pet' > y 'self';run 'southwest';elseif @x 'pet' > x 'self' and @y 'pet' &lt; y 'self';run 'northeast';elseif @x 'pet' &lt; x 'self' and @y 'pet' &lt; y 'self';run 'northwest';elseif @x 'pet' > x 'self' and @y 'pet' == y 'self';run 'east';elseif @x 'pet' &lt; x 'self' and @y 'pet' == y 'self';run 'west';elseif @x 'pet' == x 'self' and @y 'pet' > y 'self';run 'south';elseif @x 'pet' == x 'self' and @y 'pet' &lt; y 'self';run 'north';endif;pause 100;endwhile;if @inrange 'pet' 2;// Tame;clearjournal;useskill 'animal taming';waitfortarget 1000;target! 'pet';// Handle;if @property '(tame)' 'pet';if @findobject 'ridgeback';msg 'all follow me';pause 2000;playmacro 'Taming';endif;for 5;if @gumpexists 0x909cc741 or not @findobject 'pet';break;elseif dead or followers == 0;break;elseif @name 'pet' != 'trashpet';msg 'all follow me';rename 'pet' 'trashpet';else;msg 'trashpet release';endif;pause 500;endfor;replygump 0x909cc741 2;sysmsg 'Success: tamed and released!' 88;ignoreobject 'pet';@unsetalias 'pet';else;@settimer 'stuck' 0;for 0 to 'errors';if @injournal 'errors[]';sysmsg 'Ignore: error message!' 25;ignoreobject 'pet';@unsetalias 'pet';break;endif;endfor;endif;elseif @timer 'stuck' >= 20000;sysmsg 'Ignore: stuck timeout!' 25;ignoreobject 'pet';@unsetalias 'pet';endif;endif;</macro>
  141. <macro loop="True" name="Chivalry" interrupt="False">while skill 'chivalry' &lt; 60;if skill 'chivalry' &lt; 45.1;while mana > 13;cast 'divine fury';endwhile;endif;if skill 'chivalry' > 45;while mana > 18;cast 'enemy of one';endwhile;endif;endwhile;stop;</macro>
  142. <macro loop="True" name="Necromancy" interrupt="False">while skill necromancy &lt; 100;if skill 'necromancy' &lt; 60;while skill 'necromancy' &lt; 60;while mana > 20;cast 'horrific beast';endwhile;endwhile;while mana &lt; 20;break;endwhile;cast 'wraith form';elseif skill 'necromancy' &lt; 75;while mana > 20;cast 'wither';endwhile;elseif skill 'necromancy' &lt; 99;while mana > 20;cast 'lich form';endwhile;else;while mana > 20;cast 'vampiric embrace';endwhile;endif;endwhile;stop;</macro>
  143. <macro loop="False" name="Spellweaving" interrupt="True">while skill 'spellweaving' &lt; 24;cast 'arcane circle';endwhile;while skill 'spellweaving' &lt; 52;cast 'reaper form';endwhile;while skill 'spellweaving' &lt; 80;cast 'essence of wind';endwhile;while skill 'spellweaving' &lt; 100;cast 'word of death' 'self';while hits &lt; 50;cast 'greater heal' 'self';endwhile;endwhile;</macro>
  144. <macro loop="True" name="Animal Lore" interrupt="True">while skill 'animal lore' &lt; 100;if not findalias 'lore pet';promptalias 'lore pet';endif;useskill 'animal lore';@target! 'lore pet';endwhile;while skill 'animal lore' &lt; 110;if not findalias 'lore pet';promptalias 'lore pet';endif;useskill 'animal lore';@target! 'lore pet';endwhile;while skill 'animal lore' &lt; 115;if not findalias 'lore pet';promptalias 'lore pet';endif;useskill 'animal lore';@target! 'lore pet';endwhile;//while skill 'animal lore' &lt; 120;if not findalias 'lore pet';promptalias 'lore pet';endif;useskill 'animal lore';@target! 'lore pet';endwhile;</macro>
  145. <macro loop="True" name="Blah" interrupt="True">replygump 0x5d40a15b 19;pause 1000;clickscreen 100 600 'single''left';pause 1000;</macro>
  146. <macro loop="False" name="Spirit Speak" interrupt="True">//while skill 'spirit speak' &lt; 60;//while skill 'spirit speak' &lt; 80;//while skill 'spirit speak' &lt; 90;//while skill 'spirit speak' &lt; 95;//while skill 'spirit speak' &lt; 100;//while skill 'spirit speak' &lt; 105;//while skill 'spirit speak' &lt; 110;//while skill 'spirit speak' &lt; 115;while skill 'spirit speak' &lt; 120;useskill 'spirit speak';endwhile;</macro>
  147. </macros>
  148. <autoloot>
  149. <enabled>False</enabled>
  150. <container>0xffffffff</container>
  151. <guards>False</guards>
  152. </autoloot>
  153. <scavenger enabled="True">
  154. <scavenge graphic="0xf3f" color="0x0" enabled="True"/>
  155. <scavenge graphic="0x1515" color="0x0" enabled="True"/>
  156. <scavenge graphic="0x1f03" color="0x0" enabled="True"/>
  157. <scavenge graphic="0x175d" color="0x7d1" enabled="False"/>
  158. </scavenger>
  159. <organizer>
  160. <group complete="False" source="0x42218a13" loop="True" name="Organizer-2" target="0x40ed2368" stack="False">
  161. <item graphic="0x1034" amount="0x0"/>
  162. <item graphic="0x1f03" amount="0x0"/>
  163. <item graphic="0x1515" amount="0x0"/>
  164. </group>
  165. <group complete="False" source="0x40ed2368" loop="True" name="Organizer-3" target="0x40f1f14d" stack="False">
  166. <item graphic="0xb2c" amount="0x0"/>
  167. </group>
  168. <group complete="False" source="0xff70" loop="False" name="Organizer-4" target="0x77659f69" stack="False"/>
  169. <group complete="False" source="0xd1e0" loop="False" name="Organizer-4" target="0x77659f69" stack="False"/>
  170. <group complete="True" source="0x418d896b" loop="False" name="Scribe Goods" target="0x42adec32" stack="False">
  171. <item graphic="0xef3" amount="0x32"/>
  172. <item graphic="0xf84" amount="0x32"/>
  173. <item graphic="0xf8d" amount="0x32"/>
  174. <item graphic="0xf7b" amount="0x32"/>
  175. <item graphic="0xf7a" amount="0x32"/>
  176. <item graphic="0xf8c" amount="0x32"/>
  177. <item graphic="0xf85" amount="0x32"/>
  178. <item graphic="0xf86" amount="0x32"/>
  179. <item graphic="0xf88" amount="0x32"/>
  180. </group>
  181. </organizer>
  182. <spellgrid>
  183. <grid name="Magery/UOF" x="579" y="619" locked="True" enabled="False"/>
  184. <grid name="Necroweavermage" x="532" y="510" locked="True" enabled="False"/>
  185. <grid name="bushwarrior" x="50" y="50" locked="True" enabled="False"/>
  186. <grid name="create food" x="573" y="642" locked="True" enabled="False"/>
  187. </spellgrid>
  188. </profile>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!