I recently returned to UO, and i discovered that the script i used years ago (Craftmatic) for my heartwood quests didn't work, probably because it has been many years since then and i'm now playing on a free-shard.
I went through the script and fixed all the bugs that i could find and i now have it in working order, it will work on any quest in heartwood, well at least on the free-shard i currently play on. I have one problem with it, it's not really a big deal considering i don't afk the script anyways, but when the script is searching for the current quest i'm on it does a "Event Macro 17 0" on the NPC in order to get a new quest to pop up. This causes the NPC's paper doll to also pop up, and the paper doll becomes the current container gump instead of the quest window.
This causes the script to think the gump did not open and it tries over and over again to cycle through the quests, popping up a window telling me that the gump didn't open and it will reset and try again. I added a few lines into the script where in the event a paper doll is the current gump in easyuo it right clicks it away, allowing the quest gump to become the current gump.
if #CONTNAME = paperdoll_gump
{
set %xclick #contposx + 37
set %yclick #contposy + 49
click %xclick %yclick r
}
This allows the script to work pretty good but once in a while it messes up and it tells me it needs to reset, all i have to do is click the ok button and it fixes itself when it cycles back through to the code i added above. But i was wondering if anyone has a better way i could go about doing this?
I hope it's not against the rules to post this script, but i don't see how i'm going to get help if people can't see the code i'm trying to fix. Also, this script requires a script called kalocr.exe to be placed in the same directory the euo.exe is in to work.
;======================================================================
; Script Name: CraftMatic (Crafters Quest Automater)
; Author: Tazzman
; Version: 2.06
; Client Tested with: 1.5.0B
; EUO version tested with: 1.5 Build 0062
; Shard OSI / FS: OSI
; Revision Date: 15 October 2005
; Public Release: 11 September 2005
; Purpose: To automate the creation & turn-in of the various Crafter Quest Items
; using the minimum resources needed per quest type.
;======================================================================
; Instructions - Just have 10 or so of whatever tool you need in your pack for
; the particular quest you're doing - Tinker Tools, Sewing Kits, Jointing Planes
; or Tongs, along with a couple thousand ingots or pieces of cloth.
;
; FOR THE SCRIPTS THAT REQUIRE BOARDS OR EMPTY BOTTLES, have a packy standing
; next to you With it's pack OPEN (and positioned at the bottom of the screen)
; before starting the script. Stand in the quest area, no more than 8-10 paces
; from the Quest Giver. Pick the Quest, press the "Start" button, sit back
; and watch the satchels roll in. Smile
;
; Quest Detection Routine courtesy of Kal In Ex, with his wonderful
; FAST OCR script (kalocr.txt) Thanks Kal!
;======================================================================
:Setup
gosub KalOCRSetup
Begin:
gosub menuinit
ignoreitem reset
set #menubutton N/A
menu delete EUOLabel3
menu text EUOLabel3 85 148 Status: Paused
hotkeyloop:
if #menubutton = Start
goto Start
goto hotkeyloop
;======================================================================
Start:
menu set EUOLabel3 Status: Working...
gosub QuestType
gosub countem
gosub FindCrafter
gosub GetNewQuest
gosub MarkItems
gosub TurnEmIn
gosub PackStatus
if #Menubutton = Pause1
menu set EUOLabel3 Status: Paused
goto HotKeyLoop
;======================================================================
sub FindCrafter
FindCrafter:
FindItem XU_AV G_12
Event Property #FindID
If %Weaver notin #Property || #FindRep <> 7
{
IgnoreItem #FindID
Goto FindCrafter
}
Set %CrafterID #FindID
Set %CrafterType #FindType
if #menubutton = Pause1
menu set EUOLabel3 Status: Pausing after Cycle
return
;======================================================================
sub GetNewQuest
GetNewQuest:
Set #LObjectID %CrafterID
Set #LObjectType %CrafterType
Event Macro 17 0
wait 5
Paperdoll1:
if #CONTNAME = paperdoll_gump
{
set %xclick #contposx + 37
set %yclick #contposy + 49
click %xclick %yclick r
goto Paperdoll1
}
Gosub OpenGump generic_gump 507_496 999 999
Set %AcceptX ( #ContPosX + 132 )
Set %AcceptY ( #ContPosY + 461 )
Set %RefuseX ( #ContPosX + 344 )
Set %RefuseY ( #contPosY + 461 )
wait 10
call %kalocr GetMLQInfo QuestOffer #contposx #contposy
If %1 <> %QuestPixels
Goto GetNewQuest
else
Click %AcceptX %AcceptY
Wait 20
if #menubutton = Pause1
menu set EUOLabel3 Status: Pausing after Cycle
return
;======================================================================
Sub MarkItems
exevent popup #charid
WaitingForGump:
gosub OpenGump normal_gump
wait 2
set %xclick #contposx + 47
set %yclick #contposy + 92
click %xclick %yclick
wait 10
if %ItemType = JTL
Set %tomark %tomark - 2
Mark:
for %i 1 %tomark
{
finditem %itemtype C_ , #backpackid
if #findkind = -1
{
wait 10
Display OK Don't have enough %ItemName! Only had %i
return
}
set #ltargetkind 1
set #ltargetid #findid
target 3s
event macro 22
ignoreitem #findid
}
wait 10
Key ESC
if #menubutton = Pause1
menu set EUOLabel3 Status: Pausing after Cycle
Return
;======================================================================
Sub TurnEmIn
Set #LObjectID %CrafterID
Set #LObjectType %CrafterType
Event Macro 17 0
wait 5
Paperdoll2:
if #CONTNAME = paperdoll_gump
{
set %xclick #contposx + 37
set %yclick #contposy + 49
click %xclick %yclick r
goto Paperdoll2
}
Gosub OpenGump generic_gump 507_496 999 999
wait 10
Set %AcceptX ( #ContPosX + 129 )
Set %AcceptY ( #ContPosY + 461 )
Click %AcceptX %AcceptY
Gosub OpenGump generic_gump 507_496 999 999
wait 10
Set %AcceptX ( #ContPosX + 129 )
Set %AcceptY ( #ContPosY + 461 )
Click %AcceptX %AcceptY
Wait 20
Return
;======================================================================
Sub OpenGump
Set %Timer ( #SCnt + 6 )
WaitForGumpToOpen:
Wait 1
If %Timer < #Scnt
{
Display OK The Gump Did Not Open.$Script Will Now attempt to restart.$If this happens more than twice in a row, please halt & restart script.
Goto Start
}
If #ContName <> %1 && #ContSize <> %2
Goto WaitForGumpToOpen
Wait 10
if %3 <> 999 && %4 <> 999
{
Set #ContPosX %3
Set #ContPosY %4
}
Return
;======================================================================
Sub CraftGump
Set %Timer ( #SCnt + 6 )
WaitForCraftGump:
Finditem %Tool
if #findkind = -1
return
Wait 1
If %Timer < #Scnt
{
Display OK The Crafting Gump Did Not Open.$Script Will Now Halt.
Halt
}
If #ContName <> %1 && #ContSize <> %2
Goto WaitForCraftGump
Wait 5
if %3 <> 999 && %4 <> 999
{
Set #ContPosX %3
Set #ContPosY %4
}
Return
;======================================================================
sub countem
if %ItemType = WUF ; If Doing Bottle Quest, make sure we have 50 to bypass craft gumps
Gosub CheckInitialMaterial
countem:
ignoreitem reset
Finditem %itemtype C_ , #backpackid
If #FindCnt < %ToMark
{
Set %Amount ( %ToMark - #FindCnt )
gosub MakeItem
goto countem
}
return
;======================================================================
Sub MakeItem
gosub CheckInitialMaterial
if %ItemType = WUF
Return
FindTool:
FindItem %ToolID C_ , #backpackid
If #FindKind = -1
{
Display OK You Do Not Have Any %ToolType $ Script Will Now halt.
halt
}
set %Tool #FindID
event property %tool
IF runic IN %tool
{
ignoreitem %tool
goto Findtool
}
Set #LObjectID #FindID
Wait 1
Event Macro 17 0
Gosub OpenGump generic_gump 530_537 999 999
Set %OneButtonX ( #ContPosX + %OffsetX1 )
Set %OneButtonY ( #ContPosY + %OffsetY1 )
Set %TwoButtonX ( #ContPosX + %OffsetX2 )
Set %TwoButtonY ( #ContPosY + %OffsetY2 )
Set %ThreeButtonX ( #ContPosX + %OffsetX3 )
Set %ThreeButtonY ( #ContPosY + %OffsetY3 )
Set %MakeLastX ( #ContPosX + 280 )
Set %MakeLastY ( #ContPosY + 412 )
Set %ExitButtonX ( #ContPosX + 26 )
Set %ExitButtonY ( #ContPosY + 412 )
Click %OneButtonX %OneButtonY
Gosub CraftGump generic_gump 530_507 999 999
Click %TwoButtonX %TwoButtonY
Gosub CraftGump generic_gump 530_507 999 999
Click %ThreeButtonX %ThreeButtonY
Gosub CraftGump generic_gump 530_507 999 999
set %tomake ( %amount - 1 )
for %t 1 %tomake
{
gosub CheckMaterial
Finditem %Tool
if #findkind = -1
Return
Click %MakeLastX %MakeLastY
Gosub CraftGump generic_gump 530_507 999 999
if #menubutton = Pause1
menu set EUOLabel3 Status: Pausing after Cycle
}
Click %ExitButtonX %ExitButtonY
Return
;======================================================================
Sub CheckMaterial
ignoreitem reset
finditem %MaterialType C_ , #backpackid
if #findstack < %MaterialAmount
{
set %amounttodrag ( %MaterialAmount - #findstack )
finditem %MaterialType C_
if #findkind = -1
{
Display OK You do not have enough Materials (Boards/Ingots/Cloth/Bottles).$Please check to ensure your pets backpack is open.$If you're out of raw materials, please restock.
halt
}
set %MaterialOnPet #Findstack
set %amounttodrag ( %MaterialAmount - %MaterialOnYou )
if %amounttodrag > %MaterialOnPet
{
exevent drag #findid %MaterialOnPet
wait 10
exevent dropc #backpackid
wait 10
goto CheckMaterial
}
exevent drag #findid %amounttodrag
wait 10
exevent dropc #backpackid
wait 10
ignoreitem reset
return
}
return
;======================================================================
sub CheckInitialMaterial
ignoreitem reset
finditem %MaterialType C_ , #backpackid
set %MaterialOnYou #findstack
ignoreitem #findid
wait 10
if %MaterialOnYou < %InitialMaterial
{
finditem %MaterialType C_
if #findkind = -1
{
display OK You do not have enough Materials (Boards/Ingots/Cloth/Bottles).$Please check to ensure your pets backpack is open.$If you're out of raw materials, please restock.
halt
}
set %MaterialOnPet #Findstack
set %amounttodrag ( %InitialMaterial - %MaterialOnYou )
if %amounttodrag > %MaterialOnPet
{
exevent drag #findid %MaterialOnPet
wait 10
exevent dropc #backpackid
wait 10
goto CheckInitialMaterial
}
exevent drag #findid %amounttodrag
wait 10
exevent dropc #backpackid
wait 10
ignoreitem reset
return
}
return
;======================================================================
sub PackStatus
event property #backpackid
str pos #property Contents:
str del #property 1 #strres
set %var #strres
str pos %var $
if #strres > 1
str del %var #strres 100
set %var #strres
str len %var
set %strlen #strres
set %number1 1
str del %number1 1 1
set %number1 #strres
set %number2 1
str del %number2 1 1
set %number2 #strres
set %numb 1
for %i 1 %strlen
{
str mid %var %i 1
if ! ( #strres < 1 || #strres > 0 ) 3
if %number1 > 0 2
set %numb 2
goto skip
if ( #strres < 1 || #strres > 0 )
set %number . %numb %number . %numb , #strres
skip:
}
set %maxitems ( 120 - %tomark )
if %number1 > %maxitems
{
Display OK Your backpack is too full. Please make some room and restart the script.
set #menubutton = N/A
goto Begin
}
Return
;======================================================================
sub KalOCRSetup
set %kalocr kalocr.txt
call %kalocr SetCharFormat NoSpaces
if %1 <> NoSpaces
{
Display OK Unable to find KALOCR.TXT. Please ensure that it is in the EUOX.EXE directory.
Halt
}
Return
;======================================================================
Sub QuestType
menu get combo
if #menures = 1
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 130 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 130 ; Y-Axis Offset for Category List 2
Set %OffsetX3 233 ; X-Axis Offset for Category List 3
Set %OffsetY3 110 ; Y-Axis Offset for Category List 3
Set %ItemName BarrelTaps ; Yes, we're making Barrel Taps today.
Set %Weaver wine ; Name of the Quest Giver
Set %ItemType IEG ; Barrel Tap ID
Set %MaterialType ENK ; Ingots
Set %MaterialAmount 2
set %InitialMaterial 50
Set %QuestPixels Beer_Goggles ; For the Beer Goggles Quest
Set %ToMark 25 ; How many Barrel Taps do we need?
Set %ToolID JTL_KTL ; Tinker Tool ID
Set %ToolType Tinker_Tools
return
}
;======================================================================
if #menures = 2
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 110 ; Y-Axis Offset for Category List 1
Set %OffsetX2 380 ; X-Axis Offset for Category List 2
Set %OffsetY2 270 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 110 ; Y-Axis Offset for Category List 3
Set %ItemName Garlands ; Flower Garlands
Set %Weaver cloth ; Name of the Quest Giver
Set %ItemType JJN ; Flower Garland ID
Set %MaterialType BUI_CUI ; Cloth
Set %MaterialAmount 5
Set %InitialMaterial 50
Set %QuestPixels Haute_Couture ; For the Haute Couture Quest
Set %ToMark 10 ; How many Garlands do we need?
Set %ToolID HAG ; Sewing Kit
Set %ToolType Sewing_Kits
return
}
;======================================================================
if #menures = 3
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 190 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 190 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 90 ; Y-Axis Offset for Category List 3
Set %ItemName BroadSwords ; BroadSwords
Set %Weaver metal ; Name of the Quest Giver
Set %ItemType ATF ; BroadSword ID
Set %MaterialType ENK ; Ingots
Set %MaterialAmount 10
Set %InitialMaterial 100
Set %QuestPixels Cuts_Both_Ways ; For the Cuts Both Ways Quest
Set %ToMark 10 ; How many Broadswords do we need?
Set %ToolID OBG_TBG_TLH_FBG ; Blacksmith Tools
Set %ToolType Tongs
return
}
;======================================================================
if #menures = 4
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 170 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 170 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 170 ; Y-Axis Offset for Category List 3
Set %ItemName SpyGlasses ; SpyGlasses
Set %Weaver bark ; Name of the Quest Giver
Set %ItemType ZVH ; Spyglass ID
Set %MaterialType ENK ; Ingots
Set %MaterialAmount 4
Set %InitialMaterial 100
Set %QuestPixels The_Far_Eye ; For the Far Eye Quest
Set %ToMark 20 ; How many Spyglasses do we need?
Set %ToolID JTL_KTL ; Tinker Tools
Set %ToolType Tinker_Tools
return
}
;======================================================================
if #menures = 5
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 110 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 110 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 110 ; Y-Axis Offset for Category List 3
Set %ItemName FukiyaDarts ; Darts.
Set %Weaver bowcrafter ; Name of the Quest Giver
Set %ItemType SGP ; Fuyika Dart ID
Set %MaterialType TLK ; Boards
Set %MaterialAmount 1
Set %InitialMaterial 1
Set %QuestPixels Lethal_Darts ; For the Deadly Darts Quest
Set %ToMark 10 ; How many Darts do we need?
Set %ToolID UFG ; Fletching Tools
Set %ToolType Fletching_Tools
return
}
;======================================================================
if #menures = 6
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 110 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 110 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 80 ; Y-Axis Offset for Category List 3
Set %ItemName Footstools ; Footstools.
Set %Weaver trinket ; Name of the Quest Giver
Set %ItemType QFE ; Footstool ID
Set %MaterialType TLK ; Boards
Set %MaterialAmount 9
Set %InitialMaterial 90
Set %QuestPixels Arch_Support ; For the Arch Support Quest
Set %ToMark 10 ; How many Footstools do we need?
Set %ToolID IGG_KGG_WFG_AIG_AGG_EGG_BIG_ZHG_CIG_CGG ; Carpentry Tools
Set %ToolType Carp_Tools
return
}
;======================================================================
if #menures = 7
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 110 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 110 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 80 ; Y-Axis Offset for Category List 3
Set %ItemName EmptyBottles ; EmptyBottles
Set %Weaver Wine ; Name of the Quest Giver
Set %ItemType WUF ; Empty Bottle ID
Set %MaterialType WUF ; Empty Bottle ID
Set %MaterialAmount 50
Set %InitialMaterial 50
Set %QuestPixels Message_in_a_Bottle ; For the Message In a Bottle Quest
Set %ToMark 1 ; How many Stacks of bottles do we need?
Set %ToolID IGG_KGG_WFG_AIG_AGG_EGG_BIG_ZHG_CIG_CGG ; Irrelevant
Set %ToolType Jointing_Planes ; Irrelevant
return
}
;======================================================================
if #menures = 8
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 130 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 130 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 70 ; Y-Axis Offset for Category List 3
Set %ItemName Bows ; Regular Bows
Set %Weaver bowcrafter ; Name of the Quest Giver
Set %ItemType WOH ; Fuyika Dart ID
Set %MaterialType TLK ; Boards
Set %MaterialAmount 7
Set %InitialMaterial 70
Set %QuestPixels A_Simple_Bow ; For the Simple Bow Quest
Set %ToMark 10 ; How many Bows do we need?
Set %ToolID UFG ; Fletching Tools
Set %ToolType Fletching_Tools
return
}
;======================================================================
if #menures = 9
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 110 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 110 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 80 ; Y-Axis Offset for Category List 3
Set %ItemName Footstools ; Footstools.
Set %Weaver Ciala ; Name of the Quest Giver
Set %ItemType QFE ; Footstool ID
Set %MaterialType TLK ; Boards
Set %MaterialAmount 9
Set %InitialMaterial 90
Set %QuestPixels Arch_Support ; For the Arch Support Quest
Set %ToMark 10 ; How many Footstools do we need?
Set %ToolID IGG_KGG_WFG_AIG_AGG_EGG_BIG_ZHG_CIG_CGG ; Carpentry Tools
Set %ToolType Carp_Tools
return
}
;======================================================================
if #menures = 10
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 130 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 130 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 90 ; Y-Axis Offset for Category List 3
Set %ItemName Crossbows ; Crossbows
Set %Weaver bowcrafter ; Name of the Quest Giver
Set %ItemType JSF ; Fuyika Dart ID
Set %MaterialType TLK ; Boards
Set %MaterialAmount 7
Set %InitialMaterial 70
Set %QuestPixels Ingenious_Archery,_Part_I ; For the Crossbow Quest
Set %ToMark 10 ; How many Crossbows do we need?
Set %ToolID UFG ; Fletching Tools
Set %ToolType Fletching_Tools
return
}
;======================================================================
if #menures = 11
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 130 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 130 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 110 ; Y-Axis Offset for Category List 3
Set %ItemName Heavy_Crossbows ; Heavy Crossbows
Set %Weaver bowcrafter ; Name of the Quest Giver
Set %ItemType LMH ; Fuyika Dart ID
Set %MaterialType TLK ; Boards
Set %MaterialAmount 10
Set %InitialMaterial 80
Set %QuestPixels Ingenious_Archery,_Part_II ; For the Heavy Crossbow Quest
Set %ToMark 8 ; How many Heavy Crossbows do we need?
Set %ToolID UFG ; Fletching Tools
Set %ToolType Fletching_Tools
return
}
;======================================================================
if #menures = 12
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 130 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 130 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 150 ; Y-Axis Offset for Category List 3
Set %ItemName Repeating_Crossbows ; Crossbows
Set %Weaver bowcrafter ; Name of the Quest Giver
Set %ItemType PPO ; Repeating Crossbow ID
Set %MaterialType TLK ; Boards
Set %MaterialAmount 10
Set %InitialMaterial 100
Set %QuestPixels Ingenious_Archery,_Part_III ; For the Repeating Crossbow Quest
Set %ToMark 10 ; How many Repeating Crossbows do we need?
Set %ToolID UFG ; Fletching Tools
Set %ToolType Fletching_Tools
return
}
;======================================================================
if #menures = 13
{
Set %OffsetX1 29 ; X-Axis Offset for Category List 1
Set %OffsetY1 110 ; Y-Axis Offset for Category List 1
Set %OffsetX2 29 ; X-Axis Offset for Category List 2
Set %OffsetY2 110 ; Y-Axis Offset for Category List 2
Set %OffsetX3 230 ; X-Axis Offset for Category List 3
Set %OffsetY3 130 ; Y-Axis Offset for Category List 3
Set %ItemName Tinker Toolkits ; Crossbows
Set %Weaver trinket ; Name of the Quest Giver
Set %ItemType JTL_KTL ; Repeating Crossbow ID
Set %MaterialType ENK ; Boards
Set %MaterialAmount 2
Set %InitialMaterial 20
Set %QuestPixels Necessity's_Mother ; For the Repeating Crossbow Quest
Set %ToMark 12 ; How many Repeating Crossbows do we need?
Set %ToolID JTL_KTL ; Fletching Tools
Set %ToolType Tinker_Tools
return
}
;======================================================================
;--------- EasyUO Menu Designer Code Begin ---------
sub menuinit
menu Clear
menu Window Title CraftMatic v2.06
menu Window Color Black
menu Window Size 230 170
menu Font Transparent #true
menu Font Align Right
menu Font Name MS Sans Serif
menu Font Size 8
menu Font Style
menu Font Color Red
menu Font Transparent #false
menu Font Align Left
menu Font BGColor Black
menu Text EUOLabel1 60 34 Quest Item to Produce
menu Font Size 9
menu Font Size 8
menu Font Color WindowText
menu Font BGColor Window
menu Combo Create combo 10 10 210
menu Combo Add combo Barrel Taps (Wine Tender)
menu Combo Add combo Garlands (Cloth Weaver)
menu Combo Add combo BroadSwords (Metal Weaver)
menu Combo Add combo SpyGlasses (Bark Weaver)
menu Combo Add combo Fukiya Dart (BowCrafter)
menu Combo Add combo Footstools (Trinket Weaver)
menu Combo Add combo EmptyBottles (Wine Tender)
menu Combo Add combo Regular Bows (BowCrafter)
menu Combo Add combo Footstools2 (Ciala the Arborist)
menu Combo Add combo Crossbows (BowCrafter)
menu Combo Add combo Heavy Crossbows (Bowcrafter)
menu Combo Add combo Repeating Crossbows (Bowcrafter)
menu Combo Add combo Tinker Tools (Trinket Weaver)
menu Font BGColor BtnFace
menu Button Start 64 70 109 25 Start!
menu Button Pause1 10 140 50 25 Pause
menu Font BGColor Black
menu Font Color White
menu Font Align Center
menu Show 800 10
return
;--------- EasyUO Menu Designer Code End ---------
