#IF (!@czd_scripts) {#ALIAS csver {#EC;#EC Cosmo Drazi Scripts;#IF (@czd_scripts) {#FORALL {@czd_scripts} {#IF (%mod(%ismember(%i,@czd_scripts),2)) {#ECHOPROMPT %i v} {#ECHOPROMPT %i;#EC}}} {#EC No scripts are currently loaded.}};#VAR czd_scripts {FullHeal|2.8}} {#ADDITEM czd_scripts {FullHeal|2.8}};#ALIAS fw {#IF (!%trigger(fullheal)) {#VAR fhq @fhcount;#t+ fullwipe;#IF (%1) {diag %1} {diag me}}} {fhstuff};#ALIAS fh {#IF (!%trigger(fullwipe)) {#VAR fhq @fhcount;#t+ fullheal;#IF (%1) {diag %1} {diag me}}} {fhstuff};#ALIAS ffh {#IF (!%trigger(fullwipe)) {#t+ fullerheal;fh %1}} {fhstuff};#ALIAS fhq {#IF (!%trigger(fullwipe)) {#t+ fullheal;qd}} {fhstuff};#ALIAS add {#VAR fhqueue %dups(%additem(%lower(%1),@fhqueue));#EC Queued: %replace(@fhqueue,"|"," ")} {fhstuff};#ALIAS rem {#VA fhqueue %delitem(%lower(%1),@fhqueue);#VAR fhcount %numitems(@fhqueue);#EC Queued: %replace(@fhqueue,"|"," ")} {fhstuff};#ALIAS fhc {#VA fhcount 1;#VA fhq 1;#VA fhqueue me;#EC Queued: %replace(@fhqueue,"|"," ")} {fhstuff};#ALIAS fhs {#EC Queued: %replace(@fhqueue,"|"," ")} {fhstuff};#ALIAS qd {#VAR fhq 1;#VAR fhcount %numitems(@fhqueue);#FORALL {@fhqueue} {diag %i}} {fhstuff};#ALIAS fh? {#EC;#EC {Full Heal};#EC {---------};#EC {fh : Fullheals name};#EC {ffh : Fullheals name (and removes blindness and deafness)};#EC {fw : Removes helpful afflictions (deafness, blindness, insomnia)};#EC { from name};#EC {};#EC {add : Adds name to queue};#EC {rem : Removes name from queue};#EC {qd : Diagnoses all names in queue};#EC {fhq : Fullheals all in queue};#EC {fhs : Shows current queue};#EC {fhc : Resets queue to "me"};#EC {};#EC {fh? : This help file};#EC {fhinfo : Info on FullHeal};#EC {};#EC {For help on use, refer to http://www.geocities.com/cosmo_drazi/achaea/fullheal.html}} {fhstuff};#ALIAS fhinfo {#EC;#EC { Full Heal};#EC { Version %item(@czd_scripts,%ismember(FullHeal,@czd_scripts)+1)};#EC;#EC { By Tim Manwill};#EC { Cosmo_Drazi~@geocities.com};#EC;#EC {http://www.geocities.com/};#EC { cosmo_drazi/achaea/fullheal.html}} {fhstuff};#VAR fullheal {me} {_nodef} {fhstuff};#VAR fhq {1} {_nodef} {fhstuff};#VAR fhcount {1} {_nodef} {fhstuff};#VAR fhqueue {me} {_nodef} {fhstuff};#VAR cfire {0} {_nodef} {fhstuff};#VAR cearth {0} {_nodef} {fhstuff};#VAR cwater {0} {_nodef} {fhstuff};#VAR cair {0} {_nodef} {fhstuff};#VAR cspirit {0} {_nodef} {fhstuff};#VAR cneed {} {_nodef} {fhstuff};#TRIGGER {You have harnessed the power of} {#VA cair 0;#VA cearth 0;#VA cfire 0;#VA cwater 0;#VA cspirit 0;#T+ fhchannels} {fhstuff} 517;#TRIGGER {^%dh, %dm} {#t- fhchannels} {fhchannels} 517;#TRIGGER {^({Air|Earth|Fire|Water|Spirit})} {#va c%lower(%1) 1} {fhchannels} 517;#TRIGGER {{You feel your insides clench as your soul is frozen|You have been slain}} {#VA cair 0;#VA cearth 0;#VA cfire 0;#VA cwater 0;#VA cspirit 0} {fhstuff} 517;#TRIGGER {{You have the skill to heal the following afflictions|You possess the following abilities in Healing}} {#t+ fhupdate} {fhstuff} 517;#TRIGGER {^%dh, %dm} {#IF (@fhq = @fhcount) {#t- fullheal;#t- fullwipe;#t- fullerheal;#IF (@cneed != "") {#IF (%ismember("a",@cneed)) {#VA cneed {%additem("Air",%delitem("a",@cneed))}};#IF (%ismember("e",@cneed)) {#VA cneed {%additem("Earth",%delitem("e",@cneed))}};#IF (%ismember("f",@cneed)) {#VA cneed {%additem("Fire",%delitem("f",@cneed))}};#IF (%ismember("w",@cneed)) {#VA cneed {%additem("Water",%delitem("w",@cneed))}};#EC You require: %trimleft(%trimright(%replace(@cneed,"|"," ")))};#VA cneed "";#t- fhoff} {#ADD fhq 1}} {fhoff} 517;#TRIGGER {{Whom do you wish to diagnose|You must regain equilibrium first.|You must have a spirit channel open| must be in the local area for your remote diagnosis|You must regain balance first.}} {#t+ fhoff} {fullheal} 517;#TRIGGER {(%w) is:} {#VAR fullheal %1;#t+ fhoff} {fullheal} 517;#TRIGGER {You are:} {#VAR fullheal me;#t+ fhoff} {fullheal} 517;#TRIGGER {{Whom do you wish to diagnose|You must regain equilibrium first.|You must have a spirit channel open}} {#IF (@fhq = @fhcount) {#t- fullheal;#t- fullwipe;#t- fullerheal;#t- fhoff} {#ADD fhq 1}} {fullwipe} 517;#TRIGGER {(%w) is:} {#VAR fullheal %1;#t+ fhoff} {fullwipe} 517;#TRIGGER {You are:} {#VAR fullheal me;#t+ fhoff} {fullwipe} 517;#TRIGGER {^%dh, %dm} {#t- fhupdate} {fhupdate} 517;#TEMP {Animals} {#TRIGGER {repulsed by animals} {#IF (@cair & @cwater) {heal @fullheal animals} {#IF (%ismember("a",@cneed)) {} {#IF !@cair {#VA cneed %additem("a",@cneed)}};#IF !@cwater {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Anorexia} {#TRIGGER {anorexic} {#IF (@cair & @cearth) {heal @fullheal anorexia} {#IF (%ismember("a",@cneed)) {} {#IF !@cair {#VA cneed %additem("a",@cneed)}};#IF !@cearth {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Arms} {#TRIGGER {afflicted by a crippled * arm} {#IF (@cearth) {heal @fullheal arms} {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Asthma} {#TRIGGER {afflicted by horrible asthma} {#IF (@cair) {heal @fullheal asthma} {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Berserk} {#TRIGGER {^berserk} {#IF (@cair) {heal @fullheal berserk} {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Blindness} {#TRIGGER {^blind} {#IF (@cearth) {heal @fullheal blindness} {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}} {fullerheal} 517;#TRIGGER {^blind} {#IF (@cearth) {heal @fullheal blindness} {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}} {fullwipe} 517} {fhupdate} 517;#TEMP {Burning} {#TRIGGER {ablaze} {#IF (@cearth & @cwater) {heal @fullheal burning} {#IF !@cearth {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}};#IF !@cwater {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Claustrophobia} {#TRIGGER {claustrophobic} {#IF (@cfire & @cwater) {heal @fullheal claustrophobia} {#IF (%ismember("f",@cneed)) {} {#IF !@cfire {#VA cneed %additem("f",@cneed)}};#IF !@cwater {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Clumsiness} {#TRIGGER {afflicted with clumsiness} {#IF (@cair & @cwater) {heal @fullheal clumsiness} {#IF (%ismember("a",@cneed)) {} {#IF !@cair {#VA cneed %additem("a",@cneed)}};#IF !@cwater {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Confusion} {#TRIGGER {confused} {#IF (@cfire) {heal @fullheal confusion} {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Darkshade} {#TRIGGER {allergic to sunlight} {#IF (@cearth & @cfire) {heal @fullheal darkshade} {#IF (%ismember("e",@cneed)) {} {#IF !@cearth {#VA cneed %additem("e",@cneed)}};#IF !@cfire {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Deafness} {#TRIGGER {^deaf} {#IF (@cair) {heal @fullheal deafness} {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}}} {fullerheal} 517;#TRIGGER {^deaf} {#IF (@cair) {heal @fullheal deafness} {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}}} {fullwipe} 517} {fhupdate} 517;#TEMP {Dementia} {#TRIGGER {demented} {#IF (@cfire) {heal @fullheal dementia} {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Dizziness} {#TRIGGER {overcome by dizziness} {#IF (@cwater) {heal @fullheal dizziness} {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Epilepsy} {#TRIGGER {suffering from epilepsy} {#IF (@cair & @cfire) {heal @fullheal epilepsy} {#IF (%ismember("a",@cneed)) {} {#IF !@cair {#VA cneed %additem("a",@cneed)}};#IF !@cfire {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Fear} {#TRIGGER {afflicted by fear} {#IF (@cwater) {heal @fullheal fear} {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Generosity} {#TRIGGER {extremely generous} {#IF (@cearth) {heal @fullheal generosity} {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Hallucinations} {#TRIGGER {hallucinating} {#IF (@cearth) {heal @fullheal hallucinations} {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Insomnia} {#TRIGGER {an insomniac} {#IF (@cair) {heal @fullheal insomnia} {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}}} {fullwipe} 517} {fhupdate} 517;#TEMP {Impatience} {#TRIGGER {impatient} {#IF (@cfire) {heal @fullheal impatience} {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Legs} {#TRIGGER {afflicted by a crippled * leg} {#IF (@cair & @cearth) {heal @fullheal legs} {#IF !@cair {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}};#IF !@cearth {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Masochism} {#TRIGGER {masochistic} {#IF (@cair & @cfire) {heal @fullheal masochism} {#IF (%ismember("a",@cneed)) {} {#IF !@cair {#VA cneed %additem("a",@cneed)}};#IF !@cfire {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Mercy} {#TRIGGER {merciful indeed} {#IF (@cearth & @cfire) {heal @fullheal mercy} {#IF !@cearth {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}};#IF !@cfire {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Paranoia} {#TRIGGER {paranoid} {#IF (@cfire & @cwater) {heal @fullheal paranoia} {#IF (%ismember("f",@cneed)) {} {#IF !@cfire {#VA cneed %additem("f",@cneed)}};#IF !@cwater {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Paralysis} {#TRIGGER {paralysed} {#IF (@cfire) {heal @fullheal paralysis} {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Recklessness} {#TRIGGER {^reckless} {#IF (@cwater) {heal @fullheal recklessness} {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Slickness} {#TRIGGER {extremely oily} {#IF (@cearth) {heal @fullheal slickness} {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Stupidity} {#TRIGGER {unnaturally stupid} {#IF (@cwater) {heal @fullheal stupidity} {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Stuttering} {#TRIGGER {a stuttering fool} {#IF (@cfire) {heal @fullheal stuttering} {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Unconsciousness} {#TRIGGER {afflicted by lapses in consciousness} {#IF (@cearth & @cfire) {heal @fullheal unconsciousness} {#IF (%ismember("e",@cneed)) {} {#IF !@cearth {#VA cneed %additem("e",@cneed)}};#IF @cfire {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Vertigo} {#TRIGGER {afraid of heights} {#IF (@cearth & @cfire) {heal @fullheal vertigo} {#IF !@cearth {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}};#IF !@cfire {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Vomiting} {#TRIGGER {violently ill} {#IF (@cearth & @cwater) {heal @fullheal vomiting} {#IF !@cearth {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}};#IF !@cwater {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Weariness} {#TRIGGER {wearied in body} {#IF (@cfire) {heal @fullheal weariness} {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Shyness} {#TRIGGER {afflicted by unbearable shyness} {#IF (@cearth) {heal @fullheal shyness} {#IF (%ismember("e",@cneed)) {} {#VA cneed %additem("e",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Agoraphobia} {#TRIGGER {agoraphobic} {#IF (@cair & @cfire) {heal @fullheal agoraphobia} {#IF !@cair {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}};#IF !@cfire {#IF (%ismember("f",@cneed)) {} {#VA cneed %additem("f",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TEMP {Heroism} {#TRIGGER {afflicted by a hero-complex} {#IF (@cair) {heal @fullheal heroism} {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}}} {fullheal} 517} {fhupdate} 517;#TEMP {Loneliness} {#TRIGGER {very lonely} {#IF (@cair & @cwater) {heal @fullheal loneliness} {#IF !@cair {#IF (%ismember("a",@cneed)) {} {#VA cneed %additem("a",@cneed)}};#IF !@cwater {#IF (%ismember("w",@cneed)) {} {#VA cneed %additem("w",@cneed)}}}} {fullheal} 517} {fhupdate} 517;#TRIGGER {The power of air is harnessed to your will.} {#va cair 1} {fhstuff} 517;#TRIGGER {The strength of earth is at your command.} {#va cearth 1} {fhstuff} 517;#TRIGGER {Elemental fire burns at your behest.} {#va cfire 1} {fhstuff} 517;#TRIGGER {Purest water soothes you into calm.} {#va cwater 1} {fhstuff} 517;#TRIGGER {You merge the four elemental channels} {#va cspirit 1} {fhstuff} 517;#TRIGGER {You sever the link to the realm of %1.} {#va c%lower(%1) 0} {fhstuff} 517;#T+ fhstuff;#T- fullheal;#T- fullerheal;#T- fullwipe;#T- fhupdate;#T- fhoff;#t- fhchannels;#EC {FullHeal v%item(@czd_scripts,%ismember(FullHeal,@czd_scripts)+1) has been successfully installed};#EC {Type fh? for commands};#EC;#EC {Refer to http://www.geocites.com/cosmo_drazi/achaea/fullheal.html};#EC { for setup and usage documentation.};#EC (
geocities.com/southbeach/marina/4190/achaea) (
geocities.com/southbeach/marina/4190) (
geocities.com/southbeach/marina) (
geocities.com/southbeach)