Health-Walk Shard (script): Difference between revisions

From Elanthipedia
Jump to navigation Jump to search
(Created page with '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 …')
 
(Redirected page to Health-Walk Suite (script))
 
(16 intermediate revisions by the same user not shown)
Line 1: Line 1:
#REDIRECT [[Health-Walk Suite (script)]]
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.<br>
<br>
The script uses cambrinth. You need to open your character's variables file and define variables for cambrinth and hum. For example:

<pre>#var {cambrinth} {kingsnake armband}
#var {hum} {bolero}</pre>

I also recommend adding my humming triggers:

<pre>#trigger {^You finish humming} {#send hum $hum}
#trigger {^You should stop playing before you do that} {#send stop hum;#send 1 $lastcommand}</pre>

'''You must be using [http://www.elanthia.org/GenieSettings/#Maps my map] to run this script.'''

==Script==

<pre>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</pre>

[[Category:Scripts]]

Latest revision as of 17:54, 4 March 2016