Health-Walk Leth (script): Difference between revisions

From Elanthipedia
Jump to navigation Jump to search
No edit summary
Line 25: Line 25:
==Changelog==
==Changelog==


*'''08/27/2011''': Fixed a problem that caused the script to hang on appraisal training.
*'''08/05/2011''': Fixed avenger-related bug.
*'''08/05/2011''': Fixed avenger-related bug.
*'''03/30/2011''': The script will no longer hang if you fumble while humming.
*'''03/30/2011''': The script will no longer hang if you fumble while humming.
Line 30: Line 31:
==Script==
==Script==


<pre>setvariable gs avenger
<pre>put #clear main
setvariable gs avenger
put #class arrive off
put #class arrive off
put #class combat off
put #class rp on


put avoid !drag
put avoid !drag
Line 60: Line 64:
pause
pause


put #mapper load Map61_Leth_Deriel
put #mapper load Map61_Leth_Deriel
put look
put look
action put #queue clear;send $lastcommand when ^(\.\.\.wait|Sorry,)
action put #queue clear;send $lastcommand when ^(\.\.\.wait|Sorry,)


goto PERC1
goto PERC1


COMP:
COMP:
if ($Scholarship.LearningRate >= 34) && ($First_Aid.LearningRate >= 34) || ($First_Aid.LearningRate >= 34) then goto MAGIC
if ($Scholarship.LearningRate >= 34) && ($First_Aid.LearningRate >= 34) || ($First_Aid.LearningRate >= 34) then goto MAGIC
if ("$righthandnoun" = "$cambrinth") then put stow my $cambrinth
if ("$righthandnoun" = "$cambrinth") then put stow my $cambrinth
put get my compendium
put get my compendium
waitforre o
waitforre o
put turn my compendium
put turn my compendium
waitforre o
waitforre o
put study my compendium
put study my compendium
wait
wait
pause .2
pause .2
goto HPERC
goto HPERC


MAGIC:
MAGIC:
if ($mana < 85) then goto APPRAISE
if ($mana < 85) then goto APPRAISE
else if ($Harness_Ability.LearningRate >= 34) && ($Arcana.LearningRate >= 34) && ($Primary_Magic.LearningRate >= 34) then goto COMP
else if ($Harness_Ability.LearningRate >= 34) && ($Arcana.LearningRate >= 34) && ($Primary_Magic.LearningRate >= 34) then goto COMP
if ("$righthandnoun" = "compendium") then put stow my compendium
if ("$righthandnoun" = "compendium") then put stow my compendium
send stop hum
send stop hum
waitforre ^You stop|^In the name
waitforre ^You stop|^In the name
put prep GS
put prep GS
wait
wait
put charge my $cambrinth 11
put charge my $cambrinth 11
waitfor Roundtime
waitfor Roundtime
pause .1
pause .1
pause .1
pause .1
put focus my $cambrinth
put focus my $cambrinth
gs1:
gs1:
pause 2
pause 2
match gs2 not understanding your question.
match gs2 not understanding your question.
match castgs1 ^With a sad look
match castgs1 ^With a sad look
put ask %gs for leave
put ask %gs for leave
castgs1:
castgs1:
matchwait 1.5
matchwait 1.5
put cast %gs
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
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
send hum $hum
waitforre ^You .+ hum|^You are already performing something
waitforre ^You .+ hum|^You are already performing something
goto HPERC
goto HPERC
gs2:
gs2:
pause 2
pause 2
match gs3 not understanding your question.
match gs3 not understanding your question.
match castgs2 ^With a sad look
match castgs2 ^With a sad look
put ask second %gs for leave
put ask second %gs for leave
castgs2:
castgs2:
matchwait 1.5
matchwait 1.5
put cast %gs
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
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
send hum $hum
waitforre ^You .+ hum|^You are already performing something
waitforre ^You .+ hum|^You are already performing something
goto HPERC
goto HPERC


gs3:
gs3:
pause 2
pause 2
match gs1 not understanding your question.
match gs1 not understanding your question.
match castgs3 ^With a sad look
match castgs3 ^With a sad look
put ask second %gs for leave
put ask second %gs for leave
castgs3:
castgs3:
matchwait 1.5
matchwait 1.5
put cast %gs
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
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
send hum $hum
waitforre ^You .+ hum|^You are already performing something
waitforre ^You .+ hum|^You are already performing something
goto HPERC
goto HPERC

APPRAISE:
APPRAISE:
if ($Appraisal.LearningRate >= 34) then goto FORAGE
if ($Appraisal.LearningRate >= 34) then goto FORAGE
if matchre ("$monsterlist", "(%gs)") then goto APPRAISE2
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
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:
APPRAISE2:
send appraise %gs quick
send appraise %gs quick
wait
wait
pause
pause
return
return
goto HPERC
goto HPERC

FORAGE:
FORAGE:
if ($Perception.LearningRate >= 34) then goto OTHER
if ($Perception.LearningRate >= 34) then goto OTHER
send collect torn cloth
send collect torn cloth
wait
wait
pause
pause
send collect torn cloth
send collect torn cloth
wait
wait
pause
pause
KICK:
KICK:
send kick pile
send kick pile
waitforre Assuming you mean a pile|^I could not find what you were referring to
waitforre Assuming you mean a pile|^I could not find what you were referring to
send kick pile
send kick pile
waitforre Assuming you mean a pile|^I could not find what you were referring to
waitforre Assuming you mean a pile|^I could not find what you were referring to
goto HPERC
goto HPERC

OTHER:
OTHER:
pause 5
pause 5
goto HPERC
goto HPERC


HPERC:
HPERC:
pause .5
pause .5
match %s You're not ready to do that again, yet.
match %s You're not ready to do that again, yet.
match RETURN You close your eyes, drawing all your thoughts inward,
match RETURN You close your eyes, drawing all your thoughts inward,
put perceive health
put perceive health
matchwait
matchwait

PHMOVE:
PHMOVE:
pause .5
pause .5
put #mapper walk %ROOMID
put #mapper walk %ROOMID
waitfor %ROOMDESC
waitfor %ROOMDESC
pause .5
pause .5
return
return


RETURN:
RETURN:
pause .5
pause .5
return
return


PERC1:
PERC1:
save MAGIC
save FORAGE
var ROOMID 165
var ROOMID 165
var ROOMDESC Madame Orris' Perfumerie, Salon
var ROOMDESC Madame Orris' Perfumerie, Salon
Line 185: Line 189:


PERC2:
PERC2:
save APPRAISE
save COMP
var ROOMID 186
var ROOMID 186
var ROOMDESC Arthianna's Clinic, Healing Tent
var ROOMDESC Arthianna's Clinic, Healing Tent
Line 192: Line 196:


PERC3:
PERC3:
save FORAGE
save MAGIC
var ROOMID 157
var ROOMID 157
var ROOMDESC Khushi's, Back Room
var ROOMDESC Khushi's, Back Room
Line 199: Line 203:


PERC4:
PERC4:
save COMP
save APPRAISE
var ROOMID 170
var ROOMID 170
var ROOMDESC Ongadine's Garb and Gear, Showroom
var ROOMDESC Ongadine's Garb and Gear, Showroom
Line 206: Line 210:


PERC5:
PERC5:
save MAGIC
save FORAGE
var ROOMID 146
var ROOMID 146
var ROOMDESC Reena's Rainbow, Salesroom
var ROOMDESC Reena's Rainbow, Salesroom
Line 213: Line 217:


PERC6:
PERC6:
save APPRAISE
save COMP
var ROOMID 148
var ROOMID 148
var ROOMDESC Dove's Delightful Dwellings
var ROOMDESC Dove's Delightful Dwellings
Line 220: Line 224:


PERC7:
PERC7:
save FORAGE
save MAGIC
var ROOMID 151
var ROOMID 151
var ROOMDESC Sinjian's Bardic Requisites, Sales Room
var ROOMDESC Sinjian's Bardic Requisites, Sales Room
Line 227: Line 231:


PERC8:
PERC8:
save COMP
save APPRAISE
var ROOMID 154
var ROOMID 154
var ROOMDESC Blanca's Basketry and Wickerworks, Showroom
var ROOMDESC Blanca's Basketry and Wickerworks, Showroom
Line 234: Line 238:


PERC9:
PERC9:
save MAGIC
save FORAGE
var ROOMID 156
var ROOMID 156
var ROOMDESC Leth Deriel, Wooden Shack
var ROOMDESC Leth Deriel, Wooden Shack
Line 241: Line 245:


PERC10:
PERC10:
save APPRAISE
save COMP
var ROOMID 160
var ROOMID 160
var ROOMDESC Huyelm's Trueflight Bow and Arrow Shop, Salesroom
var ROOMDESC Huyelm's Trueflight Bow and Arrow Shop, Salesroom
Line 248: Line 252:


PERC11:
PERC11:
save FORAGE
save MAGIC
var ROOMID 162
var ROOMID 162
var ROOMDESC Morikai's, Salesroom
var ROOMDESC Morikai's, Salesroom
Line 259: Line 263:
skill.check:
skill.check:
if $Empathy.LearningRate > 33 then
if $Empathy.LearningRate > 33 then
goto end
goto end
else
else
return
return


end:
end:

Revision as of 22:42, 27 August 2011

Health-Walk Leth (script)
Category training
Front-end Genie
Author Isharon


Run this script anywhere in Leth Deriel to start health-walking. I've avoided popular destinations such as the gem-selling room, because health-walking tends to annoy the occupants.

This script trains the following skills: appraisal, arcana, empathy, first aid, foraging, harness ability, life magic, mechanical lore, perception, power perceive, scholarship, and vocals. You probably won't lock all of these skills while running this script, but it will keep them draining.

Required Genie Settings

The script hums and 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 the official Genie maps my map to run this script.

Changelog

  • 08/27/2011: Fixed a problem that caused the script to hang on appraisal training.
  • 08/05/2011: Fixed avenger-related bug.
  • 03/30/2011: The script will no longer hang if you fumble while humming.

Script

put #clear main
setvariable gs avenger
put #class arrive off
put #class combat off
put #class rp on

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 .+ hum|^You are already performing something

send open my compendium
pause

put #mapper load Map61_Leth_Deriel
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 .+ 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 .+ 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 .+ 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 FORAGE
var ROOMID 165
var ROOMDESC Madame Orris' Perfumerie, Salon
gosub PHMOVE
gosub HPERC

PERC2:
save COMP
var ROOMID 186
var ROOMDESC Arthianna's Clinic, Healing Tent
gosub PHMOVE
gosub HPERC

PERC3:
save MAGIC
var ROOMID 157
var ROOMDESC Khushi's, Back Room
gosub PHMOVE
gosub HPERC

PERC4:
save APPRAISE
var ROOMID 170
var ROOMDESC Ongadine's Garb and Gear, Showroom
gosub PHMOVE
gosub HPERC

PERC5:
save FORAGE
var ROOMID 146
var ROOMDESC Reena's Rainbow, Salesroom
gosub PHMOVE
gosub HPERC

PERC6:
save COMP
var ROOMID 148
var ROOMDESC Dove's Delightful Dwellings
gosub PHMOVE
gosub HPERC

PERC7:
save MAGIC
var ROOMID 151
var ROOMDESC Sinjian's Bardic Requisites, Sales Room
gosub PHMOVE
gosub HPERC

PERC8:
save APPRAISE
var ROOMID 154
var ROOMDESC Blanca's Basketry and Wickerworks, Showroom
gosub PHMOVE
gosub HPERC

PERC9:
save FORAGE
var ROOMID 156
var ROOMDESC Leth Deriel, Wooden Shack
gosub PHMOVE
gosub HPERC

PERC10:
save COMP
var ROOMID 160
var ROOMDESC Huyelm's Trueflight Bow and Arrow Shop, Salesroom
gosub PHMOVE
gosub HPERC

PERC11:
save MAGIC
var ROOMID 162
var ROOMDESC Morikai's, Salesroom
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 #class arrive on
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

send hum $hum