[Autohotkey] Bod Rewards

If you make a Client-side script you can publish it here for other players to use
Post Reply
Blade Slinger
Apprentice Scribe
Posts: 17
Joined: Tue Mar 23, 2010 6:11 pm

[Autohotkey] Bod Rewards

Post by Blade Slinger »

The adding up bod points to see what the reward is going to be is time consuming. I put together a quick script in autohotkey where you select what bod you have and it tells you the points it's worth as well as the rewards. It makes the process a little quicker and easier for the wife and I thought I would share it here. Please let me know if I have made an error on something. This should work for all bods.

Code: Select all

#NoEnv 
SendMode Input  
SetWorkingDir %A_ScriptDir%  
#NoTrayIcon

TabColors := ["adf2a2", "f5f5f5", "ffebad", "e6faf9", "ceffad"]
Gui, Font, s12 cBlue , Calibri
Gui, Add, Tab3, vMyTab gTabEvent x0 y0 w740 h360 , Tailor||Smith|Carpentry|Fletching|Taming

Gui, Tab, Carpentry
Gui, Add, Text, x22 y42 w100 h20 +BackgroundTrans, Amount
Gui, Add, DropDownList, vCarpAmount gCarpUpdate x80 y39 w50 h100 , 10||15|20
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x150 y42 w100 h20, Wood Type
Gui, Add, DropDownList, vCarpType gCarpUpdate x230 y39 w130 h300 , Regular||Pine|Ash|Mohogany|Yew|Oak|Zircote|Ebony|Bamboo|Purple Heart|Redwood|Petrified
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x375 y42 w100 h20, Size
Gui, Add, DropDownList, vCarpSize gCarpUpdate x410 y39 w100 h300 , Small||2-piece|3-piece|4-piece|5-piece|6-piece
Gui, Font, s12 cBlue , Calibri
Gui, Add, CheckBox, vCarpExcep gCarpUpdate x530 y42 w100 h20 ,Exceptional
Gui, Font, s12 cMaroon , Calibri
Gui, Add, Text, x22 y72 w100 h20, Total Points:
Gui, Font, s12 cRed Bold , Calibri
Gui, Add, Text, vCarpTotalPoints x105 y72 w100 h20, 10

Gui, Font, s12 cNavy Bold, Calibri
Gui, Add, Text, x400 y88 w500 h20, All small Bods fit into a large Bod.

Gui, Font, s12 cMaroon Normal, Calibri
Gui, Add, GroupBox, x22 y100 w670 h250, Reward
Gui, Font, s12 cNavy Bold, Calibri
tmp := "75% Sturdy Axe`n25% Boards"
Gui, Add, Text, vCarpRewards x45 y120 w640 h220, %tmp%



Gui, Tab, Fletching
Gui, Font, s12 cBlue normal , Calibri
Gui, Add, Text, x22 y42 w100 h20, Amount
Gui, Add, DropDownList, vFletAmount gFletUpdate x80 y39 w50 h100 , 10||15|20
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x150 y42 w100 h20, Wood Type
Gui, Add, DropDownList, vFletType gFletUpdate x230 y39 w130 h300 , Regular||Pine|Ash|Mohogany|Yew|Oak|Zircote|Ebony|Bamboo|Purple Heart|Redwood|Petrified
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x375 y42 w100 h20, Size
Gui, Add, DropDownList, vFletSize gFletUpdate x410 y39 w100 h300 , Small||3-piece|6-piece
Gui, Font, s12 cBlue , Calibri
Gui, Add, CheckBox, vFletExcep gFletUpdate x530 y42 w100 h20 ,Exceptional
Gui, Font, s12 cMaroon , Calibri
Gui, Add, Text, x22 y72 w100 h20, Total Points:
Gui, Font, s12 cRed Bold , Calibri
Gui, Add, Text, vFletTotalPoints x105 y72 w100 h20, 10

Gui, Font, s12 cNavy Bold, Calibri
Gui, Add, Text, x400 y88 w500 h20, All small Bods fit into a large Bod.

Gui, Font, s12 cMaroon Normal , Calibri
Gui, Add, GroupBox, x22 y100 w670 h250, Reward
Gui, Font, s12 cNavy Bold, Calibri
tmp := "75% Sturdy Axe`n25% Boards"
Gui, Add, Text, vFletRewards x45 y120 w640 h220, %tmp%


Gui, Tab, Tailor
Gui, Font, s12 cBlue normal , Calibri
Gui, Add, Text, x22 y42 w100 h20, Amount
Gui, Add, DropDownList, vTailorAmount gTailorUpdate x80 y39 w50 h100 , 10||15|20
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x170 y42 w100 h20, Material
Gui, Add, DropDownList, vTailorType gTailorUpdate x230 y39 w130 h300 , Cloth||Leather|Spined|Horned|Barbed|Polar|Synthetic|Blaze|Daemonic|Shadow|Frost|Ethereal
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x375 y42 w100 h20, Size
Gui, Add, DropDownList, vTailorSize gTailorUpdate x410 y39 w100 h300 , Small||4-piece|5-piece|6-piece
Gui, Font, s12 cBlue , Calibri
Gui, Add, CheckBox, vTailorExcep gTailorUpdate x530 y42 w100 h20 ,Exceptional
Gui, Font, s12 cMaroon , Calibri
Gui, Add, Text, x22 y72 w100 h20, Total Points:
Gui, Font, s12 cRed Bold , Calibri
Gui, Add, Text, vTailorTotalPoints x105 y72 w100 h20, 10

Gui, Font, s12 cNavy Bold, Calibri
Gui, Add, Text, x400 y88 w500 h20, All small Bods fit into a large Bod.

Gui, Font, s12 cMaroon Normal , Calibri
Gui, Add, GroupBox, x22 y100 w670 h250, Reward
Gui, Font, s12 cNavy Bold, Calibri
tmp := "Cloth 1`nColored Loom`nCharged Dye Tub"
Gui, Add, Text, vTailorRewards x45 y120 w640 h220, %tmp%


Gui, Tab, Smith
Gui, Font, s12 cBlue normal , Calibri
Gui, Add, Text, x22 y42 w100 h20, Amount
Gui, Add, DropDownList, vSmithAmount gSmithUpdate x80 y39 w50 h100 , 10||15|20
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x170 y42 w100 h20, Material
Gui, Add, DropDownList, vSmithType gSmithUpdate x230 y39 w130 h300 , Iron||Dull Copper|Shadow Iron|Copper|Bronze|Gold|Agapite|Verite|Valorite|Blaze|Ice|Toxic|Electrum|Platinum
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x375 y42 w100 h20, Size
Gui, Add, DropDownList, vSmithSize gSmithUpdate x410 y39 w100 h300 , Small||Ringmail|Chainmail|Plate
Gui, Font, s12 cBlue , Calibri
Gui, Add, CheckBox, vSmithExcep gSmithUpdate x530 y42 w100 h20 ,Exceptional
Gui, Font, s12 cMaroon , Calibri
Gui, Add, Text, x22 y72 w100 h20, Total Points:
Gui, Font, s12 cRed Bold , Calibri
Gui, Add, Text, vSmithTotalPoints x105 y72 w100 h20, 10

Gui, Font, s12 cNavy Bold, Calibri
Gui, Add, Text, x400 y88 w500 h20, Weapons have no large Bod.

Gui, Font, s12 cMaroon Normal , Calibri
Gui, Add, GroupBox, x22 y100 w670 h250, Reward
Gui, Font, s12 cNavy Bold, Calibri
tmp := "50% Sturdy Shovel`n50% Sturdy Smith Hammer"
Gui, Add, Text, vSmithRewards x45 y120 w640 h220, %tmp%



Gui, Tab, Taming
noLarge := "                                    These animals do not fit into any large Bods`n`nLlama  :  Bull Frog  :  Giant Toad  :  Snow Leopard  :  Walrus  :  Jack Rabbit  :  Rabbit  :  Hind  `nGreat Hart  :  Alligator  :  Gorilla  :  Slime  :  Mountain Goat  :  Skittering Hopper  :  Boar`nPredator HellCat  :  Lava Lizard"
Gui, Font, s12 cBlue normal , Calibri
Gui, Add, Text, x22 y42 w100 h20, Amount
Gui, Add, DropDownList, vTameAmount gTameUpdate x80 y39 w50 h100 , 10||15|20
Gui, Font, s12 cBlue , Calibri
Gui, Add, Text, x375 y42 w100 h20, Size
Gui, Add, DropDownList, vTameSize gTameUpdate x410 y39 w100 h300 , Small||3-piece|4-piece|5-piece|6-piece
Gui, Font, s12 cMaroon Normal, Calibri
Gui, Add, GroupBox, x22 y100 w670 h250, Reward
Gui, Font, s12 cNavy Bold, Calibri
tmp := "Pet Powerscroll 105`nBrush`nPet Leash`nWooden Horse Statue`nLeather / Spined Leather `n`n" + noLarge
Gui, Add, Text, vTameRewards x45 y120 w640 h220, %tmp%



Gui, +AlwaysOnTop
Gui, Show, x93 y276 h360 w710, UOEX Bod Rewards
GoSub, TabEvent

Return


GuiClose:
ExitApp

TabEvent:
GuiControlGet, MyTab
if (MyTab = "Tailor")
	cTab := 1
if (MyTab = "Smith")
	cTab := 2
if (MyTab = "Carpentry")
	cTab := 3
if (MyTab = "Fletching")
	cTab := 4
if (MyTab = "Taming")
	cTab := 5
Gui, Color, % TabColors[cTab]
return

CarpUpdate:
	Gui, Submit, NoHide
	; Update Carpentry Tab Something was changed. 
	CarpTotal := 0
	CarpReward =
	
	If (CarpAmount = 10)
			CarpTotal += 10
			
	If (CarpAmount = 15)
			CarpTotal += 25
		
	If (CarpAmount = 20)
			CarpTotal += 50
	
	If (CarpType = "Pine")
			CarpTotal += 200
	
	If (CarpType = "Ash")
			CarpTotal += 250
	
	If (CarpType = "Mohogany")
			CarpTotal += 300
	
	If (CarpType = "Yew")
			CarpTotal += 350
			
	If (CarpType = "Oak")
			CarpTotal += 400
	
	If (CarpType = "Zircote")
			CarpTotal += 450
			
	If (CarpType = "Ebony")
			CarpTotal += 500
			
	If (CarpType = "Bamboo")
			CarpTotal += 550
			
	If (CarpType = "Purple Heart")
			CarpTotal += 600
			
	If (CarpType = "Redwood")
			CarpTotal += 650
			
	If (CarpType = "Petrified")
			CarpTotal += 700
	
	If (CarpSize = "2-piece")
			CarpTotal += 50			
	
	If (CarpSize = "3-piece")
			CarpTotal += 100
			
	If (CarpSize = "4-piece")
			CarpTotal += 200
			
	If (CarpSize = "5-piece")
			CarpTotal += 300
			
	If (CarpSize = "6-piece")
			CarpTotal += 400
	
	If (CarpExcep = 1)
			CarpTotal += 200
	
	if (CarpTotal >= 0 and CarpTotal < 200)
		CarpReward := "75% Sturdy Axe`n25% Boards"
	
	if (CarpTotal >= 200 and CarpTotal < 400)
		CarpReward := "75% Gargoyle Axe`n25% Armor of Crafting +1"
	
	if (CarpTotal >= 400 and CarpTotal < 450)
		CarpReward := "66% Prospector's Axe`n33% Armor of Crafting +1"
		
	if (CarpTotal >= 450 and CarpTotal < 500)
		CarpReward := "50% Stain of Durability`n50% Armor of Crafting +1"
	
	if (CarpTotal >= 500 and CarpTotal < 550)
		CarpReward := "75% Pine Runic Saw`n25% Decorative Item`n`nDecorative Items:`n Vise, Unfinished Chair, Unfinished Chest, Unfinished Shelves, Unfinished Gravestone "
	
	if (CarpTotal >= 550 and CarpTotal < 600)
		CarpReward := "66% Pine Runic Saw`n33% Decorative Item`n`nDecorative Items:`n Vise, Unfinished Chair, Unfinished Chest, Unfinished Shelves, Unfinished Gravestone  "
	
	if (CarpTotal >= 600 and CarpTotal < 650)
		CarpReward := "50% Ash Runic Saw`n50% Decorative Item`n`nDecorative Items:`n Vise, Unfinished Chair, Unfinished Chest, Unfinished Shelves, Unfinished Gravestone  "

	if (CarpTotal >= 650 and CarpTotal < 700)
		CarpReward := "66% Ash Runic Saw`n33% Nails`n`nNails - WARNING!`n - this item currently does not exist, so BODs with this reward can actually have no reward if you're unlucky to roll Nails as a reward.   "
	
	if (CarpTotal >= 700 and CarpTotal < 750)
		CarpReward := "50% Mohogany Runic Saw`n50% Nails`n`nNails - WARNING!`n - this item currently does not exist, so BODs with this reward can actually have no reward if you're unlucky to roll Nails as a reward.   "
	
	if (CarpTotal >= 750 and CarpTotal < 800)
		CarpReward := "50% Mohogany Runic Saw`n50% 120 Carpentry Powerscroll "
	
	if (CarpTotal >= 800 and CarpTotal < 850)
		CarpReward := "33% Yew Runic Saw`n33% 120 Lumberjacking Powerscroll`n33% Armor of Crafting +3  "
		
	if (CarpTotal >= 850 and CarpTotal < 900)
		CarpReward := "33% Yew Runic Saw`n33% +10 Ancient Carpentry Hammer`n33% Armor of Crafting +3 "
		
	if (CarpTotal >= 900 and CarpTotal < 950)
		CarpReward := "33% Oak Runic Saw`n33% Evil Decorative Item`n33% Armor of Crafting +3`n`nEvil Decorative Items:`n Bone Table, Bone Throne, Bed of Nails (East and South), Bone Couch (E and S), Sacrificial Altar (E and S), Stone Coffin (E and S)  "
		
	if (CarpTotal >= 950 and CarpTotal < 1000)
		CarpReward := "33% Zircote Runic Saw`n33% +20 Ancient Carpentry Hammer`n33% Nails`n`nNails - WARNING!`n - this item currently does not exist, so BODs with this reward can actually have no reward if you're unlucky to roll Nails as a reward.  "
	
	if (CarpTotal >= 1000 and CarpTotal < 1050)
		CarpReward := "33% Ebony Runic Saw`n33% Evil Decorative Item`n33% Nails`n`nEvil Decorative Items:`n Bone Table, Bone Throne, Bed of Nails (East and South), Bone Couch (E and S), Sacrificial Altar (E and S), Stone Coffin (E and S) `n`nNails - WARNING!`n - this item currently does not exist, so BODs with this reward can actually have no reward if you're unlucky to roll Nails as a reward.  "
	
	if (CarpTotal >= 1050 and CarpTotal < 1100)
		CarpReward := "50% Bamboo Runic Saw`n50% +30 Ancient Carpentry Hammer"
	
	if (CarpTotal >= 1100 and CarpTotal < 1150)
		CarpReward := "50% Purple Heart Runic Saw`n50% Evil Decorative Item`n`nEvil Decorative Items:`n Bone Table, Bone Throne, Bed of Nails (East and South), Bone Couch (E and S), Sacrificial Altar (E and S), Stone Coffin (E and S)  "
	
	if (CarpTotal >= 1150 and CarpTotal < 1200)
		CarpReward := "50% Redwood Runic Saw`n50% +40 Ancient Carpentry Hammer "
	
	if (CarpTotal >= 1200 and CarpTotal < 1250)
		CarpReward := "50% Petrified Runic Saw`n50% Evil Decorative Item`n`nEvil Decorative Items:`n Bone Table, Bone Throne, Bed of Nails (East and South), Bone Couch (E and S), Sacrificial Altar (E and S), Stone Coffin (E and S)   "
	
	if (CarpTotal >= 1250)
		CarpReward := "50% Bag of Resources`n50% Armor of Crafting +5`n`nBag of Resources:`n A bag that has a weight of 100, but can hold any amount of ore, logs and hides (not ingots, boards or cut leather though) without any additional weight. Essentially a Bag of Holding for raw materials.  "
	
	GuiControl,, CarpRewards, %CarpReward% 
	GuiControl,, CarpTotalPoints, %CarpTotal%		
return




FletUpdate:
	Gui, Submit, NoHide
	; Update Carpentry Tab Something was changed. 
	FletTotal := 0
	FletReward =
	
	If (FletAmount = 10)
			FletTotal += 10
			
	If (FletAmount = 15)
			FletTotal += 25
		
	If (FletAmount = 20)
			FletTotal += 50
	
	If (FletType = "Pine")
			FletTotal += 200
	
	If (FletType = "Ash")
			FletTotal += 250
	
	If (FletType = "Mohogany")
			FletTotal += 300
	
	If (FletType = "Yew")
			FletTotal += 350
			
	If (FletType = "Oak")
			FletTotal += 400
	
	If (FletType = "Zircote")
			FletTotal += 450
			
	If (FletType = "Ebony")
			FletTotal += 500
			
	If (FletType = "Bamboo")
			FletTotal += 550
			
	If (FletType = "Purple Heart")
			FletTotal += 600
			
	If (FletType = "Redwood")
			FletTotal += 650
			
	If (FletType = "Petrified")
			FletTotal += 700
	
	If (FletSize = "3-piece")
			FletTotal += 300	
			
	If (FletSize = "6-piece")
			FletTotal += 400
	
	If (FletExcep = 1)
			FletTotal += 200
	
	if (FletTotal >= 0 and FletTotal < 200)
		FletReward := "75% Sturdy Axe`n25% Boards"
	
	if (FletTotal >= 200 and FletTotal < 400)
		FletReward := "75% Gargoyle Axe`n25% Armor of Crafting +1"
	
	if (FletTotal >= 400 and FletTotal < 450)
		FletReward := "66% Prospector's Axe`n33% Armor of Crafting +1"
		
	if (FletTotal >= 450 and FletTotal < 500)
		FletReward := "50% Stain of Durability`n50% Armor of Crafting +1"
	
	if (FletTotal >= 500 and FletTotal < 550)
		FletReward := "75% Pine Runic Fletcher Tool`n25% Decorative Item`n`nDecorative Items:`n Archery Butte (North and West), Stack of Arrows, Stack of Logs (N and W), Stack of Boards (N and W)  "
	
	if (FletTotal >= 550 and FletTotal < 600)
		FletReward := "66% Pine Runic Fletcher Tool`n33% Decorative Item`n`nDecorative Items:`n Archery Butte (North and West), Stack of Arrows, Stack of Logs (N and W), Stack of Boards (N and W)   "
	
	if (FletTotal >= 600 and FletTotal < 650)
		FletReward := "50% Ash Runic Fletcher Tool`n50% Decorative Item`n`nDecorative Items:`n Archery Butte (North and West), Stack of Arrows, Stack of Logs (N and W), Stack of Boards (N and W)   "

	if (FletTotal >= 650 and FletTotal < 700)
		FletReward := "66% Ash Runic Fletcher Tool`n33% 5-use Dip Tub`n`nDip Tubs:`n Used to convert arrows into special, enchanted arrows (10 per use): Armor Piercing, Explosive, Freeze, Lightning, Poison    "
	
	if (FletTotal >= 700 and FletTotal < 750)
		FletReward := "50% Mohogany Runic Fletcher Tool`n50% 5-use Dip Tub`n`nDip Tubs:`n Used to convert arrows into special, enchanted arrows (10 per use): Armor Piercing, Explosive, Freeze, Lightning, Poison   "
	
	if (FletTotal >= 750 and FletTotal < 800)
		FletReward := "50% Mohogany Runic Fletcher Tool`n50% 120 Bowcraft/Fletching Powerscroll "
	
	if (FletTotal >= 800 and FletTotal < 850)
		FletReward := "33% Yew Runic Fletcher Tool`n33% 120 Lumberjacking Powerscroll`n33% Armor of Crafting +3  "
		
	if (FletTotal >= 850 and FletTotal < 900)
		FletReward := "33% Yew Runic Fletcher Tool`n33% +10 Ancient Fletcher Hammer`n33% Armor of Crafting +3 "
		
	if (FletTotal >= 900 and FletTotal < 950)
		FletReward := "33% Oak Runic Fletcher Tools`n33% +10 Ancient Fletcher Hammer`n33% Armor of Crafting +3 "
		
	if (FletTotal >= 950 and FletTotal < 1000)
		FletReward := "33% Zircote Runic Fletcher Tools`n33% +20 Ancient Fletcher Hammer`n33% 25-use Dip Tub`n`nDip Tubs:`n Used to convert arrows into special, enchanted arrows (10 per use): Armor Piercing, Explosive, Freeze, Lightning, Poison"
	
	if (FletTotal >= 1000 and FletTotal < 1050)
		FletReward := "33% Ebony Runic Fletcher Tools`n33% +20 Ancient Fletcher Hammer`n33% 25-use Dip Tub`n`nDip Tubs:`n Used to convert arrows into special, enchanted arrows (10 per use): Armor Piercing, Explosive, Freeze, Lightning, Poison"
	
	if (FletTotal >= 1050 and FletTotal < 1100)
		FletReward := "50% Bamboo Runic Fletcher Tools`n50% +30 Ancient Fletcher Hammer "
	
	if (FletTotal >= 1100 and FletTotal < 1150)
		FletReward := "50% Purple Heart Runic Fletcher Tools`n50% +30 Ancient Fletcher Hammer "
	
	if (FletTotal >= 1150 and FletTotal < 1200)
		FletReward := "50% Redwood Runic Fletcher Tools`n50% +40 Ancient Fletcher Hammer "
	
	if (FletTotal >= 1200 and FletTotal < 1250)
		FletReward := "50% Petrified Runic Fletcher Tools`n50% +40 Ancient Fletcher Hammer "
	
	if (FletTotal >= 1250 )
		FletReward := "50% 50-use Dip Tub`n50% Armor of Crafting +5`n`nDip Tubs:`n Used to convert arrows into special, enchanted arrows (10 per use): Armor Piercing, Explosive, Freeze, Lightning, Poison "
	
	
	
	GuiControl,, FletRewards, %FletReward% 
	GuiControl,, FletTotalPoints, %FletTotal%		
return



TailorUpdate:
	Gui, Submit, NoHide
	; Update Carpentry Tab Something was changed. 
	TailorTotal := 0
	TailorReward =
	
	If (TailorAmount = 10)
			TailorTotal += 10
			
	If (TailorAmount = 15)
			TailorTotal += 25
		
	If (TailorAmount = 20)
			TailorTotal += 50
	
	If (TailorType = "Spined")
			TailorTotal += 50
	
	If (TailorType = "Horned")
			TailorTotal += 100
	
	If (TailorType = "Barbed")
			TailorTotal += 150
	
	If (TailorType = "Polar")
			TailorTotal += 200
			
	If (TailorType = "Synthetic")
			TailorTotal += 250
	
	If (TailorType = "Blaze")
			TailorTotal += 300
			
	If (TailorType = "Daemonic")
			TailorTotal += 350
			
	If (TailorType = "Shadow")
			TailorTotal += 400
			
	If (TailorType = "Frost")
			TailorTotal += 450
			
	If (TailorType = "Ethereal")
			TailorTotal += 500	
	
	If (TailorSize = "4-piece")
			TailorTotal += 300
			
	If (TailorSize = "5-piece")
			TailorTotal += 400
			
	If (TailorSize = "6-piece")
			TailorTotal += 500
	
	If (TailorExcep = 1)
			TailorTotal += 100
	
	if (TailorTotal >= 0 and TailorTotal < 50)
		TailorReward := "Cloth 1`nColored Loom`nCharged Dye Tub "
	
	if (TailorTotal >= 50 and TailorTotal < 100)
		TailorReward := "Cloth 2`nColored Loom`nCharged Dye Tub "
	
	if (TailorTotal >= 100 and TailorTotal < 150)
		TailorReward := "Cloth 3`nLeather Medallion`nSturdy Sewing Kit`nTailor's Florin"
		
	if (TailorTotal >= 150 and TailorTotal < 200)
		TailorReward := "Cloth 4`nLeather Medallion`nSturdy Sewing Kit`nTailor's Florin"
	
	if (TailorTotal >= 200 and TailorTotal < 300)
		TailorReward := "Cloth 5`nArmor of Crafting +1`nLeather Medallion`nTailor's Florin"
	
	if (TailorTotal >= 300 and TailorTotal < 350)
		TailorReward := "Stretched Hide`nArmor of Crafting +1`nLeather Medallion`nTailor's Florin"
	
	if (TailorTotal >= 350 and TailorTotal < 400)
		TailorReward := "Spined Runic Kit`nArmor of Crafting + 1`nMaster's Knife`nTailor's Florin"

	if (TailorTotal >= 400 and TailorTotal < 450)
		TailorReward := "Tapestry`nMaster's Knife`nFlair Item`nTailor's Florin`nLeather Medallion "
	
	if (TailorTotal >= 450 and TailorTotal < 500)
		TailorReward := "Bear Rug`nMaster's Knife`nFlair Item`nTailor's Florin`nStretched Hide "
	
	if (TailorTotal >= 500 and TailorTotal < 550)
		TailorReward := "Deco`nSealant of Durability`nFlair Item`nBear Rug`nTapestry`n`nDecorative Items:`n Tapestry, Rose of Trinsic, Deer Corpse, Banner  "
	
	if (TailorTotal >= 550 and TailorTotal < 600)
		TailorReward := "Clothing Bless Deed`nSealant of Durability`nDeco`nTailor's Florin`n`nDecorative Items:`n Tapestry, Rose of Trinsic, Deer Corpse, Banner "
		
	if (TailorTotal >= 600 and TailorTotal < 650)
		TailorReward := "Horned	Runic Kit`nSealant of Durability`n110 Powerscroll`nTailor's Florin"
		
	if (TailorTotal >= 650 and TailorTotal < 700)
		TailorReward := "Horned	Runic Kit`nArmor of Crafting + 3`nBarbed Runic Kit`nSealant of Durability`nLeather Medallion"
		
	if (TailorTotal >= 700 and TailorTotal < 750)
		TailorReward := "Barbed Runic Kit`nArmor of Crafting + 3`nFlair Item`nLeather Medallion`nSealant of Durability "
	
	if (TailorTotal >= 750 and TailorTotal < 800)
		TailorReward := "Barbed Runic Kit`nArmor of Crafting + 3`nFlair Item`nGargoyle's Knife`nPolar Runic Kit"
	
	if (TailorTotal >= 800 and TailorTotal < 850)
		TailorReward := "Polar Runic Kit`nGargoyle's Knife`nFlair Item`nLeather Medallion`nTailor's Florin"
	
	if (TailorTotal >= 850 and TailorTotal < 900)
		TailorReward := "Polar Runic Kit`nGargoyle's Knife`nLeather Medallion`nSynthetic Runic Kit"
	
	if (TailorTotal >= 900 and TailorTotal < 950)
		TailorReward := "Synthetic Runic Kit`nBag of Resources`nLeather Medallion`nBlaze Runic Kit`n115 Powerscroll "
	
	if (TailorTotal >= 950 and TailorTotal < 1000)
		TailorReward := "Blaze Runic Kit`nBag of Resources`nLeather Medallion`nDaemonic Runic Kit`nTailor's Florin`nFlair Item "
	
	if (TailorTotal >= 1000 and TailorTotal < 1050)
		TailorReward := "Daemonic Runic Kit`nArmor of Crafting + 5`nLeather Medallion`nDeco`nTailor's Florin`nFlair Item`n`nDecorative Items:`n Tapestry, Rose of Trinsic, Deer Corpse, Banner "
	
	if (TailorTotal >= 1050 and TailorTotal < 1100)
		TailorReward := "Shadow Runic Kit`nArmor of Crafting + 5`nLeather Medallion`nDeco`nFlair Item`n`nDecorative Items:`n Tapestry, Rose of Trinsic, Deer Corpse, Banner"
	
	if (TailorTotal >= 1100 and TailorTotal < 1150)
		TailorReward := "Frost Runic Kit`nArmor of Crafting + 5`nTailor's Florin"	
	
	if (TailorTotal >= 1150)
		TailorReward := "Ethereal Runic Kit`nWarp-Weft Shirt`n120 Powerscroll`nTailor's Florin"
	
	GuiControl,, TailorRewards, %TailorReward% 
	GuiControl,, TailorTotalPoints, %TailorTotal%		
return



SmithUpdate:
	Gui, Submit, NoHide
	; Update Smithentry Tab Something was changed. 
	SmithTotal := 0
	SmithReward =
	
	If (SmithAmount = 10)
			SmithTotal += 10
			
	If (SmithAmount = 15)
			SmithTotal += 25
		
	If (SmithAmount = 20)
			SmithTotal += 50
	
	If (SmithType = "Dull Copper")
			SmithTotal += 200
	
	If (SmithType = "Shadow Iron")
			SmithTotal += 250
	
	If (SmithType = "Copper")
			SmithTotal += 300
	
	If (SmithType = "Bronze")
			SmithTotal += 350
			
	If (SmithType = "Gold")
			SmithTotal += 400
	
	If (SmithType = "Agapite")
			SmithTotal += 450
			
	If (SmithType = "Verite")
			SmithTotal += 500
			
	If (SmithType = "Valorite")
			SmithTotal += 550
			
	If (SmithType = "Blaze")
			SmithTotal += 600
			
	If (SmithType = "Ice")
			SmithTotal += 650
			
	If (SmithType = "Toxic")
			SmithTotal += 700
	
	If (SmithType = "Electrum")
			SmithTotal += 750
			
	If (SmithType = "Platinum")
			SmithTotal += 800
	
	If (SmithSize = "Ringmail")
			SmithTotal += 200			
	
	If (SmithSize = "Chainmail")
			SmithTotal += 300
			
	If (SmithSize = "Plate")
			SmithTotal += 400	
	
	If (SmithExcep = 1)
			SmithTotal += 200
	
	if (SmithTotal >= 0 and SmithTotal < 25)
		SmithReward := "50% Sturdy Shovel`n50% Sturdy Smith Hammer "
	
	if (SmithTotal >= 25 and SmithTotal < 50)
		SmithReward := "50% Sturdy Pickaxe`n50% Sturdy Smith Hammer "
	
	if (SmithTotal >= 50 and SmithTotal < 200)
		SmithReward := "90% Sturdy Shovel`n10% Armor of Crafting +1 "
		
	if (SmithTotal >= 200 and SmithTotal < 400)
		SmithReward := "90% Sturdy Pickaxe`n10% Armor of Crafting +1 "
	
	if (SmithTotal >= 400 and SmithTotal < 450)
		SmithReward := "90% Prospector's Tool`n10% Armor of Crafting +1`n`nProspector's Tool:`n Used to 'promote' a vein of ore to one level higher. Iron becomes Dull Copper, Gold becomes Agapite, Electrum becomes Platinum, etc. Used only once on a vein, before mining. Needs to be used again after the vein respawns. You still need to have high enough Mining to mine the new type of ore.  "
	
	if (SmithTotal >= 450 and SmithTotal < 500)
		SmithReward := "50% Powder of Fortifying`n25% Gargoyle Pickaxe`n25% Decorative Item`n`nDecorative Items:`n Chainmail Tunic, Chainmail Leggings, Decorative Armor, Decorative Shield and Sword, Decorative Scale Shield, Sword Display`n`nPowder of Fortifying:`n Adds 10 current durability to an item if it's damaged or adds 10 maximum durability if undamaged (caps at 255). Works on all types of items that have a durability.   "
	
	if (SmithTotal >= 500 and SmithTotal < 550)
		SmithReward := "33% Dull Copper Runic Hammer`n33% Gargoyle Pickaxe`n33% Decorative Item`n`nDecorative Items:`n Chainmail Tunic, Chainmail Leggings, Decorative Armor, Decorative Shield and Sword, Decorative Scale Shield, Sword Display  "

	if (SmithTotal >= 550 and SmithTotal < 600)
		SmithReward := "60% Dull Copper Runic Hammer`n40% Shadow Iron Runic Hammer"
	
	if (SmithTotal >= 600 and SmithTotal < 625)
		SmithReward := "50% Shadow Iron Runic Hammer`n50% Colored Forge Deed "
	
	if (SmithTotal >= 625 and SmithTotal < 650)
		SmithReward := "75% Shadow Iron Runic Hammer`n25% Colored Anvil Deed "
	
	if (SmithTotal >= 650 and SmithTotal < 675)
		SmithReward := "50% Copper Runic Hammer`n50% Decorative Item`n`nDecorative Items:`n Chainmail Tunic, Chainmail Leggings, Decorative Armor, Decorative Shield and Sword, Decorative Scale Shield, Sword Display  "
		
	if (SmithTotal >= 675 and SmithTotal < 700)
		SmithReward := "75% Copper Runic Hammer`n25% Colored Anvil Deed "
		
	if (SmithTotal >= 700 and SmithTotal < 750)
		SmithReward := "50% Bronze Runic Hammer`n50% Decorative Item`n`nDecorative Items:`n Chainmail Tunic, Chainmail Leggings, Decorative Armor, Decorative Shield and Sword, Decorative Scale Shield, Sword Display  "
		
	if (SmithTotal >= 750 and SmithTotal < 800)
		SmithReward := "50% Ancient Smithy Hammer +10`n50% Armor of Crafting +3 "
	
	if (SmithTotal >= 800 and SmithTotal < 850)
		SmithReward := "50% Gargoyle Pickaxe`n50% Armor of Crafting +3 "
	
	if (SmithTotal >= 850 and SmithTotal < 925)
		SmithReward := "50% Ancient Smithy Hammer +15`n50% Armor of Crafting +3 "
	
	if (SmithTotal >= 925 and SmithTotal < 1000)
		SmithReward := "50% Gold Runic Hammer`n50% Metal Dye Tub`n`nMetal Dye Tub:`n As the name suggests, it can dye any metal-made equipment, to the selected colour. 10 uses "
	
	if (SmithTotal >= 1000 and SmithTotal < 1050)
		SmithReward := "50% Ancient Smithy Hammer +30`n50% Metal Dye Tub`n`nMetal Dye Tub:`n As the name suggests, it can dye any metal-made equipment, to the selected colour. 10 uses "
	
	if (SmithTotal >= 1050 and SmithTotal < 1100)
		SmithReward := "50% Agapite Runic Hammer`n50% Smither's Protector`n`nSmither's Protector:`n A pickaxe the behaves like an axe (you can chop trees with it, not mine) and has Use Best Weapon Skill. "
	
	if (SmithTotal >= 1100 and SmithTotal < 1150)
		SmithReward := "50% Ancient Smithy Hammer +60`n50% Smither's Protector`n`nSmither's Protector:`n A pickaxe the behaves like an axe (you can chop trees with it, not mine) and has Use Best Weapon Skill. "
	
	if (SmithTotal >= 1150 and SmithTotal < 1200)
		SmithReward := "50% Verite Runic Hammer`n50% Armor of Crafting +5 "
		
	if (SmithTotal >= 1200 and SmithTotal < 1250)
		SmithReward := "50% Valorite Runic Hammer`n50% Armor of Crafting +5 "
		
	if (SmithTotal >= 1250 and SmithTotal < 1300)
		SmithReward := "50% Blaze Runic Hammer`n50% Armor of Crafting +5"
		
	if (SmithTotal >= 1300 and SmithTotal < 1350)
		SmithReward := "50% Ice Runic Hammer`n50% Bag of Resources`n`nBag of Resources:`n A bag that has a weight of 100, but can hold any amount of ore, logs and hides (not ingots, boards or cut leather though) without any additional weight. Essentially a Bag of Holding for raw materials.  "
		
	if (SmithTotal >= 1350 and SmithTotal < 1400)
		SmithReward := "50% Toxic Runic Hammer`n50% Bag of Resources`n`nBag of Resources:`n A bag that has a weight of 100, but can hold any amount of ore, logs and hides (not ingots, boards or cut leather though) without any additional weight. Essentially a Bag of Holding for raw materials.  "
		
	if (SmithTotal >= 1400 and SmithTotal < 1450)
		SmithReward := "50% Electrum Runic Hammer`n50% Sharpening Blade`n`nSharpening blade: Used to permanently add a Damage Increase % to a weapon. Each use gives a few %, depending on Blacksmith skill. "
	
	if (SmithTotal >= 1450)
		SmithReward := "50% Platinum Runic Hammer`n50% Sharpening Blade`n`nSharpening blade:`n Used to permanently add a Damage Increase % to a weapon. Each use gives a few %, depending on Blacksmith skill.  "
	
	GuiControl,, SmithRewards, %SmithReward% 
	GuiControl,, SmithTotalPoints, %SmithTotal%		
return



TameUpdate:
	Gui, Submit, NoHide
	; Update Tameentry Tab Something was changed. 
	TameTotal := 0
	TameReward =
	
	noLarge := "                                    These animals do not fit into any large Bods`n`nLlama  :  Bull Frog  :  Giant Toad  :  Snow Leopard  :  Walrus  :  Jack Rabbit  :  Rabbit  :  Hind  `nGreat Hart  :  Alligator  :  Gorilla  :  Slime  :  Mountain Goat  :  Skittering Hopper  :  Boar`nPredator HellCat  :  Lava Lizard"
	
	
	If (TameAmount = 10 and TameSize = "Small")
			TameReward := "Pet Powerscroll 105`nBrush`nPet Leash`nWooden Horse Statue`nLeather / Spined Leather `n`n" + noLarge
			
	If (TameAmount = 15 and TameSize = "Small")
			TameReward := "Pet Powerscroll 105`nPet Leash`nWooden Horse Statue`nLeather / Spined Leather `n`n`n" + noLarge
		
	If (TameAmount = 20 and TameSize = "Small")
			TameReward := "Powerscroll 105`nPet Leash`nPet Bonding Deed`nBio Tool`nLeather / Spined Leather `n`n"	+ noLarge
	
	If (TameAmount = 10 and TameSize = "3-piece")
			TameReward := "Veterinary clothing +3`nAnimal lore clothing +3`nBarded horse decoration`nPet bonding deed`nBio tool`nSpined leather 300-400`nOrganics 1500-2000 "
	
	If (TameAmount = 15 and TameSize = "3-piece")
			TameReward := "Pet powerscroll 115`nVeterinary clothing +3`nAnimal lore clothing +3`nBarded horse decoration`nBarbed leather 350-450`nOrganics 2000-2500 "
	
	If (TameAmount = 20 and TameSize = "3-piece")
			TameReward := "Pet powerscroll 115`nVeterinary clothing +4`nAnimal lore clothing +4`nMounted dreadhorn decoration`nPolar leather 400-500`nOrganics 2500-3000 "
	
	If (TameAmount = 10 and TameSize = "4-piece")
			TameReward := "Pet powerscroll 115`nVeterinary clothing +4`nAnimal lore clothing +4`nMounted dreadhorn decoration`nPolar leather 400-500`nOrganics 2500-3000 "
	
	If (TameAmount = 15 and TameSize = "4-piece")
			TameReward := "Powerscroll 115`nVeterinary clothing +4`nAnimal lore clothing +4`nMounted dreadhorn deco`nSynthetic leather 450-550`nOrganics 3000-3500 "
	
	If (TameAmount = 20 and TameSize = "4-piece")
			TameReward := "Powerscroll 115`nVeterinary clothing +5`nAnimal lore clothing +5`nMounted pixie deco`nBlaze leather 500-600`nOrganics 3500-4000 "
	
	If (TameAmount = 10 and TameSize = "5-piece")
			TameReward := "Powerscroll 115`nVeterinary clothing +5`nAnimal lore clothing +5`nMounted pixie deco`nBlaze leather 500-600`nOrganics 3500-4000 "
	
	If (TameAmount = 15 and TameSize = "5-piece")
			TameReward := "Pet powerscroll 120`nPowerscroll 120`nVeterinary clothing +5`nAnimal lore clothing +5`nMounted pixie deco`nDaemonic leather 550-650`nOrganics 4000-4500 "
	
	If (TameAmount = 20 and TameSize = "5-piece")
			TameReward := "Pet powerscroll 120`nPowerscroll 120`nShadow leather 600-700`nOrganics 4500-5000 "
	
	If (TameAmount = 10 and TameSize = "6-piece")
			TameReward := "Pet powerscroll 120`nPowerscroll 120`nShadow leather 600-700`nOrganics 4500-5000 "
	
	If (TameAmount = 15 and TameSize = "6-piece")
			TameReward := "Pet powerscroll 130`nBio engineering book`nFrost leather 650-750`nOrganics 5000-5500 "
	
	If (TameAmount = 20 and TameSize = "6-piece")
			TameReward := "Pet powerscroll 130`nPowerscroll 120`nBio engineering book`nEthereal leather 700-800`nOrganics 5500-6000 "

	
	GuiControl,, TameRewards, %TameReward% 
return


Nick
Legendary Scribe
Posts: 515
Joined: Fri Sep 24, 2010 12:40 pm
Location: PA native, liveing in NC right now Moveing to TX in march

Re: [Autohotkey] Bod Rewards

Post by Nick »

is this a easyUO script? sorry I don't know much about what type is what
Blade Slinger
Apprentice Scribe
Posts: 17
Joined: Tue Mar 23, 2010 6:11 pm

Re: [Autohotkey] Bod Rewards

Post by Blade Slinger »

Nick wrote:
Sat Nov 27, 2021 6:37 pm
is this a easyUO script? sorry I don't know much about what type is what
https://www.autohotkey.com/ just download and install and you should be able to run it. Save the text in a text file and change the .txt to .ahk
User avatar
Matrix
Legendary Scribe
Posts: 271
Joined: Sun Mar 08, 2020 5:57 pm

Re: [Autohotkey] Bod Rewards

Post by Matrix »

Thanks.

Anyone tested?
Please reply to me:
in-game: [pm Matrix
discord id: Matrixre
(Only checking the forums monthly)
(All prices can be change, ED to Gold to ED)
Blade Slinger
Apprentice Scribe
Posts: 17
Joined: Tue Mar 23, 2010 6:11 pm

Re: [Autohotkey] Bod Rewards

Post by Blade Slinger »

Matrix wrote:
Fri Dec 10, 2021 3:16 pm
Anyone tested?
Wife has been using it for several months and found it works great.
User avatar
+Colibri
Administrator
Posts: 3958
Joined: Sat Feb 25, 2006 4:08 pm
Location: static void Main

Re: [Autohotkey] Bod Rewards

Post by +Colibri »

Whoa, nice! Amazing what languages all are used to interact with this game - although in this case, it's more of a calculation, it doesn't actually pull any data from the screen or click anything, right?

I also use AHK to add some ALT+CTRL+... functionality to my computer.
Interesting video of what can be made with it: https://www.youtube.com/watch?v=lIFE7h3m40U
(a more sophisticated approach would be to code something in a lower-level, like C, on a middleware/driver level, but hey this works and it's a great exercise in what is possible).
+Colibri, Administrator of UO Excelsior Shard

Don't know what the purpose of your life is? Well then make something up! ;)
(Old Colibrian proverb)
Blade Slinger
Apprentice Scribe
Posts: 17
Joined: Tue Mar 23, 2010 6:11 pm

Re: [Autohotkey] Bod Rewards

Post by Blade Slinger »

+Colibri wrote:
Sun Dec 12, 2021 8:32 pm
I also use AHK to add some ALT+CTRL+... functionality to my computer.
Autohotkey is great! I have used it to fully automate someones job so they could do other things. I have used it to create a backend server for a website as well. It was used to create a connection from the warehouse to the office without any inbound connections. I used to automate many different programs at the same time on my job. I was almost 6 times faster once I got the 12k lines of code done and then every one in my department used it to speed up.

I agree, using C++ or something would run faster but this is a simple task. No, it does not click the screen or get any data. It's just a simple hard coded lookup.
Post Reply