UOGamers Community
This is a sample guest message. Register a free account today to become a member! Once signed in, you'll be able to participate on this site by adding your own topics and posts, as well as connect with other members through your own private inbox!
-
To obtain new Razor updates, please reinstall Razor from our new website.
Uosteam carpentry quest script still around?
- Thread starter goobypls
- Start date
MB
Knight
// Description: Arch Support Quest Maker
if not listexists 'Carpentry Recipes'
@createlist 'Carpentry Recipes'
@pushlist 'Carpentry Recipes' 'Bramble Coat'
@pushlist 'Carpentry Recipes' 'Ironwood Crown'
@pushlist 'Carpentry Recipes' 'Phantom Staff'
@pushlist 'Carpentry Recipes' 'Acid Proof Rope'
endif
if not listexists 'Talismans'
@createlist 'Talismans'
@pushlist 'Talismans' 0x2f58
@pushlist 'Talismans' 0x2f59
@pushlist 'Talismans' 0x2f5a
@pushlist 'Talismans' 0x2f5b
endif
if not listexists 'Skills'
@createlist 'Skills'
@pushlist 'Skills' 'Alchemy Bonus'
@pushlist 'Skills' 'Blacksmithing Bonus'
@pushlist 'Skills' 'Carpentry Bonus'
@pushlist 'Skills' 'Inscription Bonus'
@pushlist 'Skills' 'Tailoring Bonus'
@pushlist 'Skills' 'Tinkering Bonus'
endif
if not listexists 'Jewelry'
@createlist 'Jewelry'
@pushlist 'Jewelry' 0x108a
@pushlist 'Jewelry' 0x1f09
@pushlist 'Jewelry' 0x1086
@pushlist 'Jewelry' 0x1f06
endif
if not listexists 'Jewelspurposes'
@createlist 'Jewelspurposes'
@pushlist 'Jewelspurposes' 'Faster Cast Recovery'
@pushlist 'Jewelspurposes' 'Lower reagent cost'
@pushlist 'Jewelspurposes' 'Faster Casting'
@pushlist 'Jewelspurposes' 'Luck'
endif
if not @findobject 'Carpentry Quest Giver'
promptalias 'Carpentry Quest Giver'
endif
if not @findobject 'Restock'
// Get serial of beetles backpack and replace 0x41605f7f with yours
setalias 'Restock' 0x41605f7f
if not timerexists 'feedPet'
createtimer 'feedPet'
endif
if not @findobject 'Trash Barrel'
promptalias 'Trash Barrel'
endif
// Hourly feed pet
if timer 'feedPet' >= 3600000
feed 'Restock' 'Meat' 0 1
pause 1000
settimer 'feedPet' 0
endif
endif
if not @findobject 'Reward Box'
promptalias 'Reward Box'
endif
if @findtype 0x1bd7 0 'backpack' 90
// Craft quest items
while @counttype 0xb5e 0 'backpack' < 10
if usetype! 0x102e
waitforgump 0x38920abd 5000
replygump 0x38920abd 2
waitforgump 0x38920abd 5000
else
sysmsg 'Out of saws!' 25
stop
endif
pause 1000
endwhile
if @useobject! 'Carpentry Quest Giver'
waitforgump 0x19bc4061 5000
if @ingump 0x19bc4061 "special stool"
replygump 0x19bc4061 1
waitforcontext 'self' 4 5000
waitfortarget 5000
pause 1000
// Mark items until quest is completed
while @counttype 0xb5e 0x4ea 'backpack' != 10
@targettype 0xb5e 0
pause 800
endwhile
@canceltarget
@useobject! 'Carpentry Quest Giver'
waitforgump 0xdf31ecf8 5000
replygump 0xdf31ecf8 4
waitforgump 0x96626c6e 5000
replygump 0x96626c6e 1
pause 2000
// Handle reward bags
while @findtype 0xe75 'any' 'backpack'
@setalias 'trash' 'found'
@useobject! 'trash'
pause 1000
waitforcontents 'trash' 5000
// Runics
while @findtype 0x1028 'any' 'trash'
@moveitem! 'found' 'Reward Box'
pause 1000
endwhile
// Carpentry Recipes
while @findtype 0x2831 0 'trash'
waitforproperties 'found' 5000
for 0 to 'Carpentry Recipes'
if @property 'Carpentry Recipes[]' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
endfor
ignoreobject 'found'
endwhile
// Talismans
for 0 to 'Talismans'
while @findtype Talismans[] 0 'trash'
waitforproperties 'found' 5000
if @property 'slayer' 'found'
@moveitem! 'found' 'reward box'
pause 1000
break
ignoreobject 'found'
endif
if @property Skills[] 'found' >=25
@moveitem! 'found' 'reward box'
pause 1000
break
ignoreobject 'found'
endif
if @property 'Exceptional Bonus' 'found' >= 25
@moveitem! 'found' 'Reward Box'
pause 1000
break
ignoreobject 'found'
endif
if @property 'killer' 'found' >= 90
@moveitem! 'found' 'Reward Box'
pause 1000
break
ignoreobject 'found'
endif
if @property 'Protection' 'found' >= 50
@moveitem! 'found' 'Reward Box'
pause 1000
break
ignoreobject 'found'
endif
ignoreobject 'found'
endwhile
endfor
//Jewels
for 0 to 'Jewelry'
while @findtype Jewelry[] 0 'trash'
pause 1000
if @property 'Luck' 'found' >= 90
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster Cast Recovery' 'found' = 3
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Defense chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Hit chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster casting' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
ignoreobject 'found'
endwhile
endfor
// Drop checked reward backpacks to trash barrel
if @findalias 'Trash Barrel'
moveitem! 'trash' 'Trash Barrel'
else
moveitemoffset! 'trash' 'ground' 1 0 0
endif
pause 1000
endwhile
else
replygump 0x19bc4061 2
endif
endif
pause 800
elseif @movetype 0x1bd7 'Restock' 'backpack' 0 0 0 0 90
pause 1000
else
sysmsg 'Out of boards!' 25
stop
endif
clearignorelist
if not listexists 'Carpentry Recipes'
@createlist 'Carpentry Recipes'
@pushlist 'Carpentry Recipes' 'Bramble Coat'
@pushlist 'Carpentry Recipes' 'Ironwood Crown'
@pushlist 'Carpentry Recipes' 'Phantom Staff'
@pushlist 'Carpentry Recipes' 'Acid Proof Rope'
endif
if not listexists 'Talismans'
@createlist 'Talismans'
@pushlist 'Talismans' 0x2f58
@pushlist 'Talismans' 0x2f59
@pushlist 'Talismans' 0x2f5a
@pushlist 'Talismans' 0x2f5b
endif
if not listexists 'Skills'
@createlist 'Skills'
@pushlist 'Skills' 'Alchemy Bonus'
@pushlist 'Skills' 'Blacksmithing Bonus'
@pushlist 'Skills' 'Carpentry Bonus'
@pushlist 'Skills' 'Inscription Bonus'
@pushlist 'Skills' 'Tailoring Bonus'
@pushlist 'Skills' 'Tinkering Bonus'
endif
if not listexists 'Jewelry'
@createlist 'Jewelry'
@pushlist 'Jewelry' 0x108a
@pushlist 'Jewelry' 0x1f09
@pushlist 'Jewelry' 0x1086
@pushlist 'Jewelry' 0x1f06
endif
if not listexists 'Jewelspurposes'
@createlist 'Jewelspurposes'
@pushlist 'Jewelspurposes' 'Faster Cast Recovery'
@pushlist 'Jewelspurposes' 'Lower reagent cost'
@pushlist 'Jewelspurposes' 'Faster Casting'
@pushlist 'Jewelspurposes' 'Luck'
endif
if not @findobject 'Carpentry Quest Giver'
promptalias 'Carpentry Quest Giver'
endif
if not @findobject 'Restock'
// Get serial of beetles backpack and replace 0x41605f7f with yours
setalias 'Restock' 0x41605f7f
if not timerexists 'feedPet'
createtimer 'feedPet'
endif
if not @findobject 'Trash Barrel'
promptalias 'Trash Barrel'
endif
// Hourly feed pet
if timer 'feedPet' >= 3600000
feed 'Restock' 'Meat' 0 1
pause 1000
settimer 'feedPet' 0
endif
endif
if not @findobject 'Reward Box'
promptalias 'Reward Box'
endif
if @findtype 0x1bd7 0 'backpack' 90
// Craft quest items
while @counttype 0xb5e 0 'backpack' < 10
if usetype! 0x102e
waitforgump 0x38920abd 5000
replygump 0x38920abd 2
waitforgump 0x38920abd 5000
else
sysmsg 'Out of saws!' 25
stop
endif
pause 1000
endwhile
if @useobject! 'Carpentry Quest Giver'
waitforgump 0x19bc4061 5000
if @ingump 0x19bc4061 "special stool"
replygump 0x19bc4061 1
waitforcontext 'self' 4 5000
waitfortarget 5000
pause 1000
// Mark items until quest is completed
while @counttype 0xb5e 0x4ea 'backpack' != 10
@targettype 0xb5e 0
pause 800
endwhile
@canceltarget
@useobject! 'Carpentry Quest Giver'
waitforgump 0xdf31ecf8 5000
replygump 0xdf31ecf8 4
waitforgump 0x96626c6e 5000
replygump 0x96626c6e 1
pause 2000
// Handle reward bags
while @findtype 0xe75 'any' 'backpack'
@setalias 'trash' 'found'
@useobject! 'trash'
pause 1000
waitforcontents 'trash' 5000
// Runics
while @findtype 0x1028 'any' 'trash'
@moveitem! 'found' 'Reward Box'
pause 1000
endwhile
// Carpentry Recipes
while @findtype 0x2831 0 'trash'
waitforproperties 'found' 5000
for 0 to 'Carpentry Recipes'
if @property 'Carpentry Recipes[]' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
endfor
ignoreobject 'found'
endwhile
// Talismans
for 0 to 'Talismans'
while @findtype Talismans[] 0 'trash'
waitforproperties 'found' 5000
if @property 'slayer' 'found'
@moveitem! 'found' 'reward box'
pause 1000
break
ignoreobject 'found'
endif
if @property Skills[] 'found' >=25
@moveitem! 'found' 'reward box'
pause 1000
break
ignoreobject 'found'
endif
if @property 'Exceptional Bonus' 'found' >= 25
@moveitem! 'found' 'Reward Box'
pause 1000
break
ignoreobject 'found'
endif
if @property 'killer' 'found' >= 90
@moveitem! 'found' 'Reward Box'
pause 1000
break
ignoreobject 'found'
endif
if @property 'Protection' 'found' >= 50
@moveitem! 'found' 'Reward Box'
pause 1000
break
ignoreobject 'found'
endif
ignoreobject 'found'
endwhile
endfor
//Jewels
for 0 to 'Jewelry'
while @findtype Jewelry[] 0 'trash'
pause 1000
if @property 'Luck' 'found' >= 90
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster Cast Recovery' 'found' = 3
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Defense chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Hit chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster casting' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
ignoreobject 'found'
endwhile
endfor
// Drop checked reward backpacks to trash barrel
if @findalias 'Trash Barrel'
moveitem! 'trash' 'Trash Barrel'
else
moveitemoffset! 'trash' 'ground' 1 0 0
endif
pause 1000
endwhile
else
replygump 0x19bc4061 2
endif
endif
pause 800
elseif @movetype 0x1bd7 'Restock' 'backpack' 0 0 0 0 90
pause 1000
else
sysmsg 'Out of boards!' 25
stop
endif
clearignorelist
Last edited:
aemneuspeed
Knight
some of you can say you dont like MB and what not, but he's one of the most helpful folks I've seen on these forums...
Geaux
Sorceror
Grezz GreenWood
Sorceror
Yeah, seriously, MB you rock for this.
Itsumaru Naohiro
Traveler
I tested this today and had some trouble. I may of been using the wrong Npc or something but what was happening is it was saying i was out of dovetail saws when i wasn't and that the item or npc was unrecognized. The macro didn't even attempt to create anything.
Matiu
Page
I had same prob u need to edit line "81" from "if usetype! 0x102e" too "if usetype! xxxxxx " the x's being one of these >
Draw knife = 0x10e4
Scorp = 0x10e7
Saw = 0x1034
Froe = 0x10e5
Inshave = 0x10e6
Dovetail saw = 0x1028
here it is in red
// Craft quest items
while @counttype 0xb5e 0 'backpack' < 10
if usetype! 0x102e
waitforgump 0x38920abd 5000
replygump 0x38920abd 2
waitforgump 0x38920abd 5000
else
sysmsg 'Out of saws!' 25
stop
endif
pause 1000
endwhile
try this it uses scorps !
// Description: Arch Support Quest Maker
if not listexists 'Carpentry Recipes'
@createlist 'Carpentry Recipes'
@pushlist 'Carpentry Recipes' 'Bramble Coat'
@pushlist 'Carpentry Recipes' 'Ironwood Crown'
@pushlist 'Carpentry Recipes' 'Phantom Staff'
@pushlist 'Carpentry Recipes' 'Acid Proof Rope'
endif
if not listexists 'Talismans'
@createlist 'Talismans'
@pushlist 'Talismans' 0x2f58
@pushlist 'Talismans' 0x2f59
@pushlist 'Talismans' 0x2f5a
@pushlist 'Talismans' 0x2f5b
endif
if not listexists 'Skills'
@createlist 'Skills'
@pushlist 'Skills' 'Alchemy Bonus'
@pushlist 'Skills' 'Blacksmithing Bonus'
@pushlist 'Skills' 'Carpentry Bonus'
@pushlist 'Skills' 'Fletching Bonus'
@pushlist 'Skills' 'Inscription Bonus'
@pushlist 'Skills' 'Tailoring Bonus'
@pushlist 'Skills' 'Tinkering Bonus'
@pushlist 'Skills' 'Cooking Bonus'
endif
if not listexists 'Jewelry'
@createlist 'Jewelry'
@pushlist 'Jewelry' 0x108a
@pushlist 'Jewelry' 0x1f09
@pushlist 'Jewelry' 0x1086
@pushlist 'Jewelry' 0x1f06
endif
if not listexists 'Jewelspurposes'
@createlist 'Jewelspurposes'
@pushlist 'Jewelspurposes' 'Faster Cast Recovery'
@pushlist 'Jewelspurposes' 'Lower reagent cost'
@pushlist 'Jewelspurposes' 'Faster Casting'
@pushlist 'Jewelspurposes' 'Luck'
endif
if not @findobject 'Carpentry Quest Giver'
promptalias 'Carpentry Quest Giver'
endif
if not @findobject 'Restock'
// Get serial of beetles backpack and replace 0x41605f7f with yours
setalias 'Restock' 0x5bc33
if not timerexists 'feedPet'
createtimer 'feedPet'
endif
if not @findobject 'Trash Barrel'
promptalias 'Trash Barrel'
endif
// Hourly feed pet
if timer 'feedPet' >= 3600000
feed 'Restock' 'Meat' 0 1
pause 1000
settimer 'feedPet' 0
endif
endif
if not @findobject 'Reward Box'
promptalias 'Reward Box'
endif
while @counttype 0x1eb8 0 'backpack' < 2
usetype! 0x1eb8
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 23
endwhile
while @counttype 0x10e7 0 'backpack' < 2
usetype! 0x1eb8
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 16
waitforgump 0x38920abd 15000
endwhile
if @findtype 0x1bd7 0 'backpack' 90
// Craft quest items
while @counttype 0xb5e 0 'backpack' < 10
if usetype! 0x10e7
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 2
waitforgump 0x38920abd 15000
else
sysmsg 'Out of saws!' 25
stop
endif
pause 1000
endwhile
if @useobject! 'Carpentry Quest Giver'
waitforgump 0x19bc4061 5000
if @ingump 0x19bc4061 "special stool"
replygump 0x19bc4061 1
waitforcontext 'self' 4 5000
waitfortarget 5000
pause 1000
// Mark items until quest is completed
while @counttype 0xb5e 0x4ea 'backpack' != 10
@targettype 0xb5e 0
pause 800
endwhile
@canceltarget
@useobject! 'Carpentry Quest Giver'
waitforgump 0xdf31ecf8 5000
replygump 0xdf31ecf8 4
waitforgump 0x96626c6e 5000
replygump 0x96626c6e 1
pause 2000
// Handle reward bags
while @findtype 0xe75 'any' 'backpack'
@setalias 'trash' 'found'
@useobject! 'trash'
pause 1000
waitforcontents 'trash' 5000
// Runics
while @findtype 0x1028 'any' 'trash'
@moveitem! 'found' 'Reward Box'
pause 1000
endwhile
while @findtype 0x2831 'any' 'trash'
@moveitem! 'found' 'Reward Box'
pause 1000
endwhile
// Carpentry Recipes
while @findtype 0x2831 0 'trash'
waitforproperties 'found' 5000
for 0 to 'Carpentry Recipes'
if @property 'Carpentry Recipes[]' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
endfor
ignoreobject 'found'
endwhile
// Talismans
for 0 to 'Talismans'
while @findtype Talismans[] 0 'trash'
waitforproperties 'found' 5000
if @property 'slayer' 'found'
@moveitem! 'found' 'reward box'
pause 1000
break
endif
if @property 'Exceptional Bonus' 'found' >= 20
for 0 to 'Skills'
if @property Skills[] 'found' >= 20
@moveitem! 'found' 'Reward Box' 160
pause 1000
break
endif
endfor
endif
if @property Skills[] 'found' >=25
@moveitem! 'found' 'reward box'
pause 1000
break
endif
if @property 'Exceptional Bonus' 'found' >= 25
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'killer' 'found' >= 95
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Protection' 'found' >= 60
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
ignoreobject 'found'
endwhile
endfor
//Jewels
for 0 to 'Jewelry'
while @findtype Jewelry[] 0 'trash'
pause 1000
if @property 'Luck' 'found' >= 90
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster Cast Recovery' 'found' = 3
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Defense chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Hit chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster casting' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
ignoreobject 'found'
endwhile
endfor
// Drop checked reward backpacks to trash barrel
if @findalias 'Trash Barrel'
moveitem! 'trash' 'Trash Barrel'
else
moveitemoffset! 'trash' 'ground' 1 0 0
endif
pause 1000
endwhile
else
replygump 0x19bc4061 2
endif
endif
pause 800
elseif @movetype 0x1bd7 'Restock' 'backpack' 0 0 0 0 90
pause 1000
else
sysmsg 'Out of boards!' 25
stop
endif
clearignorelist
hope this helps & hope i havent messed this up with my shite typing skills ! and Thanks MB !
Draw knife = 0x10e4
Scorp = 0x10e7
Saw = 0x1034
Froe = 0x10e5
Inshave = 0x10e6
Dovetail saw = 0x1028
here it is in red
// Craft quest items
while @counttype 0xb5e 0 'backpack' < 10
if usetype! 0x102e
waitforgump 0x38920abd 5000
replygump 0x38920abd 2
waitforgump 0x38920abd 5000
else
sysmsg 'Out of saws!' 25
stop
endif
pause 1000
endwhile
try this it uses scorps !
// Description: Arch Support Quest Maker
if not listexists 'Carpentry Recipes'
@createlist 'Carpentry Recipes'
@pushlist 'Carpentry Recipes' 'Bramble Coat'
@pushlist 'Carpentry Recipes' 'Ironwood Crown'
@pushlist 'Carpentry Recipes' 'Phantom Staff'
@pushlist 'Carpentry Recipes' 'Acid Proof Rope'
endif
if not listexists 'Talismans'
@createlist 'Talismans'
@pushlist 'Talismans' 0x2f58
@pushlist 'Talismans' 0x2f59
@pushlist 'Talismans' 0x2f5a
@pushlist 'Talismans' 0x2f5b
endif
if not listexists 'Skills'
@createlist 'Skills'
@pushlist 'Skills' 'Alchemy Bonus'
@pushlist 'Skills' 'Blacksmithing Bonus'
@pushlist 'Skills' 'Carpentry Bonus'
@pushlist 'Skills' 'Fletching Bonus'
@pushlist 'Skills' 'Inscription Bonus'
@pushlist 'Skills' 'Tailoring Bonus'
@pushlist 'Skills' 'Tinkering Bonus'
@pushlist 'Skills' 'Cooking Bonus'
endif
if not listexists 'Jewelry'
@createlist 'Jewelry'
@pushlist 'Jewelry' 0x108a
@pushlist 'Jewelry' 0x1f09
@pushlist 'Jewelry' 0x1086
@pushlist 'Jewelry' 0x1f06
endif
if not listexists 'Jewelspurposes'
@createlist 'Jewelspurposes'
@pushlist 'Jewelspurposes' 'Faster Cast Recovery'
@pushlist 'Jewelspurposes' 'Lower reagent cost'
@pushlist 'Jewelspurposes' 'Faster Casting'
@pushlist 'Jewelspurposes' 'Luck'
endif
if not @findobject 'Carpentry Quest Giver'
promptalias 'Carpentry Quest Giver'
endif
if not @findobject 'Restock'
// Get serial of beetles backpack and replace 0x41605f7f with yours
setalias 'Restock' 0x5bc33
if not timerexists 'feedPet'
createtimer 'feedPet'
endif
if not @findobject 'Trash Barrel'
promptalias 'Trash Barrel'
endif
// Hourly feed pet
if timer 'feedPet' >= 3600000
feed 'Restock' 'Meat' 0 1
pause 1000
settimer 'feedPet' 0
endif
endif
if not @findobject 'Reward Box'
promptalias 'Reward Box'
endif
while @counttype 0x1eb8 0 'backpack' < 2
usetype! 0x1eb8
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 23
endwhile
while @counttype 0x10e7 0 'backpack' < 2
usetype! 0x1eb8
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 16
waitforgump 0x38920abd 15000
endwhile
if @findtype 0x1bd7 0 'backpack' 90
// Craft quest items
while @counttype 0xb5e 0 'backpack' < 10
if usetype! 0x10e7
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 2
waitforgump 0x38920abd 15000
else
sysmsg 'Out of saws!' 25
stop
endif
pause 1000
endwhile
if @useobject! 'Carpentry Quest Giver'
waitforgump 0x19bc4061 5000
if @ingump 0x19bc4061 "special stool"
replygump 0x19bc4061 1
waitforcontext 'self' 4 5000
waitfortarget 5000
pause 1000
// Mark items until quest is completed
while @counttype 0xb5e 0x4ea 'backpack' != 10
@targettype 0xb5e 0
pause 800
endwhile
@canceltarget
@useobject! 'Carpentry Quest Giver'
waitforgump 0xdf31ecf8 5000
replygump 0xdf31ecf8 4
waitforgump 0x96626c6e 5000
replygump 0x96626c6e 1
pause 2000
// Handle reward bags
while @findtype 0xe75 'any' 'backpack'
@setalias 'trash' 'found'
@useobject! 'trash'
pause 1000
waitforcontents 'trash' 5000
// Runics
while @findtype 0x1028 'any' 'trash'
@moveitem! 'found' 'Reward Box'
pause 1000
endwhile
while @findtype 0x2831 'any' 'trash'
@moveitem! 'found' 'Reward Box'
pause 1000
endwhile
// Carpentry Recipes
while @findtype 0x2831 0 'trash'
waitforproperties 'found' 5000
for 0 to 'Carpentry Recipes'
if @property 'Carpentry Recipes[]' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
endfor
ignoreobject 'found'
endwhile
// Talismans
for 0 to 'Talismans'
while @findtype Talismans[] 0 'trash'
waitforproperties 'found' 5000
if @property 'slayer' 'found'
@moveitem! 'found' 'reward box'
pause 1000
break
endif
if @property 'Exceptional Bonus' 'found' >= 20
for 0 to 'Skills'
if @property Skills[] 'found' >= 20
@moveitem! 'found' 'Reward Box' 160
pause 1000
break
endif
endfor
endif
if @property Skills[] 'found' >=25
@moveitem! 'found' 'reward box'
pause 1000
break
endif
if @property 'Exceptional Bonus' 'found' >= 25
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'killer' 'found' >= 95
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Protection' 'found' >= 60
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
ignoreobject 'found'
endwhile
endfor
//Jewels
for 0 to 'Jewelry'
while @findtype Jewelry[] 0 'trash'
pause 1000
if @property 'Luck' 'found' >= 90
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster Cast Recovery' 'found' = 3
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Defense chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Hit chance increase' 'found' >= 12
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
if @property 'Faster casting' 'found'
@moveitem! 'found' 'Reward Box'
pause 1000
break
endif
ignoreobject 'found'
endwhile
endfor
// Drop checked reward backpacks to trash barrel
if @findalias 'Trash Barrel'
moveitem! 'trash' 'Trash Barrel'
else
moveitemoffset! 'trash' 'ground' 1 0 0
endif
pause 1000
endwhile
else
replygump 0x19bc4061 2
endif
endif
pause 800
elseif @movetype 0x1bd7 'Restock' 'backpack' 0 0 0 0 90
pause 1000
else
sysmsg 'Out of boards!' 25
stop
endif
clearignorelist
hope this helps & hope i havent messed this up with my shite typing skills ! and Thanks MB !
Last edited: