Health-Walk Shard (script)
Jump to navigation
Jump to search
Run this Genie3 script anywhere in Shard to start health-walking. I've avoided popular destinations such as the bazaar tent and gem-selling room, because health-walking tends to annoy the occupants.
The script uses cambrinth. You need to open your character's variables file and define variables for cambrinth and hum. For example:
#var {cambrinth} {kingsnake armband} #var {hum} {bolero}
I also recommend adding my humming triggers:
#trigger {^You finish humming} {#send hum $hum} #trigger {^You should stop playing before you do that} {#send stop hum;#send 1 $lastcommand}
You must be using my map to run this script.
Script
action send 1 $lastcommand when ^(\.\.\.wait|Sorry\,) setvariable gs avenger put arrive2 put avoid !drag waitforre ^You're now avoiding put avoid !hold waitforre ^You're now avoiding put avoid !join waitforre ^You're now avoiding send ask %gs for leave waitforre ^With a sad look, (a|an) .+ (avenger|colepexy|dirnel|guardian|narmorbreth|woodwisp)|^To whom are you speaking send close my compendium waitforre ^You close|^That is already|^What were send stow right waitforre ^You put|^Stow what send stow left waitforre ^You put|^Stow what send hum $hum waitforre ^You begin to hum|^You are already performing something send open my compendium pause put #mapper load Map67_Shard put look action put #queue clear;send $lastcommand when ^(\.\.\.wait|Sorry,) goto PERC1 COMP: if ($Scholarship.LearningRate >= 34) && ($First_Aid.LearningRate >= 34) || ($First_Aid.LearningRate >= 34) then goto MAGIC if ("$righthandnoun" = "$cambrinth") then put stow my $cambrinth put get my compendium waitforre o put turn my compendium waitforre o put study my compendium wait pause .2 goto HPERC MAGIC: if ($mana < 85) then goto APPRAISE else if ($Harness_Ability.LearningRate >= 34) && ($Arcana.LearningRate >= 34) && ($Primary_Magic.LearningRate >= 34) then goto COMP if ("$righthandnoun" = "compendium") then put stow my compendium send stop hum waitforre ^You stop|^In the name put prep GS wait put charge my $cambrinth 11 waitfor Roundtime pause .1 pause .1 put focus my $cambrinth gs1: pause 2 match gs2 not understanding your question. match castgs1 ^With a sad look put ask %gs for leave castgs1: matchwait 1.5 put cast %gs waitforre ^With a warrior's calm|^With a gracious smile|^A spotted fungus colepexy gracefully flitters into the area^Howling, a hairy dog-faced dirnel bounds in^A salty bulbous-eyed narmorbreth swims in|^Your heart skips a beat, but you are unable send hum $hum waitforre ^You begin to hum|^You are already performing something goto HPERC gs2: pause 2 match gs3 not understanding your question. match castgs2 ^With a sad look put ask second %gs for leave castgs2: matchwait 1.5 put cast %gs waitforre ^With a warrior's calm|^With a gracious smile|^A spotted fungus colepexy gracefully flitters into the area^Howling, a hairy dog-faced dirnel bounds in^A salty bulbous-eyed narmorbreth swims in|^Your heart skips a beat, but you are unable send hum $hum waitforre ^You begin to hum|^You are already performing something goto HPERC gs3: pause 2 match gs1 not understanding your question. match castgs3 ^With a sad look put ask second %gs for leave castgs3: matchwait 1.5 put cast %gs waitforre ^With a warrior's calm|^With a gracious smile|^A spotted fungus colepexy gracefully flitters into the area^Howling, a hairy dog-faced dirnel bounds in^A salty bulbous-eyed narmorbreth swims in|^Your heart skips a beat, but you are unable send hum $hum waitforre ^You begin to hum|^You are already performing something goto HPERC APPRAISE: if ($Appraisal.LearningRate >= 34) then goto FORAGE if matchre ("$monsterlist", "(%gs)") then goto APPRAISE2 waitforre ^With a warrior's calm|^With a gracious smile|^A spotted fungus colepexy gracefully flitters into the area^Howling, a hairy dog-faced dirnel bounds in^A salty bulbous-eyed narmorbreth swims in APPRAISE2: send appraise %gs quick wait pause return goto HPERC FORAGE: if ($Perception.LearningRate >= 34) then goto OTHER send collect torn cloth wait pause send collect torn cloth wait pause KICK: send kick pile waitforre Assuming you mean a pile|^I could not find what you were referring to send kick pile waitforre Assuming you mean a pile|^I could not find what you were referring to goto HPERC OTHER: pause 5 goto HPERC HPERC: pause .5 match %s You're not ready to do that again, yet. match RETURN You close your eyes, drawing all your thoughts inward, put perceive health matchwait PHMOVE: pause .5 put #mapper walk %ROOMID waitfor %ROOMDESC pause .5 return RETURN: pause .5 return PERC1: save COMP var ROOMID 227 var ROOMDESC Stormwill Tower, Entrance Hall gosub PHMOVE gosub HPERC PERC2: save MAGIC var ROOMID 209 var ROOMDESC Zerek's General Store gosub PHMOVE gosub HPERC PERC3: save APPRAISE var ROOMID 345 var ROOMDESC Painted Ladies Design gosub PHMOVE gosub HPERC PERC4: save FORAGE var ROOMID 268 var ROOMDESC Brickwell Tower, Guildmaster's Office gosub PHMOVE gosub HPERC PERC5: save COMP var ROOMID 341 var ROOMDESC Sister Imadrail's Emporium gosub PHMOVE gosub HPERC PERC6: save MAGIC var ROOMID 281 var ROOMDESC Province of Ilithi, Citizenship Office gosub PHMOVE gosub HPERC PERC7: save APPRAISE var ROOMID 569 var ROOMDESC Budd's Barber Shop gosub PHMOVE gosub HPERC PERC8: save FORAGE var ROOMID 567 var ROOMDESC Bettin' Birdies, The Casino gosub PHMOVE gosub HPERC PERC9: save COMP var ROOMID 549 var ROOMDESC The Heraldry Shop gosub PHMOVE gosub HPERC PERC10: save MAGIC var ROOMID 550 var ROOMDESC Blazons and Banners gosub PHMOVE gosub HPERC PERC11: save APPRAISE var ROOMID 553 var ROOMDESC Coin of the Realm gosub PHMOVE gosub HPERC PERC12: save FORAGE var ROOMID 153 var ROOMDESC Aelik's Pawn gosub PHMOVE gosub HPERC PERC13: save COMP var ROOMID 152 var ROOMDESC Balint's Tiles gosub PHMOVE gosub HPERC PERC14: save MAGIC var ROOMID 150 var ROOMDESC Mirrors by Noelle gosub PHMOVE gosub HPERC PERC15: save APPRAISE var ROOMID 172 var ROOMDESC Liani's Heaven, Private Table gosub PHMOVE gosub HPERC PERC16: save FORAGE var ROOMID 259 var ROOMDESC Tower of Honor, Guildleader's Office gosub PHMOVE gosub HPERC PERC17: save COMP var ROOMID 175 var ROOMDESC A Grand Entrance gosub PHMOVE gosub HPERC PERC18: save MAGIC var ROOMID 176 var ROOMDESC Seats of Plenty gosub PHMOVE gosub HPERC PERC19: save APPRAISE var ROOMID 177 var ROOMDESC Golden Phoenix, Front Desk gosub PHMOVE gosub HPERC PERC20: save FORAGE var ROOMID 178 var ROOMDESC Golden Phoenix, Tavern Room gosub PHMOVE gosub HPERC PERC21: save COMP var ROOMID 315 var ROOMDESC Temple of Darkness, Glassus' Shop gosub PHMOVE gosub HPERC PERC22: save MAGIC var ROOMID 206 var ROOMDESC Shard's Osut'vie gosub PHMOVE gosub HPERC gosub skill.check goto PERC1 skill.check: if $Empathy.LearningRate > 33 then goto end else return end: send echo YOU ARE MIND LOCKED IN EMPATHY. put arrive1 put avoid all waitforre ^All AVOID options cleared send ask %gs for leave waitforre ^With a sad look, (a|an) .+ (avenger|colepexy|dirnel|guardian|narmorbreth|woodwisp)|^To whom are you speaking send close my compendium waitforre ^You close|^That is already|^What were send stow right waitforre ^You put|^Stow what send stow left waitforre ^You put|^Stow what put .idle