Sort Herbs (script)

Sort Herbs (script)
Category	utility
Front-end	Genie
Author	Isharon

Description

This script sorts your herb pouch, alphabetizing your herbs by noun (e.g., "flower" or "potion").

setvar tincture 0
setvar tea 0
setvar stem 0
setvar solution 0
setvar sap 0
setvar salve 0
setvar root 0
setvar pulp 0
setvar powder 0
setvar potion 0
setvar pollen 0
setvar paste 0
setvar moss 0
setvar mash 0
setvar leaf 0
setvar grass 0
setvar flower 0
setvar elixir 0
setvar coffee 0
setvar berries 0
setvar balm 0

ACTION setvar tincture 1 WHEN ^You rummage through .+ and see .+ tincture
ACTION setvar tea 1 WHEN ^You rummage through .+ and see .+ tea
ACTION setvar stem 1 WHEN ^You rummage through .+ and see .+ stem
ACTION setvar solution 1 WHEN ^You rummage through .+ and see .+ solution
ACTION setvar sap 1 WHEN ^You rummage through .+ and see .+ sap
ACTION setvar salve 1 WHEN ^You rummage through .+ and see .+ salve
ACTION setvar root 1 WHEN ^You rummage through .+ and see .+ root
ACTION setvar pulp 1 WHEN ^You rummage through .+ and see .+ pulp
ACTION setvar powder 1 WHEN ^You rummage through .+ and see .+ powder
ACTION setvar potion 1 WHEN ^You rummage through .+ and see .+ potion
ACTION setvar pollen 1 WHEN ^You rummage through .+ and see .+ pollen
ACTION setvar paste 1 WHEN ^You rummage through .+ and see .+ paste
ACTION setvar moss 1 WHEN ^You rummage through .+ and see .+ moss
ACTION setvar mash 1 WHEN ^You rummage through .+ and see .+ mash
ACTION setvar leaf 1 WHEN ^You rummage through .+ and see .+ leaf
ACTION setvar grass 1 WHEN ^You rummage through .+ and see .+ grass
ACTION setvar flower 1 WHEN ^You rummage through .+ and see .+ flower
ACTION setvar elixir 1 WHEN ^You rummage through .+ and see .+ elixir
ACTION setvar coffee 1 WHEN ^You rummage through .+ and see .+ coffee
ACTION setvar berries 1 WHEN ^You rummage through .+ and see .+ berries
ACTION setvar balm 1 WHEN ^You rummage through .+ and see .+ balm

put rummage in my herb pouch
waitforre You rummage

if %tincture = 1 then gosub sort tincture
if %tea = 1 then gosub sort tea
if %stem = 1 then gosub sort stem
if %solution = 1 then gosub sort solution
if %sap = 1 then gosub sort sap
if %salve = 1 then gosub sort salve
if %root = 1 then gosub sort root
if %pulp = 1 then gosub sort pulp
if %powder = 1 then gosub sort powder
if %potion = 1 then gosub sort potion
if %pollen = 1 then gosub sort pollen
if %paste = 1 then gosub sort paste
if %moss = 1 then gosub sort moss
if %mash = 1 then gosub sort mash
if %leaf = 1 then gosub sort leaf
if %grass = 1 then gosub sort grass
if %flower = 1 then gosub sort flower
if %elixir = 1 then gosub sort elixir
if %coffee = 1 then gosub sort coffee
if %berries = 1 then gosub sort berries
if %balm = 1 then gosub sort balm
goto exit

sort:
put sort $0 in my herb pouch
waitforre ^All items|^You may only sort|^What were you
return

exit:
put rummage in my herb pouch