Health-Walk Shard (script)
Health-Walk Shard (script) | |
---|---|
Category | training |
Front-end | Genie |
Author | Isharon |
Run this script anywhere in Shard 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.
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 my map to run this script.
Updates
01/24/2011: Updated the script to work with VTCifer's map of Shard (in the latest Genie map bundle).
Script
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 488 var ROOMDESC Stormwill Tower, Entrance Hall gosub PHMOVE gosub HPERC PERC2: save MAGIC var ROOMID 452 var ROOMDESC Zerek's General Store gosub PHMOVE gosub HPERC PERC3: save APPRAISE var ROOMID 574 var ROOMDESC Painted Ladies Design gosub PHMOVE gosub HPERC PERC4: save FORAGE var ROOMID 508 var ROOMDESC Brickwell Tower, Guildmaster's Office gosub PHMOVE gosub HPERC PERC5: save COMP var ROOMID 436 var ROOMDESC Sister Imadrail's Emporium gosub PHMOVE gosub HPERC PERC6: save MAGIC var ROOMID 548 var ROOMDESC Province of Ilithi, Citizenship Office gosub PHMOVE gosub HPERC PERC7: save APPRAISE var ROOMID 215 var ROOMDESC Budd's Barber Shop gosub PHMOVE gosub HPERC PERC8: save FORAGE var ROOMID 225 var ROOMDESC Bettin' Birdies, The Casino gosub PHMOVE gosub HPERC PERC9: save COMP var ROOMID 221 var ROOMDESC The Heraldry Shop gosub PHMOVE gosub HPERC PERC10: save MAGIC var ROOMID 220 var ROOMDESC Blazons and Banners gosub PHMOVE gosub HPERC PERC11: save APPRAISE var ROOMID 208 var ROOMDESC Coin of the Realm gosub PHMOVE gosub HPERC PERC12: save FORAGE var ROOMID 158 var ROOMDESC Aelik's Pawn gosub PHMOVE gosub HPERC PERC13: save COMP var ROOMID 164 var ROOMDESC Balint's Tiles gosub PHMOVE gosub HPERC PERC14: save MAGIC var ROOMID 181 var ROOMDESC Mirrors by Noelle gosub PHMOVE gosub HPERC PERC15: save APPRAISE var ROOMID 249 var ROOMDESC Liani's Heaven, Private Table gosub PHMOVE gosub HPERC PERC16: save FORAGE var ROOMID 243 var ROOMDESC Tower of Honor, Guildleader's Office gosub PHMOVE gosub HPERC PERC17: save COMP var ROOMID 487 var ROOMDESC A Grand Entrance gosub PHMOVE gosub HPERC PERC18: save MAGIC var ROOMID 483 var ROOMDESC Seats of Plenty gosub PHMOVE gosub HPERC PERC19: save APPRAISE var ROOMID 462 var ROOMDESC Golden Phoenix, Front Desk gosub PHMOVE gosub HPERC PERC20: save FORAGE var ROOMID 463 var ROOMDESC Golden Phoenix, Tavern Room gosub PHMOVE gosub HPERC PERC21: save COMP var ROOMID 395 var ROOMDESC Temple of Darkness, Glassus' Shop gosub PHMOVE gosub HPERC PERC22: save MAGIC var ROOMID 385 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 #mapper walk 43 waitfor Shard, West City Gates send hum $hum