Herb Healer (script)
Jump to navigation
Jump to search
Herb Healer (script) | |
---|---|
Category | utility |
Front-end | Genie |
Author | Isharon |
This script checks your supply of herbs and your wounds and then treats your wounds with the appropriate herbs. It can also check which herbs you are missing.
This is a modification of Pete's herb-healing script. This version works with all herb preparations and knows whether you should EAT, RUB, or DRINK the herb.
Syntax
.HERB: diagnoses and treats wounds
.HERB CHECK: checks your herb pouch for missing herbs
Changelog
3/8/2018
- Fixed hangup on cebi tea.
9/5/2012
- Script is now compatible with the new stackable herb pouches sold at Foraging Emporium. (If you use something other than an herb pouch, replace "herb pouch" with your container.) This modification was required, because when "leaf" herbs are stacked, they show up as "leaves," but the noun is still "leaf."
3/9/2012
- Added support for the herbal food and beverages sold at Herb's Bakery
- Condensed consumption variable setting for easier editing
- Fixed: failure to recognize external limb wounds
- Fixed: failure to list missing herbs in heal mode
Script
IF_1 GOTO %1 GOTO INIT CHECK: #Initialize supplies setvar need_aevaes 1 setvar need_aloe 1 setvar need_blocil_or_junliar 1 setvar need_cebi 1 setvar need_eghmok 1 setvar need_georin 1 setvar need_hisan 1 setvar need_hulnik 1 setvar need_ithor 1 setvar need_jadice 1 setvar need_lujeakave 1 setvar need_muljin 1 setvar need_nemoih 1 setvar need_nilos 1 setvar need_plovik 1 setvar need_riolur 1 setvar need_sufil 1 setvar need_yelith 1 action setvariable need_aevaes 0 when ^You rummage.*aevaes action setvariable need_aloe 0 when ^You rummage.*aloe action setvariable need_blocil_or_junliar 0 when ^You rummage.*(blocil|junliar) action setvariable need_cebi 0 when ^You rummage.*cebi action setvariable need_eghmok 0 when ^You rummage.*eghmok action setvariable need_georin 0 when ^You rummage.*georin action setvariable need_hisan 0 when ^You rummage.*hisan action setvariable need_hulnik 0 when ^You rummage.*hulnik action setvariable need_ithor 0 when ^You rummage.*ithor action setvariable need_jadice 0 when ^You rummage.*jadice action setvariable need_lujeakave 0 when ^You rummage.*lujeakave action setvariable need_muljin 0 when ^You rummage.*muljin action setvariable need_nemoih 0 when ^You rummage.*nemoih action setvariable need_nilos 0 when ^You rummage.*nilos action setvariable need_plovik 0 when ^You rummage.*plovik action setvariable need_riolur 0 when ^You rummage.*riolur action setvariable need_sufil 0 when ^You rummage.*sufil action setvariable need_yelith 0 when ^You rummage.*yelith put rummage in my herb pouch waitforre ^You rummage GOTO supplies INIT: #Initialize supplies setvar need_aevaes 1 setvar need_aloe 1 setvar need_blocil_or_junliar 1 setvar need_cebi 1 setvar need_eghmok 1 setvar need_georin 1 setvar need_hisan 1 setvar need_hulnik 1 setvar need_ithor 1 setvar need_jadice 1 setvar need_lujeakave 1 setvar need_muljin 1 setvar need_nemoih 1 setvar need_nilos 1 setvar need_plovik 1 setvar need_riolur 1 setvar need_sufil 1 setvar need_yelith 1 action setvariable need_aevaes 0 when ^You rummage.*aevaes action setvariable need_aloe 0 when ^You rummage.*aloe action setvariable need_blocil_or_junliar 0 when ^You rummage.*(blocil|junliar) action setvariable need_cebi 0 when ^You rummage.*cebi action setvariable need_eghmok 0 when ^You rummage.*eghmok action setvariable need_georin 0 when ^You rummage.*georin action setvariable need_hisan 0 when ^You rummage.*hisan action setvariable need_hulnik 0 when ^You rummage.*hulnik action setvariable need_ithor 0 when ^You rummage.*ithor action setvariable need_jadice 0 when ^You rummage.*jadice action setvariable need_lujeakave 0 when ^You rummage.*lujeakave action setvariable need_muljin 0 when ^You rummage.*muljin action setvariable need_nemoih 0 when ^You rummage.*nemoih action setvariable need_nilos 0 when ^You rummage.*nilos action setvariable need_plovik 0 when ^You rummage.*plovik action setvariable need_riolur 0 when ^You rummage.*riolur action setvariable need_sufil 0 when ^You rummage.*sufil action setvariable need_yelith 0 when ^You rummage.*yelith # Initialize wound variables setvar nerves 0 setvar skin 0 setvar ext_head 0 setvar int_head 0 setvar ext_neck 0 setvar int_neck 0 setvar ext_chest 0 setvar int_chest 0 setvar ext_abdomen 0 setvar int_abdomen 0 setvar ext_back 0 setvar int_back 0 setvar ext_limb 0 setvar int_limb 0 setvar ext_eye 0 setvar int_eye 0 setvar ext_scar 0 setvar int_scar 0 #Initialize preparation variables send rummage in my herb pouch action setvariable prep_aevaes $1 when ^You rummage .+ aevaes (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_aevaes leaf when ^You rummage .+ aevaes leaves action setvariable prep_aevaes mead when ^You rummage .+ mead flavored with aevaes action setvariable prep_aloe $1 when ^You rummage .+ aloe (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_aloe leaf when ^You rummage .+ aloe leaves action setvariable prep_blocil $1 when ^You rummage .+ blocil (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_blocil leaf when ^You rummage .+ blocil leaves action setvariable prep_blocil scone when ^You rummage .+ blocil berry scone action setvariable prep_cebi $1 when ^You rummage .+ cebi (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_cebi leaf when ^You rummage .+ cebi leaves action setvariable prep_eghmok $1 when ^You rummage .+ eghmok (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_eghmok leaf when ^You rummage .+ eghmok leaves action setvariable prep_georin $1 when ^You rummage .+ georin (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_georin leaf when ^You rummage .+ georin leaves action setvariable prep_hisan $1 when ^You rummage .+ hisan (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_hisan leaf when ^You rummage .+ hisan leaves action setvariable prep_hulnik $1 when ^You rummage .+ hulnik (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_hulnik leaf when ^You rummage .+ hulnik leaves action setvariable prep_ithor $1 when ^You rummage .+ ithor (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_ithor leaf when ^You rummage .+ ithor leaves action setvariable prep_jadice $1 when ^You rummage .+ jadice (balm|berries|coffee|elixir|flower|grass|leaf|mash|moss|potion|powder|pulp|root|salve|sap|solution|stem|tea|tincture) action setvariable prep_jadice leaf when ^You rummage .+ jadice leaves action setvariable prep_jadice sticky-bun when ^You rummage .+ jadice pollen sticky-bun action setvariable prep_junliar $1 when ^You rummage .+ junliar (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_junliar leaf when ^You rummage .+ junliar leaves action setvariable prep_lujeakave $1 when ^You rummage .+ lujeakave (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_lujeakave leaf when ^You rummage .+ lujeakave leaves action setvariable prep_muljin $1 when ^You rummage .+ muljin (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_muljin leaf when ^You rummage .+ muljin leaves action setvariable prep_nemoih $1 when ^You rummage .+ nemoih (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_nemoih leaf when ^You rummage .+ nemoih leaves action setvariable prep_nilos $1 when ^You rummage .+ nilos (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_nilos leaf when ^You rummage .+ nilos leaves action setvariable prep_plovik $1 when ^You rummage .+ plovik (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_plovik leaf when ^You rummage .+ plovik leaves action setvariable prep_riolur $1 when ^You rummage .+ riolur (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_riolur leaf when ^You rummage .+ riolur leaves action setvariable prep_riolur cookie when ^You rummage .+ riolur shortbread cookie action setvariable prep_sufil $1 when ^You rummage .+ sufil (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_sulfil leaf when ^You rummage .+ sulfil leaves action setvariable prep_yelith $1 when ^You rummage .+ yelith (ale|balm|berries|berry|brandy|bread|brownie|butter|cake|coffee|cookie|cornbread|drink|elixir|flower|grass|jam|kefir|leaf|mash|mead|moss|paste|pie|pollen|porridge|potion|powder|puff-pastry|pulp|root|salve|sap|sauce|scone|smoothie|solution|spread|stem|sticky-bun|tart|tea|tincture|yogurt) action setvariable prep_yelith leaf when ^You rummage .+ yelith leaves waitforre ^You rummage # Initialize actions send health ACTION setvar nerves 1 WHEN (minor|severe) twitching|difficulty controlling actions|paralysis of the entire body ACTION setvar skin 1 WHEN (abrasions|scuffing|scratches) (about|across|along|around|from|in|of|on|to) the skin|rash|boils|sores ACTION setvar ext_head 1 WHEN (abrasions|scuffing|scratches|cuts and bruises|cuts|slashes|holes) (about|across|along|around|from|in|of|on|to) the head|(cracked|crushed) skull|pulpy stump for a head ACTION setvar int_head 1 WHEN (bruised|swollen|bloated) head|bruising (about|across|along|around|from|in|of|on|to) the head|inside head ACTION setvar ext_neck 1 WHEN (abrasions|scuffing|scratches|cuts and bruises|cuts|slashes|holes) (about|across|along|around|from|in|of|on|to) the neck|(shattered|useless) neck ACTION setvar int_neck 1 WHEN bruising (about|across|along|around|from|in|of|on|to) the neck|(bruised|swollen|swollen and shattered) neck|inside neck ACTION setvar ext_chest 1 WHEN (abrasions|scuffing|scratches|cuts and bruises|cuts|slashes|holes) (about|across|along|around|from|in|of|on|to) the chest|(shattered|destroyed) chest ACTION setvar int_chest 1 WHEN bruising (about|across|along|around|from|in|of|on|to) the chest|(bruised|swollen) chest|inside chest ACTION setvar ext_abdomen 1 WHEN (abrasions|scuffing|scratches|cuts and bruises|cuts|slashes|holes) (about|across|along|around|from|in|of|on|to) the abdomen|abdomen deeply gouged|destroyed abdomen ACTION setvar int_abdomen 1 WHEN bruising (about|across|along|around|from|in|of|on|to) the abdomen|(bruised|swollen) abdomen|discolored abdomen|inside abdomen ACTION setvar ext_back 1 WHEN (abrasions|scuffing|scratches|cuts and bruises|cuts|slashes|holes) (about|across|along|around|from|in|of|on|to) the back|(shattered|destroyed) back ACTION setvar int_back 1 WHEN (about|across|along|around|from|in|of|on|to) the back|(bruised|swollen) back|inside back ACTION setvar ext_limb 1 WHEN (abrasions|scuffing|scratches|cuts and bruises|cuts|slashes|holes) (about|across|along|around|from|in|of|on|to) the ((right|left) (hand|arm|leg)|tail)|(broken|shattered) ((right|left) (hand|arm|leg)|tail)|stump for a ((right|left) (hand|arm|leg)|tail) ACTION setvar int_limb 1 WHEN bruising (about|across|along|around|from|in|of|on|to) the ((right|left) (hand|arm|leg)|tail)|(bruised|swollen) ((right|left) (hand|arm|leg)|tail)|inside ((right|left|r\.|l\.) (hand|arm|leg)|tail) ACTION setvar ext_eye 1 WHEN (black and blue|swollen|bleeding|slashed|shattered) (right|left) eye|cavity for a (right|left) eye ACTION setvar int_eye 1 WHEN bruising (about|across|along|around|from|in|of|on|to) the (right|left) eye|bruised (right|left) eye|bruised and (crossed|cloudy|blind) (right|left) eye|inside ((right|left)|r\.|l\.) eye ACTION setvar ext_scar 1 WHEN a stump for|flesh stump for|gashes|malformed|missing|non-existent|scarred|scarring|scars|shriveled|skin discoloration|skin loss|skin tone|socket|stump ACTION setvar int_scar 1 WHEN a blind|blank stare|breath|clouded|emaciated|move|moving|numbness|pallor|paralyzed|twitch|twitching #Secondary resupply action ACTION setvar need_%s 1 WHEN ^That was the last of pause #Take herbs for anything that picked up by the triggers nerves: if (%nerves = 1) then GOTO heal_nerves GOTO skin heal_nerves: if matchre ("%prep_lujeakave", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_lujeakave", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_lujeakave", "(balm|salve)") then var consume rub SAVE lujeakave matchre heal_nerves ...wait matchre nerves_scar ^You apply|^You drink|^You eat|^You take matchre rub_lujeakave ^Rub what matchre need_lujeakave ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my lujeakave %prep_lujeakave matchwait rub_lujeakave: send get my lujeakave %prep_lujeakave matchre need_lujeakave ^What were you referring matchwait 1 send rub my lujeakave %prep_lujeakave waitforre ^You rub send stow my lujeakave %prep_lujeakave waitforre ^You put|^You stow|^That was the last|^Stow what nerves_scar: gosub set_int_scar goto skin need_lujeakave: setvar need_lujeakave 1 skin: if (%skin = 1) then GOTO heal_skin GOTO ext_head heal_skin: if matchre ("%prep_aloe", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_aloe", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_aloe", "(balm|salve)") then var consume rub SAVE aloe matchre heal_skin ...wait matchre skin_scar ^You apply|^You drink|^You eat|^You take matchre rub_aloe ^Rub what matchre need_aloe ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my aloe %prep_aloe matchwait rub_aloe: send get my aloe %prep_aloe matchre need_aloe ^What were you referring matchwait 1 send rub my aloe %prep_aloe waitforre ^You rub send stow my aloe %prep_aloe waitforre ^You put|^You stow|^That was the last|^Stow what skin_scar: gosub set_ext_scar goto ext_head need_aloe: setvar need_aloe 1 ext_head: if (%ext_head = 1) then GOTO heal_ext_head GOTO int_head heal_ext_head: if matchre ("%prep_nemoih", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_nemoih", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_nemoih", "(balm|salve)") then var consume rub SAVE nemoih matchre heal_ext_head ...wait matchre ext_head_scar ^You apply|^You drink|^You eat|^You take matchre rub_nemoih ^Rub what matchre need_nemoih ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my nemoih %prep_nemoih matchwait rub_nemoih: send get my nemoih %prep_nemoih matchre need_nemoih ^What were you referring matchwait 1 send rub my nemoih %prep_nemoih waitforre ^You rub send stow my nemoih %prep_nemoih waitforre ^You put|^You stow|^That was the last|^Stow what ext_head_scar: gosub set_ext_scar goto int_head need_nemoih: setvar need_nemoih 1 int_head: if (%int_head = 1) then GOTO heal_int_head GOTO ext_neck heal_int_head: if matchre ("%prep_eghmok", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_eghmok", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_eghmok", "(balm|salve)") then var consume rub SAVE eghmok matchre heal_int_head ...wait matchre int_head_scar ^You apply|^You drink|^You eat|^You take matchre rub_eghmok ^Rub what matchre need_eghmok ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my eghmok %prep_eghmok matchwait rub_eghmok: send get my eghmok %prep_eghmok matchre need_eghmok ^What were you referring matchwait 1 send rub my eghmok %prep_eghmok waitforre ^You rub send stow my eghmok %prep_eghmok waitforre ^You put|^You stow|^That was the last|^Stow what int_head_scar: gosub set_int_scar goto ext_neck need_eghmok: setvar need_eghmok 1 ext_neck: if (%ext_neck = 1) then GOTO heal_ext_neck GOTO int_neck heal_ext_neck: if matchre ("%prep_georin", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_georin", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_georin", "(balm|salve)") then var consume rub SAVE georin matchre heal_ext_neck ...wait matchre ext_neck_scar ^You apply|^You drink|^You eat|^You take matchre rub_georin ^Rub what matchre need_georin ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my georin %prep_georin matchwait rub_georin: send get my georin %prep_georin matchre need_georin ^What were you referring matchwait 1 send rub my georin %prep_georin waitforre ^You rub send stow my georin %prep_georin waitforre ^You put|^You stow|^That was the last|^Stow what ext_neck_scar: gosub set_ext_scar goto int_neck need_georin: setvar need_georin 1 int_neck: if (%int_neck = 1) then GOTO heal_int_neck GOTO ext_chest heal_int_neck: if matchre ("%prep_riolur", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_riolur", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_riolur", "(balm|salve)") then var consume rub SAVE riolur matchre heal_int_neck ...wait matchre int_neck_scar ^You apply|^You drink|^You eat|^You take matchre rub_riolur ^Rub what matchre need_riolur ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my riolur %prep_riolur matchwait rub_riolur: send get my riolur %prep_riolur matchre need_riolur ^What were you referring matchwait 1 send rub my riolur %prep_riolur waitforre ^You rub send stow my riolur %prep_riolur waitforre ^You put|^You stow|^That was the last|^Stow what int_neck_scar: gosub set_int_scar goto ext_chest need_riolur: setvar need_riolur 1 ext_chest: if (%ext_chest = 1) then GOTO heal_ext_chest GOTO int_chest heal_ext_chest: if matchre ("%prep_plovik", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_plovik", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_plovik", "(balm|salve)") then var consume rub SAVE plovik matchre heal_ext_chest ...wait matchre ext_chest_scar ^You apply|^You drink|^You eat|^You take matchre rub_plovik ^Rub what matchre need_plovik ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my plovik %prep_plovik matchwait rub_plovik: send get my plovik %prep_plovik matchre need_plovik ^What were you referring matchwait 1 send rub my plovik %prep_plovik waitforre ^You rub send stow my plovik %prep_plovik waitforre ^You put|^You stow|^That was the last|^Stow what ext_chest_scar: gosub set_ext_scar goto int_chest need_plovik: setvar need_plovik 1 int_chest: if (%int_chest = 1) then GOTO heal_int_chest GOTO ext_abdomen heal_int_chest: if matchre ("%prep_ithor", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_ithor", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_ithor", "(balm|salve)") then var consume rub SAVE ithor matchre heal_int_chest ...wait matchre int_chest_scar ^You apply|^You drink|^You eat|^You take matchre rub_ithor ^Rub what matchre need_ithor ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my ithor %prep_ithor matchwait rub_ithor: send get my ithor %prep_ithor matchre need_ithor ^What were you referring matchwait 1 send rub my ithor %prep_ithor waitforre ^You rub send stow my ithor %prep_ithor waitforre ^You put|^You stow|^That was the last|^Stow what int_chest_scar: gosub set_int_scar goto ext_abdomen need_ithor: setvar need_ithor 1 ext_abdomen: if (%ext_abdomen = 1) then GOTO heal_ext_abdomen GOTO int_abdomen heal_ext_abdomen: if matchre ("%prep_nilos", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_nilos", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_nilos", "(balm|salve)") then var consume rub SAVE nilos matchre heal_ext_abdomen ...wait matchre ext_abdomen_scar ^You apply|^You drink|^You eat|^You take matchre rub_nilos ^Rub what matchre need_nilos ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my nilos %prep_nilos matchwait rub_nilos: send get my nilos %prep_nilos matchre need_nilos ^What were you referring matchwait 1 send rub my nilos %prep_nilos waitforre ^You rub send stow my nilos %prep_nilos waitforre ^You put|^You stow|^That was the last|^Stow what ext_abdomen_scar: gosub set_ext_scar goto int_abdomen need_nilos: setvar need_nilos 1 int_abdomen: if (%int_abdomen = 1) then GOTO heal_int_abdomen GOTO ext_back heal_int_abdomen: if matchre ("%prep_muljin", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_muljin", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_muljin", "(balm|salve)") then var consume rub SAVE muljin matchre heal_int_abdomen ...wait matchre int_abdomen_scar ^You apply|^You drink|^You eat|^You take matchre rub_muljin ^Rub what matchre need_muljin ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my muljin %prep_muljin matchwait rub_muljin: send get my muljin %prep_muljin matchre need_muljin ^What were you referring matchwait 1 send rub my muljin %prep_muljin waitforre ^You rub send stow my muljin %prep_muljin waitforre ^You put|^You stow|^That was the last|^Stow what int_abdomen_scar: gosub set_int_scar goto ext_back need_muljin: setvar need_muljin 1 ext_back: if (%ext_back = 1) then GOTO heal_ext_back GOTO int_back heal_ext_back: if matchre ("%prep_hulnik", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_hulnik", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_hulnik", "(balm|salve)") then var consume rub SAVE hulnik matchre heal_ext_back ...wait matchre ext_back_scar ^You apply|^You drink|^You eat|^You take matchre rub_hulnik ^Rub what matchre need_hulnik ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my hulnik %prep_hulnik matchwait rub_hulnik: send get my hulnik %prep_hulnik matchre need_hulnik ^What were you referring matchwait 1 send rub my hulnik %prep_hulnik waitforre ^You rub send stow my hulnik %prep_hulnik waitforre ^You put|^You stow|^That was the last|^Stow what ext_back_scar: gosub set_ext_scar goto int_back need_hulnik: setvar need_hulnik 1 int_back: if (%int_back = 1) then GOTO heal_int_back GOTO ext_limb heal_int_back: if matchre ("%prep_blocil", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_blocil", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_blocil", "(balm|salve)") then var consume rub SAVE blocil matchre heal_int_back ...wait matchre int_back_scar ^You apply|^You drink|^You eat|^You take matchre rub_blocil ^Rub what matchre heal_int_back2 ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my blocil %prep_blocil matchwait rub_blocil: send get my blocil %prep_blocil matchre heal_int_back2 ^What were you referring matchwait 1 send rub my blocil %prep_blocil waitforre ^You rub send stow my blocil %prep_blocil waitforre ^You put|^You stow|^That was the last|^Stow what heal_int_back2: if matchre ("%prep_junliar", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_junliar", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_junliar", "(balm|salve)") then var consume rub SAVE junliar matchre heal_int_back2 ...wait matchre int_back_scar ^You apply|^You drink|^You eat|^You take matchre rub_junliar ^Rub what matchre need_blocil_or_junliar ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my junliar %prep_junliar matchwait rub_junliar: send get my junliar %prep_junliar matchre need_blocil_or_junliar ^What were you referring matchwait 1 send rub my junliar %prep_junliar waitforre ^You rub send stow my junliar %prep_junliar waitforre ^You put|^You stow|^That was the last|^Stow what int_back_scar: gosub set_int_scar goto ext_limb need_blocil_or_junliar: setvar need_blocil_or_junliar 1 ext_limb: if (%ext_limb = 1) then GOTO heal_ext_limb GOTO int_limb heal_ext_limb: if matchre ("%prep_jadice", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_jadice", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_jadice", "(balm|salve)") then var consume rub SAVE jadice matchre heal_ext_limb ...wait matchre ext_limb_scar ^You apply|^You drink|^You eat|^You take matchre rub_jadice ^Rub what matchre need_jadice ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my jadice %prep_jadice matchwait rub_jadice: send get my jadice %prep_jadice matchre need_jadice ^What were you referring matchwait 1 send rub my jadice %prep_jadice waitforre ^You rub send stow my jadice %prep_jadice waitforre ^You put|^You stow|^That was the last|^Stow what ext_limb_scar: gosub set_ext_scar goto int_limb need_jadice: setvar need_jadice 1 int_limb: if (%int_limb = 1) then GOTO heal_int_limb GOTO ext_eye heal_int_limb: if matchre ("%prep_yelith", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_yelith", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_yelith", "(balm|salve)") then var consume rub SAVE yelith matchre heal_int_limb ...wait matchre int_limb_scar ^You apply|^You drink|^You eat|^You take matchre rub_yelith ^Rub what matchre need_yelith ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my yelith %prep_yelith matchwait rub_yelith: send get my yelith %prep_yelith matchre need_yelith ^What were you referring matchwait 1 send rub my yelith %prep_yelith waitforre ^You rub send stow my yelith %prep_yelith waitforre ^You put|^You stow|^That was the last|^Stow what int_limb_scar: gosub set_int_scar goto ext_eye need_yelith: setvar need_yelith 1 ext_eye: if (%ext_eye = 1) then GOTO heal_ext_eye GOTO int_eye heal_ext_eye: if matchre ("%prep_sufil", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_sufil", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_sufil", "(balm|salve)") then var consume rub SAVE sufil matchre heal_ext_eye ...wait matchre ext_eye_scar ^You apply|^You drink|^You eat|^You take matchre rub_sufil ^Rub what matchre need_sufil ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my sufil %prep_sufil matchwait rub_sufil: send get my sufil %prep_sufil matchre need_sufil ^What were you referring matchwait 1 send rub my sufil %prep_sufil waitforre ^You rub send stow my sufil %prep_sufil waitforre ^You put|^You stow|^That was the last|^Stow what ext_eye_scar: gosub set_ext_scar goto int_eye need_sufil: setvar need_sufil 1 int_eye: if (%int_eye = 1) then GOTO heal_int_eye GOTO ext_scar heal_int_eye: if matchre ("%prep_aevaes", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_aevaes", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_aevaes", "(balm|salve)") then var consume rub SAVE aevaes matchre heal_int_eye ...wait matchre int_eye_scar ^You apply|^You drink|^You eat|^You take matchre rub_aevaes ^Rub what matchre need_aevaes ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my aevaes %prep_aevaes matchwait rub_aevaes: send get my aevaes %prep_aevaes matchre need_aevaes ^What were you referring matchwait 1 send rub my aevaes %prep_aevaes waitforre ^You rub send stow my aevaes %prep_aevaes waitforre ^You put|^You stow|^That was the last|^Stow what int_eye_scar: gosub set_int_scar goto ext_scar need_aevaes: setvar need_aevaes 1 ext_scar: if (%ext_scar = 1) then GOTO heal_ext_scar GOTO int_scar heal_ext_scar: if matchre ("%prep_cebi", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_cebi", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_cebi", "(balm|salve)") then var consume rub SAVE cebi matchre heal_ext_scar ...wait matchre int_scar ^You apply|^You drink|^You eat|^You take matchre rub_cebi ^Rub what matchre need_cebi ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my cebi %prep_cebi matchwait rub_cebi: send get my cebi %prep_cebi matchre need_cebi ^What were you referring matchwait 1 send rub my cebi %prep_cebi waitforre ^You rub send stow my cebi %prep_cebi waitforre ^You put|^You stow|^That was the last|^Stow what need_cebi: setvar need_cebi 1 int_scar: if (%int_scar = 1) then GOTO heal_int_scar GOTO supplies heal_int_scar: if matchre ("%prep_hisan", "(ale|brandy|coffee|drink|elixir|kefir|mash|mead|potion|smoothie|solution|tea|tincture)") then var consume drink if matchre ("%prep_hisan", "(berries|berry|bread|brownie|butter|cake|cookie|cornbread|flower|grass|jam|leaf|moss|paste|pie|pollen|porridge|powder|puff-pastry|pulp|root|sap|sauce|scone|spread|stem|sticky-bun|tart|yogurt)") then var consume eat if matchre ("%prep_hisan", "(balm|salve)") then var consume rub SAVE hisan matchre heal_int_scar ...wait matchre supplies ^You apply|^You drink|^You eat|^You take matchre rub_hisan ^Rub what matchre need_hisan ^Drink what|^Eat what|^What were you referring|^Please rephrase that command send %consume my hisan %prep_hisan matchwait rub_hisan: send get my hisan %prep_hisan matchre need_hisan ^What were you referring matchwait 1 send rub my hisan %prep_hisan waitforre ^You rub send stow my hisan %prep_hisan waitforre ^You put|^You stow|^That was the last|^Stow what goto supplies need_hisan: setvar need_hisan 1 #Report on missing herbs supplies: echo echo You are missing the following herbs: echo if (%need_nemoih = (1) then { ECHO nemoih (external head wounds) } if (%need_eghmok = (1) then { ECHO eghmok (internal head wounds) } if (%need_sufil = (1) then { ECHO sufil (external eye wounds) } if (%need_aevaes = (1) then { ECHO aevaes (internal eye wounds) } if (%need_georin = (1) then { ECHO georin (external neck wounds) } if (%need_riolur = (1) then { ECHO riolur (internal neck wounds) } if (%need_plovik = (1) then { ECHO plovik (external chest wounds) } if (%need_ithor = (1) then { ECHO ithor (internal chest wounds) } if (%need_nilos = (1) then { ECHO nilos (external abdomen wounds) } if (%need_muljin = (1) then { ECHO muljin (internal abdomen wounds) } if (%need_hulnik = (1) then { ECHO hulnik (external back wounds) } if (%need_blocil_or_junliar = (1) then { ECHO blocil or junliar (internal back wounds) } if (%need_jadice = (1) then { ECHO jadice (external limb wounds) } if (%need_yelith = (1) then { ECHO yelith (internal limb wounds) } if (%need_aloe = (1) then { ECHO aloe (skin wounds) } if (%need_lujeakave = (1) then { ECHO lujeakave (nerve wounds) } if (%need_cebi = (1) then { ECHO cebi (external scars) } if (%need_hisan = (1) then { ECHO hisan (internal scars) } goto end set_ext_scar: setvar ext_scar 1 return set_int_scar: setvar int_scar 1 return ScriptError: ECHO ********************************* ECHO *** Usage: ECHO *** To see which herbs you need: ECHO *** .herb check ECHO *** To heal: ECHO *** .herb ECHO ********************************* goto end end: